Trailing-Edge
-
PDP-10 Archives
-
BB-T573C-DD_1986
-
5,17/ornmac.unv
There are 80 other files named ornmac.unv in the archive. Click here to see a list.
x
,R @ P Cv)6Q @ CBd)3P ' CJ9ip CRn:=P @EV6:=P @G"uZP @G"v<[P G4ulQ @ G>ih6P G>ihvp G>ilp G>ilwp G>il}p G>im p GHv8;P GHv:=P IvLuP I<[P @I1kp I1k2p I1lp I1l}p I1m p I6
xP IulwP Iv;wP Iv<[P IvLP 'IvLVP IX-]Q IX.M Q @ IXu]Q IXvM Q @ J:/
:P J:l P J:u|VP KK9 ,p})
XLIST
-
X AON,<Applica-0tion object block-P and object type -pblock not allowed. together in WTOR.0/WTO/ACK message>.P
X CMI,<Command.p message invalid>/
X UPO,<Unknown/0 processor object/P>
X UPT,<Uniden/ptified processor 0type>
X IPE,<OP00ERATOR privileges0P required>
X IO0pE,<Invalid OPR en1try>
X IFC,<Ill10egally formatted 1Pcommand message>
X IRS,<Illegal 2range specified>
X MTS,<Message 2Ptoo short>
X BM2pL,<Bad message le3ngth>
X CSU,<Ca30nnot send to spec3Pified user>
X N3pOM,<No outstandin4g messages>
X I40CS,<Invalid argum4Pent count specifi4ped in command>
5X IAL,<Invalid ar50gument length spe5Pcified>
X ITM,<5pInvalid type argu6ment in message>
X ONS,<OPR not 6Psetup .. command 6pignored>
X DTM,7<Duplicate type s70pecified in messa7Pge>
X WJP,<WTO,7p WTOR, or ACK job8 number field req80uires privileges>8P
X WTP,<WTO, WT8pOR or ACK object 9type field requir90es privileges>
9PX IWF,<Invalid WT9pO or WTOR field>
X WOP,<WTO, WTO:0R, or ACK object :Pblock field requi:pres privileges>
; X IOU,<Invalid o;0bject unit specif;Pied in object blo;pck>
X RIW,<Rang<e invalid in WTO,<0 WTOR or ACK obje<Pct block>
X OPD<p,<OPR pid already= defined>
X ISM=0,<OPR setup messa=Pge invalid .. OPR=p did not send hel>lo>
X OAS,<OPR >0already setup .. >POPR deleted>
X >pANI,<Application ?name invalid in a?0pplication hello ?Pmessage>
X ODE,?p<OPR Does not exi@st .. message not@0 sent>
X MTF,<W@PTO message type f@pield required witAh WT.SJI set>
XA0 IAC,<Invalid ackAPnowledgement codeAp .. code was zeroB>
X CNI,<CommanB0d not yet implemeBPnted>
X IPS,<InBpvalid pid for senCder .. pid was zeC0ro>
X ISC,<InvaCPlid switch specifCpied in command>
D X WNA,<Write to D0operator functionDP not allowed for Dpthis job>
X LNIE,<Logging not enaE0bled>
X RNA,<RaEPnge not allowed iEpn START command wFith /DEVICE>
X F0IQS,<Invalid queuFPe specified in coFpmmand>
X SUF,<EGRROR.SYS entry faG0iled on REPORT coGPmmand>
X IUM,<IGpnvalid user speciHfied in message>
X ARP,<ACK messHPages require WHEEHpL or OPERATOR priIvileges>
X NRW,I0<Notify message rIPequires WHEEL or IpOPERATOR privilegJes>
X JDE,<Job J0to be notified noJP longer exists>
Jp X NJD,<Job to beK notified is DETAK0CHED .. notify igKPnored>
X BNR,<BKpatch commands notL allowed from remL0ote nodes>
X NOLPD,<No operators dLpefined>
X DOL,<MDevice already onM0line .. command iMPgnored>
X SFF,<MpScheduler functioNns failed for SHON0W SCHEDULER commaNPnd>
X ORS,<SYSTNpEM, HOST or REMOTOE operator privilO0ege required>
XOP OHS,<SYSTEM or HOpOST operator privPilege required>
P0 X OSY,<SYSTEM opPPerator privilege Pprequired>
X SAFQ,<Send to ACTDAE Q0failed for SET USQPAGE command>
X QpCLO,<Can't locateR operator>
X SCR0N,< Specified CPURP not running >
RpX ICP,< Invalid CSPU number specifiS0ed >
X NRN,< NoSP CPUs will be ablSpe to run jobs .. Tcommand ignored >T0
X ACS,< All CPTPUs are already scTphedulable .. commUand ignored >
L IST
SALL
LKK| (i
XLIST
(IX E.NORM,<OPR ter()minated normally>*y
TOPS20 <
X E.O+PNF,<Unable to op+8en ^T/DCNDAT/>
X+X E.CONF,<Unable t+xo get connects fo,r ^T/DCNDAT/>
X ,8E.ACFL,<Unable to,X accept connects ,xfor server links>-
X E.OUTF,<Outpu-8t over link ^T/DC-XNDAT/ failed .. l-xink aborted>
X E..INPF,<Input over.8 server link fail.Xed .. link aborte.xd>
X E.STSF,<Sta/tus return for in/8put server link f/Xailed .. link abo/xrted>
X E.INVC,<0Invalid connect s08tatus ^O/ARG1/ ..0X link aborted>
>0x ;END TOPS20
X E1.EXIT,<EXIT comma18nd issued>
LI ST
SALL
LIKK9: 1
EXTERNQAL TXTTBL
EXTEpRNAL STSTBL
EXTERNAL ERRTBL
0EXTERNAL RPTERR
P DEFINE X(SUFFIXp,TEXT),<
EXTERNAL E$'SUFFIX
0> ;END X
ERRCDPS
ERRTXT
OR NMSG
XT
ORKKN UQ !
XLIST
X ACI,<ApplicatVion code ^D/G$ARGV01/ invalid .. WTOVP rejected>
X AHVpF,<Application ^TW/@APLNAM/ hello aW0cknowledgement faWPiled .. hello ignWpored>
X ANS,<ApXplication ^T/@APLX0NAM/ not signed oXPn yet .. WTO/WTORXp/ACK rejected>
YX CAS,<^W/G$ARG2/Y0 is already runniYPng jobs .. commanYpd ignored>
X CDZE,<^W/G$ARG2/ doeZ0s not exist>
X ZPCDN,<^W/G$ARG2/ iZps down .. command[ ignored>
X CNM[0,<^W/G$ARG2/ is a[Pn invalid CPU nam[pe>
X CPM,<WTO/W\TOR/ACK request f\0or ^T/@APLNAM/ ha\Ps different pid f\prom hello .. WTO ]rejected>
X CSF]0,<Class scheduler]P error: ^E/G$ARG1]p/>
X DDI,<Disk ^drive number ^D/G^0$ARG1/ invalid on^P SET command>
X^p DJF,<SET ONLINE _failed because ^E_0/G$ARG1/>
X DUF_P,<DEVTYP UUO fail_ped for device ^W/`G$ARG1/:>
X EDC`0,<Job scheduling `P^T/@G$ARG1/d for `pspecified CPU(s)>a
X IAP,<^T/@G$Aa0RG1/ is not runniaPng>
X ICN,<Chanapnel number ^D/G$AbRG1/ invalid on Sb0ET command>
X IbPDD,<^T/@G$ARG1/ ibps not a valid disck structure .. coc0mmand ignored>
cPX IDS,<^T/@G$ARG1cp/ is not supportedd for /DEVICE .. d0command ignored>
X IMT,<Illegal dpmessage type ^O/Ge$ARG1/>
X INS,<e0Operator at node eP^N/G$ARG1/ not enepabled for node ^Nf/G$ARG2/>
X INTf0,<Invalid node orfP no terminal linefps for node ^N/G$AgRG1/>
X ION,<OPg0R hello message ngPode ^N/G$ARG1/ ingpvalid .. OPR ignohred>
X IOT,<Invh0alid object type hP^O/G$ARG1/ specifhpied in message>
i X ISP,<Insufficii0ent privileges toiP set ^W/G$ARG1/>
X IRD,<Can't ^Tj/@G$ARG2/ a disk j0device (^W/G$ARG1jP/:)>
X ITD,<^T/jp@G$ARG1/ is not ak valid tape drivek0 .. command ignorkPed>
X LAO,<ORIOkpN log file ^F/LOGlFD/ already open l0.. command ignorelPd>
X LFE,<ORIONlp log error ^E/[-1m]/ .. logging dism0abled>
X MBP,<OmPRION must be [1,2mp] or JACCT to ^T/n@G$ARG1/ CPU job n0scheduling>
X MnPDA,<Can't ^T/@G$AnpRG2/ a device conotrolled by MDA (^o0W/G$ARG1/:)>
X oPMNV,<Message ^D/Gop$ARG1/ no longer pvalid .. sender hp0as gone away>
XpP NJA,<Can't ^T/@Gpp$ARG2/ device, ORqION not [1,2] or q0JACCT>
X NMC,<NqPo messages found qpwith code ^O/G$ARrG1/>
X NMN,<No r0messages for noderP ^N/G$ARG1/>
X rpNON,<No operatorss at node ^N/G$ARGs01/>
X NSM,<MesssPage ^D/G$ARG1/ dospes not exist>
Xt NTD,<^T/@G$ARG1/t0 is not a tape drtPive or valid strutpcture .. command uignored>
X OAE,u0<DN60 OPR at nodeuP ^N/G$ARG1/ alreaupdy exists>
X ONvE,<OPR not enablev0d for message ^D/vPG$ARG1/ at node ^vpN/G$ARG2/>
X OSwF,<OPR setup failw0ure for pid ^O/G$wPARG1/ .. OPR ignowpred>
X PER,<Comxmand error: ^T/@Gx0$ARG1/>
X RWF,<xP^T/@G$ARG1/ file xpretrieval waits fyailed ^E/[-2]/>
X SIC,<SET ONLIyPNE ^T/@G$ARG1/ chypannel number ^O/Gz$ARG2/ invalid>
z0 X SID,<SET ONLINzPE ^T/@G$ARG1/ devzpice number ^O/G$A{RG2/ invalid>
X{0 SJF,<SET JOB sch{Peduler error: ^E/{pG$ARG1/>
X SJN,|<SET JOB invalid |0.. job ^D/G$ARG1/|P not logged in>
|p X SPI,<SET prior}ity value ^D/G$AR}0G1/ invalid .. 63}P is maximum>
X }pSSF,<SET SCHEDULE~R error: ^E/G$ARG~01/>
X TAB,<TAKE~P command aborted ~pbecause ^T/@G$ARG1/ not running
0 on command "^T/@PG$ARG2/">
X UFRp,<UUO failed tryi ng to ^T/@G$ARG2/ 0 ^W/G$ARG1/:>
X P UUF,<SETUUO fail ped trying to ^T/@G$ARG1/ CPU job s0cheduling>
X WTPL,<WTO/WTOR messapge length ^D/G$ARG1/ exceeds max o0f ^D/[WTOMAX]/>
P X WVN,<Wrong ORNpMAC version number ORION used vers0ion ^O/[%%.OPR]/ Pand OPR used verspion ^O/.OHDRS+OPH.OV(MI)/>
LIST
SALL
LISTL;<rP L;<YP L;<I9P ! L;<\YP L;<kP '@L;=+qP @ L;=xUP " L;=xrP L;>-P L;>M P @L;>NP $ L;>N8P M:=P MF:=p M2
p P MR%eHQ MR& `P MR6L`P MRV>9P MS) P MS.[yQ N$ {`l
X <CAT| ALOG>,0,CATTAB,
|
X <CONFIG>,1,CN|@FTAB,CNFORN
X |`<LCP>,2,LCPTAB,LC} PORN
X <NCP>,3} ,NCPTAB,
X <QU}@OTA>,4,QUOTAB,
>,4,QUOTAB,
N%Iw ~ p X OPERAT X OPERATN:}KsQ O*6:=P S;:P SB I;P U
IjQp U
Ikp U
Il}p WMX4 PPul
X ALIGNP0,ALI
X BACKSPQACE,BKS
X CANQHCEL,CNC
X CLOQhSE,CLO
X CONTRINUE,CNT
X DER(LETE,DEL
IFN FRHTDN60,<
X DEFINRhE,DEF
> ;END FSTDN60
IFE FTDN60S(,<
TOPS10< X DEFSHINE,DEF >
> ;ENShD FTDN60
X DISATBLE,DIS
X DIST(MOUNT,DSM
X ETHNABLE,ENA
X EThNTER,ENT
X EXUIT,EXT
X FORWU(ARDSPACE,FWS
XUH HELP,HLP
X HUhOLD,HLD
X IDEVNTIFY,IDN
X MV(ODIFY,MOD
X MVHOUNT,MTN
X PAVhUSE,PAU
X PUSWH,PUS
X PRINTW(,PRT
TOPS10< XWH RECOGNIZE,REC > Wh
X RELEASE,RELX
X REPORT,RPTX(
X REQUEUE,REXHQ
X RESPOND,RXhSP
TOPS10< X RYESTRICT,RST >
Y( X RETURN,RTN
YH X ROUTE,RTE
YhX SEND,SND
X ZSET,SET
X SHZ(OW,SHW
X SHUTZHDOWN,SHD
X STZhART,STA
X SUB[MIT,SUB
X SUP[(PRESS,SUP
X T[HAKE,TAK
X UNL[hOAD,UNL
TOPS10\< X UNRESTRICT,UR\(S >
X WAIT,WAI\H
X SWITCH\h,SWI
X LO]CK,LOC
X UNLO](CK,ULC
X ]H<\"32>,CTZ
X NEXT,NXT
WMxU ^ut
X JOB,JO^(B
X OPERATOR^H,OPR
X TERMIN AL,TRM
RMINWN{y d(y
X AFTER,dHAFT
X <ANF-10dh>,ANF
X ALL,AeLL
X <ALL-MEe(SSAGES>,ALM
XeH <ALL-NODES>,ALG eh
X ASK,ASK f
X ATTRIBUTE,ATRf(
X(<BEGINNINGfH-OF>,BEG)
X <fhCONTROL-FILE>,CTLg
X COPY,CPY g(
X(<CURRENT-POSgHITION>,CUR)
X gh<CURRENT-REQUEST>h,ACR
X DAYTIMh(E,DAY
X DECNEhHT,DCN
X <DEFAhhULT-PPN>,DPP
iX <ERROR-MESSAGESi(>,ERM
X <EVERiHY-REQUEST>,AER ih
X FILE,FIL
jX (<FORMS-TYPE>,Fj(OT)
X IGNORE,jHIGN
X IMMEDIAjhTELY,IMM
X <JkOB-MESSAGES>,JOM k(
X KEYPAD,KPD kH
X (<LIMIT-EXCEkhEDED-ACTION>,LEA)l
X LINE,LIN l(
X LOG,LOG
lHX LOGGING,LGG
X (<MEMORY-LIMITmS>,MEM)
X MESm(SAGES,MSG
X (mH<NETWORK>,NET) mh
X NODE,NOD
nX NOKEYPAD,NKP n(
X(<NOOPR-INTERVnHENTION>,NOI)
Xnh <OPR-ACTION-MESSoAGES>,OAM
X <Oo(NLINE>,ONL
X(oH<OPR-INTERVENTIONoh>,OIA)
X OTHERp,OTH
X <OUTPUp(T-DISPLAY>,OPD pH
X(<OUTPUT-LIMITphS>,OPL)
X (<PqAGE-LIMITS>,PGL) q(
X PARAMETERS,qHPRM
X PRIORITqhY,PRI
X (<PRIrORITY-LIMITS>,PRLr()
X <REJECTIONrH-LIST>,REJ
X rhREQUEST,RQN
Xs QUEUE,QUE
IFs(N FTDQS,<
X SERVsHER,SRV
>
X SshITGO,SIT
X STtATUS,STS
X SYt(STEM,SYS
X <TtHAKE-COMMANDS>,TACth
X (<TIME-LIMuITS>,TIM)
X Tu(IMESHARING,TSR uH
X TO,TO
X uhTYPE,TYP
v;DN60 KEYWORDS
v(
IFN FTDN60,<
vHX <BYTES-PER-MESSvhAGE>,BPM
X <CLwEAR-SEND-DELAY>,Cw(SD
X <DATA-TERwHMINAL-READY>,DTR wh
X <EMULATION>,ExMU
X HASP,HSPx(
X OFF,OFF xH
X ON,ON
Xxh <RECORDS-PER-MESySAGE>,RPM
X SECy(ONDARY,SEC
X yH<SILO-WARNING-LEVyhEL>,SWL
z
X <TIMEOUT-CATEGz(ORY>,TOU
X <TRzHANSPARENCY>,TRA zh
X 2780,278
{X 3780,378
X {(CPU,CPU
X <D{HL10-PORT>,D10
X DTE,D20
|
> ;END FTDN60
|(
X <ACKNOWLED|HGED>,ACK
X <AL|hL-TAPE-DRIVES>,AT}P
X <ANSI>,ANS}(
X <AUTOMATIC}H-VOLUME-RECOGNITI}hON>,AVR
X <AVAI~LABLE>,AVA
X ~(<CHANNEL>,CHN
X <DRIVE>,DRV ~h
X <DISK-DRIVE>,DSK
X <DOMESTI(C>,DOM
X <EBCHDIC>,EBC
X <FhOREIGN>,FOR
X <INITIALIZE>,INI (
X NO,NO
HX <REGULATED>,REG h
X <SCRATCH>,SCR
X <STRUCT(URE>,STR
X <THAPE-DRIVE>,TAP
X <TOPS20>,T20
X <UNAVAILABLE(>,UAV
X UNIT,UHNI
X <ACTIVE-hSWAPPING-LIST>,ASL
X <CRASH-DUMP(-LIST>,CDL
X <HSYSTEM-SEARCH-LIShT>,SSL
;X <UNLABELED>,UNL
X( <UNREGULATED>,URHG
X <VOLUME-IDh>,VID
X YES,YES
X 200,200(
X 556,556 H
X 800,800 h
X 160,160
X 625,625
(
X <BIAS-CONHTROL>,BIA
X <ShCHEDULER>,SCH
X <NONE>,NON
X <BACKGROUND>,BHCK
X <CLASS>,ChLS
X <ACCOUNTS>,ACT
X <ALL(OCATED>,ALO
XH <WITHHELD>,WHD h
X <POLICY-PROG RAM>,PPR
(
X <AUTOMATIC-S HTRUCTURE-RECOGNIT hION>,ASR
X <SYS
TEM-LISTS>,SLS
(
X <INCLUDE>,INC
H
X <EXCLUDE>,E
hXC
X <ALLOCAT ION>,ALC
X <BA (TCH-REQUEST>,BRQ H
X <KSYS> h,KSY
X
<USAGE>,USG
X
( <BILLING-CLOSURE
H>,UBC
X <FILE-
hCLOSURE>,UFC
X<EVERY>,WKY
X <NOW>,NOW
X<DAILY>,DLY
X <BATMAX>,BMX
X <BATMIN(>,BMN
X <CORMHAX>,CMX
X <COhRMIN>,CMN
X <DATE>,DAT
X <(LOGMAX>,LMX
XH <SCHEDULE>,SCD h
X <JOB-SCHEDULING>,JSC
X <AL(L-CPUs>,ACP
XH <ONLY>,NLY
Xh <LISTS>,LST
STS>,LST
Y
um6Q @ [$ P [< P [Lui P [LvI9P [NF:=p [Nahrp [NaiVp [Naj2p [NajQp [NajZp [NakRp [Nalp [Nal}p [PvNP ' ]ah2p ]aiVp ]akVp ]akZp ]al}p ]tEHQ ]ukQ @ ]v>9Q ]!iUp ]!kp ]!lp ]!lpp ]!l}p ]$,}P ]>!h4p ]>!h7p ]>!hzp ]>!iVp ]>!k6p ]>!kVp ]>!kZp ]>!k\P ]>!kqp ]>!kxp ]>!l}p ]>!mp ]Pu[Q @ ]Vl P ]Vn<[P ^eyw 0 G$$LGN ^:d[PQ _t,yQ _v}Q ` _
QkRp _
Ql}p _
Qm p _
Qm7p _
U|W _v
X (<BATC_(H>,BAT)
X (<C_HARD-PUNCH>,CDP) _h
X <CARD-READER-`INTERPRETER>,BIN `(
X (<EVENT>,EVT)`H
X <FAL>,FAL `h
TOPS20 <
X <aFILE-RETRIEVAL>,Ra(ET
> ;END TOPaHS20
IFN FTFTS,<
X <FTS>,FTS
b> ;End of FTFTS cb(onditional
X <MObHUNT>,MNT
X (<bhPAPER-TAPE-PUNCH>c,PTP)
X PLOTTERc(,PLT
X PRINTEcHR,LPT
X READEchR,RDR ;READER
RDR ;READER
_
V:=p _@r Q _@r Q _@r Q _@r0 Q _@r@ Q _@t8Q > _@tZQ _@tEHQ _@u
zQ @ _@uHvQ _@ulzQ @ _@v)6Q _@v+:Q @ _@v>9Q _@vH5Q _BAkRp _BAk{p _BAl}p _BAmWp _Cip _CiVp _Cj1p _CjQp _Ckp _CkRp _Ckqp _Cksp _Clp _Clp _Cl}p _Cmp _Cmp _Cm7p _Cm9p _CYP x_CZ7P _Ci9P _ClYQ x_CzP _JtLx (z4
DSPTAB(&HA,.KYC,B,D)
,.KYC,B,D)
_Ju9< (y
KEYTAB( .KYB,A,C)
(_Ju\s Q w
XLIST
X CSE,<Class scheduler ^T/@G$ARG01/>
X CWM,<MessPage ^D/G$ARG1/ capnceled^I/@G$ARG3/>
X DRU,<Device0 ^W/G$ARG1/: ^T/@PG$ARG2/ed>
X FRpW,<File retrieval waits ^T/@G$ARG10/d>
X JLO,<MessPage ^D/G$ARG1/ capnceled .. job ^D/G$JOB/ logged out0>
X LFC,<ORION Plogging disabled pby ^I/@JOBTXT/>
X MCJ,<^D/G$ARG2 0/ message(s) canc Peled>
X ODM,<Ou ptput display for
OPR modified>
X
0 OLO,<ORION loggi
Png enabled by ^I/
p@JOBTXT/>
X SCC ,<SEND command co 0mpleted>
X SEM, P<Entry made in ER pROR.SYS>
X SET,
<Set accepted, ^W
0/G$ARG1/ is now ^
PD/G$ARG2/>
X SJ
pM,<Jobi^D/G$ARG1/
X SOT ONLINE acc
X SSJ,<JRG1/ now in class ^D/G$AR0G2/>
X SSS,<SchPeduler setting mopdified>
LIST
SALL
IST
_Jv9 'z:
DSPTAB('(A,.SWC,B,D)
,.SWC,B,D)
_Jv=t hy
KEYTAB( .SWB,A,C)
(_W$:P _W&:=P >`:
=Q `: [sQ `: H5Q `:$\YQ `:&<Q @ `:-iQ `:.,WQ `:MmQ `:v
WQ `;\Q `;$rQ @ ahvp alp alyp al}p amp a9: =
EXTERNA1L P$GPDB ;GET THPE PDB BLOCK
EXTpERNAL P$PNXT ;GET NEXT PDB GIVEN 0A PDB BLOCK
EXTPERNAL P$PERR ;GEpT ERROR BLOCK FROM PDB GIVEN A PDB0
EXTERNAL P$PDEPF ;GET DEFAULT FpILLING ROUTINE GIVEN A PDB
EXTER0NAL P$PACT ;GET PACTION ROUTINE GIpVEN A PDB
EXTERNAL P$NARG ;NE0XT ARGUMENT TYPE PTO PROCESS
EXTEpRNAL P$SETU ;SETUP POINTER TO PAR0SER BLOCKS
EXTEPRNAL P$CURR ;GETp THE CURRENT LOCATION
EXTERNAL P0$PREV ;SET THE PPREVIOUS TO CURRENpT
EXTERNAL P$FLOT ;FLOATING POI0NT NUMBER
EXTERPNAL P$INIT ;PARSpER INIT
EXTERNAL P$INTR ;PARSER0 INTERRUPTS
EXTPERNAL P$TINT ;TIpMER INTERRUPTS
EXTERNAL P$NFLD 0;NEXT FIELD TYPE PAND BLOCK ADDRESSp
EXTERNAL P$DIR ;DIRECTORY FIEL 0D
EXTERNAL P$NE PXT ;GET NEXT FIE pLD
EXTERNAL P$T IME ;TIME/DATE C 0HECK
EXTERNAL P P$COMMA ;COMMA CH pECK
EXTERNAL P$ CFM ;CONFIRM CHE 0CK
EXTERNAL P$K PEYW ;KEYWORD CHE pCK
EXTERNAL P$S WIT ;SWITCH CHEC 0K
EXTERNAL P$US PER ;USER CHECK
p EXTERNAL P$NUM ;NUMBER CHECK
E 0XTERNAL P$FILE ; PFILE SPEC CHECK
p EXTERNAL P$IFIL ! ;INPUT FILE SPEC!0
EXTERNAL P$OFI!PL ;OUTPUT FILE S!pPEC
EXTERNAL P$"FLD ;FIELD CHECK"0
EXTERNAL P$TOK"P ;TOKEN CHECK
"pEXTERNAL P$NODE #;NODE CHECK
EXT#0ERNAL P$SIXF ;SI#PXBIT FIELD CHECK
EXTERNAL P$RNGE$ ;RANGE OF NUMBE$0RS
EXTERNAL P$T$PEXT ;TEXT CHECK
EXTERNAL P$DEV % ;DEVICE CHECK
%0EXTERNAL P$QSTR %P;QUOTED STRING
%pEXTERNAL P$UQST &;UNQUOTED STRING
EXTERNAL P$TAKE&P ;Take processin&pg
EXTERNAL P$AC'CT ;Account stri'0ng
EXTERNAL P$N'PPRO ;No process required
cess a
v:=P auI7Q x avN8P 'a!ip a!i p a!jp a!l}p aK!hsp aK!hvp aK!i1p aK!i6p aK!iVp aK!k9p aK!lvp aK!l}p d:v;ZQ d; Q d; |Q d; yQ d;<:Q @ eQk5p eQkRp eQlp eQl}p eLuI7Q x eN!hzp eN!iVp eN!jp eN!k9p eN!lp eN!lZp eN!l}p eN!mp f:
:wP f:h6P f:%{9P f:5|WP f:L{WP f;YzP f;, VP f;.)3P gahzp galp gal}p g0t vP g0t9P g0v<vP g0vHrP g0vK7P g0vK<P gK1hwp gK1iUp gK1j7p gK1jSp gK1l}p gK6LuP gPtyQ gPt9Q gPtQ @ gPtSP gPt PQ gPt:Q gPtHwP gPu6Q @ gPu[ZQ gPuySP gPu{@P gPv
TP gPv91P gPv\yQ @ gSmp gSm p g^NHt z0
X <ALL>h,ALL
X <APPEN(D>,APD
X <AVAhILABLE>,AVA
X <CHARACTERISTICS(>,CHR
X <COPIEHS:>,CPY
X <CRhEATE>,CRE
X <DEVICE:>,DEV
(X <FILE:>,FIL
H X <FREE>,FRE
h X <LINES>,LNS
X <PAGES:>,PAG (
X <JOBNAME:>,HJOB
X <MOUNTEhD>,MNT
X <NODE:>,NOD
X <NO(-SIGNON-REQUIRED>H,NSN;NO-SIGNON-REhQUIRED
X <NOUNLOAD>,NUL
X <P(AUSE:>,PAU
X H<REQUEST-ID:>,REQh
X <REPEAT-COUNT:>,RPT
X <SE(QUENCE:>,SEQ
HX <SHORT>,SHT
h X <STOP>,STP
X <JOB>,JBX
(X <SIGNON-REQUIREHD>,SON
X <SUPEhRSEDE>,SPR
X <PURGE>,PUR
X( <ERROR-PROCESSINHG>,ERR
X <NOERhROR-PROCESSING>,N ER;/NOERROR-PROCE (SSING
X <REASON H:>,RSN
X <REM hOVE>,REM
X <D ISPLAY>,DSP
X ( <NODISPLAY>,NDP H
X <OPR-ACTION h-MESSAGE>,OAM
X <OTHER>,OTH
( X <USERS>,USR
X <WRITE-LOCKED h>,WLK
X <C OUNT:>,CNT
X (<DENSITY:>,DEN
X <INCREMENT:>, hINC
X <LABEL-T YPE:>,LBT
X <O (VERIDE-EXPIRATION H:>,OVR
X <OWNE hR:>,OWN
X <PR!OTECTION>,PRO
!(X <STARTING-VOLUM!HE-ID:>,SVI;/START!h-VOLUME-ID:
X <"TAPE-DISPOSITION:"(>,TDP
X <VOLUM"HE-ID>,VID
"h
X <WINDFALL:>,#WFL
X <CLASS-#(ASSIGNMENTS:>,CAS#H
X <NOCHECK>,N#hCK
X <N$O-SESSION-ENTRIES$(>,NOS
X $H<CANCEL>,KIL
$hX <CM>,CM
X %<NEW>,NEW
X <%(PM>,PM
X <SA%H>,SA
X <SCHE%hD>,SCH
&X <FAILSOFT>,FSF
ILSOFT>,FSF gg
V 0!
IFNB <PB>,<TOPS10<A==Bp>>
IFNB <C>,<TOPS20<A==C>>
PS20<A==C>>
ijp ij7p ij|p il}p i Hy
G $$ATB
GiuI7P 'inL}P L i?kpp i?lp i?l}p L i?4( x! IFN FTUUOS ,B ;DEFINE UNi?4H K 8! IFN FTJSYS , INTERN(AEDT ig P igX<P ) AEDTo<tQ p o<t]VQ @ o<u+qQ o<ux1Q oPu+qQ oPu86Q oPu:6Q @ oPu[yQ oPuiQ oPuiWQ @ oPui\Q oPv
[Q #` oPv:TQ oPv;RQ oR}X<P ap (i?
XLIST
&( A==.ZZ
.ZZ==.'pZZ+1
LIST
SAL L
NOD.NX)6q@ (z
A==:B
A==:B &
:` 'hzK
IF2,<IF(NDEF INTACK,<EXTE((RN INTACK>>
PUS(HHJ P,INTACK
JUM)8P [ITEXT (A)]
[ITEXT (A)]
u|P ` E=P ;P P $ :2P Eh6P @ FN8P ` dLuP f:P f,P f=P ! f=P fH8P h6P {p )1P ` 6)1P `
SP S@P 4+P mhuQ n+;Q @ uyP 9P 4 VP 5TP ! 6X;P & 2P p *i9P / *|*2P @ /J P ' /J P ' /JHP " 2 /J P ' /J$P " 0 /J%lP " ! /J0 P ' /J5lP " ! /J@ P ' /JU+P " 1 /JdJP " 2 /KP " 1 /LuP " # /LxP " B /LyP " /LzP " 5 /L9P " /LZP " /LP " 9 /LP " /LP ! /LP " /LP " /LP " 6 /LSP " /LYP " $ /L uP " /L vP " - /L yP " 7 /L P " $ /L P " /L PP " % /L YP " % /L(:P /L(uP " 4 /L)3P " /L*0P " 3 /L*7P /L*yP ! /L+7P " > /L+<P " > /L,P " /L,XP " : /L9P " . /L9P /L:P " & /L;P ! /L;P " 5 /L;7P " ? /L;<P " ? /L;QP ! /L;ZP ! /L<P " " /L< P " /L<rP " /L=P " /L= P ! /L=9P " /LD(P " " /LDHP " # /LH:P " @ /LH<P " /LHwP " /LI3P ! /LI6P ! /LJ9P ! /LK P " = /LKvP " ' /LLP " /LL[P " & /LLuP " ' /LLvP ! /LMP " /LXQP " ( /L[:P " /L[PP ! /L[ZP ! /L\VP " /L]ZP /L^P " 9 /L^P ! /Lh6P /Lj6P " /LkyP " ( /LkzP " /LmyP ! /M P ! /M P ! /M
xP " /MP ! /MwP " /M6P "
/MQP " 8 /MTP " ) /M+qP /M+vP "
/M,qP " A /M<P " /M<|P " : /MI0P " /MIsP "
/MK<P " @ /MKqP ! /MKsP "
/MLP /MLzP " C /MY6P " /M]P ! /Mi:P " /MjxP " /Mk P " B /Mk`P " ) /MkrP " /MktP " /MkwP " 4 /Mk{P " = /MnP ! /Mx6P " /MySP " /Mz0P " /M{@P " /M{VP " /M|P " /M|P " /M|P /M}P " /N:P ! /N vP " /N P /N
P " 7 /N
TP " /N
VP " /N
VP " /N
ZP !
/N! /N 2P " /N)P /N)1P !
/N)3P " * /N)5P " /N)6P ! /N)8P !
/N,P " /N,P ! /N,7P " /N,xP !
/N,zP ! /N-P ! 3 /N8yP " * /N91P " /N9:P ! /N:P ! /N:P ! /N::P " /N;P " 8 /N;RP ! /N<vP " . /N=P ! /N=P " + /N=P " /N=1P ! /N=8P ! /N=tP ! /N=vP " /N>9P " /NDHP " , /NH1P " /NH5P ! /NH8P " + /NJ6P " /NK`P " /NKzP " /NLPP " /NLVP /NLyP " /NN8P " /NX;P " , /NXQP " ; /NYQP " < /N[P ! /N[TP " - /N[VP ! /N\SP " / /N\YP ! /N\sP " ; /N\yP /Nj2P " / /Nx4P ! /NzP " 6 /Nz|P " < /O9P " 0 6~
TP @ 7&{Q ;&=1P @ >+P >+RP >- P >-7P >$<vP " >$J9P " >$K:P " >$LvP " >$[PP " >$]P "
>%P " >%KqP " >%Y9P " >%]P " >&)1P " >&86P "
>&9P " >&:P " >&:P " >&<vP " >&<zP " >&=P " >&=P " >&=tP " >&[P " >&[VP " >DLYp " >luP " >lyP " >lP " >lP "
>m1P " >m tP " >m P " >mKsP " >m[rP " >mi\P " >mnP " >myP " >mySP " >mzP " >m|yP " >m|zP " >n:P " >n
ZP " >nP " >n 2P " >n)6P " >n)8P "
>n,xP " >n-P " >n-P " >n9:P " >n:P " >n:P " >n:P " >n:P " >n:P " >n:P " >n:P " >n;RP " >n<P " >n<wP " >n=P " >n=P " >n=1P " >n=8P " ?%+qP ?%LP ?%X<P
?%[ZP ? ?%|P ? ?& P J ?& K
(xP K
)VP K
*QP K
=9P K$YVP K$]P N -P ! ND;P @ NLWP !& NL=P !% NLI7P !! NL\PP !& NM P !# NMQP !% NMHZP ! NMLzP !' NMi;P !' NMk{P !$ NM}YP !# NM}wP !! NN
WP !" NN=TP !$ NN[VP !" Nf= P ! NfN8P NuyP O< P Oj6P ! O3P O$zP @ O$P B O$P ! O$ uP O$ P O$,P O$87P O$:P @ O$<rP O$MP O$[RP
O$lVP O% P A O%wP O%I0P O%YP
O%YP O%Y6P O%[P
O%\P O%\VP O%]P
O%ktP O%lwP O%m P O%z0P O%|P O& vP O&
TP O&)P O&,P O&;wP O&=vP O&J6P O&KzP O&LPP O&lwP
O&x:P A O. VP @ O.
QP @ O.
zP jA O<P $ O< P $ O< PP $ O<89P $ O<:P $ O<; P $ O<;ZP $ O<< P $ O<<RP $ O<I7P $ O<I;P $ O<LxP $ O<\YP $
WP $ O>
O>)6P $ O>)8P $ O>,P $ O>,wP $ O>8 P $ O>8tP $ O>98P $ O>:P $
O>;wP $ O><P $
O>=P $
O>=TP $ O>IP $ O>\yP $ O>j2P $ O>yVP $ O>{P $ R P Z}J2P ! _$rP _$YP _$I9P _$\YP _%+qP _%LzP _%kxP _%xUP _%xrP _&-P _&M P _&NP _&N8P kP P >}{woP