Hi,
so, ich haben nun ein Pagseg auf der As400 und ein Testpgm
Code:
H DECEDIT('0,') DATEDIT(*DMY.)
FRRDRKTSTP O E PRINTER
C WRITE TR1
C EVAL pseg = 'BILD'
C EVAL posh = 2
C EVAL posv = 2
C write TR2
C EVAL posh = 5
C EVAL posv = 4
C write TR2
c seton lr
PRTF, umgewandelt mit *AFPDS
Code:
A R TR1
A SKIPB(002)
A 19 'TEST UNTERSCHRIFT DYNAMISCH'
A 70 'Seite'
A SEITE 5 0 76 EDTCDE(Z)
A R TR2
A PAGSEG(&PSEG &POSH &POSV)
A PSEG 8A P
A POSH 5S 3P
A POSV 5S 3P
Den Spool kann ich mit mit 5 ansehen, er enthält 'sichtbar' nur
TR1
Eine Fehlermeldung im Joblog hab ich nicht
(Die hatte ich vorher, bei größeren POSH und V Werten)
ist das Bild nun im Spool versteckt ?
(hab z.zt. keinen passenden Drucker)
Danke
Robi
Bookmarks