CL / CMD - Parameterlisten

[ebschubert]

Hallo @ all

ich habe da mal folgende Frage:

Kann man ein CMD definieren, das ua. als Paramter eine Liste hat, die wiederum als Elemente verschiedene Listen mit mehreren Elementen enthält?

Wie hoch ist da die Schachtelungstiefe?

Konkret:

                                                                      
             PARM       KWD(FELDER) TYPE(*CHAR) LEN(5) RSTD(*YES) +   
                          DFT(*NAM1) VALUES(*NAM1 *NAM2 *NAM3 *STR +  
                          *PLZ *ORT) MAX(6) EXPR(*YES) +              
                          PROMPT('Adressfelder aus .... ')           
                                                                      
             PARM       KWD(MAPPING) TYPE(MAPELEM) MIN(1) MAX(10) +   
                          PROMPT('Mapping ...')        
 MAPELEM:    ELEM       TYPE(*UINT4) MIN(1) EXPR(*YES) +              
                          PROMPT('Startposition')                     
             ELEM       TYPE(*UINT4) MIN(1) EXPR(*YES) PROMPT('Länge')

Dieses möchte ich wiederum in einer Liste mit ... sagen wir MAX(10) ... haben.

Geht das überhaupt? Wenn ja - wie?

Danke vorab

[bwachs]

Hallo,

vielleicht hilft dies weiter :

System iProgramming CL overview and concepts Version 6 Release 1,
Kapitel : Defining lists within lists, Seite 286 ff.

Gruß

Bernd

[kuempi von stein]

Hatten wir sowas nicht gerade vor kurzenm?

Chapter 9. Defining Commands

kuempi

[ebschubert]

Schaut euch doch bitte mal die Listen an!
Es sind 2(!) Listen und die 2. hat bereits eigene Elemente!

Die Änderung auf :

                                                                      
             PARM       KWD(MAPDEF) TYPE(MAPLIST) MIN(1) MAX(10)      
 MAPLIST:    ELEM       TYPE(*CHAR) LEN(5) RSTD(*YES) DFT(*NAM1) +    
                          VALUES(*NAM1 *NAM2 *NAM3 *STR *PLZ *ORT) +  
                          MAX(6) EXPR(*YES) CHOICE(*NONE) +           
                          PROMPT('Adressfelder aus ...')           
             ELEM       TYPE(MAPELEM) MIN(1) MAX(10) +                
                          PROMPT('Mapping der ...')        
 MAPELEM:    ELEM       TYPE(*UINT4) MIN(1) EXPR(*YES) +              
                          PROMPT('Startposition')                     
             ELEM       TYPE(*UINT4) MIN(1) EXPR(*YES) PROMPT('Länge')

bringt beim kompilieren folgende Fehlermeldungen:

P D 0 2 6 3 2 9 0 0 2 0 E r f o r d e r l i c h e r P a r a m e t e r n i c h t n a c h w a h l w e i s e m P a r a m e t e r
P a r a m e t e r a n g e n o m m e n .
P D 0 2 5 9 4 0 0 0 1 0 E r f o r d e r l i c h e L i s t e o d e r q u a l i f i z i e r t e r N a m e a l l e r w a h l w e
Q u a l i f i k a t i o n s m e r k m a l e n i c h t e r l a u b t .
P D 0 2 5 8 3 0 M e h r a l s d r e i V e r s c h a c h t e l u n g s t i e f e n f } r S c h l } s s e l w o r t M A
P D 0 2 8 5 4 4 0 0 1 0 E r f o r d e r l i c h e s E L E M n a c h w a h l w e i s e m E L E M n i c h t e r l a u b t . W
a n g e n o m m e n .
P D 0 2 6 3 3 9 0 0 2 0 E r f o r d e r l i c h e r P a r a m e t e r n i c h t n a c h w a h l w e i s e m P a r a m e t e r
P a r a m e t e r a n g e n o m m e n .

[ebschubert]

Zusatz:

Die entscheidende Fehlermeldung ist:

* CPD0258 30 Mehr als drei Verschachtelungstiefen für Schlüsselwort MAPDEF angegeben.

[Fuerchau]

Das ist ja dann wohl eindeutig.