Hello,



I have a the following coded subproc:





P WriteDiff b

D WriteDiff pi

d fieldchange 10 const

d value 80 const



/free



lgfldch = fieldchange;

lgvalue = %trim(value);

write rlog;



/end-free



P WriteDiff e



Is there a way to do this that no matter if I pass a character or numeric
defined field, the subproc would work.



So, both of these would work.



D NUMBER 10S 0

D TEXT 20





/free

Writediff('number' : number);



Writediff('Text' : text);

/end-free



I am thinking that I would pass a pointer rather then the value, but not
sure how I would code this.



Thanks.


This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].