RUNSQLSTM - Problem

[muadeep]

bekomme jetzt folgenden Fehler:

Satz    *...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... 8   FLGNR. Letzte Änderung
      1 insert into jrnanz/SOURCES1                                                                              
      2    SELECT 1 , 1 ,'     A            ' concat WHFLDI concat '   ' concat                                  
      3           case when whfldd=0 then substr(digits(whfldb) , 3 , 3)                                         
      4                else ' 'concat digits(whfldd) end                                                         
      5           concat whfldt concat                                                                           
      6           case when whfldp=0 then '  '                                                                   
      7                else substr(digits(WHFLDp) , 1 , 2) end                                                   
      8           concat                                                                                         
      9           Case When Length(Trim(Left(WHFTXT, 28) <> 0                                                    
     10                Then '       TEXT(' concat                                                                
     11                     '''' concat trim(left(WHFTXT , 28)) concat ''''                                      
     12                     concat ')' end                                                                       
     13      from jrnanz/fields                                                                                  
                               * * * * *  E N D E  D E R  Q U E L L E * * * * *                                  
5722SS1 V5R3M0 040528            SQL-Anweisungen ausführen         SQL                                01.09.06 09
Satz    *...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... 8   FLGNR. Letzte Änderung
MSG ID  WTK  SATZ  TEXT                                                                                          
SQL0104  30       9  Position 50 Token <> ungültig. Gültige Token: ).
                    Nachrichtenzusammenfassung             
  Gesamt    Info   Warnung      Fehler  Wertigk. Beendigung
      1        0         0          0        1         0   
Fehler der Wertigkeitsstufe 30 in Quelle gefunden. 

[BenderD]

Hallo,

vielleicht solltest du mal genauer beschreiben, was du eigentlich machst und was du damit erreichen willst. Mir scheint, dass das mit einem relativ einfachen
create table as
(select joccid, joentt, ..., b.*
from xxxjrn, xxx b
) with no data
in einem ratsch und einfacher geht.

mfg

Dieter Bender

der keine Ratespiele mag

bekomme jetzt folgenden Fehler:

Satz    *...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... 8   FLGNR. Letzte Änderung
      1 insert into jrnanz/SOURCES1                                                                              
      2    SELECT 1 , 1 ,'     A            ' concat WHFLDI concat '   ' concat                                  
      3           case when whfldd=0 then substr(digits(whfldb) , 3 , 3)                                         
      4                else ' 'concat digits(whfldd) end                                                         
      5           concat whfldt concat                                                                           
      6           case when whfldp=0 then '  '                                                                   
      7                else substr(digits(WHFLDp) , 1 , 2) end                                                   
      8           concat                                                                                         
      9           Case When Length(Trim(Left(WHFTXT, 28) <> 0                                                    
     10                Then '       TEXT(' concat                                                                
     11                     '''' concat trim(left(WHFTXT , 28)) concat ''''                                      
     12                     concat ')' end                                                                       
     13      from jrnanz/fields                                                                                  
                               * * * * *  E N D E  D E R  Q U E L L E * * * * *                                  
5722SS1 V5R3M0 040528            SQL-Anweisungen ausführen         SQL                                01.09.06 09
Satz    *...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... 8   FLGNR. Letzte Änderung
MSG ID  WTK  SATZ  TEXT                                                                                          
SQL0104  30       9  Position 50 Token <> ungültig. Gültige Token: ).
                    Nachrichtenzusammenfassung             
  Gesamt    Info   Warnung      Fehler  Wertigk. Beendigung
      1        0         0          0        1         0   
Fehler der Wertigkeitsstufe 30 in Quelle gefunden. 

[Fuerchau]

Case When Length(Trim(Left(WHFTXT, 28) <> 0

Zähl doch einfach mal die offenen Klammern !

[woki]

Versuch es mal hiermit:

insert into jrnanz/SOURCES1                                                                              
   SELECT 1 , 1 ,'     A            ' concat WHFLDI concat '   ' concat                                  
          case when whfldd=0 then substr(digits(whfldb) , 3 , 3)                                         
               else ' 'concat digits(whfldd) end                                                         
          concat whfldt concat                                                                           
          case when whfldp=0 then '  '                                                                   
               else substr(digits(WHFLDp) , 1 , 2) end                                                   
          concat                                                                                         
          Case When Length(Trim(Left(WHFTXT, 28))) <> 0                                                    
               Then '       TEXT(' concat                                                                
                    '''' concat trim(left(WHFTXT , 28)) concat ''''                                      
                    concat ')' end                                                                       
     from jrnanz/fields

LG, Kathrin