DUPSPLF von SCS in AFPDS mit Schablone und Ausgabe als PDF

[oulbrich]

Hallo zusammen,

folgende Aufgabe: Ich möchte vorhanden Spooldateien SCS Spooldateien in AFPDS Spools duplizieren.
Den neuem Spool soll eine Schablone mitgeben werden und dann auch noch als PDF ins IFS gespeichert werden.
Spooldateien als PDF in AFPDS inkl. Overlay sind kein Problem indem ich den Printerfile VOR der Erstellung des Spool entsprechen anpasse.
Will ich nun aber eine vorhandene Spooldatei duplizieren muß ich das API QSPCRTSP benutzten. Im Format SPL0200 finde ich die Parameter für Front Overlay etc. Ich kann da aber nirgens was finden um die Spool direkt in ein PDF zu konvertieren. Im OVRPRTF kann man ja über WSCST(*PDF) und angabe des STMF den SPOOL in eine STMF umleiten. Gibt es da API Technisch auch was??
Bin für jeden Gedanken dankbar.

[Fuerchau]

Der einfachste Weg ist hier:
CPYSPLF ... CTLCHAR(*FCFC)
OVRPRTF FILE(QPRINT) ... CTLCHAR(*FCFC)
CPYF ... TOFILE(QPRINT)

Mit dem CPYSPLF und *FCFC übergibst du auch die SCS-Formularsteuerung.
Anschließend machst du deinen OVRPRTF für Overlay und PDF.
Mit dem CPYF gibst du die Daten dann als Spool aus, wobei durch *FCFC die Formularsteuerung übernommen wird.

[oulbrich]

Verliere ich durch den CPYSPLF und anschließenden CPYF nicht die ganzen Feldattribute wie HIGHLIGHT etc. Mir wäre lieber das über das API zu lösen da ich bis heute da nie Probleme mit den Attributen hatte. Weißt du evtl. welches API hinter der ovrprtf wscst(*PDF) steckt.

[Andreas Herzfeldt]

Hallo oulbrich, ab V6R1 gibt es ein Lizenzprogramm 5761-TS1 mit den Optionen *BASE + 1 die für die PDF-Umsetzung gut sind. Mit diesen, kannst Du im CHGPRTF/OVRPRTF/CRTPRTF diese ansteuern. Hier ein Beispiel für einen CPYF mit einem OVRPRTF + Overlays :

CPYSPLF in QTEMP/STDIPF mit CTLCHR(*FCFC)
OVRPRTF FILE(PDFSYSPRT) DEVTYPE(*AFPDS)
PAGESIZE(&PLOVR &PWOVR) LPI(&LPIOVR) +
CPI(&CPIOVR) OVRFLW(&OVOVR) +
CTLCHAR(*FCFC) CHRID(&CHRID &CODPG) +
PAGRTT(0) DUPLEX(*NO) +
FRONTOVL(ACTOVL/&SPOVL) BACKOVL(*NONE) +
TOSTMF(&IFSFILEC) WSCST(*PDF)
CPYF FROMFILE(QTEMP/STDIPDF) TOFILE(PDFSYSPRT)

Die beiden Werte "TOSTMF" und "WSCST" sind für die PDF-Erstellung notwendig.

MFG
Andreas

[Fuerchau]

Was das Attribut Highlight angeht, so wird hierfür eine 2. Zeile ohne Vorschub vom CPYSPLF generiert.
Das müsste für die Wiederherstellung des Spools auch funktionieren.
Das selbe gilt auch für Underline, da hierfür "_"-Zeichen verwendet werden.

Ein API für OVRPRTF würde dir da auch nicht helfen.

[oulbrich]

Hallo,ich habe es nun so gelöst wie ihr beide das vorgeschlagen habt. Es funktioniert und bis jetzt habe ich auch keinerlei Probleme mit irgendwelchen Attributen, aber ich meine es muß trotzdem eine Möglickeit geben das ganze mit API´s zu lösen.

Gruß Olaf Ulbrich

[Fuerchau]

Für OVRPRTF gibt es kein API (warum auch).
Für das Auslesen und Erstellen der Spools gibts ja API's, die aber anscheinend dein Problem nicht lösen.

Allerdings sind hier doch API's, die doch meist komplizierter sind, gar nicht nötig.
Warum sich also damit abquälen .

[oulbrich]

die vorhanden API´s zu auslesen und erstellen eines Spools sind schon ok aber die Funktion über 5761TS1 in PDF konvertieren fehlt und genau das suche ich eigentlich.