RSR - Special resource record

   Name : DCLRSR

   Function:
   Resource Class Data Description Declare.  This segment describes the main key of a resource data
   instance, as well as defining the actual data objects contained for this key.  This mapping applies to
   the RD data set records, the CX data sets, and for resource data in storage.

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 44 RSU  
0 (0) ADDRESS 4 RSUNEXT ADDRESS TO NEXT ENTRY | 0
4 (4) CHARACTER 4 RSUEYE ID
8 (8) CHARACTER 2 RSUVER VERSION NUMBER
10 (A) CHARACTER 2 * RESERVED
12 (C) CHARACTER 4 RSUOPER CP OPERATION ID
12 (C) UNSIGNED 3 RSUOCC OCCURRENCE ID
15 (F) UNSIGNED 1 RSUOP OPERATION ID
16 (10) CHARACTER 1 RSUALCTYPE ALLOCATE TYPE (X/S)
17 (11) CHARACTER 11 * RESERVED
28 (1C) CHARACTER 4 RSUWS WORK STATION
32 (20) SIGNED 4 RSUALCNUM AMOUNT ALLOCATED
36 (24) CHARACTER 8 RSUJOBN JOBNAME
44 (2C) CHARACTER   RSUEND END
OPERATIONS WAITING FOR RESOURCE ALLOCATION ADDRESSED VIA QRSPLNWAIT (SEE DCLQRS)
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 44 RSW  
0 (0) ADDRESS 4 RSWNEXT ADDRESS TO NEXT ENTRY | 0
4 (4) CHARACTER 4 RSWEYE ID
8 (8) CHARACTER 2 RSWVER VERSION NUMBER
10 (A) BITSTRING 1 RSWFLAGS FLAG BYTE
   
 1...  ....
  RSWCONTTIE CONTENTION MESSAGE TIE BUILD
   
 .1..  ....
  RSWCHANGED RESOURCE WAS UPDATED
   
 ..11  1111
  * RESERVED
11 (B) CHARACTER 1 * RESERVED
12 (C) CHARACTER 4 RSWOPER CP OPERATION KEY
12 (C) UNSIGNED 3 RSWOCC OCCURRENCE ID
15 (F) UNSIGNED 1 RSWOP OPERATION ID
16 (10) CHARACTER 1 RSWALCTYPE ALLOCATE TYPE (X/S)
17 (11) CHARACTER 11 * RESERVED
28 (1C) CHARACTER 4 RSWWS WORK STATION
32 (20) SIGNED 4 RSWALCNUM AMOUNT TO ALLOCATE
36 (24) CHARACTER 8 RSWALCTIME TIME PUT ON WAIT Q (TOD)
44 (2C) CHARACTER   RSWEND END
DIALOG RESOURCE LIST EXTENSION THE EXTENSION IS APPENDED TO THE RS MAIN BODY DURING A GS LIST REQUEST.
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 72 RSL DIALOG LIST EXTENTION
0 (0) SIGNED 4 RSLXUSE CURRENT USED EXCLUSIVE
4 (4) SIGNED 4 RSLSUSE CURRENT USED SHARED
8 (8) SIGNED 4 RSLWAITR RESERVED
12 (C) SIGNED 4 * WAITING REASON (SEE DCLQDRSN)
16 (10) CHARACTER 1 RSLWQF ELEMENTS ON WAIT QUEUE (Y/N)
17 (11) CHARACTER 1 RSLXALL ANY CURRENT ALL X
18 (12) CHARACTER 1 RSLSALL S
19 (13) CHARACTER 5 * RESERVED
24 (18) CHARACTER 48 RSLCURIVL CURRENT INTERVAL
72 (48) CHARACTER   RSLEND END
DIALOG IN USE LIST AND WAITING QUEUE MAPPING. USED FOR DIALOG REQUESTS WITH RESOURCE CODE RESESWQ & RESRSUL.
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 72 RSD  
0 (0) CHARACTER 28 RSDKEY CP KEY
0 (0) CHARACTER 16 RSDOCC OCC ID
16 (10) CHARACTER 6 RSDOCCIAD OCC INPUT ARRIVAL DATE
22 (16) CHARACTER 4 RSDOCCIAT OCC INPUT ARRIVAL TIME
26 (1A) SIGNED 2 RSDOPNO OPERATION NUMBER
28 (1C) CHARACTER 4 RSDWS WORK STATION
32 (20) CHARACTER 8 RSDJOBNAME JOBNAME
40 (28) CHARACTER 6 RSDOPSTD OPERATION START/L.OUT DATE
46 (2E) CHARACTER 4 RSDOPSTT OPERATION START/L.OUT TIME
50 (32) SIGNED 4 RSDOCCNO OCCURRENCE NUMBER
54 (36) SIGNED 4 RSDALCNUM AMOUNT ALLOCATED
58 (3A) SIGNED 2 RSDPRIO PRIORITY
60 (3C) SIGNED 2 RSDDUR DURATION
62 (3E) CHARACTER 1 RSDALCTYPE ALLOCATION TYPE
63 (3F) CHARACTER 1 RSDSTAT STATUS
64 (40) SIGNED 4 RSDWRSN REASON FOR WAIT
68 (44) CHARACTER 1 RSDIAFLAG FLAGS
   
 1...  ....
  RSDINUSEL IN-USE LIST
