FLABC - File Lasting Access Block

Table 1.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 144 DFHFLAB 
      Eye catcher
(0) CHARACTER 16 FLAB_EYE_CATCHER Eye catcher
(0) HALFWORD 2 FLAB_LENGTH Length of FLAB
(2) CHARACTER 6 FLAB_EYE1 >DFHFC FC 'domain'
(8) CHARACTER 8 FLAB_EYE2 FLAB 
      Main part of FLAB.
(10) CHARACTER 128 FLAB_MAIN_PART Main part of FLAB
(10) CHARACTER 4 *
(10) CHARACTER 4 *
(10) ADDRESS 4 FLAB_NEXT_FLAB_ ADDRESS -> next FLAB on chain from owning FLAB
(10) ADDRESS 4 FLAB_FREE_FLAB_ ADDRESS Address of next FLAB on free chain
(14) ADDRESS 4 FLAB_FRAB_ADDRESS Addresss of FRAB that owns this FLAB
(18) CHARACTER 8 *
(18) CHARACTER 8 FLAB_FILENAME Name of associated file
(20) CHARACTER 4 FLAB_REMOTE_SYSTEM_ID Name of target system if file is remote
(24) CHARACTER 8 FLAB_REMOTE_FILENAME Name of file on target system if file is remote
(2C) CHARACTER 4 *
(2C) ADDRESS 4 FLAB_FCTE_ADDRESS -> associated FCTE
(30) UNSIGNED 4 FLAB_ENVIRONMENT_ID Environment identifier 
      This part of the FLAB addresses the FRTE chain and controls
      whether the file may be closed or reallocated.
(34) CHARACTER 4 *
(34) ADDRESS 4 FLAB_FRTE_CHAIN_ ADDRESS -> first FRTE owned by this FLAB
(38) BIT(8) 1 FLAB_FLAGS Flag byte
(38) 1... ....   FLAB_FORCE_ABEND SDT connect failed, abend
(38) .1.. ....   * Reserved
(38) ..1. ....   FLAB_BACKOUT_ ATTEMPTS_DISABLED Do not attempt backout: base data set has had a backout failure since the last unshunt
(38) ...1 ....   * Reserved
(38) .... 1...   FLAB_MI_COMPLETE_SEEN Mass insert complete log rec seen (restart)
(38) .... .1..   FLAB_WA_COMPLETE_SEEN Write add complete log rec seen (restart)
(38) .... ..1.   FLAB_NEEDS_FLLB FLLB getmained but not yet chained
(38) .... ...1   FLAB_HAS_FLLB FLLB now chained
(39) BIT(8) 1 FLAB_SECURITY_ACCESS Security Characteristics
(39) 1... ....   FLAB_READ_ALLOWED Read security check OK
(39) .1.. ....   FLAB_UPDATE_ALLOWED Update security check OK
(39) ..11 1111   * Reserved
(3A) CHARACTER 1 *
(3A) UNSIGNED 1 FLAB_RETAIN_REASON Reason work had to be retained
(3B) UNSIGNED 1 FLAB_RETAIN_REASON2 Sub-reason for backout failures 
      SET storage for READ_SET requests
(3C) CHARACTER 8 FLAB_SET_CONTROL Set storage control
(44) CHARACTER 8 FLAB_SETU_CONTROL Set storage control 
      Threadsafe Flags ??? make these separate words
(4C) BIT(8) 1 *
(4C) CHARACTER 1 *
(4C) BIT(8) 1 FLAB_DO_NOT_CLOSE_ FLAG
(4C) 1... ....   FLAB_DO_NOT_CLOSE Dont close file until syncpoint commit
(4D) BIT(8) 1 *
(4D) CHARACTER 1 *
(4D) BIT(8) 1 FLAB_DO_NOT_ REALLOCATE_FLAG
(4D) 1... ....   FLAB_DO_NOT_ REALLOCATE Dont realloc file exist
(4E) BIT(8) 1 *
(4E) CHARACTER 1 *
(4E) BIT(8) 1 FLAB_RECOVERABLE_ WORK_DONE_FLAG
(4E) 1... ....   FLAB_RECOVERABLE_ WORK_DONE Recoverable work done so eligible for shunting
(4F) BIT(8) 1 *
(4F) CHARACTER 1 *
(4F) BIT(8) 1 FLAB_QUICMP_PENDING_ FLAG
(4F) 1... ....   FLAB_QUICMP_PENDING RLS QUICOPY or QUIBWO req recvd for base data set 
      Statistics for this task. Copied to FCT at end of task.
      If a stats are collected before end of task the value
      collected is saved in FLAB_STATS_COLLECTED so that the
      extra value saved at end of task is reduced by that value
(50) CHARACTER 28 FLAB_STATS Stats for task
(50) FULLWORD 4 FLAB_FCTDSRD READ
(54) FULLWORD 4 FLAB_FCTDSWRA ADD
(58) FULLWORD 4 FLAB_FCTDSWRU UPDATE
(5C) FULLWORD 4 FLAB_FCTDSGU GET UPDATE
(60) FULLWORD 4 FLAB_FCTDSBR BROWSE
(64) FULLWORD 4 FLAB_FCTDSBRU BROWSE UPDATE
(68) FULLWORD 4 FLAB_FCTDSDEL DELETE
(6C) CHARACTER 28 FLAB_STATS_COLLECTED Stats collected
(6C) FULLWORD 4 FLAB_FCTDSRD_ COLLECTED READ
(70) FULLWORD 4 FLAB_FCTDSWRA_ COLLECTED ADD
(74) FULLWORD 4 FLAB_FCTDSWRU_ COLLECTED UPDATE
(78) FULLWORD 4 FLAB_FCTDSGU_ COLLECTED GET UPDATE
(7C) FULLWORD 4 FLAB_FCTDSBR_ COLLECTED BROWSE
(80) FULLWORD 4 FLAB_FCTDSBRU_ COLLECTED BROWSE UPDATE
(84) FULLWORD 4 FLAB_FCTDSDEL_ COLLECTED DELETE
(88) CHARACTER 8 * Reserved
(90) CHARACTER 0 * Align to double word boundary

Constants

Table 2.
Len Type Value Name Description 
      Values for flab_retain_reason
1 DECIMAL 0 FLAB_NOT_RETAINED
1 DECIMAL 1 FLAB_FILE_BACKOUT_ FAILURE
1 DECIMAL 2 FLAB_CACHE_FAILURE
1 DECIMAL 3 FLAB_RLS_CATASTROPHE
1 DECIMAL 4 FLAB_INDOUBT
1 DECIMAL 5 FLAB_COMMIT_FAILURE
1 DECIMAL 6 FLAB_CICS_FAILURE 
      Values for flab_retain_reason2
1 DECIMAL 0 FLAB_NO_SUBREASON
1 DECIMAL 1 FLAB_IO_ERROR
1 DECIMAL 2 FLAB_NO_SPACE
1 DECIMAL 3 FLAB_AIX_FULL
1 DECIMAL 4 FLAB_DUP_RECORD
1 DECIMAL 5 FLAB_OPEN_ERROR
1 DECIMAL 6 FLAB_NO_LDEL
1 DECIMAL 7 FLAB_DEADLOCK
1 DECIMAL 8 FLAB_COPY_ACTIVE
1 DECIMAL 9 FLAB_SEVERE_ERROR
1 DECIMAL 10 FLAB_RETAINABLE_LOCKS
1 DECIMAL 11 FLAB_REPEATABLE_READS
1 DECIMAL 12 FLAB_LOCK_STRUC_FULL