Zitat von
Fuerchau
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.
Bookmarks