Arrayelemente

[JonnyRico]

Hi,

kann mir vielleicht mal kurz jemand auf die Sprüge helfen, wie ich Arrayelemente bereits bei der Initaisierung vorneheme? Ich will nicht jedes Element gleich initalisieren.

Gruß

Sascha

[Frank Hildebrandt]

Hier ein kleines Beispiel

d TABKEY          S              4S 0 Dim(32) CTData PerRcd(1) 
d TABDSC          S              8    Dim(32) Alt(TABKEY)  

Das hier muss ans Ende der Quelle gestellt werden.
    
** Table of Function Key Values
0049F1                         
0050F2                         
0051F3                         
0052F4                         
0053F5                         
0054F6                         
0055F7                         
0056F8                         
0057F9                         
0058F10                        
0059F11                        
0060F12                        
0063AUTOENT                    
0177F13                        
0178F14                        
0179F15                        
0180F16                        
0181F17                        
0182F18                        
0183F19                        
0184F20                        
0185F21         
0186F22         
0187F23         
0188F24         
0189CLEAR       
0241ENTER       
0243HELP        
0244ROLLDOWN    
0245ROLLUP      
0246PRINT       
0248HOME 

[JonnyRico]

Hi,

danke. Ich hatte fast befürchtet das es nicht schöner geht. Danke.

Gruß

Sascha

[B.Hauser]

Es geht aber auch anders:

D DSWochenTag     DS                                               
D                               10A   inz('Montag')                
D                               10A   inz('Dienstag')              
D                               10A   inz('Mittwoch')              
D                               10A   inz('Donnerstag')            
D                               10A   inz('Freitag')               
D                               10A   inz('Samstag')               
D                               10A   inz('Sonntag')               
 *                                                                 
D FGWochentag                   10A   Dim(7) Overlay(DSWochentag) 

Birgitta

[JonnyRico]

Oh

Ja das sieht doch schon nen bissel hübscher aus. Danke für den Tip.

Gruß

Sascha