*COMDECK /KWMG/ 
* 
*         FET FIELDS
* 
 #ASCII#  MICRO     1,,/0,05D,02D,22D,0,1/  ASCII CHAR SET BITS 
 #CMPLT#  MICRO     1,,/0,00D,01D,00D,1,1/  FET COMPLETE BIT
 #DC#     MICRO     1,,/0,01D,06D,24D,1,1/  DISPOSITION CODE
 #DVT#    MICRO     1,,/0,01D,12D,48D,1,1/  FET DEVICE TYPE 
 #FF#     MICRO     1,,/0,01D,01D,36D,0,0/  OS FLUSH ON ABNORMAL TERM.
 #FTS#    MICRO     1,,/0,01D,06D,18D,1,1/  (#FTL# + #FTS#) - 5 
 #RA#     MICRO     1,,/0,06D,30D,30D,1,1/  FET RANDOM ADDRESS
* 
*         FIT FIELDS
* 
 #BAL#    MICRO     1,,/0,15D,01D,28D,1,0/  BUFFER ALLOCATED BY CRM 
 #BBH#    MICRO     1,,/0,17D,01D,18D,0,0/  BUFFER CAN BE BELOW HHA 
 #BCK#    MICRO     1,,/0,20D,01D,59D,0,0/  BLOCK CKSUM BIT 
#BFF#     MICRO  1,,/0,13D,01D,35D,1,1/  BAD FILE FLAG
 #BFS#    MICRO     1,,/0,17D,18D,00D,0,1/  CIRCULAR BUFFER SIZE
 #BN#     MICRO     1,,/0,19D,30D,00D,1,1/  BLOCK NUMBER
 #BT#     MICRO     1,,/0,11D,03D,21D,0,0/  BLOCK TYPE
 #BZF#    MICRO     1,,/0,25D,18D,00D,1,1/  BUZY FET ADDRESS
 #B8F#    MICRO     1,,/0,17D,01D,47D,0,0/  ROUND PUT-S DOWN TO *8 BITS 
 #CC#     MICRO     1,,/0,17D,01D,51D,1,0/  CHARACTER CONVERSION
 #CDT#    MICRO     1,,/0,26D,18D,30D,0,1/  COLLATING TO DISPLAY TABLE
 #CF#     MICRO     1,,/0,11D,03D,30D,0,0/  CLOSE FLAG
 #CL#     MICRO     1,,/0,16D,06D,30D,0,1/  COUNT FIELD LENGTH RT=T 
 #CM#     MICRO     1,,/0,11D,01D,35D,0,0/  CONVERSION MODE 
 #CNF#    MICRO     1,,/0,17D,01D,19D,0,0/  CONNECTED FILE FLAG 
 #CP#     MICRO     1,,/0,17D,24D,21D,0,1/  BCP OF COUNT FIELD RT=T 
 #CPA#    MICRO     1,,/0,32D,18D,00D,0,1/  COMPRESSION RTN ADDR
 #C1#     MICRO     1,,/0,17D,01D,46D,0,0/  COMP-1 BIT RT=D/T 
 #DCA#    MICRO     1,,/0,33D,18D,00D,0,1/  DECOMPRESSION RTN ADDR
 #DCT#    MICRO     1,,/0,20D,22D,30D,0,1/  DISPLAY TO COLLATING TABLE
 #DFC#    MICRO     1,,/0,13D,02D,56D,0,1/  DAYFILE CONTROL 
 #DFLG#   MICRO     1,,/0,19D,01D,18D,0,1/  DEFERRED LOGGING FLAG 
 #DKI#    MICRO     1,,/0,24D,01D,22D,0,0/  DUPLICATE KEY INDICATOR 
 #DP#     MICRO     1,,/0,16D,07D,09D,0,1/  DATA BLOCK PADDING FACTOR 
 #DX#     MICRO     1,,/0,12D,18D,00D,0,1/  DATA EXIT ADDRESS 
 #ECT#    MICRO     1,,/0,13D,09D,45D,0,1/  TRIVIAL ERROR COUNT 
 #EFC#    MICRO     1,,/0,13D,02D,54D,0,1/  ERROR FILE CONTROL
 #EMK#    MICRO     1,,/0,24D,01D,23D,0,0/  EMBEDDED KEY FLAG 
 #EO#     MICRO     1,,/0,15D,03D,30D,0,0/  ERROR OPTION
 #EOIWA#  MICRO     1,,/0,30D,30D,00D,0,1/  WA AT EOI FO=WA 
 #ERL#    MICRO     1,,/0,13D,09D,36D,0,1/  TRIVIAL ERROR LIMIT 
 #ES#     MICRO     1,,/0,13D,09D,18D,0,1/  ERROR STATUS
 #EX#     MICRO     1,,/0,13D,18D,00D,0,1/  ERROR EXIT ADDRESS
 #EXD#    MICRO     1,,/0,13D,01D,54D,0,0/  EXTENDED DIAGNOSTIC FLAG
