0 1 TECH.RegisteredObject %String 1 %String 1 %Integer 1 %ListOfDataTypes 1 %Boolean 1 %Boolean 1 ActieParameters:%ListOfDataTypes %Status 0) If (..IsSpecifiekEtiket()) { Set ..ToeleveringID = ..ActieParameters.GetAt(1) Set ..Dossiercode = ..ActieParameters.GetAt(2) Set ..Aantal = ..ActieParameters.GetAt(3) Do ..VerwijderActieParameters() } Else { Set ..ToeleveringID = "" Set ..Dossiercode = "" Set ..Aantal = 1 } Quit $$$OK ]]> %String %String %Integer %Boolean %Boolean IsHerafdruk:%Boolean 1