Warum nimmst du denn Sqript?
Würde es nicht gehen? Wenn du ein @dblookup auf die ansicht machst, die du ja eh schon hast für die eingebettet ansicht?
Dann hast du die Anzahl der Antwortdoc's und dank dem Lookup auch den Parameter der dafür verantwortlich ist das die Docs verschoben werden oder nicht.
Dann machst du ein @ReplaceSubstring, um die zu löschen die nicht verschoben werden dürfen. Über bleibt ein Array mit leeren Arraystellen. Das müsste dann mit einem @Trim auf die Gefüllten Arraystellen gekürtzt werden und dann kannst du das mit @Count die Anzahl der Verfübaren Docs zurück geben.
Schluessel:="nichtVerschieben";
AllDoc:=@DbLookup(....;SchlüsselFeld);
VDoc:=@Trim(@ReplaceSubstring(ALLDoc;Schluessel;""));
Result:=@Count(VDoc)
Result
Das ist das erste mal das ich ein Code nur so im Kopf entwickelt habe, ohne ihn selbst zu testen.
Ich hoffe er geht.
Erst mal Danke für Eure Mitarbeit ;-)
@Klaas
irgendwie gefällt mir Script besser ;-)
Mit @dblookup bekomme ich nur Werte einer Spalte
Noch mal zur Erklärung: zu einer Bestellung können 2 verschiedene Antwort-Typen gehören. Entweder aktive Positionen (Form="Position") oder stornierte (Form=Storno). Jetzt nutze ich eine Picklistcollection mit SigleCategory. Funktioniert ja soweit ganz gut. Wenn ich jetzt nur eine aktive Position habe, macht es keinen Sinn, diese zu verschieben. Also soll der User eine Meldung "Unsinn!!" bekommen und die Picklist entfallen. Außerdem soll er darauf hingewiesen werden wenn er versucht, alle vorhandenen Positionen zu verschieben. Dazu brauche ich die Anzahl aller Dokumente, die in der Picklist angezeigt werden.
Ich könnte mit
Set view = db.GetView("$aktiv")
Set col = view.GetallEntriesByKey(ws.CurrentDocument.Document.UniversalID)
Messagebox col.count
Set teilcol = ws.PickListCollection( 3 ,True, Fileserver, Filename,"($aktiv)","Positionswahl","Bitte Positionen auswählen",currdoc.UniversalID)
Dummerweise gibt es keine Beziehung zwischen dem Dokument und der darin eingebetteten Ansicht. Oder irre ich micht hier?
Viele Grüße
Mirko