Codes opération RPG-IV ER =Erreur FD =Found NF =not found B = blanc NR =no record EOF =end of file BOF =begin ........................................................................... : f = /free : une colonne à blanc= non renseignable : : OK en V5 : renseignée = obligatoire, ( ) = facultatif : ........................................................................... : Code : Facteur 1 : Facteur 2 : zone result : > : < : = : :...........:.................:.................:.............:...:...:...: :f ACQ : nom d'unité : fichier WORKSTN : : :ER : : : ADD : (zone) : zone : somme : + : - : 0 : : ADDDUR : date/heure : durée:code : date/heure : :ER : : : ALLOC : : longueur : pointeur : :ER : : : ANDxx : opérande : opérande : : : : : :f BEGSR : sous-pgm : : : : : : : CABxx : opérande : opérande : label : > : < : = : : CALL : : nom de pgm : (plist) : :ER :LR : : CALLB(D) : : procedure/point.: (plist) : :ER :LR : : CASxx : opérande : opérande : sous-pgm : > : < : = : : CAT(P) : chaîne-1 : chaîne-2(:nb' '): chaîne-3 : : : : :f CHAIN(N) : argument : fichier ou fmt : (DS) :NR :ER : : :...........:.................:.................:.............:...:...:...: |
........................................................................... : Code : Facteur 1 : Facteur 2 : zone result : > : < : = : :...........:.................:.................:.............:...:...:...: : CHECK : chaîne : argument(:pos) : (position) : :ER :FD : : CHECKR : chaîne : argument(:pos) : (position) : :ER :FD : :f CLEAR : (*NOKEY) : structure/fmt : : : : : :f CLOSE : : fichier/*ALL : : :ER : : :f COMMIT : (frontière) : : : :ER : : : COMP : opérande : opérande : : > : < : = : : DEFINE : *LIKE : zone référencée : zone définie: : : : : " " : *DTAARA : nom data-area : nom-pgm : : : : :f DELETE : (argument) : nom fichier : :NR :ER : : : DIV(H) : divisé : diviseur : quotient : > : < : = : : DO : val-départ : val-limite : index : : : : : DOUxx : opérande : opérande : : : : : : DOWxx : opérande : opérande : : : : : :f DSPLY : message-id : message-queue : (réponse) : :ER : : :f ELSE : : : : : : : : END : : incrément (do) : : : : : : ENDCS : : : : : : : :f ENDDO : : incrément : : : : : :...........:.................:.................:.............:...:...:...: |
........................................................................... : Code : Facteur 1 : Facteur 2 : zone result : > : < : = : ........................................................................... :f ENDIF : : : : : : : :f ENDSL : : : : : : : :f ENDSR : (label)) : (retour) : : : : : :f EXCEPT : : nom-specif O : : : : : :f EXFMT : : format : : :ER : : :f EXSR : : sous-programme : : : : : : EXTRCT : : date/heure:code : résultat : : : : :f FEOD : : fichier : : :ER : : : GOTO : : label : : : : : : IFxx : opérande : opérande : :NR :ER : : :f IN : (*LOCK) : data area : : :ER : : :f ITER : : : : : : : : KFLD : : : zone clé : : : : : KLIST : nom-klist : : : : : : :f LEAVE : : : : : : : : LOOKUP : (tableau) : argument : tableau : > : < : = : : MOVE(P) : (fmt date/heure): origine : résultat : + : - :0,B: : MOVEL(P) : (fmt date/heure): origine : résultat : + : - :0,B: ........................................................................... |
........................................................................... : Code : Facteur 1 : Facteur 2 : zone result : > : < : = : ........................................................................... : MOVEA : : zone/tableau : zone/tableau: + : - :0,B: : MULT : multiplié : multiplicateur : résultat : + : - :0,B: : MVR : : : reste : + : - :0,B: : OCCUR : (occurence) : nom DS : (résultat) : :ER : : :f OPEN : : fichier : : :ER : : : ORxx : opérande : opérande : : : : : :f OTHER : : : : : : : :f OUT : (*LOCK) : data area : : :ER : : : PARM : (retour) : (envoi) : paramètre : : : : : PLIST : nom plist : : : : : : :f READ(N) : : fichier/fmt : (DS) : :ER :EOF: :f READC(N) : : format : : :ER :EOF: :f READE(N) : (argument) : fichier/fmt : (DS) : :ER :EOF: :f READP(N) : : fichier/fmt : (DS) : :ER :BOF: :f READPE(N): (argument) : fichier/fmt : (DS) : :ER :BOF: :f REL : unité : fichier : : :ER : : :f RESET : (*NOKEY) : structure/fmt : résultat : :ER : : :f RETURN : : : : : : : ........................................................................... |
........................................................................... : Code : Facteur 1 : Facteur 2 : zone result : > : < : = : ........................................................................... :f ROLBK : : : : :ER : : : SCAN : argument(:lg) : chaîne(:pos) : résultat : : :FD : :f SELECT : : : : : : : :f SETGT : argument : fichier/fmt : :NR :ER : : :f SETLL : arg(*START/*END): fichier/fmt : :NR :ER :FD : : SETOFF : : : :-- :-- :-- : : SETON : : : :-- :-- :-- : :f SORTA : : tableau : : : : : : SUB : (val.origine) : val.enlevée : résultat : : : : : SUBDUR : date/heure : durée:code : date/heure : :ER : : : ou : date/heure : date/heure : durée:code : :ER : : : SUBST(P) : lg à extraire : chaîne(:pos) : résultat : :ER : : : TAG : label : : : : : : : TESTN : : : var-char :NU :BN :BL : :f TEST(D| : format : : date ou : :ER : : : T|Z [E]): à vérifier : : char ou num.: :ER : : : TIME : : : résultat : : : : :f UNLOCK : : fichier/D-A : : :ER : : ........................................................................... |
........................................................................... : Code : Facteur 1 : Facteur 2 : zone result : > : < : = : ........................................................................... :f UPDATE : : fichier/fmt : (DS) : :ER : : : WHENxx : opérande : opérande : : : : : :f WRITE : : fichier/fmt : (DS) : :ER :EOF: : XFOOT : : tableau : somme : + : - : 0 : : XLATE : de:à : chaîne(:pos) : résultat : :ER :FD : : Z-ADD : : val. ajoutée : résultat : + : - : 0 : : Z-SUB : : val. soustraite : résultat : + : - : 0 : :...........:.................:.................:.............:...:...:...: les tests logiques "xx" sont : . EQ (=) . LT (<) . GT (>) . LE (<=) . GE (>=) . NE (<>) |