Examples
•
TEST/JCL
set
*ff
to
forMs/fIt
filter
*pr
*ff
forMs
(chars=#C#)
basic
run
l
#P1#"
//SToP
This example uses two substitution fields: one
in
the FORMS
command line representing the number of characters, and one
in
the
RUN
command line.
If
you issue the
DO
command:
00
TEST
(C
=
132
I P1=
PROGRAM
1 )
(ENTER)
the lines written
to
the SYSTEM/JCL file are:
•
TEST/JCL
set
*ff
to
forMs/fIt
filter
*pr
*ff
forMs
(chars=132)
basic
run
I
PRoGRAM1"
//SToP
The compile phase substitutes the character string value of the tokens
into the actual command line!
The length of the replacement string does not have to be equal
to
the
length of the token name between the
# signs.
To reduce the number of tokens needed
on
the
DO
command line,
and
to
increase the program options
at
the same time, use the
IIASSIGN macro
as
follows:
•
TEST/JCL
/IASSIGN
c=80
//ASSIGN
p1=pro~raM1
//IF
nUIll2
IIASSIGN
c=132
//ASSIGN
p1=pro~raM2
//END
set
*ff
to
forMs/fIt
filter
*pr
*ff
forMs
(chars=#C#)
basic
run
l
#P1#"
//SToP
A-21
To Next Page
Loading...
