Re: Passing Parms To An RPG Program

["Richard Casey" <casey_r@xxxxxxxxxxxxxxxx>]

Robert,

You are passing a single parameter (SL415RD-Linkage) to a program that is
expecting 3 parameters. 
Changing the CALL statement in your COBOL program to:
     Call "SL415RD" Using SL415RD_SSN SL415RD_Loan_Number
SL415RD_Reporting_MDCY
should solve the problem.

You could also change the prototype and interface in your RPG program as
described in Tommy's note.

Have fun!
Richard Casey

-----Original Message-----
From: cobol400-l-bounces@xxxxxxxxxxxx
[mailto:cobol400-l-bounces@xxxxxxxxxxxx] On Behalf Of Robert Munday
Sent: Tuesday, May 27, 2008 11:42 AM
To: COBOL
Subject: [COBOL400-L] Passing Parms To An RPG Program

I am attempting to call an RPG program from a COBOL program, passing three
parameters.  My RPG incoming parms are set up using the program
prototype/interface method.  The RPG program receives the first parameter
but not the second or third.  Is there something I need to add to either
program or will I need to revert to the fixed-format *Entry parm method in
my RPG program?

*  Parameters For Call To SL415RD - Calculate First Date Of Reporting
 01  SL415RD-Linkage.                                                
     05  SL415RD_SSN                         Pic X(9).               
     05  SL415RD_Loan_Number                 Pic X(2).               
     05  SL415RD_Reporting_MDCY              Pic X(8).               

*  Call Program SL415RD To Calculate The First Date Of Reporting
     Call "SL415RD" Using SL415RD-Linkage.                      


 *  Program Prototype

D SL415RD         PR                  ExtPgm('SL415RD')

D  Borrower_SSN                  9A
Borrower SSN    
D  Loan_Number                   2A
Loan Number     
D  Report_Date                   8A
Report Date MDCY
 

 *  Program Interface

D SL415RD         PI

D  SSN                           9A
Borrower SSN    
D  Loan#                         2A
Loan Number     
D  Report_MDCY                   8A
Report Date MDCY


Thanks,



Robert Munday
Munday Software Consultants
Montgomery, AL
on assignment in Columbia, SC
soon to be somewhere else...