Correspondances déclaration « colonné » free form

Les nouvelles déclarations free-form, ancienne « cartes » H, F, D sont remplacées par ctl-opt, dcl-f, dcl-s, dcl-ds, dcl-pr, dcl-pi…
En attendant de les connaître par cœur, voici une aide pour retrouver les correspondances avec l’ancien formalisme.

Data type Lettre ancienne forme Free-form syntax Examples
Alphanumeric A CHAR(len)
VARCHAR(len {: varying-size} )
DCL-S library CHAR(10);
DCL-S libfilembr VARCHAR(33);
DCL-S cmdparm VARCHAR(10:4);
UCS-2 C UCS2(len)
VARUCS2(len {: varying-size} )
DCL-S firstName UCS2(10);
DCL-S filePath VARUCS2(5000);
Graphic DBCS GRAPH(len)
VARGRAPH(len {: varying-size}
DCL-S firstName GRAPH(20);
DCL-S fullName VARGRAPH(50);
Indicator N IND DCL-S isValid IND;
Packed P PACKED(digits {:decimals} ) DCL-S numRecords PACKED(5);
DCL-S salary PACKED(15:2);
Zoned S ZONED(digits {: decimals} ) DCL-S numRecords ZONED(5);
DCL-S salary ZONED(15:2);
Binary B BINDEC(digits {: decimals} ) DCL-S numRecords BINDEC(9);
DCL-S bonus BINDEC(9:2);
Integer I INT(digits)
Digits can be 3, 5, 10, 20
DCL-S index INT(10);
Unsigned U UNS(digits)
Digits can be 3, 5, 10, 20
DCL-S count UNS(20);
Float F FLOAT(bytes)
Bytes can be 4, 8
DCL-S variance FLOAT(8);
Date D DATE { (format) } DCL-S duedate DATE;
DCL-S displayDate DATE(*YMD);
Time T TIME { (format) } DCL-S startTime TIME;
DCL-S displayTime TIME(*USA);
Timestamp Z TIMESTAMP DCL-S start TIMESTAMP;
Pointer * POINTER DCL-S pUserspace POINTER;
Procedure
pointer
* POINTER(*PROC) DCL-S pProc POINTER(*PROC);
Object O OBJECT{(*JAVA : class)} DCL-S obj OBJECT(*JAVA:'Cls');

IBM i gratuit

Vous souhaitez découvrir IBM i.

Vous voulez approfondir vos connaissances et les tester sur IBM i. Vous voulez écrire vos propres petites application.

Vous serez intéressés par un accès IBM i gratuit en 7.3.

Et bien RZKH l’a fait: Rendez-vous à cette adresse http://pub400.com/, et suivez le parcours fléché.

Vous trouverez toutes les instructions pour avoir un accès à PUB400.COM

  1. What is this all about?
    Énumère les raisons pour lesquelles vous souhaitez un accès IBM i.
  2. What can i do? What shouldn’t i do?
    Explique les conditions
  3. How to get started with a free account?
    Liste les clients qui donnent accès à ce serveur.
  4. SIGNUP
    Décrit ce qu’un compte vous apporte.
  5. click here
    Où vous allez entrer vos coordonnées pour obtenir un compte.
  6. New – Please click to verify your data
    Vous envoie un mail pour vérifier que vous êtes bien un humain.
  7. Un fois vérifié votre identité.
    Vous recevez un mail avec votre mot de passe pour accéder à PUB400.COM.
  8. Connectez-vous, changez de mot de passe et enjoy!

 

DCLPRCOPT : Option de compilation CLLE dans le source

Avant la 6.1, les options de compilations était à mémoriser pour les fois suivantes(Par exemple sous forme de commentaires dans le sources) et il fallait les ressaisir dans la commande de compilation à chaque fois.
Depuis la 6.1, c’est du passé et nous allons voir comment.
Elles peuvent être saisies dans le source avec la commande Declare Processing Options (DCLPRCOPT).

Voici un exemple:

DCLPRCOPT DFTACTGRP(*NO) ACTGRP(*NEW) BNDDIR(MYLIB/MYBNDDIR) 

 

Clef NIR, Numéro d’Inscription au Répertoire

Voici une requête exemple qui peut vous permettre de calculer la clef NIR en SQL: