Blog

Benutzereingabe-Skript als Position

  • Beitrags-Autor:
  • Beitrags-Kategorie:Sonstiges
Dim gPID
 
Function BPM_OnCreate(DCRoot)
   gPID = InputBox("Welche Prozess-ID?", "Frage", "XX")
End Function
 
 
Function BPM_OnProcessBatch(DCBatch)
   'eine ID setzen
   iDocCount = DCBatch.GetDocumentCount
   For i = 0 To iDocCount - 1
      Set DCTempDocument = DCBatch.GetDocument(i)
      DCTempDocument.SetAttributeW "ID_PROCESS_FLAG", gPID
   Next
   'zum nächsten Schritt   
   DCBatch.SetPositionW("ID_vb-script5")
End Function