Re: QCMDCHK API

["Dan Bale" <dbale@xxxxxxxxxxx>]

>>Does anyone know how to use the QCMDCHK API or something similar and allow
variables as command parameters?  Similar to user options in PDM.  Using the
QCMDCHK API and specifying a variable (like &F) for a command parameter
produces an error stating that variables can only be used in CL programs.

I'm guessing there's a way to do it since you can do it with user options in
PDM.  I checked out the call stack while doing this in PDM and see the
QUOCMD API being called, but I didn't find this API specified anywhere in
the online manuals.<<

Brad,

I am using the QCMDCHK in a way that seems similar to your requirements.  Here
is one example:

If  ( &SrcType *eq 'RPG' ) Then( Do )

      ChgVar &Cmd Value('+

          ?CrtRpgPgm Pgm(' *cat &SrcFileLib *tcat '/' *cat &SrcMember *tcat ') +

                 SrcFile(' *cat &SrcFileLib *tcat '/' *cat &SrcFile   *tcat ') +

                                                                              ')

      Call QCmdChk ( &Cmd 2000 )

      SbmJob RqsDta( &Cmd )     Job( &SrcMember )

EndDo


HTH,
- Dan Bale





* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the RPG/400 Discussion Mailing List!  To submit a new         *
* message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
* from this list send email to MAJORDOMO@midrange.com and specify       *
* 'unsubscribe RPG400-L' in the body of your message.  Questions should *
* be directed to the list owner / operator: david@midrange.com          *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *