Bruce Vining (bvining) is right.

If you plan on doing this frequently, or are thinking about putting this
into WRKJOBSCDE then you may want to replace the "call" with a command
interface.

You can take this source (commonly stored in QCMDSRC)

CMD PROMPT('My special program')
PARM KWD(MYNBR) TYPE(*DEC) LEN(7) MIN(1) +
CHOICE('Some number') PROMPT('Describe +
number')

and "compile" it with CRTCMD.

then you should be able to type in
PGM1 and hit F4 and it will prompt you for the number and format it
correctly to the program

See also:
http://publib.boulder.ibm.com/infocenter/iseries/v6r1m0/topic/rbam6/cmdinfodoc.htm

Commands are much cleaner when it comes to parameters in cases like
SBMJOB CMD(MYPGM1 MYNBR(2))
Then the stuff that happens when you try
SBMJOB CMD(CALL PGM(MYPGM1) PARM(2))
And it sure beats burying hex numbers all over the place.


Rob Berendt

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].