PARTL ?~:PAY000001 D?~Pm?~ ==:ENTRY

?~`M . . . . . . . . . . . . RPGSRC ?~{. . . . . . . . . . . . . . PROGRAM1

C'E". . . . . . . . . . . . . PROGRAM1 D RPG 4

F3=Kv

F5="B

F6=!qq=

F9=ek

F10=dk

F11=D

<32. D?~Pm?~A;

T?~`MM?~{VNdk5#g{8(D5Z?~PmPQ-fZ,raT/x kD==#bJmzByPVf?~Pmu?,H'Z40F11=D1#9Cv /OBv/T/@?~Pm?~u?#

40F1=oz1i4PXKA;DE"#

40F3=Kv1Kv10Nq"5XA*<NqDA;# 40F5="B1e}A;ODdka>#

40F6=!qq=1xA0DFU !qq=1A;#TZ`M* PARTL D?~,;P ;vG<q=#

40F9=ek1r0F10=dk1+B?~{mSA?~Pm#C?~;;(*fZMI T+d{FmSA?~Pm#

40F11=D1Dk?~PmPD?~`X*DC'E"# 40F14=G<Fx1xA?~PmPDB;v?~# 40F21=4,1i4K DFU LrD4,#

40F23=>}1S?~PmP>}10PvD?~DG<#Y4 F23 7O>}Yw#

9&+BPu?mSA PAY000001 ?~Pm?~:

RPGSRC PROGRAM2 PROGRAM2 D RPG 4 RPGSRC PROGRAM3 PROGRAM3 D RPG

4

!\4T}ZKPD53a) DFU Lr(eNNT/VN,+T;Tb)A;(eK

BP&\#

Z8B ?~Pm?~"-rXFMDzY 93

Page 105
Image 105
IBM SB84-0449-00 manual 4TZKPD53a DFU LreNNT/VN,+TTbAeK BP&\#