Re: RNF7542 on compile

[Joe Pluta <joepluta@xxxxxxxxxxxxxxxxx>]

If you want to use an expression, you need to specify the parameter as 
CONST.  I think VALUE will work as well, but I stick with CONST.

      D  tline                       120a   CONST


Joe

> I get a compile error that points to a problem with this code (presumably)
>
>    writeLine('  INFO : Requested  Delivery date for VIN: '+
>     %trim(vinnum) + ' has changed from '+ assemblydate + ' to ' +<===
> Compiler complains about this line
>    cdtm02002 ) ;
>
> WriteLine has this prototype and PI
>
>        D writeline       PR
>        D  tline                       120a
> ---------------------------------------------------------
>        P writeline       B
>        D writeline         PI
>        D  tline                       120a
>        c/free
>                 if overflow = *on;
>                   write heading;
>                   overflow = *off;
>                 endif;
>                    MsgTxt = tline;
>
>                    write detail;
>         /end-free
>        P writeline         E
>
> I *think* it is complaining the the WriteLine procedure can't take a
> variable but all the procedure does is fill a variable in the output
> file.  The idea is to write messages to the printer file about errors
> and warnings.  Can I not pass a variable parameter in this case?