Re: Recognising a particular job -- RPG400-L

Hi Dave,

thanks for your reply.
I've used that API a few times, it might be my fallback position if I can't
think of anything simpler.
I can't exactly recall why I think it's expensive to call, I guess I could
always benchmark it and find out.

That said, I've been slightly guilty lately of making work for myself by
trying to be super efficient, only to find that the IBMi performs so
surprisingly well that I was making my life awkward for no real reason...

best regards
Craig

On 22 February 2018 at 20:24, <dlclark@xxxxxxxxxxxxxxxx> wrote:

"RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx> wrote on 02/22/2018 02:30:39
PM:

A given trigger program can always determine the Application Server

program

relevant to the file it's on and therefore one way to determine if it is
case 2 would be to check if that program was in the call stack, by using

an

API ( quite expensive I think? )

Our trigger program calls the system API (QWVRCSTK) to examine the
call stack every time it is invoked -- in fact, potentially more than once
per invocation (if SQL was used for the I/O). We wanted to determine the
program that caused the I/O and pass that in a modified trigger buffer
header when writing the buffer to a data queue. This doesn't seem to be
hurting our performance, but perhaps it is because we are using the data
queue method so that the trigger program can return control as fast as
possible.

Sincerely,

Dave Clark
--
int.ext: 91078
direct: (937) 531-6378
home: (937) 751-3300

Winsupply Group Services
3110 Kettering Boulevard
Dayton, Ohio 45439 USA
(937) 294-5331

************************************************************
*********************************
This email message and any attachments is for use only by the named
addressee(s) and may contain confidential, privileged and/or proprietary
information. If you have received this message in error, please
immediately notify the sender and delete and destroy the message and all
copies. All unauthorized direct or indirect use or disclosure of this
message is strictly prohibited. No right to confidentiality or privilege
is waived or lost by any error in transmission.
************************************************************
*********************************
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD