Re: Trigger-happy

Well,

My pointer arithmetic is slightly different to yours and at first I was
confused by your offset + 1 but I think it all comes out in the wash.

I don't think you need to define the array if you are just using pointer
arithmetic e.g:

//‚This Program

Dcl-Pi *N;

TrgBuf LikeDS( TrgBufDS );

TrgBufLen Int( 10 );

End-Pi;

Dcl-Ds TrgBufDS Qualified Template;

File Char( 10 );

Library Char( 10 );

Member Char( 10 );

TrgEvent Char( 1 );

TrgTime Char( 1 );

CmtLckLvl Char( 1 );

*N Char( 3 );

CCSID Int( 10 );

RRN Int( 10 );

*N Char( 4 );

OrgRecOfs Int( 10 );

OrgRecLen Int( 10 );

OrgRecNBOff Int( 10 );

OrgRecNBLen Int( 10 );

NewRecOfs Int( 10 );

NewRecLen Int( 10 );

NewRecNBOff Int( 10 );

NewRecNBLen Int( 10 );

End-Ds;



//‚Before Image

Dcl-Ds Before ExtName( 'MYFILE' ) Qualified Based( pBefore );

End-Ds;



//‚After Image

Dcl-Ds After ExtName( 'MYFILE' ) Qualified Based( pAfter );

End-Ds;

pBefore = %Addr( TrgBuf ) + TrgBuf.OrgRecOfs;

pAfter = %Addr( TrgBuf ) + TrgBuf.NewRecOfs;