SQL-Befehle im CL

[Hubert Brethauer]

Eine kleine (hoffentlich einfache) Frage:Wie integriere ich SQL-Befehle in einem CL? - Vielen Dank -

[malzusrex]

Guten Morgen

mit runsqlstm

Gruß Ronald

[B.Hauser]

... 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