RFE92319-asis
RFE92319 sample with existing EDCDSECT output
rfe92319.h
Go to the documentation of this file.
1 #pragma pack(packed)
2 
3 #ifndef __iazjsab__
4 #define __iazjsab__
5 
6 struct iazjsab {
7  unsigned char jsabid[4]; /* JSAB ID */
8  void *jsabnext; /* JSAB CHAIN FIELD */
9  int jsablen; /* Length of control block @410D001 */
10  unsigned char jsabvers; /* CONTROL BLOCK VERSION */
11  unsigned char jsabflg1; /* JSAB FLAG 1 @410D001 */
12  unsigned char jsabflg2; /* JSAB FLAG 2 @410D001 */
13  struct {
14  unsigned char _jsabclev; /* CREATING COMPONENT'S CODE LEVEL */
15  } jsabclr;
16  unsigned char jsabscid[4]; /* SCHEDULING COMPONENT'S ID */
17  struct {
18  unsigned char _jsabjbid[8]; /* JOB ID */
19  } jsabwkid;
20  unsigned char jsabjbnm[8]; /* JOB NAME */
21  unsigned char jsabpref[8]; /* PREFIX USED IN MESSAGES */
22  unsigned char jsabusid[8]; /* USERID */
23  unsigned char jsabssnm[4]; /* Creating Subsystem name @MG05383 */
24  unsigned char jsabresc[16]; /* Reserved for future use @MG05383 */
25  double jsabestk; /* PROGRAM ENTRY START TIME */
26  double jsabxstk; /* PROGRAM EXECUTION START TIME */
27  void *jsabuser; /* USER AREA POINTER */
28  unsigned char jsabgpnm[8]; /* XCF group name @520LSDS */
29  unsigned char jsabjsta[8]; /* JES Status @OW17398 */
30  int jsabresv[5]; /* Reserved for future use @OW17398 */
31  double jsabend; /* CAUSE DOUBLE WORD BOUNDARY */
32  };
33 
34 #define jsabclev jsabclr._jsabclev
35 #define jsabjbid jsabwkid._jsabjbid
36 
37 /* Values for field "jsabvers" */
38 #define jsabvrsn 1 /* CURRENT CONTROL BLOCK VERSION */
39 
40 /* Values for field "jsabflg1" */
41 #define jsabnval 0x80 /* This JSAB is not valid @410D001 */
42 #define jsabstsk 0x40 /* Subtask level JSAB @R05LOPI */
43 
44 /* Values for field "jsabend" */
45 #define jsabsize 0x80 /* LENGTH OF JSAB */
46 #define jsabblsz 0x38 /* LENGTH OF CHARACTER AREA */
47 #define jsabclrl 0x71 /* Length of re-use clear area @410D001 */
48 #define jsabok 0 /* JSAB PROCESSING OK */
49 #define jsabnost 4 /* JSAB STORAGE NOT OBTAINED/RELEASED */
50 #define jsabnfnd 8 /* JSAB NOT FOUND RETURN CODE */
51 
52 #endif
53 
54 #pragma pack(reset)
void * jsabnext
Definition: rfe92319.h:8
unsigned char jsabflg2
Definition: rfe92319.h:12
unsigned char jsabusid[8]
Definition: rfe92319.h:22
unsigned char jsabvers
Definition: rfe92319.h:10
int jsablen
Definition: rfe92319.h:9
double jsabxstk
Definition: rfe92319.h:26
unsigned char _jsabjbid[8]
Definition: rfe92319.h:18
unsigned char jsabid[4]
Definition: rfe92319.h:7
unsigned char jsabjsta[8]
Definition: rfe92319.h:29
struct iazjsab::@1 jsabwkid
double jsabend
Definition: rfe92319.h:31
struct iazjsab::@0 jsabclr
Definition: rfe92319.h:6
unsigned char jsabgpnm[8]
Definition: rfe92319.h:28
int jsabresv[5]
Definition: rfe92319.h:30
double jsabestk
Definition: rfe92319.h:25
unsigned char jsabjbnm[8]
Definition: rfe92319.h:20
unsigned char jsabssnm[4]
Definition: rfe92319.h:23
unsigned char jsabscid[4]
Definition: rfe92319.h:16
void * jsabuser
Definition: rfe92319.h:27
unsigned char jsabflg1
Definition: rfe92319.h:11
unsigned char jsabpref[8]
Definition: rfe92319.h:21
unsigned char _jsabclev
Definition: rfe92319.h:14
unsigned char jsabresc[16]
Definition: rfe92319.h:24