69 (45) CHARACTER 3 * RESERVED
72 (48) CHARACTER   RSDEND END
RESOURCE INSTANCE DESCRIPTION. KEY FIELDS ARE DEFINED HERE. WHEN LOCATED IN THE RS-DATASPACE THE RECORD IS ADDRESSABLE VIA QRSPLNIX (SEE DCLQRS).
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 216 RS RESOURCE INSTANCE STRUCTURE
0 (0) CHARACTER 64 RSKEY KEY STRUCTURE
0 (0) CHARACTER 2 RSID USED BY FOR IO METHODS
2 (2) CHARACTER 44 RSNAME PLAN INSTANCE KEY
46 (2E) CHARACTER 16 * RESERVED FOR ADDITIONAL KEY FIELDS
OBJECT HEADER. CONTAINS THE INDEX ID OF THE RESOURCE AS WELL AS COMMON RESOURCE DATA. NOTE: THE OBJECT HEADER IS NOT POSSIBLE TO UPDATE IN DIALOG CODE.
64 (40) CHARACTER 12 RSOBJDESC OBJECT HEADER STRUCTURE
64 (40) SIGNED 4 * RESERVED
68 (44) SIGNED 4 RSOBJIDX RESOURCE INDEX NUMBER
72 (48) BITSTRING 1 RSOFLAGS FLAG BYTE
   
 1...  ....
  RSOUPDATE RECORD UPDATED (IN DSPC ONLY)
   
 .1..  ....
  RSOCONERR ON ERROR MODIFIED IN CX
   
 ..1.  ....
  RSOCUSEDFOR USED FOR CHANGED IN CX
   
 ...1  ....
  RSOCDEFWSC DEFAULT WSC CHANGED IN CX
   
 ....  1...
  RSODYNADD DYNADDED RESOURCE
   
 ....  .111
  * RESERVED
73 (49) CHARACTER 1 RSORODMA RODM STATUS, AVAILABILITY
74 (4A) CHARACTER 1 RSORODMQ QUANTITY
75 (4B) CHARACTER 1 RSORODMD DEVIATION
REST OF MAIN RS BODY.
76 (4C) CHARACTER 4 RSEYE RECORD ID
80 (50) SIGNED 4 RSVER RECORD VERSION
84 (54) CHARACTER 8 RSLUSER LAST UPDATING USER in RD
92 (5C) CHARACTER 8 RSGROUP GROUP ID
100 (64) CHARACTER 6 RSLUDATE DATE OF LAST UPDATE in RD
106 (6A) CHARACTER 4 RSLUTIME TIME OF LAST UPDATE IN RD
110 (6E) CHARACTER 2 RSONERROR

ON ERROR OPTION:
F=FREE
FX=FREE IF EXCLUSIVE
FS=FREE IF SHARED
K=KEEP
'BLANK'=USE DEFAULTS

