Re: Maximum Number Of Parms

[Jerry Adams <jerry@xxxxxxxxxxxxxxx>]

Robert,

I just looked a bit closer at your examples.  I'm old and my eyes play 
tricks on me many times, but I counted forty [40] parms on your callp, 
not thirty-nine [39]. 


	* Jerry C. Adams
*IBM System i Programmer/Analyst
B&W Wholesale Distributors, Inc.* *
voice
	615.995.7024
fax
	615.995.1201
email
	jerry@xxxxxxxxxxxxxxx <mailto:jerry@xxxxxxxxxxxxxxx>



Robert Munday wrote:
> Good morning, class.
>
>
> I am creating new programs in /FREE based upon fixed format programs currently in production.  I have an external program call with 39 parms.  It works in fixed format (it must... it's in production), but when I do the same thing in /FREE, I get:
>
> *RNF5407 20  More parameters were passed in the prototyped call than are allowed.
>
>
> Here is the code:
>
>  *  PFS - Loan Rates Calculation                                                            
> D PFM202R         PR                  ExtPgm('PFM202R')                    Loan Rates Calc  
> D PFM001                              Like(@pfinco)                        Finance Company  
> D PFM002                              Like(ppplst)                         Policy State     
> D PFM003                              Like(@plan)                          Plan             
> D PFM004                              Like(@pfspmt)                        Payments         
> D PFM005                              Like(@pfsefdt)                       Effective Date   
> .....
> D PFM037                              Like(@drvs)                          Number Of Drivers
> D PFM038                              Like(@charge_acq#)                   Charge Aquisition
> D PFM039                              Like(@NRtype)                                         
>
>
> // PFS - Loan Rates Calculation                                                              
>   CallP PFM202R(@pfinco :ppplst :@plan :@pfspmt :@pfsefdt :@pfsfrmla                         
>    :@pfscalc :@pfstype :@pfsoper :@pfspm1 :@pfspm2 :@pfspm3 :@pfspm4                         
>    :@pfspm5 :@pfspm6 :@pfspm7 :@pfspm8 :@pfspm9 :@pfspm10 :@pfspm11                          
>    :@pfspm12 :@pfspm13 :@pfspm14 :@pfspm15 :@pfspm16 :@pfspm17 :@pfspm18                     
>    :@pfspm19 :@pfspm20 :@pfspm21 :@pfspm22 :@pfspm23 :@pfsapr :@pfstotal                     
>    :@dfdwpp :@ppirat :@drvs :@charge_acq# :@conr :@NRtype);   // PFS - Loan Rates Calculation
>
>
> Where am I going wrong?  What's the solution?  How many parms can I pass?
>
> Thanks,
>
>
> Robert Munday
> Munday Software Consultants
> Montgomery, AL
> on assignment in Nashville, TN
>
>
>