Re: How do I "force" a retry option when all I get to choose from is (C G D F)?

[Charles Wilt <charles.wilt@xxxxxxxxx>]

The QCAPCMD API has better error handling options...

Alternatively, use the SQL DELETE or TRUNCATE operations...

Note that the SQL DELETE in particular is likely to work when CLRPFM
doesn't.  That may be ok or may not be...depending on your use case.

HTH,
Charles

On Wed, Sep 3, 2025 at 1:09 PM Dan Bale <dan.bale@xxxxxxxxxxxxxxxxxxxxx>
wrote:

> I've been out of RPG for a while.  It feels like this should be fairly
> simple, but it is escaping me.  Maybe putting it in a MONITOR block, but
> then how to send a message that can be responded to with a 'C' or 'R'?
>
> A direct call to the RPG program is submitted to a job queue.
> In RPG:
> Command = 'ClrPfm transacts';
> CommandLen = %len( Command );
> Callp  QCmdExc  ( ( Command ) : ( CommandLen ) );
>
> If file transacts is open elsewhere, the job sends message "The call to
> *LIBL/QCMDEXC ended in error (C G D F)."  Instead of that message, I'd like
> to see a message that gives me (C R) options.
>
> - Dan Bale
> *** CONFIDENTIALITY NOTICE: The information contained in this
> communication may be confidential, and is intended only for the use of the
> recipients named above. If the reader of this message is not the intended
> recipient, you are hereby notified that any dissemination, distribution, or
> copying of this communication, or any of its contents, is strictly
> prohibited. If you have received this communication in error, please return
> it to the sender immediately and delete the original message and any copy
> of it from your computer system. If you have any questions concerning this
> message, please contact the sender. ***
> --
> This is the RPG programming on IBM i (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/rpg400-l.
>
> Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
> questions.