Subile --- Farben Problem

[malzusrex]

Hallo Gemeinde,

habe da mal wieder etwas merkwürdiges.
Ich habe einen Subfile. Wenn ich dann in diesem bis auf die letzte Seite blättere, sind auf einmal einige Farben weg!
Subfile im SDA:
243

Anzeige auf der ersten und folgende Seiten
244

Kopfzeile auf der letzten Seite
245

Hier die Subfile-Quelle dazu


A DSPSIZ(27 132 *DS1)
A CHGINPDFT(HI UL)
A MSGLOC(26)
A CF03(03 'Ende der Arbeit')
A R SF SFL
A AKTION 1A B 4132COLOR(WHT)
A CHECK(ER)
* ..........
A SFNAME 10A O 4 13
A 4130' '
A R SFC SFLCTL(SF)
A SFLSIZ(9999)
A SFLPAG(0023)
A CSRLOC(BSZ BSS)
A RTNDTA
A BLINK
A N92 SFLDSP
A N92 SFLDSPCTL
A 92 SFLCLR
A POS 4S 0H SFLRCDNBR(CURSOR)
A BSZ 3S 0H
A BSS 3S 0H
A FIRM 18A O 1 2COLOR(WHT)
A 1116DATE
A EDTCDE(Y)
A COLOR(WHT)
A 1125TIME
A COLOR(WHT)
A SDS_JOB 10A O 1 21COLOR(BLU)
A SDS_USER 10A O 1 99COLOR(BLU)
A 1110'PGM1'
A COLOR(YLW)
A 1 56'XXXXXXXXXXXXXXXXXXXX'
A COLOR(WHT)
A 2 2'XXXXXX'
A COLOR(BLU)
A SFCVNR 4Y 0B 2 9EDTCDE(Z)
A COLOR(WHT)
A 2 14'XXXXXXXXX'
A COLOR(BLU)
A SFCDISP 2Y 0B 2 24EDTCDE(Z)
A COLOR(WHT)
A 2 27'xxxxxxxxxxxxxx'
A COLOR(BLU)
A SFCDVON 6Y 0B 2 42EDTWRD(' . . ')
A COLOR(WHT)
A 2 51'xxx'
A COLOR(BLU)
A SFCDBIS 6Y 0B 2 55EDTWRD(' . . ')
A COLOR(WHT)
A SFCDERF 1A B 2 75COLOR(WHT)
A VALUES(' ' 'J' 'N')
A 2 77'xxxxx'
A COLOR(BLU)
A SFCAMP 1A B 2 83COLOR(WHT)
A VALUES(' ' 'R' 'Y' 'G')
A 2 85'Rot'
A COLOR(RED)
A SFCRAT 4Y 0O 2 89EDTCDE(Z)
A COLOR(RED)
A SFCRPR 4Y 1O 2 94EDTCDE(2)
A COLOR(RED)
A 2100'Gelb'
A COLOR(YLW)
A SFCYAT 4Y 0O 2105COLOR(YLW)
A EDTCDE(Z)
A SFCYPR 4Y 1O 2110EDTCDE(2)
A COLOR(YLW)
A 2116'Grün'
A 2 64'xxxxxxxxxx'
A COLOR(BLU)
A SFCGAT 4Y 0O 2121EDTCDE(Z)
A SFCGPR 4Y 1O 2126EDTCDE(2)


Jemand eine Idee?

Gruß
Ronald

[Fuerchau]

Mach die SFLPAG(22).
Warum hast du kein SFLEND ?
Auf der letzten Zeile einer SFL wird ja ggf. ein "+" oder bei SFLEND(*MORE) auf der Folgezeile "weitere.../Ende" (was ich persönlich schöner finde) angezeigt.
Hierbei scheint es zu einem Überlauf wieder auf Zeile/Spalte 1/1 zu kommen, was das dortige Attribut wieder überschreibt.
Du benötigst immer rechts außen mindestens eine Stelle für das Ende-Attribut.
Deshalb kann eine SFL-Zeile nur ab Spalte 2 bis Rechts - 1 gehen.

SDA Entwurf verwendet keine SFL-Technik, sondern nur im Testmodus.

[malzusrex]

OKay,

wieder was gelernt.
Wenn ich nur 22 Zeilen nutze, bzw nicht auf Stelle 132 shcreibe, dann geht es.

SFLEND(*MORE) irgendwann hatte hier im Unternehmen mal das raus geworfen, und es zieht sich durch die ganze Anwendung, das es nicht genutzt wird.

In dem jetztigem PGM will der ANwender so viel wie Möglcih sehen. Deshalb auch die Zeilen bis unten genutzt.

Der Auszug aus dem SDA war nur um zu zeigen was alles auf den Bildschirm geballert werden soll

Danke
Gruß
Ronald