ZPL auf Zebra ausgeben

[Ottersberg]

Das verstehe ich nicht. CPYFRMSTMF hat kein RCDDLM. Nur CPYFRMIMPF. Und das hat kein RCDDLM(*FIXED).

Okay ich denke du meintest ENDLINFMT(*FIXED).

Einen anderen Fehler habe ich heute Morgen noch festgestellt. Der CPYF kopiert maximal 132 Zeichen. Mit 200 war ich also zu groß. Ich habe meine Testdatei auf 100 Zeichen verkleinert.

Neuer Ablauf:
CRTPF FILE(QTEMP/MYZPL) RCDLEN(100)
CPYFRMSTMF FROMSTMF('/test.txt') TOMBR('/QSYS.LIB/QTEMP.LIB/MYZPL.FILE/MYZPL.MBR') MBROPT(*REPLACE) ENDLINFMT(*FIXED) TABEXPN(*NO)
OVRPRTF FILE(QPRINT) FORMFEED(*CONT) OUTQ(xxx) SAVE(*YES)
CPYF FROMFILE(QTEMP/MYZPL) TOFILE(QPRINT)

Dann bekomme ich ein lesbares Etikett.

Mit
OVRPRTF FILE(QPRINT) DEVTYPE(*USERASCII) OUTQ(xxx) SAVE(*YES)
tut sich aber weiterhin nichts.

[Fuerchau]

Wenn du ein lesbares Etikett bekommst, ist ja gut.
D.h., dass der CPYFRMSTMF eine Codewandlung durchführt, die allerdings wohl unschädlich erscheint.
Der Druckertreiber macht dann die Umwandlung wieder rückgängig.

Was die Breite angeht, so kann man die ggf. im OVRPRTF mit anpassen (bis 378).
Ich kann i.M. nicht sagen, was die QPPRINT (alternativ geht auch QSYSPRT) als Druckbreite eingestellt hat.

Was die Verwirrung mit dem *FIXED angeht, so hatte ich gerade keinen AS/400-Zugriff (ähm IBM i).

Freut mich aber, dass es klappt.

[Ottersberg]

Wenn du ein lesbares Etikett bekommst, ist ja gut.

Ja. Ich habe da jetzt auch nicht weiter mit *USERASCII getestet.
Ich habe dann noch mit SQL und xmltable die automatische Verarbeitung der XML-Daten gemacht um das zu automatisieren.

Danke für die Hilfe.

[Fuerchau]

USERASCII kann nur funktionieren, wenn der CPYTOSTMF mit CVTDTA(*NONE) erfolgt und somit ASCII-Daten in der PF stehen.