*START  4000  001472  *STACK  7777  000000  *SYM    000506

SEG. #    TYPE        LOW      HIGH      TOP
  4000    PROC      000100    070420    070413    
  4001    PROC      177777    000000    117037    

*BASE   004000  000100  000132  000777  000777  

ROUTINE        ECB         PROCEDURE     ST. SIZE  LINK FR. 
  ####      4000  001472    4000  001000    000460  000260  4000  001054
  PROCG0    4000  002046    4000  001734    000052  000044  4000  001444
  LISTL0    4000  002172    4000  002110    000366  000102  4000  001570
  SIMPL0    4000  002334    4000  002272    000052  000032  4000  001730
  CHECK0    4000  002510    4000  002362    000050  000044  4000  002104
  COLLF0    4000  002750    4000  002550    000054  000036  4000  002342
  GENER0    4000  003024    4000  003000    000050  000030  4000  002422
  GENIF     4000  003252    4000  003052    000054  000076  4000  002646
  GENEX0    4000  004034    4000  003344    000370  000154  4000  003422
  PROPA0    4000  004466    4000  004176    000052  000050  4000  004052
  REPLA0    4000  004544    4000  004522    000054  000026  4000  004144
  NEGAT0    4000  004642    4000  004572    000050  000030  4000  004240
  COPYT0    4000  004732    4000  004670    000050  000030  4000  004332
  ENTEU0    4000  005034    4000  004762    000052  000030  4000  004432
  EXPRT0    4000  005124    4000  005062    000046  000030  4000  004522
  EXPRS0    4000  005216    4000  005152    000050  000026  4000  004616
  SAVES0    4000  005322    4000  005244    000050  000040  4000  004720
  RESTO0    4000  005442    4000  005360    000060  000036  4000  005036
  MAKET0    4000  005530    4000  005474    000060  000034  4000  005126
  REMOV0    4000  005734    4000  005562    000666  000042  4000  005330
  INVOK0    4000  006200    4000  005772    000736  000042  4000  005572
  ENTER0    4000  006470    4000  006234    000672  000052  4000  006062
  DGETS0    4000  006776    4000  006534    000052  000046  4000  006362
  GETFO0    4000  007236    4000  007030    000366  000042  4000  006630
  SKIPW0    4000  007312    4000  007272    000050  000024  4000  006710
  GETDE0    4000  007646    4000  007334    001522  000050  4000  007236
  GETAC0    4000  010034    4000  007706    001202  000036  4000  007430
  COLLE0    4000  010366    4000  010066    000056  000040  4000  007756
  DELET0    4000  010512    4000  010416    000056  000026  4000  010110
  INITI0    4000  011630    4000  010536    000046  001142  4000  011146
  ENTES0    4000  012732    4000  012710    000054  000024  4000  012332
  CLEAN0    4000  013012    4000  012756    000046  000034  4000  012410
  LOADT0    4000  013214    4000  013044    000452  000104  4000  012610
  GETTR0    4000  013364    4000  013314    000052  000026  4000  012762
  GETSYM    4000  016034    4000  013410    000070  000304  4000  015356
  CONVE0    4000  017200    4000  016262    000372  000076  4000  016562
  REFIL0    4000  017362    4000  017260    000050  000042  4000  016756
  PUTBA0    4000  017466    4000  017420    000046  000026  4000  017066
  PUTBC0    4000  017546    4000  017514    000052  000024  4000  017146
  PUTBB0    4000  017620    4000  017572    000250  000026  4000  017216
  SYNERR    4000  020244    4000  017644    000460  000230  4000  017632
  FATAL0    4000  020512    4000  020462    000046  000026  4000  020112
  SDUPL     4000  020572    4000  020540    000050  000032  4000  020170
  ENTET0    4000  020734    4000  020622    000356  000046  4000  020330
  MAKEU0    4000  021174    4000  020776    000054  000036  4000  020562
  LABGEN    4000  021232    4000  021220    000050  000022  4000  020632
  VARGEN    4000  021350    4000  021254    000046  000036  4000  020746
  SAVEM0    4000  021426    4000  021404    000042  000034  4000  021024
  GETLO0    4000  021516    4000  021460    000046  000030  4000  021114
  GENCH0    4000  021564    4000  021544    000056  000024  4000  021164
  GENDB0    4000  021756    4000  021610    000054  000060  4000  021352
  GENDA0    4000  022054    4000  022032    000042  000030  4000  021452
  GENIN0    4000  022162    4000  022102    000050  000050  4000  021556
  TLIT      4000  022262    4000  022226    000050  000026  4000  021660
  OTHER0    4000  022760    4000  022306    000222  000110  4000  022340
  DECLO0    4000  023110    4000  023050    000046  000032  4000  022504
  EQUIV0    4000  023176    4000  023136    000046  000032  4000  022572
  DATAO0    4000  023264    4000  023224    000046  000032  4000  022660
  CODEO0    4000  023352    4000  023312    000046  000032  4000  022746
  OTHER     4000  023560    4000  023400    000054  000050  4000  023150
  COPYL0    4000  024074    4000  023620    000060  000054  4000  023462
  ESCAP0    4000  024362    4000  024136    000254  000060  4000  023750
  OUTTAB    4000  024540    4000  024430    000052  000034  4000  024134
  OUTCH     4000  024676    4000  024570    000054  000040  4000  024270
  OUTSTR    4000  025064    4000  024730    000056  000042  4000  024454
  OUTDON    4000  025344    4000  025116    000056  000160  4000  024742
  OUTGO     4000  026022    4000  025522    000052  000072  4000  025414
  OUTNUM    4000  026214    4000  026106    000252  000052  4000  025612
  OUTGO0    4000  026410    4000  026264    000046  000056  4000  026004
  CLEAO0    4000  026726    4000  026462    000264  000060  4000  026320
  FINDGO    4000  027066    4000  027000    000054  000026  4000  026464
  OUTLIT    4000  027246    4000  027112    000060  000030  4000  026644
  SETUP0    4000  027356    4000  027274    000372  000040  4000  026754
  SETUQ0    4000  027524    4000  027414    000362  000064  4000  027120
  ENTEV0    4000  027676    4000  027604    000360  000042  4000  027274
  CREAT0    4000  030042    4000  027736    000060  000044  4000  027440
  GENPS0    4000  030232    4000  030104    000062  000050  4000  027630
  ENTEW0    4000  030342    4000  030300    000042  000030  4000  027740
  EXITS0    4000  030476    4000  030370    000362  000036  4000  030074
  GENPA0    4000  030640    4000  030532    000052  000044  4000  030236
  GENPR0    4000  031136    4000  030702    000054  000062  4000  030530
  GENPV0    4000  031462    4000  031212    000364  000064  4000  031060
  GENPU0    4000  032342    4000  031544    000362  000176  4000  031734
  GENPT0    4000  032726    4000  032532    000052  000132  4000  032324
  BEGIN0    4000  033070    4000  033056    000042  000024  4000  032470
  BEGIP0    4000  033166    4000  033114    000042  000062  4000  032564
  BEGIO0    4000  033560    4000  033246    000044  000302  4000  033154
  ENDMO0    4000  034062    4000  034056    000042  000022  4000  033462
  STOPM0    4000  034176    4000  034104    000042  000110  4000  033574
  RETUR0    4000  034354    4000  034304    000042  000072  4000  033752
  ENDPR0    4000  035224    4000  034444    000044  000034  4000  034624
  SETUR0    4000  035672    4000  035260    000064  000066  4000  035260
  GENSE0    4000  036470    4000  035746    000114  000062  4000  036060
  GENSF0    4000  037276    4000  036542    000074  000144  4000  036666
  RATFO0    4000  040326    4000  037432    000066  000050  4000  037716
  DECLA0    4000  042610    4000  040366    000074  000134  4000  042174
  INCLU0    4000  043172    4000  042730    000360  000060  4000  042562
  LINKA0    4000  043430    4000  043242    000050  000034  4000  043022
  LOCAL0    4000  043650    4000  043456    000050  000036  4000  043242
  PROCE0    4000  045226    4000  043700    000066  000106  4000  044610
  STRDE0    4000  045530    4000  045316    000364  000052  4000  045122
  STRTA0    4000  047530    4000  045574    002042  000070  4000  047106
  ENDDE0    4000  047772    4000  047576    000050  000070  4000  047370
  STATE0    4000  051432    4000  050060    000072  000100  4000  051024
  IFSTMT    4000  052146    4000  051524    000060  000054  4000  051540
  FORST0    4000  053226    4000  052214    000066  000070  4000  052616
  WHILE0    4000  053620    4000  053306    000056  000064  4000  053212
  REPEA0    4000  054306    4000  053676    000060  000064  4000  053700
  PARBO0    4000  054566    4000  054364    000050  000040  4000  054162
  BOOLE0    4000  055114    4000  054622    000056  000040  4000  054506
  BOOLT0    4000  055440    4000  055146    000056  000040  4000  055032
  BOOLF0    4000  055652    4000  055472    000054  000040  4000  055244
  BOOLP0    4000  056472    4000  055704    000066  000042  4000  056060
  BOOLO0    4000  057062    4000  056522    000054  000042  4000  056454
  SELEC0    4000  061130    4000  057116    001516  000112  4000  060512
  PROCF0    4000  061606    4000  061224    000056  000050  4000  061200
  CASES0    4000  062626    4000  061650    000400  000104  4000  062212
  DOSTMT    4000  063270    4000  062716    000056  000072  4000  062660
  COMPO0    4000  063546    4000  063352    000052  000044  4000  063140
  RETUS0    4000  064100    4000  063604    000052  000076  4000  063472
  BREAK0    4000  064306    4000  064170    000056  000046  4000  063702
  NEXTS0    4000  064466    4000  064350    000056  000046  4000  064062
  STOPS0    4000  064656    4000  064530    000050  000070  4000  064250
  GOTOS0    4000  065172    4000  064740    000054  000062  4000  064566
  CALLS0    4000  065400    4000  065250    000052  000052  4000  064774
  MKTABL    4000  065506    4000  065446    000052  000026  4000  065104
  RMTABL    4000  065600    4000  065532    000052  000026  4000  065176
  SCTABL    4000  066012    4000  065624    000064  000036  4000  065406
  LOOKUP    4000  066120    4000  066044    000062  000024  4000  065520
  ENTER     4000  066262    4000  066144    000064  000036  4000  065660
  DELETE    4000  066350    4000  066316    000052  000026  4000  065750
  ST$LU     4000  066516    4000  066376    000064  000030  4000  066114
  DSGET     4000  067014    4000  066544    000070  000044  4000  066404
  DSFREE    4000  067302    4000  067050    000066  000040  4000  066674
  DSINIT    4000  067430    4000  067334    000050  000032  4000  067024
  DSDUMP    4000  067662    4000  067456    000054  000034  4000  067256
  DSDBIU    4000  070150    4000  067712    000056  000032  4000  067542