#FFCP#    MICRO     1,,/0,13D,01D,58D,0,0/  FORCES FILE CARD PROCESS. 
 #FIB#    MICRO     1,,/0,15D,01D,29D,0,0/  FORCE INTERACTIVE BUFFER
 #FL#     MICRO     1,,/0,12D,24D,36D,0,1/  LENGTH OF F/Z RECORDS 
 #FLM#    MICRO     1,,/0,24D,30D,24D,0,1/  FILE LIMIT
 #FNF#    MICRO     1,,/0,17D,01D,59D,1,1/  FATAL ERROR FLAG
 #FO#     MICRO     1,,/0,11D,03D,18D,0,0/  FILE ORGANIZATION 
 #FP#     MICRO     1,,/0,10D,07D,27D,1,0/  FILE POSITION 
 #FPB#    MICRO     1,,/0,24D,01D,56D,0,0/  FILE POSITION BIT 
 #NOFF#   MICRO     1,,/0,13D,01D,32D,0,1/   DO NOT FLUSH FSTT (TAF/AAM)
 #FWB#    MICRO     1,,/0,01D,18D,00D,0,1/  FWA CIRCULAR BUFFER 
 #FWI#    MICRO     1,,/0,24D,01D,57D,0,0/  FORCED WRITE INDICATOR
 #HB#     MICRO     1,,/0,16D,01D,16D,0,0/  USER HEADER OPTION
 #HL#     MICRO     1,,/0,15D,24D,36D,0,1/  HEADER LENGTH RT=T
 #HMB#    MICRO     1,,/0,18D,24D,36D,0,1/  NUMBER OF HOME BLOCKS 
 #HRL#    MICRO     1,,/0,16D,18D,00D,0,1/  HASHING ROUTINE ADDRESS 
 #IBL#    MICRO     1,,/0,32D,24D,36D,0,1/  INDEX BLOCK LENGTH
 #IC#     MICRO     1,,/0,17D,03D,48D,0,0/  INTERNAL CODE 
 #IP#     MICRO     1,,/0,31D,07D,24D,0,1/  INDEX BLOCK PADDING FACTOR
 #IRS#    MICRO     1,,/0,13D,09D,18D,0,1/  ERROR STATUS
 #KA#     MICRO     1,,/0,24D,22D,00D,0,1/  KEY ADDRESS 
 #KL#     MICRO     1,,/0,31D,09D,31D,0,1/  KEY LENFTH
 #KNE#    MICRO     1,,/0,24D,01D,58D,0,1/  KEY NOT EQUAL 
 #KP#     MICRO     1,,/0,31D,04D,40D,0,1/  BEGINNING CHAR POS OF KEY 
 #KR#     MICRO     1,,/0,21D,12D,00D,0,1/  KEY VALUE REPEAT COUNT
 #KT#     MICRO     1,,/0,32D,03D,27D,0,0/  KEY TYPE
 #LA#     MICRO     1,,/0,10D,22D,00D,0,1/  LABEL ADDRESS 
 #LAC#    MICRO     1,,/0,22D,06D,40D,0,1/   COMPILER LAST ACTION 
 #LBL#    MICRO     1,,/0,10D,24D,36D,0,1/  LABEL LENGTH
 #LCR#    MICRO     1,,/0,10D,01D,35D,0,0/  LABEL ACTION ON PD=I-O TAPE 
 #LFN#    MICRO     1,,/0,00D,42D,18D,0,2/  LOGICAL FILE NAME 
 #LGX#    MICRO     1,,/0,19D,18D,00D,0,1/  LOGGING EXIT ADDRESS
 #LL#     MICRO     1,,/0,16D,06D,30D,0,1/  LENGTH FIELD LENGTH RT=D
 #LNG#    MICRO     1,,/0,22D,04D,36D,0,1/  COMPILE LANGUAGE FLAGS
 #LOP#    MICRO     1,,/0,18D,06D,30D,1,0/  LAST OPERATION
 #LOP5#   MICRO     1,,/0,18D,05D,30D,1,0/  LAST OPERATION (L.O. 5 BITS)
 #LP#     MICRO     1,,/0,17D,24D,21D,0,1/  BCP OF LENGTH FIELD RT=D
 #LT#     MICRO     1,,/0,10D,02D,22D,0,0/  LABEL TYPE
 #LVL#    MICRO     1,,/0,20D,04D,30D,0,1/  LEVEL NUMBER
 #LX#     MICRO     1,,/0,11D,18D,00D,0,1/  LABEL EXIT ADDRESS
 #MBL#    MICRO     1,,/0,19D,24D,36D,0,1/  MAXIMUM BLOCK LENGTH
 #MFN#    MICRO     1,,/0,21D,36D,24D,0,2/  MULTI-FILE NAME 
 #MKL#    MICRO     1,,/0,16D,09D,18D,0,1/  MAJOR KEY LENGTH
 #MNB#    MICRO     1,,/0,20D,24D,36D,0,1/  MINIMUM BLOCK LENGTH
 #MNR#    MICRO     1,,/0,15D,24D,36D,0,1/  MINIMUM RECORD LENGTH 
 #MRL#    MICRO     1,,/0,12D,24D,36D,0,1/  MAXIMUM RECORD LENGTH 
 #MUL#    MICRO     1,,/0,16D,06D,18D,0,1/  PADDING MULTIPLE
 #NDX#    MICRO     1,,/0,24D,01D,59D,0,0/  RETRIEVAL OF MDX KEY LIST-DA
 #NL#     MICRO     1,,/0,19D,06D,30D,0,1/  NO. LEVELS OF INDEX BLOCKS
 #NOFCP#  MICRO     1,,/0,13D,01D,59D,0,0/  NO FILE CARD PROCESS FLAG 
 #OC#     MICRO     1,,/0,17D,02D,57D,1,0/  OPEN/CLOSE FLAG 
 #OF#     MICRO     1,,/0,11D,02D,33D,0,0/  OPEN FLAG 
 #ON#     MICRO     1,,/0,24D,01D,55D,0,0/  OLD/NEW FLAG
 #ORG#    MICRO     1,,/0,15D,01D,22D,0,0/  OLD/NEW FO FLAG 
 #OVF#    MICRO     1,,/0,21D,02D,16D,0,0/  OVERFLOW OPTION FLAGS 
 #PC#     MICRO     1,,/0,16D,06D,24D,0,1/  PADDING CHARACTER 
 #PD#     MICRO     1,,/0,17D,03D,54D,0,0/  PROCESSING DIRECTION
 #PEF#    MICRO     1,,/0,13D,01D,34D,0,1/  PARITY ERROR FLAG 
 #PKA#    MICRO     1,,/0,20D,18D,00D,0,1/  ADDRESS TO RETURN PRIMARY K 
 #PM#     MICRO     1,,/0,20D,01D,58D,0,0/  PROCESSING MODE 
 #PNO#    MICRO     1,,/0,21D,24D,00D,0,2/  MULTI-FILE POSITION NUMBER
 #POS#    MICRO     1,,/0,20D,06D,52D,0,1/  IS POSITIONAL PARAMETER 
 #PTL#    MICRO     1,,/0,18D,24D,36D,0,1/  PARTIAL TRANSFER LENGTH 
 #RB#     MICRO     1,,/0,20D,12D,18D,0,1/  RECORDS PER BLOCK 
 #RC#     MICRO     1,,/0,18D,30D,00D,1,1/  RECORD COUNT
 #RDR#    MICRO     1,,/0,01D,01D,46D,0,1/  READ RELEASE
 #REL#    MICRO     1,,/0,32D,03D,24D,0,0/  RELATIONALS 
 #RKP#    MICRO     1,,/0,31D,04D,44D,0,1/  RELATIVE KEY POSITION IN RKW
 #RKW#    MICRO     1,,/0,31D,12D,48D,0,1/  RELATIVE KEY WORD 
 #RL#     MICRO     1,,/0,11D,24D,36D,0,1/  RECORD LENGTH 
 #RMK#    MICRO     1,,/0,16D,06D,30D,0,1/  RECORD MARK CHARACTER 
 #RT#     MICRO     1,,/0,11D,04D,24D,0,0/  RECORD TYPE 
 #SB#     MICRO     1,,/0,17D,01D,45D,0,0/  SIGN OVER PUNCH RT=D/T
 #SBF#    MICRO     1,,/0,15D,01D,25D,0,0/  SUPPRESS BUFFER I/O FLAG
 #SDS#    MICRO     1,,/0,13D,01D,57D,0,0/  ERROR MESSAGE DISPOSITION 
 #SES#    MICRO     1,,/0,13D,04D,27D,0,1/  SYSTEM ERROR SEVERITY 
 #SOL#    MICRO     1,,/0,30D,01D,59D,1,1/  S/L TAPE BIT           GPS
 #SPR#    MICRO     1,,/0,15D,01D,24D,0,0/  SUPPRESS READ AHEAD 
 #TL#     MICRO     1,,/0,16D,24D,36D,0,1/  TRAILER LENGTH RT=T 
 #TRC#    MICRO     1,,/0,32D,06D,18D,0,1/  TRACE INDEX 
 #ULP#    MICRO     1,,/0,10D,03D,24D,0,0/  USER LABEL PROCESSING OPTION
 #VF#     MICRO     1,,/0,11D,02D,28D,0,0/  VOLUME FLAG 
 #VNO#    MICRO     1,,/0,19D,06D,30D,0,0/  CURRENT VOLUME NUMBER 
 #WA#     MICRO     1,,/0,19D,30D,00D,0,1/  WORD ADDRESS
 #WPN#    MICRO     1,,/0,18D,01D,35D,1,0/  WRITE BIT 
 #WSA#    MICRO     1,,/0,15D,22D,00D,0,1/  USER WORKING STORAGE ADDRESS
 #XBS#    MICRO     1,,/0,21D,18D,00D,0,1/  INDEX BLOCK SIZE
 #XN#     MICRO     1,,/0,21D,42D,18D,0,2/  INDEX LFN 
* 
*         FOLLOWING ARE REDEFINITIONS OF SOME OF THE ABOVE MICROS TO
*         IMPROVE EFFICIENCY.  THE ONLY CHANGE IS TO REDUCE THE FIELD 
*         SIZE TO 18 BITS TO ALLOW THE USER OF THE  SX.  INSTRUCTION. 
* 
 #DCT#    MICRO     1,,/0,20D,18D,30D,0,1/  DISPLAY TO COLLATING TABLE
 #LA#     MICRO     1,,/0,10D,18D,00D,0,1/  LABEL ADDRESS 
 #KA#     MICRO     1,,/0,24D,18D,00D,0,1/  KEY ADDRESS 
* END /KWMG/
