;
;        DISAM FILE CONTROL BLOCK DEFINITIONS                     ;89180
;        USED BY DISAM AND MUST MATCH DSMADCON.EQU
;
CBB      EQU   $                ;CONTROL BUFFER BLOCK
CBS      DW    0                ;CONTROL BLOCK SIZE
IBS      DW    0                ;INDEX BLOCK SIZE
DBS      DW    0                ;DATA BLOCK SIZE
FKL      DW    0                ;FILE KEY LENGTH
FKO      DW    0                ;FILE KEY OFFSET
NFB      DW    0                ;NEXT FILE BLOCK
IRC      DW    0                ;INDEX RECORD COUNTER
DRC      DW    0                ;DATA RECORD COUNTER
ISC      DW    0                ;INDEX SPLIT COUNTER
DSC      DW    0                ;DATA SPLIT COUNTER
FS1      DB    0                ;FILE STATUS FLAG1
;              SEE DSMFLAG1.EQU FOR EXACT BIT DEFINITIONS
FS2      DB    0                ;FILE STATUS FLAG2
;              SEE DSMFLAG2.EQU FOR EXACT BIT DEFINITIONS
PFS      DW    0                ;PERCENT FREE SPACE (LOAD TIME)   ;88252
SIKL     DW    0                ;SECONDARY INDEX KEY LENGTH       ;89180
SIKO     DW    0                ;SECONDARY INDEX KEY OFFSET       ;89180
FSIBN    DW    0                ;FIRST SECONDARY INDEX BLOCK NUMBER89180
DMY030   DW    0                ;NOT CURRENTLY USED
DMY032   DW    0                ;NOT CURRENTLY USED
DMY034   DW    0                ;NOT CURRENTLY USED

HANDLE   DW    0                ;DISAM FILE HANDLE
IBA      DW    0                ;INDEX BLOCK ADDRESS
IFSA     DW    0                ;INDEX FREE SPACE ADDRESS
INBA     DW    0                ;INDEX NEXT BLOCK ADDRESS
DBA      DW    0                ;DATA BLOCK ADDRESS
DFSA     DW    0                ;DATA FREE SPACE ADDRESS
DNBA     DW    0                ;DATA NEXT BLOCK ADDRESS

CIRA     DW    0                ;CURRENT INDEX RECORD ADDRESS
NIRA     DW    0                ;NEXT INDEX RECORD ADDRESS
CDRA     DW    0                ;CURRENT DATA RECORD ADDRESS
NDRA     DW    0                ;NEXT DATA RECORD ADDRESS
CIBN     DW    0                ;CURRENT INDEX BLOCK NUMBER
NIBN     DW    0                ;NEXT INDEX BLOCK NUMBER
CDBN     DW    0                ;CURRENT DATA BLOCK NUMBER
NDBN     DW    0                ;NEXT DATA BLOCK NUMBER

SRL      DW    0                ;SAVED RECORD LENGTH (SPLIT)
CBN      DW    0                ;CHAINED BLOCK NUMBER (SPLIT)
UBUFA    DW    0                ;USER BUFFER ADDRESS

CSIRA    DW    0                ;CURRENT SECONDARY INDEX RECORD ADDRESS
NSIRA    DW    0                ;NEXT SECONDARY INDEX RECORD ADDRESS
CSIBN    DW    0                ;CURRENT SECONDARY INDEX BLOCK NUMBER
NSIBN    DW    0                ;NEXT SECONDARY INDEX BLOCK NUMBER

DMY080   DW    0                ;NOT CURRENTLY USED
DMY082   DW    0                ;NOT CURRENTLY USED
DMY084   DW    0                ;NOT CURRENTLY USED
DMY086   DW    0                ;NOT CURRENTLY USED
DMY088   DW    0                ;NOT CURRENTLY USED
DMY090   DW    0                ;NOT CURRENTLY USED
DMY092   DW    0                ;NOT CURRENTLY USED
DMY094   DW    0                ;NOT CURRENTLY USED
DMY096   DW    0                ;NOT CURRENTLY USED
DMY098   DW    0                ;NOT CURRENTLY USED
DMY100   DW    0                ;NOT CURRENTLY USED
DMY102   DW    0                ;NOT CURRENTLY USED
DMY104   DW    0                ;NOT CURRENTLY USED
DMY106   DW    0                ;NOT CURRENTLY USED
DMY108   DW    0                ;NOT CURRENTLY USED
DMY110   DW    0                ;NOT CURRENTLY USED
DMY112   DW    0                ;NOT CURRENTLY USED
DMY114   DW    0                ;NOT CURRENTLY USED
DMY116   DW    0                ;NOT CURRENTLY USED
DMY118   DW    0                ;NOT CURRENTLY USED
DMY120   DW    0                ;NOT CURRENTLY USED
DMY122   DW    0                ;NOT CURRENTLY USED
DMY124   DW    0                ;NOT CURRENTLY USED
DMY126   DW    0                ;NOT CURRENTLY USED