The RTVJOBD command allows you to extract one or more parameters from
an existing job description into a CL program. This can be used for
various functions in working with job descriptions.
RTVJOBD uses the system API QWDRJOBD to access the information.
A typical use of the command is to extract the USER parameter to
determine if the job description specifies a user name rather than
*RQD.
DCL &USER *CHAR LEN(10)
.
.
RTVJOBD JOBD(JOBD1) USER(&USER)
IF (&USER *NE '*RQD') DO .....
The command parameters may be prompted for with the command. The
value in the parenthesis for each parameter describes the length and
type of field to be specified in your CL program to receive the
parameter.
Command parameters *CMD
------------------
JOBD The qualified job description. The library defaults
to *LIBL.
RTNLIB An optional return variable that will contain the
library name where the job description was found.
The value may be helpful if the job description is
accessed without a specific library name. If
specified, the variable must be declared as *CHAR
LEN(10).
USER An optional return variable that will contain the
value of the USER parameter. This will be either a
user profile name or *RQD. If specified, the
variable must be declared as *CHAR LEN(10).
JOBQ An optional return variable that will contain the
job queue that will be used. If specified, the
variable must be declared as *CHAR LEN(10).
JOBQL An optional return variable that will contain the
library name for where job queue is that will be
used. If specified, the variable must be declared
as *CHAR LEN(10).
JOBPTY An optional return variable that will contain the
job priority that will be assigned to a job. If
specified, the variable must be declared as *CHAR
LEN(1).
OUTPTY An optional return variable that will contain the
output priority that will be assigned to a job. If
specified, the variable must be declared as *CHAR
LEN(1).
PRTDEV An optional return variable that will contain the
print device assigned to a job. A name will be
returned or the special values *USRPRF, *SYSVAL, or
*WRKSTN. If specified, the variable must be
declared as *CHAR LEN(10).
LOGCLPGM An optional return variable that will contain the
value for whether CL commands from CL programs will
be logged. Either *YES or *NO will be returned. If
specified, the variable must be declared as *CHAR
LEN(4).
ACGCDE An optional return variable that will contain the
value for the accounting code assigned to the job.
If specified, the variable must be declared as *CHAR
LEN(15).
PRTTXT An optional return variable that will contain the
value for the print text assigned to the job. The
special value *SYSVAL may be returned. If
specified, the variable must be declared as *CHAR
LEN(30).
RTGDTA An optional return variable that will contain the
value for the routing data to be used for a job. If
specified, the variable must be declared as *CHAR
LEN(80).
RQSDTA An optional return variable that will contain the
value for the first 80 bytes of request data for a
job. Also see the RQSDTA2 parameter. If specified,
the variable must be declared as *CHAR LEN(80).
RQSDTA2 An optional return variable that will contain the
value for the the full 256 bytes of request data for
a job. If specified, the variable must be declared
as *CHAR LEN(256).
SYNTAX An optional return variable that will contain the
value for the setting of the SYNTAX parameter for a
job. A number 00-99 or the value *NOCHK will be
returned. If specified, the variable must be
declared as *CHAR LEN(60).
INLLIBL An optional return variable that will contain the
value for the setting of the initial library list
for a job. This list contains the first 25
libraries. No error will occur if more than 25
exist. See the INLLIBL2 parameter for the complete
list.
Each library is 11 bytes long (10 characters
followed by a blank), or the special values *SYSVAL
or *NONE. If specified, the variable must be
declared as *CHAR LEN(275).
INLLIBL2 An optional return variable that will contain the
value for the setting of the initial library list
for a job. This list contains the full 250
libraries.
Each library is 11 bytes long (10 characters
followed by a blank), or the special values *SYSVAL
or *NONE. If specified, the variable must be
declared as *CHAR LEN(2750).
ENDSEV An optional return variable that will contain the
value for the end severity setting for a job. This
will be a value of 00-99. If specified, the
variable must be declared as *CHAR LEN(2).
LOGLVL An optional return variable that will contain the
value for the logging level for a job. This will be
a value of 0-4. If specified, the variable must be
declared as *CHAR LEN(1).
LOGSEV An optional return variable that will contain the
value for the logging severity level for a job.
This will be a value of 00-99. If specified, the
variable must be declared as *CHAR LEN(2).
LOGMSGTXT An optional return variable that will contain the
value for the logging of message text for a job.
This will be a value of *NOLIST, *SECLVL, or *MSG.
If specified, the variable must be declared as *CHAR
LEN(7).
INQMSGRPY An optional return variable that will contain the
value for the inquiry message reply setting for a
job. This will be a value of *RQD, *DFT, or
*SYSRPLY. If specified, the variable must be
declared as *CHAR LEN(8).
OUTQ An optional return variable that will contain the
value for the output queue to be assigned for a job.
This will be a name or the special values *USRPRF,
*DEV, or *WRKSTN. If specified, the variable must
be declared as *CHAR LEN(10).
OUTQL An optional return variable that will contain the
value for the library where the output queue
assigned for a job exists. If specified, the
variable must be declared as *CHAR LEN(10).
HOLD An optional return variable that will contain the
value for the Hold setting assigned for a job. The
value returned will be *YES or *NO. If specified,
the variable must be declared as *CHAR LEN(4).
DATE An optional return variable that will contain the
value for the Date setting assigned for a job. The
value returned will be a number or *SYSVAL. If
specified, the variable must be declared as *CHAR
LEN(6).
SWS An optional return variable that will contain the
value for the switch settings assigned for a job.
The value returned will be 8 bytes of zeros or ones.
If specified, the variable must be declared as *CHAR
LEN(8).
DEVRCYACN An optional return variable that will contain the
value for the device recovery action assigned for a
job. The value returned will be *SYSVAL, *MSG,
*DSCMSG, *DSCENDRQS, *ENDJOB, or *ENDJOBNOLIST. If
specified, the variable must be declared as *CHAR
LEN(13).
TSEPOOL An optional return variable that will contain the
value for the Time slice end pool assigned for a
job. The value returned will be *SYSVAL, *NONE, or
*BASE. If specified, the variable must be declared
as *CHAR LEN(7).
JOBMSGQMAX An optional return variable that will contain the
maximum size of the job message queue in MB. A 0
value indicates that the system value QJOBMSGMX
controls the size. A value of 2-64 indicates the
size in MBs. If specified, the variable must be
declared as *DEC LEN(3 0).
JOBMSGQFUL An optional return variable that will contain the
action to occur if the job message queue becomes
full. A value of *SYSVAL, *NOWRAP, *WRAP, or
*PRTWRAP will be returned. If specified, the
variable must be declared as *CHAR LEN(10).
ALWMLTTHD An optional return variable that will contain
whether the job should allow multiple threads. A
value of *YES or *NO will be returned. If
specified, the variable must be declared as *CHAR
LEN(4).
SPLFACN An optional return variable that will contain the
spooled file action. A value of *KEEP, *DETACH, or
*SYSVAL will be returned. If specified, the
variable must be declared as *CHAR LEN(10).
INLASPGRP An optional return variable that will contain the
primary IASP if it exists. If no IASP exists, *NONE
is returned. If specified, the variable must be
declared as *CHAR LEN(10).
DDMCNV An optional return variable that will contain the
value for the DDM conversation attribute of the job
description. If specified, the variable must be
declared as *CHAR LEN(10).
LOGOUTPUT An optional return variable that will contain the
value for LOGOUTPUT attribute of the job
description. If specified, the variable must be
declared as *CHAR LEN(10).
TEXT An optional return variable that will contain the
value for the Text description of the job
description. If specified, the variable must be
declared as *CHAR LEN(50).
Prerequisites
-------------
The following TAA Tools must be on your system:
EDTVAR Edit variable
Implementation
--------------
None, the tool is ready to use.
Objects used by the tool
------------------------
Object Type Attribute Src member Src file
------ ----- --------- ---------- -----------
RTVJOBD *CMD TAAJBDB QATTCMD
TAAJBDBC *PGM CLP TAAJBDBC QATTCL
|
