The syntax for coding the program type is shown in the subfield format on page ***.
You may omit the program type subfield. If specified, the assembler assigns the value to the symbol naming the DC instruction, if a symbol was present. It can be specified as a decimal, character, hex or binary self-defining term and is stored as a 32-bit value. The value is not used in any way by the assembler, and may be queried by using the SYSATTRP built-in function.
The program type is specified within a P prefixed set of parenthesis - P(). For example:
Prog1 DC CP(7)'Perth' Program type is 7 Prog2 DC 3XP(C'APC')'FF' Program type is C'APC'
Symbols used in subfield 4 need not be previously defined, except in literals. For example:
SYM DC FP(Rate5)'35.92' Rate5 EQU 5
All expressions in program type must be evaluatable when the DC is processed.
If program type is omitted, the assembler assigns a null to the program type, and querying the value using the SYSATTRP built-in function returns a null value.
If there are multiple operands and the first has no P-type, but one of the subsequent operands does have a P-type, then the program is assigned from the last operand specifying a program type value. For example:
alabel dc fp(1)'1',hp(33)'32760'
results in a program type of 33 being assigned to alabel.
[ Top of Page | Previous Page | Next Page | Contents | Index ]