suche in Datenstruktur Array

[woodstock99]

hallo furechau ,
hab mich evtl falsch ausgedruckt.

ich würde gerne so suchen lookup( hans , busch, strasse : feld1 : feld2 : feld 3 )
das geht natürlich nicht . habs jetzt nur mal so zum besseren verständnis geschrieben

[Fuerchau]

Da du ja weißt, dass das nicht geht, verstehe ich dein Problem nicht:

d Suchfeld ds
d F1 10
d f2 20
d f3 10

f1 = hans; f2 = busch; f3 = Strasse;
lookup(Suchfeld:Arr);

[woodstock99]

wollte nur wissen obs da evtl nen trick 17 gibt

[B.Hauser]

So wie Du die Datenstruktur definiert hast, kannst Du ein 40A Vergleichsfeld füllen und dann mit diesem den %LOOKUP auf das Array ARR machen:

D DSVergl           DS                   Qualified
D    Feld1                        10A     
D    Feld2                        20A
D    Feld3                        10A  
 /Free
    DSVergl.Feld1 = 'Hans';
    DSVergl.Feld2 = 'Busch';
    DSVergl.Feld3 = 'Strasse';

    Pos = %LookUp(DSVergl: Datenstruktur.Arr);

Sofern POS = 3 wäre, würde in Datenstruktur.Feld1(3) Hans stehen in Datenstruktur.Feld2(3) Busch und in Datenstruktur.Feld3(3) Strasse.

Birgitta

[Fuerchau]

Der Trick 17 ist: schreibe (vernünftigerweise) dafür eine Funktion:

d Suchen pr 5i 0
d F1 10 const
d F2 20 const
d F3 10 const

Suchen(Hans:Busch:Strasse);

p suchen b
d Suchen pi 5i 0
d F1 10 const
d F2 20 const
d F3 10 const

return %lookup(F1 + F2 + F3:Arr);
p suchen e

Du kannst ja %lookup(hans + Busch + Strasse:Arr) direkt verwenden, allerdings sind die Begriffe dann genau mit Blanks aufzufüllen.
Die Funktion sorgt aber dafür, dass die Feldlängen korrekt sind und somit der %lookup immer mit dem Begriff korrekt sucht.