Hallo Jamikl,

um Zeilen im RPG-Code einzufärben, muss der entsprechende Hex-Wert in den Quellcode eingefügt werden.

Die zulässigen Hex-Codes liegen zwischen x'20' und x'3F'

Am besten legst Du Dir eine Source-File mit allen möglichen Farben an und kopierst die Zeilen bei Bedarf.

Das Hex-Zeichen darf im RPG-Code nur auf den Stellen 1-5 oder in einem Kommentar verwendet werden.

Um die Hex-Werte in deine Quellen zu bekommen hast Du folgende Möglichkeiten:
1. Mit SQL:
1.1. Teildatei überschreiben:
OVRDBF FILE(MYSRC)
TOFILE(HAUSER/QRPGLESRC)
MBR(MyMember)
OVRSCOPE(*JOB)
1.2. Update über SQL:
(Im folgenden Beispiel wird die Zeile 25 auf ROT gesetzt)
UPDATE MYLIB/MYSRC
SET SRCDTA = Substr(SRCDTA, 1,
3)!!x'28'!!substr(SrcDta, 5, 92)
WHERE SRCSEQ = 25
2. Die Teildatei mit RPG lesen, den Hex-Wert eintragen und fortschreiben.
3. Falls Ihr zufällig FILEACCESS von der Firma SSS im Einsatz habt, kannst Du die Zeilen auch direkt im Hex-Code verändern.

Birgitta