CPD7812

[Luna]

Danke für Eure Hilfe

Ich mache es mit 2 DSPF's - wird einfacher

[AS400.lehrling]

Danke für Eure Hilfe

Ich mache es mit 2 DSPF's - wird einfacher

Habe hier mal 'nen auszug aus einem Übungspgm eventuell hilft es dir weiter:

10800 * -=* SUBFILES *=- 26.09.03
10900 * 26.09.03
11000 A R SFL1 SFL 26.09.03
11100 A #SFL1RN 9S 0H 26.09.03
11200 A #SFL1WAHL 1A B 4 2VALUES('X' '1' ' ') 26.09.03
11300 A #SFL1MATC 10A O 4 4 07.10.03
11400 A #SFL1TEXT 40A O 4 16 07.10.03
11500 26.09.03
11600 A R CTLSFL1 SFLCTL(SFL1) 26.09.03
11700 A CF12(12) 18.01.06
11800 17.01.06
11900 A OVERLAY 09.10.03
11910 A 91 SFLINZ 09.10.03
11920 A 93 SFLCLR 09.10.03
12000 A N93 SFLDSP 26.09.03
12100 A N93 SFLDSPCTL 26.09.03
12400 A SFLSIZ(0999) 26.09.03
12500 A SFLPAG(0007) 07.10.03
12510 A N93 SFLEND(*MORE) 09.10.03
12600 A WINDOW(6 5 12 68) 26.09.03
12700 A S1TITEL 40A O 1 2COLOR(WHT) 26.09.03
12701 A +2'F12=VERLASSEN' 17.01.06
12702 A COLOR(BLU) 17.01.06
12800 A 3 2'X' 26.09.03
12900 A COLOR(WHT) 26.09.03
13000 A 3 4'Matchcode' 07.10.03
13100 A COLOR(WHT) 26.09.03
13200 A 3 16'Beschreibungstext' 07.10.03
13300 A COLOR(WHT) 26.09.03

Stammt aus der dsppf des pgm.