for-Schleife in Aggregate

Nadine Inhelder

Kann mir bitte jemand sagen, wie eine for-Schleife in einem Aggregate aussehen müsste? Habs auf verschiedene Arten versucht, gab aber immer eine Fehlermeldung. Danke!

Philipp Knecht

Hi Nadine

Hmm...Wieso möchstest du eine For Schleife machen?

hth

Nadine Inhelder

Weil ich so was hier habe:
iif((right(GetData("LD.Par.a1"),2)=01 AND left(GetData("LD.Par.a1"),6)=rechnung("DocNum")) OR (right(GetData("LD.Par.a2"),2)=01 AND left(GetData("LD.Par.a2"),6)=rechnung("DocNum")) OR (right(GetData("LD.Par.a3"),2)=01 AND left(GetData("LD.Par.a3"),6)=rechnung("DocNum")) OR (right(GetData("LD.Par.a4"),2)=01 AND left(GetData("LD.Par.a4"),6)=rechnung("DocNum")) OR (right(GetData("LD.Par.a5"),2)=01 AND left(GetData("LD.Par.a5"),6)=rechnung("DocNum")) OR (right(GetData("LD.Par.a6"),2)=01 AND left(GetData("LD.Par.a6"),6)=rechnung("DocNum")) OR (right(GetData("LD.Par.a7"),2)=01 AND left(GetData("LD.Par.a7"),6)=rechnung("DocNum")) OR (right(GetData("LD.Par.a8"),2)=01 AND left(GetData("LD.Par.a8"),6)=rechnung("DocNum")) OR (right(GetData("LD.Par.a9"),2)=01 AND left(GetData("LD.Par.a9"),6)=rechnung("DocNum")) OR (right(GetData("LD.Par.a10"),2)=01 AND left(GetData("LD.Par.a10"),6)=rechnung("DocNum")) OR (right(GetData("LD.Par.a11"),2)=01 AND left(GetData("LD.Par.a11"),6)=rechnung("DocNum")),GetNumber(rechnung("U_bruttoweight")),"0")
und dies eigentlich noch länger sein sollte und ich die ganze Sache sonst noch 30 Mal kopieren und alle Zahlen anpassen muss...

Philipp Knecht

Ok.
Eventuell kannst du ja die Logik noch vereinfachen. Wir können die Sache auch gerne remote (kostenpflichtig) anschauen.
Ansonsten ,ohne die Hintergründe zu kennen, würde ich dir empfehlen das gesamte Konstrukt in eine Function einzubauen.

Hint:

[quote]Dim ParPath As String = "LD.Par."
Dim useBrutto As boolean = false
For i = 1 to 20

Dim res as String = ParPath & "a" & i
If right(GetData(res),2)=01 AND left(GetData.... Then
useBrutto = true
End If
Next i

If useBrutto Then

GetNumber(...)

End Ifhth

Nadine Inhelder

Vielen Dank, ich werd mir zuerst mal deinen Vorschlag genauer ansehen.