Cobol Printer File INFDS

[itec01]

... die Mimik ist doch (fast) identisch mit RPG. Die infds anhängen hast du ja schon gefunden. Dann musst du in deiner infds die Felder deklarieren, die du haben willst (Positionen ab Stelle 81 identisch mit RPG. gefüllt wird das dann mit accept. (ACCEPT MY-FEEDBACK-A FROM OPEN-FEEDBACK-AREA FOR MY-FILE) und dann sind die Felder gefüllt.

D*B

Das hat mir jetzt doch keine Ruhe gelassen. Danke für den Input, so funktioniert es.
Nach dem öffnen der PRTF kann man den ACCEPT Befehl absetzen und die Felder stehen dann zur Verfügung.
Nachteil, es stehen nicht alle PRTF Attribute zur Verfügung, wie Userdata, usw. Somit bleibe ich bei der API Variante.