I admit that I have no experience with this. I am attempting to modify a
TSO command processor that I downloaded from IBM. I am adding a new
"keyword" at the end. I am failing at execution time with the messages:
IKJ56293I RACSEQ2 FAILED - PARSE SERVICE ROUTINE HAD AN INVALID INPUT
PARAMETER BLOCK+
IKJ56293I RETRY, THEN IF ERROR CALL YOUR SYSTEM PROGRAMMER (REGISTER 15
= 12)
The parse code is:
KWXMLDD IKJKEYWD
IKJNAME 'XMLDDN',SUBFLD=XMLDDN,ALIAS=('DDN','DDNAME')
IKJNAME 'XMLDSN',SUBFLD=XMLDSN,ALIAS=('DSN','DSNAME')
IKJNAME 'XMLPATH',SUBFLD=XMLPATH,ALIAS=('PATH')
...
XMLDDN IKJSUBF
XMLDD IKJIDENT 'XMLDDN',UPPERCASE,MAXLNTH=8,FIRST=ALPHA, X
OTHER=ALPHANUM, X
HELP=('DD name to use for XML output')
XMLDSN IKJSUBF
XMLDS IKJPOSIT DSNAME,USID, X
HELP=('Dataset Name to be used for XML output')
XMLPATH IKJSUBF
XMLPAT IKJIDENT 'XMLPATH',ASIS,MAXLNTH=255, X
FIRST=ANY,OTHER=ANY, X
VALIDCK=VALDPATH, X
HELP=('UNIX path and file name')
If I remove the SUBFLD and ALIAS from the three IKJNAME macros, I don't
get the parse error. If I put a IKJKEYWD in front of each of the IKJNAME
macros, I don't get the parse error. What I'm trying to do is say that
the command will accept at most one of XMLDDN, XMLDSN, or XMLPATH.
Any TSO gurus left out there that want to admit it?
--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology
The information contained in this e-mail message may be privileged
and/or confidential. It is for intended addressee(s) only. If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense. If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
