SQLRPLE und LEFT JOIN und ganz komisches Verhalten

[B.Hauser]

Hier haben sich wohl einige vergaloppiert!

Indikator-Datenstrukturen können sowohl mit Mehrfach-Datenstrukturen (Schlüsselwort OCCURS) als auch Array-Datenstrukturen (Schlüsselwort DIM) verwendet werden!

1. Occurs:

D DSCsrC1         DS                  Occurs(50) Inz       
D   CsrC1Kunde                  15A                        
D   CsrC1ArtNr                  22A                        
D   CsrC1Umsatz                 11P 2                      
                                                           
D DSIndC1         DS                  Occurs(50) Inz       
D   Ind                          5I 0 dim(3)            
 *------------------------------------------------------
 /Free
    Exec SQL Declare CsrC1 Cursor For Select ... ;
    Exec SQL Open CsrC1;
    EXEC SQL Fetch Next From CsrC1 For  50 Rows       
                        into :DSCsrC1  :DSIndC1;

2. Dim()

D DSCsrC1         DS                  Dim(50)  Qualified  Inz    
D   CsrC1Kunde                  15A                           
D   CsrC1ArtNr                  22A                           
D   CsrC1Umsatz                 11P 2                         
                                                              
D DSIndCsrC1      DS                  Dim(50)  Qualified  Inz    
D   Ind                          5I 0 Dim(3)                  
 /*--------------------------------------------------------
 /Free
    Exec SQL Declare CsrC1 Cursor For Select ... ;
    Exec SQL Open CsrC1;
    EXEC SQL Fetch Next From CsrC1 For  50 Rows       
                        into :DSCsrC1  :DSIndCsrC1;

Birgitta