The WHEN control statement defines the test used to determine if the TMC or Audit record is to be selected for printing. The format for the WHEN control statement is:
[ AND ] [ AND ]
WHEN le [ OR ] le ... [ OR ] le
Control Statement Definition
le is either:
<operand1> <relational expression> <operand2>
Must be valid keywords. The length of operand1 would control the length of any compare, and the data type of operand1 would control the type of compare (logical or decimal). Therefore, if operand1 has been defined with a length of 4, only the first four bytes of the record are compared to operand2.
Must be one of the following:
EQ - equal
GE - greater than or equal
GT - greater than
LE - less than or equal
LT - less than
NE - not equal
{ ON }
operand1 { OFF } operand2
{ MXD }
Are as defined in the preceding logical expression, with the additional constraint that they are 1-byte fields only. Normally, operand1 would be a keyword and operand2 is normally a defined hexadecimal value to test specific bits of operand1. It functions as a mask on operand1.
ON Specifies all bits on.
OFF Specifies all bits off.
MXD Specifies at least one bit on and at least one bit off.
Every WHEN control statement is terminated by an ACTION control statement. You find the valid keywords in the Programming Guide. If you use DSNB=YES or DSNB=FAST, the DSNB record is mapped into the volume definitions. The fields are mapped as follows:
DSNB Keyword Mapping using DSNB=FAST
|
VOLUME |
DSNB |
Note |
|---|---|---|
|
|
BID |
Not mapped, not available for reporting |
|
|
ACTIND |
Not mapped, not available for reporting |
|
FLAG1 |
FLAG1 |
|
|
LSTDSNB |
CURRDSNB |
|
|
|
PREV |
Not mapped, not available for reporting |
|
1STDSNB |
NEXT |
|
|
VOLSER |
VOLSER |
|
|
|
F1STVSN |
Not mapped, not available for reporting |
|
NUMDSNB |
FILSEQ |
|
|
DSN |
DSN |
|
|
EXPDT |
EXPDT |
|
|
CDATE |
CDATE |
|
|
CTIME |
CTIME |
|
|
CJOB |
CJOB |
|
|
CSTEP |
CSTEP |
|
|
LRECL |
LRECL |
|
|
BLKSIZE |
BLKSIZE |
|
|
BLKCNT |
BLKCNT |
|
|
RECFM |
RECFM |
|
|
BATCHID |
BATCHID |
|
|
HOOKID |
HOOKID |
|
|
AUDATE |
AUDATE |
|
|
AUTIME |
AUTIME |
|
|
USERID |
USERID |
|
|
CPUID |
CPUID |
|
|
AUCODE |
AUCODE |
|
|
AUFLAG1 |
AUFLAG1 |
|
DSNB Keyword Mapping using DSNB=YES
|
VOLUME |
DSNB |
Note |
|---|---|---|
|
|
BID |
Not mapped, not available for reporting |
|
|
ACTIND |
Not mapped, not available for reporting |
|
FLAG1 |
FLAG1 |
|
|
LSTDSNB |
CURRDSNB |
|
|
|
PREV |
Not mapped, not available for reporting |
|
1STDSNB |
NEXT |
|
|
|
VOLSER |
Not mapped, not available for reporting |
|
VOLSER |
F1STVSN |
|
|
NUMDSNB |
FILSEQ |
|
|
DSN |
DSN |
|
|
EXPDT |
EXPDT |
|
|
CDATE |
CDATE |
|
|
CTIME |
CTIME |
|
|
CJOB |
CJOB |
|
|
CSTEP |
CSTEP |
|
|
LRECL |
LRECL |
|
|
BLKSIZE |
BLKSIZE |
|
|
BLKCNT |
BLKCNT |
|
|
RECFM |
RECFM |
|
|
BATCHID |
BATCHID |
|
|
HOOKID |
HOOKID |
|
|
AUDATE |
AUDATE |
|
|
AUTIME |
AUTIME |
|
|
USERID |
USERID |
|
|
CPUID |
CPUID |
|
|
AUCODE |
AUCODE |
|
|
AUFLAG1 |
AUFLAG1 |
|
|
OUTCODE |
|
Obtained from the volume and does not have a similar field in the DSNB record. |
|
OUTDATE |
|
Obtained from the volume and does not have a similar field in the DSNB record. |
|
SLOT |
|
Obtained from the volume and does not have a similar field in the DSNB record. |
|
Copyright © 2013 CA Technologies.
All rights reserved.
|
|