DSPJRN -> Attribut LRGENTNBR

[pk50226]

Hallo Dieter,

ich habe den Befehl DSPJRN vor mir, finde aber die Stelle nicht, wo ich die LRGENTRNBR erzeugen kann. Die JOSEQ ist im Standard kurz und hat 10,0 Zeichen. Die schein mir aber nicht weiter zu helfen.

Es gibt den Parameter: FROMENTLRG *FIRST, den ich nicht verändere.

Wie kriege ich das ganze 20-stellig hin.

Peter

[BenderD]

Hallo Dieter,

ich habe den Befehl DSPJRN vor mir, finde aber die Stelle nicht, wo ich die LRGENTRNBR erzeugen kann. Die JOSEQ ist im Standard kurz und hat 10,0 Zeichen. Die schein mir aber nicht weiter zu helfen.

Es gibt den Parameter: FROMENTLRG *FIRST, den ich nicht verändere.

Wie kriege ich das ganze 20-stellig hin.

Peter

... die Frage ist, wie du das hinkriegst, dass sie 10 stellig ist. DSPJRN in outfile macht 20 stellig.

D*B

PS: blind geraten, vermute ich mal, dass deine Zieldatei beim CPYF *MAP *DROP da abschneidet.

[pk50226]

... die Frage ist, wie du das hinkriegst, dass sie 10 stellig ist. DSPJRN in outfile macht 20 stellig.

D*B

PS: blind geraten, vermute ich mal, dass deine Zieldatei beim CPYF *MAP *DROP da abschneidet.

Du steuerst es über die unterschiedlichen Fileformate bei *OUTFILE FILE1 bis FILE5.

Das Problem hat sich aber erledigt. Ein interner Programmfehler.

Danke für die Tipps,

Peter

[BenderD]

... nur dass da keiner was falsches "lernt" alle Ausgabeformate haben die JOSEQN 20 stellig. Solange man beim CHGJRN SEQOPT(*RESET) macht wird da wohl ein wrap der Nummer nicht vorkommen, falls man reset macht, gibt es auch bei den 20stelligen bei DSPJRN bei curchain durchaus Doubletten und die Sortierung nach Eintragsnummer ist ohnehin nicht so clever.

D*B

Du steuerst es über die unterschiedlichen Fileformate bei *OUTFILE FILE1 bis FILE5.

Das Problem hat sich aber erledigt. Ein interner Programmfehler.

Danke für die Tipps,

Peter