Moin,
Du musst das Word Dokument in die iSeries 'Drucken'.
Das geht mit einem speziellen Treiber (Goolle, ich weis es nicht mehr)
dann (aus einem sehr alten CL heraus kopiert, ohne gewähr)
Der 'Druck' muß nach &FLR gemacht werden
PGM PARM( &LIB &FLR &FILE2 &FILE3 &LIBO)
DCL VAR(&LIB) TYPE(*CHAR) LEN(10)
DCL VAR(&LIBO) TYPE(*CHAR) LEN(10)
DCL VAR(&FLR) TYPE(*CHAR) LEN(10)
DCL VAR(&FILE2) TYPE(*CHAR) LEN(10)
DCL VAR(&FILE3) TYPE(*CHAR) LEN(10)
DLTF FILE(&LIB/&FILE3)
MONMSG MSGID(CPF0000)
CRTPF FILE(&LIB/&FILE3) RCDLEN(32766) MBR(&FILE3) +
MAXMBRS(1) LVLCHK(*NO)
MONMSG MSGID(CPF7302) /* vorhanden */
CPYFRMPCD FROMFLR(&FLR) TOFILE(&LIB/&FILE3) +
FROMDOC(&FILE2) TOMBR(&FILE3) +
TRNTBL(*NONE) TRNFMT(*NOTEXT)
DLTOVL OVL(&LIBO/&FILE3)
MONMSG MSGID(CPF0000)
CRTOVL OVL(&LIBO/&FILE3) FILE(&LIB/&FILE3)
Oder, viel einfacher und mit noch mehr möglichkeiten ...
http://www.the-tool-company.de/tools...ldesigner.html
Robi
Das Notwendige steht über dem technisch machbaren.
(klingt komisch, funktioniert aber!)
Bookmarks