Déclaration des zones de sortie en RPG-IV (spécif O) RPG ! RPG-IV ! INTERNE ! EXTERNE -----!---------!----------------------------!----------------------------------- 6 ! 6 ! O ! O ! Niveau fichier 7-14 ! 7-16 ! nom du fichier ! nom du format ! ! ! 14-16! 16-18 ! AND/OR ! idem ! ! ! 15 ! 17 ! Type de sortie ! idem ! ! H/D = entète/détail ! ! ! T = sortie total ! ! ! E = sortie EXCEPT. ! ! ! ! 16-18! 18-20 ! ADD/DEL ! idem ! ! ! 16 ! 18 ! F = Fetch overflow ! blanc ! ! appel anticipé de la ! ! ! routine de saut de page. ! ! ! R = libération de l'unité ! ! ! ! |
RPG ! RPG-IV ! INTERNE ! EXTERNE -----!---------!----------------------------!----------------------------------- 23-31! 21-29 ! indicateurs de sortie ! idem ! ! ! 32-37! 30-39 ! Nom pour EXCEPT ! idem ! ! ! 17-22! 40-51 ! espaces et sauts ! blanc 17 ! 40-42 ! SPACEB (0-255) ! 18 ! 43-45 ! SPACEA (0-255) ! 19-20! 46-48 ! SKIPB (1-255) ! 21-22! 49-51 ! SKIPA (1-255) ! ! ! ! ! Niveau zones 32-31! 21-29 ! conditions ! blanc ! ! ! 32-37! 30-43 ! nom de zone ! idem ou *ALL ! ! ! 38 ! 44 ! édit-code ! blanc ! ! ! 39 ! 45 ! Mise à l'état initial ! idem ! ! (après) ! ! ! ! |
RPG ! RPG-IV ! INTERNE ! EXTERNE -----!---------!----------------------------!----------------------------------- 40-43! 47-51 ! Position de fin ! blanc ! ! ! 44 ! 52 ! type BLANC = car. ! blanc ! ! A = car. ! ! ! L/R = signe à G/D ! ! ! B = binaire ! ! ! P = packé ! ! ! S = étendu ! ! ! G = DBCS ! ! ! D = date ! ! ! T = heure ! ! ! Z = horodatage ! ! !(V3R70) F = scientifique ! ! ! ! 45-70! 53-80 ! constante ! blanc ! ! ou ! ! ! Mot d'édition ! ! ! ou ! ! ! format date/heure<sép.> ! -----!---------!----------------------------!----------------------------------- |