RRCDL DS H RECORD LENGTH 54900000 SPACE 55800000 RFLGA DSW RPSOP, PSEUDO OP ,56700000 , NOT USED ,57600000 , NOT USED ,58500000 , NOT USED ,59400000 , NOT USED ,60300000 , NOT USED ,61200000 , NOT USED ,62100000 NOT USED 63000000 SPACE 63900000 RFLGB DSW ,, ,64800000 , NOT USED ,65700000 ENTRYSW1, ENTRY ITEM PENDING ,66600000 ESDNRSW1, ,67500000 CSECTSW1, ,68400000 DSECTSW1, ,69300000 DSCOMSW1 70200000 SPACE 71100000 RTYPE DBV , RECORD TYPE. (SEE 'JTEXT') 72000000 SPACE 72900000 RFLDI DSW ESDOFLO, ,73800000 DEFINED, SYMBOL DEFINED, NO ERROR ,74700000 PRIORDEF, PREVIOUSLY DEFINED SYMBOL ,75600000 RFIELDN, NAME FIELD APPENDED ,76500000 RFIELDX, FIELD 'A' OR 'B' APPENDED ,77400000 , LENGTH OF NAME MINUS ONE 78300005 SPACE 79200000 RSWTS DSW ,DSW1,CSW1,,ESW1, OX00106,80100005 EQUF1 ERRONEOUS LENGTH @OY08064 80150005 ORG RSWTS 81000000 RESDI DS H ESDID ASSOCIATED WITH VALUE 81900000 RLCTR DS F VALUE 82800000 RLNGA DS 0X 83700000 RFLDA EQU RLNGA+1 84600000 RNAME DS CL8 SYMBOL 85500000 RLNGQ DS H SYMBOL LENGTH ATTRIBUTE 86400000 RLNGB DS 0X 87300000 RFLDB EQU RLNGB+1 88200000 ORG , 89100000 RLAST EQU * 90000000 ORG RRCDL 90900000 RITEM DS XL(RLAST-RRCDL) 91800000 ORG RNAME 92700000 RSYMC1 DS 0XL(L'RNAME+L'RLNGQ) COMMON SEGMENT 93600000 ORG RESDI 94500000 RSYMC2 DS 0XL(L'RESDI+L'RLCTR) COMMON SEGMENT 95400000 RESDC DS 0XL(L'RESDI+L'RLCTR) COMMON SEGMENT 96300000