as400 - rpg iii - rpg iv

%ABS (Absolute Value of Expression) %ADDR (Get Address of Variable) %CHAR (Convert to Character Data) %DEC (Convert to Packed Decimal Format) %DECPOS (Get Number of Decimal Positions) %DIV (Return Integer Portion of Quotient) %EDITC (Edit Value Using...

+ OPTION(*SRCSTMT | *NOSRCSTMT)avec *SRCSTMT le compilateur génère une table de DEBUGou chaque instruction porte le N° de ligne sourceavec *NOSRCSTMT les lignes dans l'objet sont numérotées en séquence + OPTION(*DEBUGIO | *NODEBUGIO) avec *DEBUGIO le...

Ceci vous permettra de tester à l'issu d'un EXFMT : EXFMT ecranSELECTWHEN KEY = àF01EXSR ECR01F01 (touche de fonction F1) .... dans le RPG :FTFSIAIDEE CF E WORKSTN INFDS(INFECR) le /COPY INFECR **-------------------------------------------------------------**...

DPsds SDS * Nom de la procédure D PROCEDURE *PROC * code status D ERROR *STATUS * code status précédent D PRV_STATUS 16 20S 0 * numéro line selon source D LINE_NUM 21 28 * nom routine D ROUTINE *ROUTINE * nombre de paramètres reçus D PARMS *PARMS * type...

L’*INZSR : sert pour l’initialisation d’un programme. Cette routine est automatiquement appelée à l’entrée du programme, mais ne l’ai plus si le programme est géré en mode RETURN (*INRT = *ON et *INLR = *OFF) et non en mode CLOTURE (*INLR = *ON). Une...