Paul Christidis asks in part about FUNCTION CURRENT-DATE:
<snip>
>My test seem to indicate that the function 'limits' the size of the
returned string to the size of the receiving field.
>Does this concur with the findings of anyone else on this list?
</snip>
Yes, this concurs with my findings. FUNCTION CURRENT-DATE fills in its
own temporary 21-byte area. Then the MOVE statement that assigns the
function value to your variable in working-storage works just like any
other Cobol MOVE statement. If the receiving field is smaller than 21
bytes the excess is truncated.
John Schick
Sr. Technical Development Advisor
HBOC/Amisys