Zitat Zitat von Fuerchau Beitrag anzeigen
Wie ich schon sagte, Textkonstanten sind in HOCHKOMMA zu übergeben:
DCL &MDCX *CHAR(wie MDC + 2)

CHGVAR &MDCX ('''' *CAT &MDC *TCAT '''')

Beachte: die 4 Hockommas stellen 1 Hochkomma zur Verfügung!

SETVAR((MDC &MDCX))
meine Lösung für die verwirrendende '''' (es gibt mir Augenschmerz) ist, um ein Feld mit ihm zu erklären. Dann einfach *cat nach Bedarf. Dies funktioniert für CL und RPG.
Code:
DCL        VAR(&Q) TYPE(*CHAR) LEN(1) VALUE('''')  
CHGVAR     VAR(&QRYSLT) VALUE(&QRYSLT *BCAT &Q *TCAT &CUSC +
                          *TCAT &Q *BCAT '*AND optn01 *EQ' *BCAT &Q *tCAT +
                          &OPTN *TCAT &Q)
Hoffe das hilft.