Hi,
sodale, die Tat ist vollbracht.
Ich habe, Gott sei dank alle Werte in Konfigurationsdokumenten stehen.
Ich hab mir eine Ansicht bebastelt in der in der ersten Spalte die entsprechenden Feldnamen stehen. Damit kann ich per GetDocumentByKey daraufzugreifen. Dann fülle ich damit eine Liste und anhand der Aliase aus dem Feld ermittle ich die entsprechenden Werte und schreibe sie in ein Array. Diese Array weise ich dann dem zweiten Feld zu. Fertig.
Ich weiß, klingt kompliziert, aber hier ist der entsprechende Code:
...
Set keydoc = view.GetDocumentByKey("HOAI_II", True )
For idx = 0 To Ubound(keydoc.Values)
HOAI_II_List(RightBack(keydoc.Values(idx), "| ")) = LeftBack(keydoc.Values(idx), " |")
Next 'For idx = 0 To Ubound(keydoc.Values)
...
...
Redim tmpArray(0)
If doc.HOAI_II(0) <> "" Then
For idx = 0 To Ubound(doc.HOAI_II)
If Iselement(HOAI_II_List(doc.HOAI_II(idx))) Then
Redim Preserve tmpArray(idx)
tmpArray(idx) = HOAI_II_List(doc.HOAI_II(idx))
End If
Next 'For idx = 0 To Ubound(doc.HOAI_II)
doc.HOAI_II_Text = tmparray
End If 'If doc.HOAI_II(0) <> "" Then
...
Ist vielleicht nicht unbedingt der beste Programmierstil, aber was soll's. Es musste, wie so oft, schnell gehen und es funktioniert.
Danke nochmals allen, die sich gedanken gemacht haben.
Axel