Re: Quick question prototyping : dummies guide.

David,

It compiles because you're using the CONST keyword.

My understanding is that this keyword automagically casts the passed
parameter to the correct type and length.

HTH,

Peter Colpaert
Application Developer
PLI - IT - Kontich, Belgium
-----
Yoda of Borg are we. Futile is resistance, assimilated will you be.
-----



David FOXWELL <David.FOXWELL@xxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
29/11/2007 10:45
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
cc

Subject
Quick question prototyping : dummies guide.






I wanted to know more about the D spec OPTIONS ( *VARSIZE )
So I coded this simple example to pass a shorter length parameter to my
procedure than expected by that procedure.

I haven't achtually put the *VARSIZE in yet. My question is, why does my
pgm compile as I am passing a shorter length parameter?
What difference will it make if I add *VARSIZE ?


D gPr1 S 1

D gPr2 S 50

D ChgPr PR

D P1 50 CONST

D P2 50

/FREE

gPr1 = 'S';

ChgPr ( gPr1 : gPr2 );

/END-FREE

P chgPr B

D PI

D APrIn 50 CONST

D APrOut 50

/FREE

APrOut = APrIn;

/END-FREE

P chgPr E