Hubert Brethauer
19-04-06, 07:14
Eine kleine (hoffentlich einfache) Frage:Wie integriere ich SQL-Befehle in einem CL? - Vielen Dank -
Guten Morgen
mit runsqlstm
Gruß Ronald
... oder mit QShell - Commands
Beispiel 1:
QSH CMD('db2 "Insert Into Hauser.TestQSH +
Values(''Birgitta'', 12345, Default)"')
Beispiel 2:
DCL VAR(&COMMAND) TYPE(*CHAR) LEN(256) +
VALUE('db2 "Insert Into Hauser.TestQSH Values(')
DCL VAR(&CMDEND) TYPE(*CHAR) LEN(10) VALUE(')"')
DCL VAR(&Quote) TYPE(*CHAR) LEN(1) VALUE('''')
DCL VAR(&Comma) TYPE(*CHAR) LEN(2) VALUE(', ')
DCL VAR(&NAME) TYPE(*CHAR) LEN(10) VALUE('Birgitta')
DCL VAR(&NUMBER) TYPE(*CHAR) LEN(5) VALUE('12345')
DCL VAR(&MYDATE) TYPE(*CHAR) LEN(10) VALUE('2006-04-19')
CHGVAR VAR(&COMMAND) +
VALUE(&Command *TCAT &Quote *TCAT &Name *TCAT &Quote +
*TCAT &Comma *CAT &Number *TCAT &Comma +
*CAT &Quote *TCAT &MyDate *TCAT &Quote +
*TCAT &CmdEnd)
QSH CMD(&Command)
Birgitta