Have you tried coding positional operands before keyword operands in the PCL?
= > Date: Mon, 30 Jun 2014 06:44:34 -0400 > From: [email protected] > Subject: Re: IKJPOSIT question > To: [email protected] > > I am looking for a load module which is going to do some XMEM stuff towards > that end it has to be APF authorized if not I prompt the user to renter the > DDNAME or DSN > > > > If its not APF Authorized I come up with the following message I would then > like them to re-enter the dsn name however when they do I get a IKJ INVALID > KEYWORD message > > > > > So syntax is CMDA ASID(xx) MODULE > Enter X to Terminate using log/list defaults > > IKJ56702I INVALID DATASET IBMUSER.TEST.LOAD IS NOT APF AUTHORIZED IT IS > REFRENC > ED BY DD = STEPLIB ENTER EITHER DDNAME OR DSN .., DACEE > > IKJ56718A REENTER THIS OPERAND+ - > > IBMUSER.TEST.LOAD > > IKJ56712I INVALID KEYWORD, IBMUSER.TEST.LOAD > IKJ56703A REENTER THIS OPERAND - > > > This is my original layout > > CMDA IKJPARM DSECT=PARSEAT > ASID IKJKEYWD > IKJNAME 'ASID',SUBFLD=ASIDF > * > * > PROG IKJUNFLD VERIFCK=PROGLOOK > * > * > * SUBFIELDS > * > * > ASIDF IKJSUBF > ASIDX IKJIDENT 'ASID',FIRST=ALPHANUM,OTHER=ALPHANUM,PROMPT='ASID',VAX > LIDCK=ASIDLOOK > * > "But I thought that I defined the load load module positional parameter with > a IKJPOSIT macro with a DSN parm it would work since it encompasses a load > module as well e.g." > > So I coded this layout > > * > CMDA IKJPARM DSECT=PARSEAT > ASID IKJKEYWD > IKJNAME 'ASID',SUBFLD=ASIDF > * > * > PROGX IKJPOSIT DSNAME,VALIDCK=PROGLOOK > * > *SN IKJSUBF > *ROG IKJTERM UPPERCASE,TYPE=ANY,VALIDCK=PROGLOOK > * > * > * SUBFIELDS > * > * > ASIDF IKJSUBF > ASIDX IKJIDENT 'ASID',FIRST=ALPHANUM,OTHER=ALPHANUM,PROMPT='ASID',VAX > LIDCK=ASIDLOOK > * > IKJENDP > > But when I do I get the following message > > > ISPF Primary Option Menu > Option ===> tso cmda asid(11) dacee > > 0 Settings Terminal and user parameters User ID . : IBM > 1 View Display source data or listings Time. . . : 00: > 2 Edit Create or change source data Terminal. : 327 > 3 Utilities Perform utility functions Screen. . : 1 > 4 Foreground Interactive language processing Language. : ENG > 5 Batch Submit job for language processing Appl ID . : ISR > 6 Command Enter TSO or Workstation commands TSO logon : ISP > 7 Dialog Test Perform dialog testing TSO prefix: > 9 IBM Products IBM program development products System ID : ADC > 10 SCLM SW Configuration Library Manager MVS acct. : ACC > 11 Workplace ISPF Object/Action Workplace Release . : ISP > M More Additional IBM Products > > > Enter X to Terminate using log/list defaults > IKJ56712I INVALID KEYWORD, DACEE > IKJ56703A REENTER THIS OPERAND - > > > > > > > -----Original Message----- > From: IBM Mainframe Discussion List [mailto:[email protected]] On > Behalf Of Anthony Thompson > Sent: Monday, June 30, 2014 4:22 AM > To: [email protected] > Subject: Re: IKJPOSIT question > > Quote ' I am looking for to enter a string following a keyword towards that > end I use IKJPOSIT SPACE,VALIDCK=' > > Making a positional parameter follow a keyword doesn't make much sense to > me. > > For further help, I think you'll need to supply: > > 1) the intended syntax of your command; > 2) the parameters passed to IKJPARS (the IKJPARM macro and all the following > IKJ* macros through to the IKJENDP macro); > 3) what you entered on your TSO session to cause the error message. > > Ant. > > > -----Original Message----- > From: IBM Mainframe Discussion List [mailto:[email protected]] On > Behalf Of MichealButz > Sent: Monday, 30 June 2014 10:48 AM > To: [email protected] > Subject: IKJPOSIT question > > I am looking for to enter a string following a keyword towards that end I > use IKJPOSIT SPACE,VALIDCK= > > I am looking to enter program name which is up to a 8 byte character string > > When I enter the string it comes back to me IKJ56712I INVALID KEYWORD > > I don't understand this as there isn't keyword it's a positional operand > > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, send email > to [email protected] with the message: INFO IBM-MAIN > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, send email > to [email protected] with the message: INFO IBM-MAIN > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
