HLASM Language Reference

MACRO
&NAME MOVE &TO,&FROM
LCLC
&PREFIX
&PREFIX SETC '&TO'(1,5) Statement 1
&NAME ST 2,SAVEAREA
L 2,&PREFIX&FROM Statement 2
ST
2,&TO
L
2,SAVEAREA
MEND
-------------------------------------------------------------------
HERE MOVE FIELDA,B
-------------------------------------------------------------------
+HERE ST
2,SAVEAREA
+ L 2,FIELDB
+ ST 2,FIELDA
+ L 2,SAVEAREA
Statement 1 assigns the substring character value FIELD (the first five characters
corresponding to symbolic parameter &TO to the SETC symbol &PREFIX. Therefore,
FIELD replaces &PREFIX in statement 2.
Notes:
1. If the COMPAT(SYSLIST) assembler option is not specified, you can pass a
sublist into a macro definition by assigning the sublist to a SETC symbol, and
then specifying the SETC symbol as an operand in a macro instruction.
However, if the COMPAT(SYSLIST) assembler option is specified, sublists
assigned to SETC symbols are treated as a character string, not as a sublist.
2. Regardless of the setting of the COMPAT(SYSLIST) assembler option, you can
not pass separate (as opposed to a sublist of) parameters into a macro
definition, by specifying a string of values separated by commas as the
operand of a SETC instruction and then using the SETC symbol as an operand
in the macro instruction. If you attempt to do this, the operand of the SETC
instruction is passed to the macro instruction as one parameter, not as a list of
parameters.
Concatenating Substring Notations and Character Expressions: Substring
notations (see “Substring Notation” on page 371) can be concatenated with
character expressions in the operand field of a SETC instruction. If a substring
notation follows a character expression, the two can be concatenated by placing a
period between the terminating single quotation mark of the character expression
and the opening single quotation mark of the substring notation.
For example, if &ALPHA has been assigned the character value AB%4, and &BETA has
been assigned the character value ABCDEF, the following statement assigns &GAMMA
the character value AB%4BCD:
&GAMMA SETC '&ALPHA'.'&BETA'(2,3)
If a substring notation precedes a character expression or another substring
notation, the two can be concatenated by writing the opening single quotation mark
of the second item immediately after the closing parenthesis of the substring
notation.
386 HLASM V1R5 Language Reference