Fwd: Re: Overlaying program Parmeters

Here you go.
Note all fields match in size.


--- Richard C Carpenter <richard_c_work@xxxxxxxxx>
wrote:

Date: Fri, 12 Jan 2007 16:45:51 -0800 (PST)
From: Richard C Carpenter <richard_c_work@xxxxxxxxx>
Subject: Re: Overlaying program Parmeters
To: RPG programming on the AS400 / iSeries
<rpg400-l@xxxxxxxxxxxx>

Sorry. I neglected the Call statment.
There is no procedure interface.
I have only the RPGLE program, and the CL I set to
test
it.
Here are the PARM statement and call statement

PGM        (&usr &tnbr &pro &bol &po &emsg &rcnt + 
            &lst1 &lst2 &lst3 &lst4)               

CALL    INROLLXML   (&usr &tnbr &pro &bol &po &emsg
&rcnt + 
&lst1 &lst2 &lst3 &lst4)               

Richard

--- Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx> wrote:

Hi Richard,

Can you please also post the CALL statement and
procedure interface that I 
asked you for?  Thankss.

Also, if any of the CL variables are used as input
parameters to the CL 
program, please post the PGM/PARM statement from

the

CL program.

-- 
Scott Klement  http://www.scottklement.com


On Fri, 12 Jan 2007, Richard C Carpenter wrote:

Here's the source statements for both the CL and

RPG:

 DCL        &usr *CHAR 10
DCL        &tnbr *CHAR 7
DCL        &pro *CHAR 8
DCL        &bol *CHAR 11
DCL        &po  *CHAR 12
DCL        &emsg *CHAR 80
DCL        &rcnt *CHAR 3
DCL        &lst1 *CHAR 30000
DCL        &lst2 *CHAR 30000
DCL        &lst3 *CHAR 30000
DCL        &lst4 *CHAR 30000


 C     *Entry        Plist
* User Name (Passed In)
C                   Parm                   

@@USR 

          10

* Transaction Number (Passed In)
C                   Parm                   

@@TNBR

           7

* Probill Number (Passed In)
C                   Parm                   

@@PRO 

           8

* BOL Number (Passed Out)
C                   Parm                   

@@BOL 

          11

* PO Number (Passed Out)
C                   Parm                    @@PO

          12

* Error Message (Passed Out)
C                   Parm                   

@@EMSG

          80

* Number of HTML Rows (Returned to Calling Pgm)
C                   Parm                   

@@RCNT

           3

 C                   Parm                   

@@LST1        30000

C                   Parm                   

@@LST2

       30000

C                   Parm                   

@@LST3

       30000

C                   Parm                   

@@LST4

       30000

 Richard


Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx> wrote:
 Date: Thu, 11 Jan 2007 16:00:09 -0600 (CST)
From: Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx>
To: RPG programming on the AS400 / iSeries

<rpg400-l@xxxxxxxxxxxx>

Subject: Re: Overlaying program Parmeters

I haven't even tried testing from the web. I am

using a CL to call the

program passing variables.
We have no test web site to check if the

program

will work.

Can you please post the DCLs and CALL statement

from your CL. Also please

post the *ENTRY plist and procedure interface

that

are giving you

problems. If you have any variables that are

defined outside of the PLIST

or PI, please post their RPG definitions as

well.

-- 
This is the RPG programming on the AS400 /

iSeries

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




---------------------------------
We won't tell. Get more on shows you hate to

love

(and love to hate): Yahoo! TV's Guilty Pleasures

list.

-- 
This is the RPG programming on the AS400 /

iSeries

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

-- 
This is the RPG programming on the AS400 / iSeries
(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.

____________________________________________________________________________________

Need Mail bonding?
Go to the Yahoo! Mail Q&A for great tips from Yahoo!
Answers users.

http://answers.yahoo.com/dir/?link=list&sid=396546091

 
____________________________________________________________________________________
Don't pick lemons.
See all the new 2007 cars at Yahoo! Autos.
http://autos.yahoo.com/new_cars.html