Re: Passing Parms To An RPG Program

[Tommy.Holden@xxxxxxxxxxxxxxxxxxxxx]

change the RPG prototype and interface to be a DS defined like your 
linkage section.

Thanks,
Tommy Holden



From:
Robert Munday <rwmunday@xxxxxxxxxxxxx>
To:
COBOL <cobol400-l@xxxxxxxxxxxx>
Date:
05/27/2008 10:43 AM
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...