OPGELET: Deze klasse is non procedureblock en moet dit ook blijven!!! %RegisteredObject 0 1 1 APPS.VKP.Maatwerk.impl.ConfiguratorParameters 1 1 APPS.VKP.Maatwerk.impl.ConfiguratorParameters 1 Parameters:APPS.VKP.Maatwerk.impl.ConfiguratorParameters 1 DocumentType:APPS.VKP.Maatwerk.enu.DocumentType,DocumentId:%Integer APPS.VKP.Maatwerk.impl.BesteldeProducten 3) Set Puntjes = "" Do DISPONLY^vhTXTPOP("Invoeren van product met configurator "_Puntjes_$Justify("",3-$Length(Puntjes)),"Bezig met ...",1) Set BesteldeProducten = ConfiguratorService.GeefBesteldeProducten(DocumentType,DocumentId) } Do REFRESH^vhTERMINA(1,24) Quit BesteldeProducten ]]>