Re: Message File Variable Length &1 Substitution Parameters

>From: "Rusling, John B. (Alliance)" <jbrusling@alliancedev.com>
>Date: Wed, 3 Apr 2002 11:45:58 -0600
>
>I would like to put a number in an error message as a substitution
>parameter. I'll edit it into a character field first,
> ...
>GOOD...:   Yadda yadda 1,150.90 sumtin else.
>NO GOOD:   Yadda yadda     1,150.90 sumtin else.

John, just make sure the edited value is left-justified in the
character field.  Trailing blanks in the replacement text are
not included in the final message.

Left justification is easy:

c           eval    reptext = %triml(%editc(num : 'N'))

If you were using *VARY, you'd have to left-justify the value
anyway, so using *VARY will just make things more complicated.
If I recall correctly, with *VARY, you have to put the length
of the data first (2 or 4 byte binary), then the data, and then
all the subsequent fields have to follow that length of data
directly.  So you can't use a nice data structure for the
replacement text - you have to build it dynamically.

Barbara Morris