Generating the application, operation, and workstation data sets from the database

HCL Workload Automation for Z includes the following samples that help you generate the data sets that you will later process into the Discovery Library book XML file of Change and Configuration Management Database on the HCL Workload Automation master domain manager.

EQQTBMSW

A PIF-based REXX EXEC that extracts a list of workstations from the WS database. The output is a sequential data set with the following layout:

<subsystem_name>,<workstation_name>,<workstation_type>

where the workstation type is identified by a letter as follows:

Table 1. Identifiers for workstation types in the WS database
Identifier	Description
A	Agent (used for HCL Workload Automation only)
B	Broker
C	Computer
E	Remote engine (HCL Workload Automation for Z or HCL Workload Automation)
G	General
L	Pool
M	Manager (used for HCL Workload Automation master domain managers only)
P	Printer
S	System Automation
V	Virtual
X	Extended agent (used for HCL Workload Automation only)
Y	Dynamic pool
Z	z-Centric

The name of the data set generated by the sample is WSOUT. For example, a list of workstations is:

CWSA,ALFA,C
CWSA,CPU1,C
CWSA,CPU2,C
CWSA,CPU3,C
CWSA,DYNA,B
CWSA,DYNB,B
CWSA,GENA,G
CWSA,GENN,G
CWSA,MTZ1,Z
CWSA,MYPO,L
CWSA,MYP2,B
CWSA,SAU3,S
CWSA,SPAN,Z
CWSA,STC1,C
CWSA,TWSA,C
CWSA,VIRT,V
CWSA,WAIT,G
CWSA,ZZZZ,V

EQQTBSMA

Is a PIF-based REXX EXEC that extracts a list of applications, including their operations, from the AD data base. The output is two sequential data sets - one with a list of applications, the other with one of operations - with the following layout:

For applications:

<subsystem_name>,JS,<application_name>,<owner>

For operations:

<subsystem_name>,JOB,<application_name>,<owner>,<job_name>,
  <operation_number>,<is_critical>,<workstation_name>

Only active applications (status=A), whose validity range includes the date when the EXEC is run, are added in the data set. Pending applications (status=P) are ignored.

The name of the data sets generated by the sample are ADSOUTJS and ADSOUTJB. For example, a list of applications (ADSOUTJS) is:

TW9P ,JS  ,APPLSA          , RUSSELL
TW9P ,JS  ,FCPCW01         , 9610
TW9P ,JS  ,FDPCW01         , 9610
TW9P ,JS  ,FEPCW01         , 9610
TW9P ,JS  ,FFPCW01         , 9610
TW9P ,JS  ,LOAF77BANK19    , DBT
TW9P ,JS  ,MYAPPLW2        , RUSSELL
TW9P ,JS  ,MYAPPLW3        , RUSSELL
TW9P ,JS  ,MYAPPL1         , RUSSELL
TW9P ,JS  ,MYAPPL3         , JKSON12
TW9P ,JS  ,MYAPPL4         , ACCNT0NE
TW9P ,JS  ,RFS000014       , FRANCIS
TW9P ,JS  ,TROMP24A        , FRANCIS
TW9P ,JS  ,CCRMOPUS        , 9610
TW9P ,JS  ,DADDSM0         , RUSSELL

A list of operations (ADSOUTJB) is:

TW9P ,JOB ,APPLSA          , RUSSELL         , JOB1    , 10, N, SAWS
TW9P ,JOB ,FCPCW01         , 9610            , DEPCW01H, 1, N, MYWS
TW9P ,JOB ,FDPCW01         , 9610            , DEPCW01H, 1, N, MYWS
TW9P ,JOB ,FEPCW01         , 9610            , DEPCW01H, 1, N, MYWS
TW9P ,JOB ,FFPCW01         , 9610            , DEPCW01H, 1, N, MYWS
TW9P ,JOB ,LOAF77BANK19    , DBT             , EUNUT000, 9, N, CPUS
TW9P ,JOB ,LOAF77BANK19    , DBT             , N1977U01, 10, N, UA19
TW9P ,JOB ,LOAF77BANK19    , DBT             , F1977L01, 11, N, UA19
TW9P ,JOB ,LOAF77BANK19    , DBT             , N1977U15, 38, N, UA19
TW9P ,JOB ,LOAF77BANK19    , DBT             , F1977L15, 39, N, UA19
TW9P ,JOB ,LOAF77BANK19    , DBT             , N1977U16, 40, N, UA19
TW9P ,JOB ,LOAF77BANK19    , DBT             , F1977L16, 41, N, UA19
...
TW9P ,JOB ,LOAF77BANK19    , DBT             , N1977U17, 42, N, UA19
TW9P ,JOB ,LOAF77BANK19    , DBT             , F1977L25, 59, N, UA19
TW9P ,JOB ,LOAF77BANK19    , DBT             , N1977U26, 60, N, UA19
TW9P ,JOB ,LOAF77BANK19    , DBT             , F1977L26, 61, N, UA19
TW9P ,JOB ,LOAF77BANK19    , DBT             , N1977U27, 62, N, UA19
TW9P ,JOB ,LOAF77BANK19    , DBT             , F1977L27, 63, N, UA19
TW9P ,JOB ,LOAF77BANK19    , DBT             , EUNUT999, 99, N, NULL
TW9P ,JOB ,MYAPPLW2        , RUSSELL         , JOBWAIT , 1, N, W2WS
TW9P ,JOB ,MYAPPLW3        , RUSSELL         , JOBWAIT , 1, N, W3WS
TW9P ,JOB ,MYAPPL1         , RUSSELL         , JOB1    , 1, P, MYWS
TW9P ,JOB ,MYAPPL1         , RUSSELL         , JOBICBC , 2, P, MYWS
TW9P ,JOB ,MYAPPL2         , RUSSELL         , JOB1    , 1, P, MYWS
TW9P ,JOB ,MYAPPL3         , JKSON12         , JOB1    , 1, N, MYWS
TW9P ,JOB ,MYAPPL4         , ACCNT0NE        , JOB1    , 1, N, MYWS

The samples include also a customizable JCL (EQQTBSJ) that you can use to run the EXECS. You can schedule the JCL to run and collect the data from the data bases on a regular basis at the best time to get a fresh picture of the data base contents.