Re: CALLP

[Michael Ryan <michaelrtr@xxxxxxxxx>]

Is this the calling code? I only see one callp. Or do you mean that this
section of code is executed twice? Is this a prototyped program or
procedure?

On Wed, Nov 25, 2009 at 2:10 PM, Billy Waters <bwaters@xxxxxxxxxxxxxxxxxx>wrote:

> I am in the process of refreshing my RPG skills using the OJT method. I
> have a program that makes 2 calls (CALLP) to another program. The first
> call works great. The second call does nothing. Any help will be
> appreciated.  The code:
> C******************************************************
> C*  Add Record to SQLMSG file                         *
> C******************************************************
> C     ADDMSG        BEGSR
>  /FREE
>  DSPLY UPSTEP;
>  UPDTE = %DEC(%CHAR(%DATE(UDATE:*MDY):*ISO0):8:0);
>  URCNT = SQLER3;
>  UMSGID = SQLCODE;
>  UMTXT = SQLERM;
>  UPGMID = 'CKWEEK01';
>  CALLP UPDMSG(UPGMID:UPSTEP:UPDTE:UMSGID:URCNT:UMTXT);
>  /END-FREE
> C                   ENDSR
>
>
> Thanks,
> Billy Waters
> Mount Olive Pickle Company
> --
> This is the RPG programming on the IBM i / System i (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.