FSCB - Current® primary index record control block

   Name : DCLFSCB

   Function:
   This module contains the declarative of the FSCB structure which maps a generic record of the VSAM file
   constituting the primary index inside the database of the data store. It is used each time that an internal
   module of the data store requires a physical direct access to the primary index.
   Inside the module, you can distinguish the primary key of the SYSOUT, that is, the key of the KSDS:
      Jobname
      Execution date
      Execution time
     SYSOUT identifier
   Other data comprise:
      Structured and unstructured datafile number
      Structured and unstructured datapage RBN (relative block number)
      Structured and unstructured datapage total number
   A set of these three elements (separately for structured and unstructured data) constitutes the
   coordinates used to correctly locate the data portion of the SYSOUT, inside both a structured and
   unstructured datafile.
   Finally, to complete this structure, there is the secondary SYSOUT key. This comprises:
      Occurrence token
      Operation number
   These data form the operation token representing, inside the cleanup and restart local data store,
   the alternative key to get a job log. A filler for future use closes the structure.

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 77 FSCB CPRIMARYIDXREC CONTROL BLOCK
0 (0) CHARACTER 77 SKPIDXRC CURRENT PRIMARY KEY
0 (0) CHARACTER 34 FSXB PRIMARY KEY CLASS CONTROL BLOCK
0 (0) CHARACTER 8 SXBJOBNM JOBNAME
8 (8) CHARACTER 8 SXBJOBDT
8 (8) CHARACTER 4 SXBYEAR YEAR OF JOBDATE
12 (C) CHARACTER 2 SXBMONTH MONTH OF JOBDATE
14 (E) CHARACTER 2 SXBDAY DAY OF JOBDATE
16 (10) CHARACTER 8 SXBJOBTM JOB TIME IN X'HHMMSSHH' FORMAT
24 (18) CHARACTER 8 SXBJOBID JES JOB IDENTIFIER
32 (20) SIGNED 2 SXBDSID SYSOUT DD IDENT. IT IS EQUAL TO JES DSID
34 (22) UNSIGNED 1 SFSTFILN STRUCTURED DATAFILE FILE NUMBER
35 (23) UNSIGNED 1 SFUNFILN UNSTRUC. DATAFILE FILE NUMBER
36 (24) SIGNED 4 SFSTRBN SYSOUT RBN IN STRUCTURED DATAFILE
40 (28) SIGNED 4 SFUNRBN SYSOUT RBN IN UNSTRUCTURED DATAFILE
44 (2C) SIGNED 4 SKBUTOTP TOTAL NUMB.OF PAGES FOR UNSTRUCTURED SYSOUT
48 (30) SIGNED 4 SKBSTOTP TOTAL NUMB.OF PAGES FOR STRUCTURED SYSOUT
52 (34) CHARACTER 10 SABELEM ELEM.OF SECOND. KEY
52 (34) CHARACTER 10 SABOPRTK OPERATION TOKEN
52 (34) CHARACTER 8 SABOCCTK OCCURRENCE TOKEN
60 (3C) SIGNED 2 SABOPRNR OPERATION NUMBER
62 (3E) CHARACTER 15 SKPFILL FILER TO COMPLETE PIDX RECORD