perm filename SAILOW.ORG[S,AIL] blob
sn#093289 filedate 1974-03-26 generic text, type T, neo UTF8
NAME BLOCK
00 LOWER
000000 000000
SYMBOLS
04 CVE 000000 400057
04 APPLY 000000 400223
04 CVD 000000 400063
04 TWOWRD 000000 400330
04 SETCP 000000 400254
04 GETCHN 000000 405304
04 POW 000000 400036
04 CLOSO 000000 400140
04 ENTER 000000 400112
SYMBOLS
04 SUBST 000000 400060
04 DEL.PN 000000 400307
04 TYPEIT 000000 400304
04 INSTRL 000000 400156
04 SUBSR 000000 400061
04 CVASC 000000 400073
04 NEW.PN 000000 400306
04 PTYGET 000000 400164
04 JOIN 000000 400231
SYMBOLS
04 .UINIT 000000 400014
04 PTYREL 000000 400165
04 LINOUT 000000 400131
04 %ARSR1 000000 402753
04 LISTX 000000 400305
04 PTYALL 000000 400201
04 .FAIL 000000 400312
04 TYPEX 000000 400303
04 TTYIN 000000 400163
SYMBOLS
04 SGINS 000000 400332
04 INSTRS 000000 400157
04 .MT. 000000 407131
04 CAT 000000 400046
04 CLOSE 000000 400141
04 CAUSE 000000 400247
04 SIMIO 000000 405223
04 CHRCAT 000000 400047
04 SPRPDA 000000 411625
SYMBOLS
04 PTYSTL 000000 400167
04 GETFOR 000000 400070
04 STRNGC 000000 400027
04 SETFOR 000000 400067
04 PITCOP 000000 400220
04 PTCHRS 000000 400173
04 CATCHR 000000 400050
04 SETIP 000000 400255
04 ANSWER 000000 400251
SYMBOLS
04 OUTCHR 000000 400151
04 LPINI 000000 400274
04 CLKMOD 000000 400242
04 PTYSTR 000000 400202
04 LODED 000000 400176
04 CVSIX 000000 400072
04 PTCHRW 000000 400172
04 ..PAT. 000000 411550
04 LRMAK 000000 400206
SYMBOLS
04 .TEN. 000000 407145
04 DFR1IN 000000 400243
04 MKEVTT 000000 400256
04 CORGET 000000 400021
04 USERER 000000 400020
04 ARRCLR 000000 400216
04 CANINC 000000 400023
04 CORREL 000000 400024
04 INCHSL 000000 400155
SYMBOLS
04 REALIN 000000 400116
04 FLSCAN 000000 405357
04 .CH. 000000 407115
04 RESTOR 000000 400316
04 INTERR 000000 400252
04 DISABL 000000 400267
04 WORDOU 000000 400123
04 %SPGC 000000 400030
04 DT.RET 000000 400017
SYMBOLS
04 CVSTR 000000 400074
04 CVSI 000000 400310
04 CAUSE1 000000 400250
04 ARRTRA 000000 400215
04 PTYIN 000000 400203
04 CLRBUF 000000 400160
04 LOGS 000000 400040
04 %SPGC1 000000 402733
04 SAVE 000000 401662
SYMBOLS
04 .SONTP 000000 400336
04 INTIN 000000 400120
04 INTPRO 000000 400245
04 PTOSTR 000000 400177
04 CALL 000000 400044
04 INTSCA 000000 400121
04 INSET 000000 401706
04 BREAKS 000000 400132
04 ARRYOU 000000 400122
SYMBOLS
04 POINT 000000 400054
04 %UUOLN 000000 400015
04 ALLRS 000000 400321
04 CALLER 000000 400233
04 IFGLOB 000000 400302
04 INTTBL 000000 400264
04 FP1DON 000000 400322
04 ARCOP 000000 400205
04 .SUCCE 000000 400313
SYMBOLS
04 TERMIN 000000 400230
04 NOTOPN 000000 405311
04 .MES2 000000 414020
04 BACKUP 000000 400200
04 MTAPE 000000 400142
04 WORDIN 000000 400125
04 STRGC 000000 400026
04 .MES1 000000 414020
04 URSCHD 000000 400225
SYMBOLS
04 RESUME 000000 400226
04 SCAN 000000 400071
04 INOUT 000000 400334
04 ALLRM 000000 400317
04 SDESCR 000000 400324
04 FLOGS 000000 400037
04 PUTCH 000000 400052
04 DFCPKT 000000 400246
04 TTYINL 000000 400162
SYMBOLS
04 TTYUP 000000 400335
04 PTYGTL 000000 400166
04 REALSC 000000 400117
04 EXP$ 000000 400041
04 ARRYIN 000000 400124
04 BRKMAK 000000 400277
04 GETSTS 000000 400107
04 CVFIL 000000 400076
04 CVIS 000000 400311
SYMBOLS
04 TTYINS 000000 400161
04 CONELM 000000 400326
04 SPROUT 000000 400224
04 SETSTS 000000 400110
04 CHRCHR 000000 400051
04 ARYEL 000000 400210
04 FPOW 000000 400035
04 .INCON 000000 400325
04 ALLFOR 000000 400320
SYMBOLS
04 BBPP. 000000 400053
04 STACSV 000000 401676
04 %ALLOC 000000 400013
04 LOOKUP 000000 400111
04 REMEMB 000000 400314
04 %STRMR 000000 400031
04 OPEN 000000 400102
04 CVXSTR 000000 400075
04 SUSPEN 000000 400227
SYMBOLS
04 STCLER 000000 400331
04 %PSSGC 000000 400237
04 USETO 000000 400144
04 OUTSTR 000000 400152
04 INTMOD 000000 400265
04 %ARRSR 000000 400032
04 MAINPR 000000 400232
04 LEAP 000000 400275
04 PTOCNT 000000 400171
SYMBOLS
04 INCHRS 000000 400150
04 RELEAS 000000 400103
04 MYPROC 000000 400234
04 ARRBLT 000000 400214
04 USETI 000000 400143
04 ARRINF 000000 400213
04 SETBRE 000000 400133
04 $PDLOV 000000 400016
04 CODE 000000 400043
SYMBOLS
04 FORGET 000000 400315
04 INCHRW 000000 400147
04 CVOS 000000 400066
04 BRKOFF 000000 400300
04 CLOSIN 000000 400137
04 STDBRK 000000 400134
04 LPRYER 000000 400100
04 DFRINT 000000 400244
04 BEXIT 000000 400211
SYMBOLS
04 ARMAK 000000 400207
04 PSTATU 000000 400235
04 CSERR 000000 400077
04 DATERR 000000 414022
04 ENABLE 000000 400266
04 STKUWD 000000 400212
04 OUT 000000 400114
04 SETPL 000000 400104
04 LOG$ 000000 400042
SYMBOLS
04 INCHWL 000000 400154
04 RESTR 000000 401670
04 FILNAM 000000 405330
04 INTSET 000000 400241
04 CVS 000000 400065
04 PTIFRE 000000 400170
04 ONEWRD 000000 400327
04 DDFINT 000000 400240
04 LRCOP 000000 400204
SYMBOLS
04 PRISET 000000 400236
04 CVO 000000 400064
04 EQU 000000 400062
04 PITDTM 000000 400221
04 PITBND 000000 400217
04 K.OUT 000000 400034
04 CORBIG 000000 400025
04 FP2DON 000000 400323
04 INSTR 000000 400153
SYMBOLS
04 GETCHA 000000 400101
04 CORINC 000000 400022
04 SGREM 000000 400333
04 APPL$Y 000000 400222
04 PTOCHS 000000 400174
04 INPUT 000000 400115
04 FILEIN 000000 400113
04 ERMSBF 000000 400337
04 CAT.RV 000000 400045
SYMBOLS
04 K.ZERO 000000 400033
04 INTMAP 000000 400270
04 ASKNTC 000000 400253
04 RENAME 000000 400145
04 CHNCDB 000000 400105
04 PTOCHW 000000 400175
04 BRKMSK 000000 403274
04 BRKERS 000000 400276
04 USERCO 000000 400146
SYMBOLS
04 CVG 000000 400056
04 STACRS 000000 401702
04 CVF 000000 400055
PROGRAM
LOCATION 000000 000137
102100 000000 020,104,000,000,000,000 102 02,000000
PROGRAM
LOCATION 000000 000000'
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
PROGRAM
LOCATION 000000 000036'
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
PROGRAM
LOCATION 000000 000053'
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
PROGRAM
LOCATION 000000 000074'
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
LINK BLOCK
777777 777777
000000 000106'
LINK BLOCK
777777 777776
000000 000107'
LINK BLOCK
777777 777775
000000 000110'
LINK BLOCK
777777 777774
000000 000111'
LINK BLOCK
777777 777773
000000 000112'
LINK BLOCK
777777 777771
000000 000113'
PROGRAM
LOCATION 000000 000114'
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
LINK BLOCK
000000 000004
000000 000115'
PROGRAM
LOCATION 000000 000116'
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
LINK BLOCK
000000 000004
000000 000117'
PROGRAM
LOCATION 000000 000120'
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
LINK BLOCK
000000 000004
000000 000121'
PROGRAM
LOCATION 000000 000137'
070000 000300 016,000,000,000,140,000 CLOSE 000300
000000 000303 000,000,000,000,141,100 000 000303
070000 000050 016,000,000,000,024,000 CLOSE 000050
000000 000304 000,000,000,000,142,000 000 000304
330000 002000 066,000,000,004,000,000 SKIP 002000
000000 000006 000,000,000,000,003,000 000 000006
000000 000000 000,000,000,000,000,000 000 000000
777740 000000 177,176,000,000,000,000 CONSO 17,000000
INTERNAL REQUEST
000146' 000146'
PROGRAM
LOCATION 000000 000207'
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000001 000001 000,000,010,000,000,100 000 000001(01)
000002 000002 000,000,020,000,001,000 000 000002(02)
000003 000003 000,000,030,000,001,100 000 000003(03)
000004 000004 000,000,040,000,002,000 000 000004(04)
PROGRAM
LOCATION 000000 000235'
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
LINK BLOCK
000000 000007
000000 000235'
PROGRAM
LOCATION 000000 000240'
000000 000000 000,000,000,000,000,000 000 000000
254000 000000 053,000,000,000,000,000 JRST 000000
PROGRAM
LOCATION 000000 000124
000000 000000 000,000,000,000,000,000 000 000000
POLISH FIXUPS
OPF 000000 000242'
SAL 000000 000124
PROGRAM
LOCATION 000000 000242'
476000 000006' 117,100,000,000,003,000 SETOM 000006'
550600 000000 132,030,000,000,000,000 HRRZ 14,000000
254014 000000 053,000,140,000,000,000 JRST 000000(14)
634600 000014 147,030,000,000,006,000 TDZA 14,000014
211600 000001 042,070,000,000,000,100 MOVNI 14,000001
202600 000005' 040,130,000,000,002,100 MOVEM 14,000005'
265740 000000 055,076,000,000,000,000 JSP 17,000000
047000 000000 011,140,000,000,000,000 CALLI 000000
402000 000000' 100,100,000,000,000,000 SETZM 000000'
200600 000000 040,030,000,000,000,000 MOVE 14,000000
202600 000041 040,130,000,000,020,100 MOVEM 14,000041
200740 000146' 040,036,000,000,063,000 MOVE 17,000146'
265700 000000 055,074,000,000,000,000 JSP 16,000000
201040 000245' 040,042,000,000,122,100 MOVEI 01,000245'
542040 000243' 130,102,000,000,121,100 HRRM 01,000243'
525500 000001 125,064,000,000,000,100 HRLOI 12,000001
260760 000240' 054,037,000,000,120,000 PUSHJ 17,@000240'
PROGRAM
LOCATION 000000 000263'
260740 000000 054,036,000,000,000,000 PUSHJ 17,000000
051140 000000 012,046,000,000,000,000 TTYUUO 03,000000
047000 000000 011,140,000,000,000,000 CALLI 000000
047040 000012 011,142,000,000,005,000 CALLI 01,000012
332000 000000 066,100,000,000,000,000 SKIPE 000000
254017 000000 053,000,170,000,000,000 JRST 000000(17)
200040 000000 040,002,000,000,000,000 MOVE 01,000000
047040 400016 011,142,004,000,007,000 CALLI 01,400016
334000 000000 067,000,000,000,000,000 SKIPA 000000
254017 000000 053,000,170,000,000,000 JRST 000000(17)
550100 000001 132,004,000,000,000,100 HRRZ 02,000001
302100 000001 060,104,000,000,000,100 CAIE 02,000001
254000 000000 053,000,000,000,000,000 JRST 000000
557000 000001 133,140,000,000,000,100 HLRZS 000001
047040 400016 011,142,004,000,007,000 CALLI 01,400016
265040 000000 055,042,000,000,000,000 JSP 01,000000
254017 000000 053,000,170,000,000,000 JRST 000000(17)
PROGRAM
LOCATION 000000 000304'
047000 000000 011,140,000,000,000,000 CALLI 000000
402000 000000 100,100,000,000,000,000 SETZM 000000
200600 000000 040,030,000,000,000,000 MOVE 14,000000
202600 000000 040,130,000,000,000,000 MOVEM 14,000000
513000 000000 122,140,000,000,000,000 HLLZS 000000
041040 000017 010,042,000,000,007,100 INIT 01,000017
637163 000000 147,147,030,000,000,000 TSZN 03,@000000(03)
000000 000000 000,000,000,000,000,000 000 000000
265040 000302' 055,042,000,000,141,000 JSP 01,000302'
076040 000000 017,102,000,000,000,000 LOOKUP 01,000000
265040 000314' 055,042,000,000,146,000 JSP 01,000314'
204040 000307' 041,002,000,000,143,100 MOVS 01,000307'
506040 000000 121,102,000,000,000,000 HRLM 01,000000
213000 000001 042,140,000,000,000,100 MOVNS 000001
560200 000000 134,010,000,000,000,000 HRRO 04,000000
542200 000320' 130,110,000,000,150,000 HRRM 04,000320'
270040 000322' 056,002,000,000,151,000 ADD 01,000322'
PROGRAM
LOCATION 000000 000325'
047040 000011 011,142,000,000,004,100 CALLI 01,000011
265040 000316' 055,042,000,000,147,000 JSP 01,000316'
066040 000000 015,102,000,000,000,000 INPUT 01,000000
047200 000037 011,150,000,000,017,100 CALLI 04,000037
254000 000000 053,000,000,000,000,000 JRST 000000
200040 000271' 040,002,000,000,134,100 MOVE 01,000271'
047040 400036 011,142,004,000,017,000 CALLI 01,400036
254000 000000 053,000,000,000,000,000 JRST 000000
047000 000000 011,140,000,000,000,000 CALLI 000000
254017 000000 053,000,170,000,000,000 JRST 000000(17)
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
634547 000000 147,026,070,000,000,000 TDZA 13,000000(07)
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
637163 000000 147,147,030,000,000,000 TSZN 03,@000000(03)
PROGRAM
LOCATION 000000 000346'
634151 634727 147,006,116,071,153,100 TDZA 03,634727(11)
634547 000000 147,026,070,000,000,000 TDZA 13,000000(07)
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
051140 000000 012,046,000,000,000,000 TTYUUO 03,000000
047000 000012 011,140,000,000,005,000 CALLI 000012
PROGRAM
LOCATION 000000 000354'
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
000000 000000 000,000,000,000,000,000 000 000000
064250 567310 015,012,105,156,144,000 INBUF 05,567310(10)
203374 620246 040,157,146,040,123,000 MOVES 07,@620246(14)
406231 420312 101,111,114,040,145,000 ANDM 04,@420312(11)
743134 372750 170,145,143,165,164,000 DATAO 02,@372750(14)
647375 606424 151,157,156,015,012,000 TLCN 07,@606424(15)
000000 000000 000,000,000,000,000,000 000 000000
516512 244634 123,124,122,111,116,000 HRLZM 12,244634(12)
435012 042230 107,040,120,104,114,000 IORI 042230(12)
000000 000000 000,000,000,000,000,000 000 000000
516632 352212 123,131,123,124,105,000 HRLZM 14,@352212(12)
465012 042230 115,040,120,104,114,000 ORCMI 042230(12)
000000 000000 000,000,000,000,000,000 000 000000
INTERNAL REQUEST
000241' 000250'
000250' 000267'
000277' 000304'
000315' 000346'
000310' 000347'
000317' 000351'
000305' 000350'
000326' 000352'
000323' 000354'
000327' 000354'
000306' 000356'
000264' 000357'
777777 777777
000142' 000365'
777777 777777
000140' 000370'
777777 777777
000144' 000373'
PROGRAM
LOCATION 000000 000373'
516512 244634 123,124,122,111,116,000 HRLZM 12,244634(12)
435012 350202 107,040,123,120,101,000 IORI 350202(12)
416120 000000 103,105,000,000,000,000 SETMM 02,@000000
047000 000000 011,140,000,000,000,000 CALLI 000000
051140 000000 012,046,000,000,000,000 TTYUUO 03,000000
271200 000002 056,050,000,000,001,000 ADDI 04,000002
204040 000351' 041,002,000,000,164,100 MOVS 01,000351'
210040 000001 042,002,000,000,000,100 MOVN 01,000001
435040 001777 107,042,000,003,177,100 IORI 01,001777
505201 000000 121,050,010,000,000,000 HRLI 04,000000(01)
047200 400052 011,150,004,000,025,000 CALLI 04,400052
254000 000000 053,000,000,000,000,000 JRST 000000
200040 000000 040,002,000,000,000,000 MOVE 01,000000
542040 000000 130,102,000,000,000,000 HRRM 01,000000
254017 000001 053,000,170,000,000,100 JRST 000001(17)
634151 634727 147,006,116,071,153,100 TDZA 03,634727(11)
051140 000000 012,046,000,000,000,000 TTYUUO 03,000000
PROGRAM
LOCATION 000000 000414'
254217 000001 053,010,170,000,000,100 JRST 04,000001(17)
260740 000000 054,036,000,000,000,000 PUSHJ 17,000000
516031 146100 123,101,111,114,040,000 HRLZM @146100(11)
516130 746612 123,105,107,115,105,000 HRLZM 02,@746612(10)
472504 046236 116,124,040,114,117,000 ORCBM 12,046236(04)
406111 147216 101,104,111,116,107,000 ANDM 02,147216(11)
202132 251236 040,105,122,122,117,000 MOVEM 02,@251236(12)
510321 200000 122,015,012,000,000,000 HLLZ 06,@200000(01)
064252 342650 015,012,123,105,124,000 INBUF 05,342650(12)
502446 220230 120,122,062,040,114,000 HLLM 11,220230(06)
476472 426100 117,123,124,054,040,000 SETOM 11,@426100(12)
522371 720432 124,117,117,041,015,000 HLLOM 07,@720432(11)
050000 000000 012,000,000,000,000,000 OPEN 000000
064250 347652 015,012,103,117,125,000 INBUF 05,347652(10)
462104 047236 114,104,040,116,117,000 SETCMM 02,047236(04)
521010 447500 124,040,104,117,040,000 HLLOI 447500(10)
512131 540640 122,105,115,101,120,000 HLLZM 02,@540640(11)
PROGRAM
LOCATION 000000 000435'
202511 720216 040,124,117,040,107,000 MOVEM 12,720216(11)
426504 040500 105,124,040,101,040,000 SETAM 12,040500(04)
516031 146100 123,101,111,114,040,000 HRLZM @146100(11)
516130 746612 123,105,107,115,105,000 HRLZM 02,@746612(10)
472504 106424 116,124,041,015,012,000 ORCBM 12,106424(04)
516132 450244 123,105,124,120,122,000 HRLZM 02,@450244(12)
311010 447634 062,040,104,117,116,000 CAML 447634(10)
425011 147246 105,040,111,116,123,000 SETAI 147246(11)
522130 142134 124,105,101,104,056,000 HLLOM 02,@142134(10)
201013 147652 040,040,131,117,125,000 MOVEI 147652(13)
511011 247604 122,040,112,117,102,000 HLLZI 247604(11)
202471 047652 040,123,110,117,125,000 MOVEM 11,@047652(11)
462104 041212 114,104,040,102,105,000 SETCMM 02,041212(04)
202210 150240 040,110,101,120,120,000 MOVEM 04,150240(10)
545012 347500 131,040,123,117,040,000 HLRI 347500(12)
462371 643500 114,117,116,107,040,000 SETCMM 07,@643500(11)
406464 006424 101,123,040,015,012,000 ANDM 11,@006424(04)
PROGRAM
LOCATION 000000 000456'
446504 042236 111,124,040,104,117,000 EQVM 12,042236(04)
426464 047236 105,123,040,116,117,000 SETAM 11,@047236(04)
521010 447500 124,040,104,117,040,000 HLLOI 447500(10)
405012 242646 101,040,122,105,123,000 ANDI 242646(12)
426504 047644 105,124,040,117,122,000 SETAM 12,047644(04)
202372 444212 040,117,124,110,105,000 MOVEM 07,@444212(12)
511010 240610 122,040,102,101,104,000 HLLZI 240610(10)
472132 351534 116,105,123,123,056,000 ORCBM 02,@351534(12)
202171 747610 040,107,117,117,104,000 MOVEM 03,@747610(11)
202312 541626 040,114,125,103,113,000 MOVEM 06,541626(12)
270321 240630 056,015,012,101,114,000 ADD 06,@240630(01)
516365 420222 123,117,054,040,111,000 HRLZM 07,@420222(05)
431013 147652 106,040,131,117,125,000 XORI 147652(13)
202570 147250 040,127,101,116,124,000 MOVEM 13,@147250(10)
202511 720244 040,124,117,040,122,000 MOVEM 12,720244(11)
526344 052220 125,116,040,124,110,000 HRLOM 07,052220(04)
446464 053602 111,123,040,127,101,000 EQVM 11,@053602(04)
SYMBOLS
14 LOWER 000000 000001
50 WNTEND 000000 100000
50 APRISW 000000 000000
50 IOOUT 000000 000003
50 WDTH 000000 000363
50 NUMBS 000000 000004
50 INTYPE 000000 000005
50 SPARUT 000000 000504
50 ERRNOW 000000 000200
SYMBOLS
50 INVTYP 000000 000031
50 HASMSK 000000 000315
50 RECURS 000000 000004
50 ..LIST 000007 777607
50 .NOGEN 000000 000001
50 ..EXPR 000000 002000
10 SEGPPN 000000 000344'
10 SEGFIL 000000 000341'
50 ATTOP 000000 000336
SYMBOLS
50 FORTRA 000000 100000
50 $PINIT 000000 000014
50 $GITNO 000000 000003
10 UINBF 704000 000000
50 IOLOOK 000000 000015
50 IOSETI 000000 000011
10 USER 000000 000015
50 TMPB 000000 400000
50 $PNMNO 000000 000005
SYMBOLS
50 BLKTAB 000000 000332
50 .ERSWC 000000 000020
50 MINPDS 000000 000100
50 IODOUT 000000 000004
50 SCHDRQ 000000 000463
50 TOPBYT 000000 000011
50 LABEL 000000 000020
50 HEDSYM 000000 000000
50 DISPAT 000000 000472
SYMBOLS
50 BRKTBL 000000 000102
10 DPYCLR 701000 000000
50 LONGWD 000000 000372
50 IOCLOS 000000 000005
50 TAC2 000000 000013
50 PRPN 000000 000371
50 ARYLS 000000 000331
50 IOSETO 000000 000012
50 MAXLOC 000000 000012
SYMBOLS
50 TAC1 000000 000014
50 FSTATS 000000 000503
50 INTQWP 000000 000465
50 DATAB 000000 000311
50 REFRNC 000000 002000
10 INTT 000000 000312'
50 PDL 000000 000303
50 XPAND 000000 000335
50 ANYTYP 000000 000040
SYMBOLS
50 TTYDEV 000000 000016
50 DMODE 000000 000000
10 CORE2U 000000 400015
50 STTOP 000000 000007
50 SGROUT 000000 000004
50 PNTVAR 000000 002000
10 NMSAV 000000 000337'
50 ST 000000 000006
50 NIC 000000 000002
SYMBOLS
50 INTQWT 000000 000467
50 QUIET 000000 000002
50 ONAME 000000 000006
50 FREITM 000000 000327
50 INFOTA 000000 000310
50 ..LEPR 000001 000000
50 ..PARS 000000 000004
50 CMUSW 000000 000000
50 PRCTYP 000000 000011
SYMBOLS
50 LOCAT 000000 000512
50 AUTO 000000 000040
50 ..STRS 000000 200000
50 IBPNT 000000 000010
10 SP 000000 000016
50 RENSW 000000 000000
50 IPDP 000000 000474
50 REBP 000000 000322
50 ..ARRA 000000 001000
SYMBOLS
10 S13ARE 000000 000103'
50 PD.PCW 000000 000012
50 SPLNK 000000 000002
10 STRT 000000 000251'
50 IOENTE 000000 000016
50 NPRIS 000000 000020
50 MSKUNT 000000 003700
50 $NWITM 000000 000002
10 JFOV 255040 000000
SYMBOLS
10 RESTRT 000000 000245'
10 S11ARE 000000 000101'
10 LUPDL 000000 000030
50 IBP 000000 000011
50 CODAC 000000 000362
50 SCBCHN 000000 000326
50 BOOLEA 000000 001000
10 CHNL 000000 000010
50 SETYPE 000000 000006
SYMBOLS
50 SGCNUM 000000 000357
10 TEMP 000000 000014
50 PD.PPD 000000 000011
50 PD.DLW 000000 000007
50 $VRNO 000000 000006
50 STACS 000000 000424
50 HACKSW 000000 000001
50 INTPRC 000000 000471
50 FRELST 000000 000334
SYMBOLS
50 BRKDUM 000000 000302
10 PUUO 051000 000000
50 CTXTYP 000000 000013
10 SIXPNT 006000 000000
10 FLOAT 002000 000000
50 MINUS 000000 000400
50 IBUF 000000 000014
50 IJBTPC 000000 000476
50 STLIST 000000 000010
SYMBOLS
50 CONT 000000 000020
50 PUBP 000000 000321
50 ERBP 000000 000320
50 MKBP 000000 000317
50 ..IOSE 000000 400000
50 ISPDP 000000 000500
50 NOSHRK 000000 000337
50 RES 000000 400000
50 FRLOC 000000 000325
SYMBOLS
50 FP2 000000 000314
50 PD.NPW 000000 000004
50 %PDLNK 000000 000006
50 TTYCVT 000000 000502
50 ARYDIR 000000 000330
50 FP1 000000 000313
50 MADEPT 000000 001000
50 ..WRDG 000004 000000
50 INTEGR 000000 000001
SYMBOLS
50 %SPLNK 000000 000002
50 ENDFL 000000 000017
50 ITEMB 000000 010000
10 OCTPNT 012000 000000
10 DECPNT 011000 000000
50 OBUF 000000 000007
50 FBIND 000000 000100
50 $MSLNK 000000 000004
50 ITEM 000000 000400
SYMBOLS
50 ..TOTA 000000 020000
10 REENT 000000 000242'
50 SPDL 000000 000304
50 .LIST 777777 777776
50 PAGNUM 000000 000022
10 LPSA 000000 000013
50 USRPHS 000000 000003
50 LOWC 000000 000332
10 SEGSIZ 000000 400022
SYMBOLS
10 FIX 003000 000000
50 SOSNUM 000000 000023
50 FLTYPE 000000 000004
50 BRKITM 000000 000002
50 HASTAB 000000 000312
10 ARERR 007000 000000
50 FNYNAM 000000 000004
10 SEGNAM 000000 000346'
10 DEVSEG 000000 000345'
SYMBOLS
10 Z 000000 000007
50 SYSSPD 000000 000002
50 BRKCVT 000000 000501
50 %STLNK 000000 000001
10 S4PARE 000000 000072'
10 Y 000000 000006
50 PD. 000000 000000
10 CDB 000000 000011
10 X 000000 000005
SYMBOLS
50 MSK6BT 000000 003740
10 SEGTR 000000 000271'
50 IOSTAT 000000 000000
50 STINCR 000000 000352
50 LIBLEN 000000 000012
50 $ITNO 000000 000001
50 IRUNNR 000000 000477
50 GLBAR 000000 001000
50 .NEXT 777777 777777
SYMBOLS
50 INAME 000000 000013
50 IORELE 000000 000006
10 DPYOUT 703000 000000
50 GLOBSW 000000 000000
50 MINSZ 000000 010000
50 DEFPDS 000000 000300
10 S5PARE 000000 000073'
10 T 000000 000011
50 EXT 000000 000367
SYMBOLS
50 ..SAIL 000000 000002
10 SEGDEV 000000 000340'
50 WD3 000000 000370
10 ERR. 005000 000000
50 LINNUM 000000 000021
50 SAFE 000000 000020
10 P 000000 000017
10 SEGS 000000 000001
10 UPPER 000000 000000
SYMBOLS
10 S6PARE 000000 000074'
50 SIMPLE 000000 000400
50 %SETLK 000000 000003
50 FF 000000 000000
50 ITMANY 000000 000000
50 $SGPP 000000 000012
50 PRILIS 000000 000441
50 REMCHR 000000 000012
50 ALWAYS 000000 000001
SYMBOLS
50 STREQD 000000 000353
50 PGNNFL 000000 000440
50 SGACS 000000 000410
50 USCOR2 000000 000340
10 LOWER 000000 000001
10 S7PARE 000000 000075'
50 DIGS 000000 000364
50 INPROG 000000 400000
50 WNTADR 000000 200000
SYMBOLS
50 PD.ID1 000000 000001
50 ZAPBEG 000000 000305
50 BILTIN 000000 000002
50 NOPROT 000000 000000
10 GETSE 000000 000304'
50 PD.ID2 000000 000002
50 IOIN 000000 000001
50 STRLNK 000000 000001
50 II 000010 000000
SYMBOLS
50 USRTB 000000 020000
50 LONG2 000000 000373
50 FNAME 000000 000366
50 LEABOT 000000 000324
50 ITMTOP 000000 000323
10 S8PARE 000000 000076'
10 E 000000 000005
50 PD.PDA 000000 000010
50 SGCWAS 000000 000360
SYMBOLS
50 OWN 000000 000100
10 D 000000 000004
50 PD.PDB 000000 000003
50 TIMER 000000 000462
10 C 000000 000003
50 MAINPI 000000 000001
10 B 000000 000002
50 IJBCNI 000000 000475
10 A 000000 000001
SYMBOLS
50 ..SYM 000000 000200
50 SIXSW 000000 000001
10 S9PARE 000000 000077'
50 DFRINF 000000 000473
50 CLER 000000 000000
50 GLOBL 000000 200000
50 CNST 000000 200000
50 %SGROT 000000 000004
50 QUESB 000000 100000
SYMBOLS
50 $SGF 000000 000011
50 OFFSET 000000 000351
10 S14ARE 000000 000104'
50 IORENA 000000 000017
50 UNBND 000000 000002
50 PD.LLW 000000 000006
50 PD.DSW 000000 000005
50 KEEP 000000 000001
50 ..LEAP 000000 010000
SYMBOLS
50 .SIZE 777777 777775
50 ICOUNT 000000 000015
50 $SGD 000000 000010
50 BAISW 000000 000000
50 DNAME 000000 000001
10 LPLK 000000 000235'
10 S12ARE 000000 000102'
50 STRSP 000000 000003
50 MAXITM 000000 000306
SYMBOLS
50 LSTBIT 000000 000010
50 FORWRD 000000 040000
50 .HDRSI 000000 000004
50 LPARRA 000000 000100
50 CONOK 000000 001000
10 S10ARE 000000 000100'
10 Q3 000000 000010
50 ARY2B 000000 004000
50 RACS 000000 000375
SYMBOLS
50 SRELOC 000000 000361
50 STANSW 000000 000001
50 SET 000000 000040
50 EXTRNL 000000 020000
50 ..HEAD 000000 000001
50 EXPORT 000000 000000
50 IOOPEN 000000 000014
50 IODIN 000000 000002
10 Q2 000000 000007
SYMBOLS
50 BINDB 000000 040000
50 LSTYPE 000000 000007
50 SYSPD 000000 000001
10 LIOD 000000 000354'
10 Q1 000000 000006
50 EVTYPI 000000 000003
50 EVTTYP 000000 000012
50 ..SUBR 000000 000040
50 LOCSYM 000000 000000
SYMBOLS
50 ..GOGO 000000 100000
50 PROCB 000000 020000
50 PROJ 000000 000374
50 SGCCNT 000000 000354
50 LINTBL 000000 000057
50 PROCED 000000 020000
10 ERSEG 000000 000352'
50 .STTOP 777777 777774
50 SBSCRP 000000 000001
SYMBOLS
50 DEFINE 000000 000010
50 ..PROD 000000 000020
50 REFB 000000 200000
50 LOGOPN 000000 000100
50 SHORT 000000 010000
50 ..MESP 000002 000000
10 LOP22 000000 000327'
50 ICOWNT 000000 000012
50 ENDREN 000000 000511
SYMBOLS
50 %KTLNK 000000 000005
50 OCOWNT 000000 000005
50 STKURT 000000 000464
50 %INLNK 000000 000007
50 SYSPHS 000000 000002
50 QBIND 000000 000200
50 RFITYP 000000 000014
50 $SGNM 000000 000007
50 SETLNK 000000 000003
SYMBOLS
50 TSTSEG 000000 000000
50 ERRTST 000000 000020
50 WNTPDL 000000 040000
50 SGCTOT 000000 000356
50 $SPREQ 000000 000015
50 $TINIT 000000 000013
10 FRSTRT 000000 000250'
50 STBUCK 000000 000351
10 T1 000000 000012
SYMBOLS
50 ITMVAR 000000 004000
50 ..PDEF 000000 000010
50 WNTPDP 000000 040000
50 SETIOS 000000 000013
50 STDSPC 000000 400000
50 ..COMS 000000 040000
50 OBPNT 000000 000003
50 BFHED 000000 000002
50 CURMES 000000 000305
SYMBOLS
50 NOTYPE 000000 000001
50 TOP 000000 000333
50 HASHP 000000 000316
50 OLDITM 000000 000307
50 DSPTBL 000000 000034
50 CHANS 000000 000014
50 STRING 000000 000200
50 MPBIND 000000 010000
50 OBP 000000 000004
SYMBOLS
50 IOINBU 000000 000007
50 GGDAD 000000 000461
50 CDBLOC 000000 000365
50 IOOUTB 000000 000010
50 ZAPEND 000000 000351
50 RF 000000 000012
50 ARRTYP 000000 000015
50 KNTLNK 000000 000005
50 BUFOPN 000000 002000
SYMBOLS
50 LOGGIN 000000 000010
50 INTRNL 000000 040000
50 LEAPSW 000000 000001
50 PD.BDI 000000 000013
50 UUO1 000000 000000
10 IOERR. 004000 000000
50 MESSAG 000000 000200
50 ..STAT 000000 004000
50 INTQRP 000000 000466
SYMBOLS
50 DBLPRC 000000 000004
50 PD.XXX 000000 000014
50 FLOTNG 000000 000002
50 VALUE 000000 004000
50 ..SMTB 000000 000100
50 IOTLEN 000000 000024
50 SGCTIM 000000 000355
10 PDPFIX 247000 000000
50 BRCHAR 000000 000016
SYMBOLS
50 PITTYP 000000 000010
50 INTQWB 000000 000470
50 BUFACS 000000 000341
50 SGLIGN 000000 000013
50 ..GEN 000000 000400
50 JOBVER 000000 000137
50 STTYPE 000000 000003
50 DECSW 000000 000001
10 JFOV 255040 000000
SYMBOLS
10 PUUO 051000 000000
10 SIXPNT 006000 000000
10 FLOAT 002000 000000
10 OCTPNT 012000 000000
10 DECPNT 011000 000000
10 FIX 003000 000000
10 ARERR 007000 000000
10 ERR. 005000 000000
10 IOERR. 004000 000000
PROGRAM
LOCATION 000000 000477'
545304 041212 131,054,040,102,105,000 HLRI 06,041212(04)
536032 242500 127,101,122,105,040,000 HRLEM @242500(12)
476144 051212 117,106,040,122,105,000 SETOM 03,051212(04)
516510 151250 123,124,101,122,124,000 HRLZM 12,151250(10)
446350 727032 111,116,107,056,015,000 EQVM 07,727032(10)
050000 000000 012,000,000,000,000,000 OPEN 000000
201040 000000 040,042,000,000,000,000 MOVEI 01,000000
047040 400015 011,142,004,000,006,100 CALLI 01,400015
265040 000352' 055,042,000,000,165,000 JSP 01,000352'
254000 000271' 053,000,000,000,134,100 JRST 000271'
INTERNAL REQUEST
000331' 000376'
000332' 000412'
000406' 000413'
000253' 000415'
000352' 000416'
000413' 000424'
000377' 000431'
000334' 000505'
SYMBOLS
04 SAILOR 000000 000240'
SYMBOLS
04 X11 000000 000211'
SYMBOLS
04 %RECOV 000000 000013'
SYMBOLS
04 RUNNER 000000 000053'
SYMBOLS
04 %ERRC 000000 000012'
SYMBOLS
04 %STDLS 000000 000135'
SYMBOLS
04 X44 000000 000214'
SYMBOLS
04 .ERRJ. 000000 000011'
SYMBOLS
60 JOBCNI 000000 000000
SYMBOLS
04 GOGTAB 000000 000000'
SYMBOLS
04 ALLPDL 000000 000147'
SYMBOLS
04 XJBCNI 000000 000064'
SYMBOLS
04 CONFIG 000000 000007'
SYMBOLS
04 ALLPDP 000000 000146'
SYMBOLS
04 %ALLCH 000000 000207'
SYMBOLS
04 SETLET 000000 000110'
SYMBOLS
04 XJBENB 000000 000067'
POLISH FIXUPS
+
OPG 04 LPINI
OPF 000000 000000
SAL 000000 000236'
SYMBOLS
04 DEFPRI 000000 000061'
SYMBOLS
04 INILNK 000000 000113'
SYMBOLS
04 STLNK 000000 000106'
SYMBOLS
04 .ERRP. 000000 000010'
SYMBOLS
04 INTRPT 000000 000054'
SYMBOLS
04 INFTB 000000 000003'
SYMBOLS
60 JOBAPR 000000 000000
POLISH FIXUPS
+
OPG 04 %SPGC
OPF 000000 000000
SAL 000000 000120'
SYMBOLS
04 .SGCIN 000000 000040'
SYMBOLS
04 %RENSW 000000 000006'
SYMBOLS
04 X22 000000 000212'
SYMBOLS
04 DEFQNT 000000 000062'
SYMBOLS
04 PROPS 000000 000055'
SYMBOLS
04 APRACS 000000 000215'
SYMBOLS
04 GPROPS 000000 000105'
SYMBOLS
60 JOBDDT 000000 000000
SYMBOLS
60 JOBHRL 000000 000267'
SYMBOLS
60 %UUOLN 000000 000415'
SYMBOLS
60 JOB41 000000 000000
SYMBOLS
04 XJBAPR 000000 000066'
SYMBOLS
04 %SPL 000000 000122'
SYMBOLS
04 GINFTB 000000 000105'
SYMBOLS
04 .ERBWD 000000 000071'
SYMBOLS
04 SGROT 000000 000111'
SYMBOLS
60 JOBUUO 000000 000000
SYMBOLS
04 .EXPIN 000000 000037'
SYMBOLS
60 JOBSA 000000 000260'
SYMBOLS
60 %ALLOC 000000 000256'
SYMBOLS
04 DEFSSS 000000 000057'
POLISH FIXUPS
+
OPG 04 %STRMR
OPF 000000 000000
SAL 000000 000116'
SYMBOLS
04 KTLNK 000000 000112'
SYMBOLS
04 OVPCWD 000000 000063'
SYMBOLS
60 JOBTPC 000000 000000
SYMBOLS
60 JOBREL 000000 000407'
SYMBOLS
60 JOBREL 000000 000324'
SYMBOLS
04 X33 000000 000213'
POLISH FIXUPS
+
OPG 04 %ARRSR
OPF 000000 000000
SAL 000000 000114'
SYMBOLS
60 JOBREN 000000 000000
SYMBOLS
04 RPGSW 000000 000005'
SYMBOLS
04 LKSTAT 000000 000002'
SYMBOLS
60 JOBFF 000000 000410'
SYMBOLS
04 XJBTPC 000000 000065'
SYMBOLS
04 .DTRT. 000000 000036'
SYMBOLS
04 .TRACS 000000 000041'
SYMBOLS
04 .ERSTR 000000 000016'
SYMBOLS
04 DATM 000000 000001'
SYMBOLS
04 .ERSTP 000000 000015'
SYMBOLS
04 SGLKBK 000000 000114'
SYMBOLS
04 %ERGO 000000 000014'
SYMBOLS
04 SPLNEK 000000 000107'
SYMBOLS
04 GDATM 000000 000105'
SYMBOLS
60 K.OUT 000000 000263'
SYMBOLS
04 NOPOLL 000000 000056'
SYMBOLS
60 K.ZERO 000000 000000
SYMBOLS
60 JOBSYM 000000 000000
SYMBOLS
04 %OCTRE 000000 000210'
SYMBOLS
04 .SKIP. 000000 000004'
SYMBOLS
04 .ERSTC 000000 000070'
SYMBOLS
04 DEFPSS 000000 000060'
SYMBOLS
04 .SEG2. 000000 000267'
SYMBOLS
10 PDPFIX 247000 000000
END BLOCK
000000 000511'
000000 000000