PRTF Overlay mit AFPRSC

[Malte]

Moin

nee das hatte ich im nachhinein noch geändert um auszuschließen das ich Probleme durch die Namesgleichheit habe.

     H DECEDIT('0,') DATEDIT(*DMY.) datfmt(*eur)     
     H fixnbr(*zoned:*inputpacked)
 *
       Dcl-F PRINTTESTP Printer;


       write BILD1;
       *inlr = *on ;
       return ;