Re: *Entry Plist w/ data structure using prototype / procedure interface

"RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx> wrote on 04/05/2016 02:10:22
PM:

I'm writing my first trigger program in 15 or so years. I'm trying to
avoid the *Entry Plist C specs, but numerous attempts at defining the
prototype / procedure interface have not succeeded. The first parameter
for a trigger program is the buffer data structure. Obviously, I'm

trying

to achieve best performance by not moving data around unnecessarily, so

I'd

like to avoid moving the *entry parameters and, instead, use them

directly.

We're on v7r1.

I've searched and haven't found any complete examples of how to do this

in

/free. If anyone can provide a link or a RTFM reference, I would be

most

appreciative.

This is what I have in my trigger program. What else do you need
to know about this?

dcl-pr Main ExtPgm('UTLRP01RM');
TrgBuffer LikeDS(TrgInfo) Options(*Varsize);
TrgBufLen Int(10:0);
end-pr;
dcl-pi Main;
TrgBuffer LikeDS(TrgInfo) Options(*Varsize);
TrgBufLen Int(10:0);
dcl-pi;

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.
*********************************************************************************************