PRTF Overlay mit AFPRSC

[jotho]

durcker Type 3812 model 1

für PDF :

einfach ins CL (oder PRC )einfügen vor call oder load
OVRPRTF printtest devtype(*afpds) wscst(*pdf) tostmf('/home/ms/test.pdf')
fertig
nix CPYSPLF

[jotho]

und hab keine Erfahrung mit ACS

Gruss

[Dschainers]

meine Antwort hier wieder gelöscht, da dies schon von JOTHO beantwortet war

[Malte]

moin zusammen,

ich habe das jetzt mal mit diesem CLLE getestet

   PGM                                                                                                            
 OVRPRTF    FILE(PRINTTESTP) DEVTYPE(*AFPDS) +           
                TOSTMF('/home/ms/test.pdf') WSCST(*PDF)  
                                                         
   CALL       PGM(PRINTTEST)                             
                                                         
   RCLRSC     LVL(*CALLER)                               
   RCLRSC     LVL(*)                                     
                                                         
   ENDPGM

leider bekomme ich immer noch ein leeres PDF raus.

Muss ich bei dem PDF was ich für das Overlay verwende beachten?

[jotho]

Hallo

1x PRINTESTP 1x PRINTTEST

weiss nicht, ob du dich vertippt hast?
könnte daran liegen !!
H DECEDIT('0,') DATEDIT(*DMY.) datfmt(*eur)
H fixnbr(*zoned:*inputpacked)
*
Dcl-F PRINTTEST Printer;


write BILD1;
*inlr = *on ;
return ;

[jotho]

sorry PRINTTEST und PRINTTESTP

[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 ;

[jotho]

Hallo

versuchs mal mit einem jpg
und schreib auch eine Feld rein um zu sehen, ob überhaupt was in der pdf ist.

Mehr kann ich nicht helfen!

Gruss
Jotho

[Malte]

Moin Jotho,

A               R TXTA                 DRTEXT       100A        4SPACEA(1)




A               R BILD1
A                                           AFPRSC('TestOverlay.pdf' +
A                                           *PDFSPO 1.1 1 (*MAPOPT *P) +
A                                           (*PATH '/home/MS'))


A               R BILD12
A                                           AFPRSC('TestOverlay.pdf' +
A                                           *PDFSPO 1.1 1 +
A                                           (*PATH '/home/MS'))


A               R BILD13
A                                           AFPRSC('TestOverlay.pdf' +
A                                           *PDFSPO 1.1 1 (*MAPOPT *P) +
                                            (*COLORPRF *CMYKSWOP) +
A                                           (*PATH '/home/MS'))


A               R BILD2
A                                           AFPRSC('TEST.jpeg' +
A                                           *PDFSPO 1.1 1 (*MAPOPT *P) +
A                                           (*PATH '/home/MS'))


A               R BILD21
A                                           AFPRSC('TEST.jpeg' +
A                                           *JFIF 1.1 1 (*MAPOPT *ST) +
A                                           (*PATH '/home/MS'))


A               R BILD22
A                                           AFPRSC('TestOverlay.jpeg' +
A                                           *JFIF 0.1 0.1 (*MAPOPT *ST) +
A                                           (*PATH '/home/MS'))

ich hab da jetzt noch einmal verschieden Sachen getestet und mit BILD22 geht es dann auch, zu miendest im PDF beim drucken sieht das noch komisch aus aber das kann dann auch an den Druckereinstellungen liegen.

Der Nachteil beim JPEG ist natürlich jetzt das man nichts aus dem Brief Fuß kopieren kann.

Ich danke dir und auch den andern für die Große Unterstützung.

MfG
Malte