112 (70) SIGNED 4 RSDEVIATION DEVIATION OF ABOVE (MAX)
116 (74) CHARACTER 46 RSDESC RESOURCE DESCRIPTION
162 (A2) CHARACTER 6 RSLUDATECP DATE OF LAST UPD in CP
168 (A8) CHARACTER 4 RSLUTIMECP TIME OF LAST UPD IN CP
2 CHAR(2) , RESERVED
172 (AC) SIGNED 4 RSGQUANT GLOBAL (OVERRIDE) QUANTITY
176 (B0) CHARACTER 1 RSGAVAIL GLOBAL (OVERRIDE) AVAILABILLITY
177 (B1) CHARACTER 1 RSSELAVAIL AVAIL FILTER
NEXT HAD TO BE MOVED DUE TO CONFLICT WITH V2 ENH. WITH FLAG XB
178 (B2) CHARACTER 8 RSRLUTS LAST UPDATE TIMESTAMP
186 (BA) CHARACTER 8 RSLUSERCP LAST UPDATING USER IN CP
194 (C2) CHARACTER 1 RSHIPER DLF RESOURCE, Y OR N
195 (C3) CHARACTER 1 RSUSEDFOR USED FOR (N|P|C|B)
196 (C4) CHARACTER 1 RSSELWAIT WAIT FILTER
197 (C5) CHARACTER 1 RSSELALCS ALLOCATED FILTER
198 (C6 CHARACTER 1 RSONCOMPLETE

ON COMPLETE OPTION:
Y=SET TO YES
N=SET TO NO
R=RESET
'BLANK'=USE DEFAULTS

199 (C7) CHARACTER 1 RSLASTMODTYPE LAST UPDATE OF GLOBAL AVAILABILITY DUE TO:

E = EVENT APPLIED
M = MAX LIMIT
L = LIFESPAN TIE
C = ON COMPLETE ACTION
'BLANK' = OTHER

200 (C8) SIGNED 4 RSIVLNUM NUMBER OF INTERVALS
204 (CC) SIGNED 4 RSIVLOFF OFFSET
208 (D0) SIGNED 4 RSIVLCUR CURRENT INTERVAL
212 (D4) SIGNED 4 RSIVLDOFF RESERVED
216 (D8) SIGNED 4 RSUSAGECOUNTER USAGE COUNTER: INCREASED BY 1 EACH TIME A JOB ALLOCATES THE SR. RESET TO 0 WHEN MAX USAGE LIMIT IS EXCEEDED.
220 (DC) SIGNED 4 RSMAXUSAGELIMIT

MAX USAGE LIMIT:
0 = DO NOT USE COUNTERS
(THIS IS THE DEFAULT)

224 (E0) CHARACTER 1 RSMAXUSAGETYPE

MAX USAGE TYPE:
Y = SET TO YES
N = SET TO NO
'BLANK' = RESET TO BLANK

225 (E1) CHARACTER 1 RSTIELIFEACT S TIE ACTION
226 (E2) CHARACTER 10 RSTIELIFEDAT S TIE DATE AND TIME
236 (EC) CHARACTER 4 * FREE
240 (F0) CHARACTER RSEND END OF OBJECT HEADER
INTERVAL DESCRIPTION ARRAY
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 48 RSIVL (*) INTERVAL
0 (0) SIGNED 4 RSIDAY DATE
4 (4) CHARACTER 6 RSIDATE DATE
10 (A) CHARACTER 2 * RESERVED
12 (C) CHARACTER 4 RSIFTIME FROM TIME
16 (10) CHARACTER 4 RSITTIME TO TIME
20 (14) SIGNED 4 RSIQUANT MAX TO ALLOCATE
24 (18) SIGNED 4 RSIQUANTD MAX TO ALLOCATE (PLAN)
28 (1C) SIGNED 4 RSIWSCNUM NUMBER OF CONNECTED WS
32 (20) CHARACTER 1 RSIAVAIL AVAILABLE (Y/N)
33 (21) CHARACTER 1 RSIAVAILD AVAILABLE (Y/N) (PLAN)
34 (22) CHARACTER 1 * RESERVED
35 (23) BITSTRING 1 RSIFLAGS FLAG BYTE
   
 1...  ....
  RSIMODIFY CHANGED IN DIALOG
   
 .111  1111
  * RESERVED
36 (24) SIGNED 4 RSIWSOFF WS OFFSET
40 (28) CHARACTER 8 * RESERVED
48 (30) CHARACTER   RSIEND END
INTERVAL DATA
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 96 RSIVLDATA  
0 (0) SIGNED 4 RSIMAXUSED MAXIMUM CONCURRENT ALLOCATED
4 (4) SIGNED 4 RSINOWUSES CURRENTLY USED SHARED
8 (8) SIGNED 4 RSINOWUSEX CURRENTLY USED EXCLUSIVE
12 (C) SIGNED 4 RSINOWALLX CURRENT ALLOC ALL X
16 (10) SIGNED 4 RSINOWALLS CURRENT ALLOC ALL SHARED
20 (14) SIGNED 4 RSIALCTIME TIME ALLOCATED
24 (18) SIGNED 4 RSIWAITTIME TIME WAITING
28 (1C) SIGNED 4 RSIUAVATIME TIME UNAVAILABLE
32 (20) SIGNED 4 RSIALCFAIL ALLOCATION FAILIURES
36 (24) SIGNED 4 RSICONFAIL WS CONNECT FAILURES (DP ONLY)
40 (28) SIGNED 4 RSIMADEUA MADE UNAVAILABLE TIMESTAMP
44 (2C) SIGNED 4 RSIALCST ALLOCATION STARTED
48 (30) SIGNED 4 RSIWAITST WAIT STARTED
52 (34) SIGNED 4 RSISTTIME START TIME OF RSID BLOCK
56 (38) SIGNED 4 RSIENDTIME END TIME OF THIS IVLD BLOCK
60 (3C) CHARACTER 10 RSISTTIMEC START DATE & TIME IN CHAR
60 (3C) CHARACTER 6 RSISTTIMEC_D DATE
66 (42) CHARACTER 4 RSISTTIMEC_T TIME
70 (46) CHARACTER 10 * RESERVED
80 (50) SIGNED 4 * (4) RESERVED
96 (60) CHARACTER   RSIDEND END
WORKSTATION CONNECT ARRAY (ONE FOR EACH IVL).
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 8 RSCONWS (*)  
0 (0) CHARACTER 4 RSCWSDNAME WORK STATION NAME
4 (4) CHARACTER 4 * RESERVED
8 (8) CHARACTER   RSCEND END