Re: [MI400] QIBM_QCA_RTV_COMMAND continues after CPF002 *ESCAPE?

["Carsten Flensburg" <flensburg@xxxxxxxxxx>]

Hello Gene,

The QIBM_QCA_CHG_COMMAND exit program allows you to replace the entire
command string with a completely different command - f.x. one that'll simply
send a program message to the caller saying that the requested command could
not be run.

Best regards,
Carsten Flensburg

----- Original Message -----
From: <Gene_Gaunt@ReviewWorks.com>
To: <MI400@midrange.com>
Sent: Thursday, March 21, 2002 6:57 PM
Subject: [MI400] QIBM_QCA_RTV_COMMAND continues after CPF002 *ESCAPE?


> I need to stop commands (CRTPGM, UPDPGM) from executing if a certain
> parameter's value (after F4 prompting) is such-and-such.  Although a
> validity checking program that sends CPF0002 *ESCAPE to its caller would
> work, these commands already have IBM validity checking programs.
>
> So I'm trying the "command analyzer retrieve exit program" registration
> facility.  Well, the QIBM_QCA_RTV_COMMAND exit point doesn't recognize the
> CPF0002 *ESCAPE trick.  How, in some instances, can I stop a command,
after
> prompting, from executing?
>
> _______________________________________________
> This is the MI Programming on the AS400 / iSeries (MI400) mailing list
> To post a message email: MI400@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/mi400
> or email: MI400-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/mi400.
>