SNDMSG drucken

[Jenne]

Hallo Kollegen,

gibt es eine Möglichkeit aus einem CL-Programm erzeugte Message an einen Drucker zu senden und damit zu drucken? Wis z.B. SNDMSG

Danke vorab für Eure Hilfe.

Gruß
Jenne

[Fuerchau]

Von selber leider nicht.
Du musst dir den SNDMSG in einer Variablen selber zusammenbauen und dann drucken.
Per QCMDEXC kannst du den Befehl dann auch ausführen.

[Jenne]

Hallo Fuerchau,

leider benötige ich einen Anstoss. Wie drucke ich den in einem CL-Programm eine Variable?

Gruß
Jenne

[Fuerchau]

In CLP kannst du nicht drucken. Dafür benötigst du ein RPG/LE-Programm.

[Jenne]

Hallo Fuerchau,

alles klar.

Danke für Deine Hilfe.


Gruß
Jenne

[AS400.lehrling]

Hallo Fuerchau,

alles klar.

Danke für Deine Hilfe.


Gruß
Jenne

Könnte ja so aussehen:



001.00 FKONTOPF IF E DISK 060116
002.00 FQPRINT O F 80 PRINTER 060119
002.01 DSeiteNr S 3S 0 050821
002.02 C EVAL SeiteNr = 1 050821
002.03 C EXCEPT SEITENKOPF 050821
002.04 C EXCEPT SPALTUEBER 050821
002.05 C 050821
002.06 C READ KONTOPF 80 060116
002.07 C DOW *IN80 = *OFF 050821
002.08 C EXCEPT DETAILS 050821
002.09 C IF *INOA = *ON 050821
002.10 C EVAL SeiteNr = SeiteNr +1 050821
002.11 C EXCEPT SEITENKOPF 050821
002.12 C EXCEPT SPALTUEBER 050821
002.13 C ENDIF 050821
002.14 C 050821
002.15 C READ KONTOPF 80 060116
002.16 C ENDDO 050821
002.17 C EVAL *INLR = *ON 050821



Gruß AS400.lehrling