DIRECT ENTRY LINKS
  MKTEMP    4000  070174    CREATE    4000  070200    PARSCL    4000  070204  
  GFNARG    4000  070210    OPEN      4000  070214    RMTEMP    4000  070220  
  REWIND    4000  070224    TRUNC     4000  070230    CANT      4000  070234  
  ERROR     4000  070240    SWT       4000  070244    CLOSE     4000  070250  
  PRINT     4000  070254    ENCODE    4000  070260    FCOPY     4000  070264  
  GETLIN    4000  070270    REMARK    4000  070274    PUTCH     4000  070300  
  PUTLIN    4000  070304    EQUAL     4000  070310    GETARG    4000  070314  
  GCTOI     4000  070320    GCTOL     4000  070324    CTOI      4000  070330  
  ITOC      4000  070334    LTOC      4000  070340    MNTOC     4000  070344  
  PTOC      4000  070350    CTOC      4000  070354    INDEX     4000  070360  
  LENGTH    4000  070364    MAPSTR    4000  070370    MAPDN     4000  070374  
  SCOPY     4000  070400    SETERR    4000  070404    GETWRD    4000  070410  

COMMON BLOCKS 
  MISCOM    4001  001000  002051    GOCOM     4001  003052  007351  
  PRCCOM    4001  012424  000147    SELGEN    4001  012574  001013  
  CODEG0    4001  013610  000026    OUTFIL    4001  013636  000005  
  DS$MEM    4001  013644  077777    OBUFC0    4001  113644  001004  
  LOOPC0    4001  114650  000025    INCOM     4001  114676  001005  
  LEXCOM    4001  115704  001134  

OTHER SYMBOLS 
  SWT$TP    2030  120000    F192QFP5  4000  070414    SWT$CM    4040  010000  

