9(}L4(D4D~I1?~D`MMoTI0&CLr*"\mwAPI1PDx(
|n8(#
"
BLDPART ;>}B"I1#*5w,Y(BLDPART 9(K;v4f"ZTs
rI1PD?~,"R9(dvGI1#g{YNwCBLDPART T9(,;?
~,x9(dvGm;vI1,r-<9(dvd*B"I1#BLDPART ;a}
%KB"I1#
9(f"Z4D~I1PD?~
9(}LQwT53a)D`M(gMSGF)Db?}C#;x,|
;
aQwm>Ts
`M(g*MSGF)DC'(e`M#g{Tb?==}CDTs;G53a)D?~`
M,rzI\aZ9((fPSU=;u/f{"#
g{(eK*+C'(e`MD?~w*SYSTYPE(*MBR) f"DTs`M,bm>
?~f"ZOS/400 4D~I1P#g{b)?~G4?~,r|GIBLDPART |
n9(,"R;\zI*PGM Ts#g{b)?~G|,?~,r;9(|G,bGr
*;\T|G(e9(|n#
g{4(D*PGM Ts;_PZ393Dm2PP>DdP;V`XoT,rh**
*PGM TsmSB`M,"*C`MmSBoT#
":g{LrTsITP=vr`vkd`X*D?~,rZ~vTsI\a2GZ
;vTs#
+9(!n?~kC'(e`MdO9C
1BLDPART |n9(_PC'(e`MD?~1,9(}L4TBNrLQwCZ9
(?~D|n:
1. Z9(!n?~PQwTZADDADMLANG |nDBLDCMD N}OdkDZ;
vV{.GE*7D|n#
2. g{Z9(!n?~PR=`%dD|n,r9CC|n49(?~#(9(!n
?~PD|nV{.|,DN}IT`ZzZADDADMLANG|nDBLDCMD N
}O8(D|nV{.y|,DN}#)
3. g{

R;=

`%dD|n,r9CzZADDADMLANG |nO8(D|nV{.
9(C?~#
>}
BP|nTOv5wxP5w#Y(zZADDADMLANG|nDBLDCMD N}O8
(KBP5#
BLDCMD('CRTPASPGM PGM(&L/&ZN) SRCFILE(&L/&F) SRCMBR(&ZN)')
;x,Z9(!n?~PR=TB|nV{.#
CRTPASPGM PGM(&L/&ZN) SRCFILE(&L/&F) SRCMBR(&ZN) TEXT('A sample Pascal
program')
Z11B9(&CLr153