Index: vhConsistency/Checks/DOM/PM/PrijzenVariatiesViaWebservice.cls.xml
===================================================================
diff -u -r52060 -r52063
--- vhConsistency/Checks/DOM/PM/PrijzenVariatiesViaWebservice.cls.xml	(.../PrijzenVariatiesViaWebservice.cls.xml)	(revision 52060)
+++ vhConsistency/Checks/DOM/PM/PrijzenVariatiesViaWebservice.cls.xml	(.../PrijzenVariatiesViaWebservice.cls.xml)	(revision 52063)
@@ -43,7 +43,6 @@
 	Set ..BestandUploader = $$$Inject(BestandUploader, ##class(vhConsistency.Checks.DOM.PM.PrijzenVariatiesViaWebservice.BestandUploader).%New())
 	Set ..SalesPriceService = $$$Inject(SalesPriceService, ##class(AXimpl.Admin.VKP.SalesPriceService).%New())
 	Set ..GlobalMultiDimIterator = $$$Inject(GlobalMultiDimIterator, ##class(TECH.GlobalMultiDimIterator).%New($Name(^ConsistCheckPrijzenKlantProduct)))
-	Do ..GlobalMultiDimIterator.Next()
 	Set ..DecimalSeperatorInput = DecimalSeperatorInput
 	Set ..ThousandSeperatorInput = ThousandSeperatorInput
 	Set ..SkipCheck = $$$True
@@ -60,6 +59,8 @@
 	#dim Aantal, Eenheid, Identnummer, InclBTW, KlantNaam, KLNr, Korttekst, LijstPrijs, Melding, NettoPrijs, PRNr, Record, SimPPL As %String
 	#dim SalesPriceServiceEenheid, SalesPriceServiceInclBTW, SalesPriceServiceLijstPrijs, SalesPriceServiceNettoprijs As %String
 	
+	Do ..SkipGlobalHeader()
+	
 	If (($Data(^ConsistCheckPrijzenKlantProduct)) = 0) {
 		Set Melding = "De Global die de te checken data hoort te bevatten bestaat niet. Gelieve een bestand te uploaden met volgende instructie: "_$$$CRLF
 		_"Do ##class(vhConsistency.Checks.DOM.PM.PrijzenVariatiesViaWebservice).%New().UploadBestandMetPrijzenNaarGlobal() "_$$$CRLF
@@ -82,15 +83,13 @@
 			
 			If $$$Not(##class(Derde.Klant.Klant).%ExistsId(KLNr)) {
 				Set Melding = "Klant '"_KLNr_"' bestaat niet."
-				;Do ..VoegMeldingToe(Melding)
-				w !,Melding
+				Do ..VoegMeldingToe(Melding)
 				Continue
 			}
 			
 			If $$$Not(##class(Prod.Product).%ExistsId(PRNr)) {
 				Set Melding = "Product '"_PRNr_"' bestaat niet."
-				;Do ..VoegMeldingToe(Melding)
-				w !,Melding
+				Do ..VoegMeldingToe(Melding)
 				Continue
 			}
 			
@@ -103,30 +102,22 @@
 			
 			If $$$Not(NettoPrijs = SalesPriceServiceNettoprijs) {
 				Set Melding = "Voor Klant '"_KLNr_"'"_KlantNaam_"' komt de SalesPriceService-Nettoprijs niet overeen voor product '"_PRNr_"'-'"_Identnummer_"'-'"_Korttekst_"'. Bestand: '"_NettoPrijs_"' t.o.v. SalesPriceService: '"_SalesPriceServiceNettoprijs_"'."
-				;Do ..VoegMeldingToe(Melding)
-				w !,Melding
-				Continue
+				Do ..VoegMeldingToe(Melding)
 			}
 			
 			If $$$Not(LijstPrijs = SalesPriceServiceLijstPrijs) {
 				Set Melding = "Voor Klant '"_KLNr_"'"_KlantNaam_"' komt de SalesPriceService-LijstPrijs niet overeen voor product '"_PRNr_"'-'"_Identnummer_"'-'"_Korttekst_"'. Bestand: '"_LijstPrijs_"' t.o.v. SalesPriceService: '"_SalesPriceServiceLijstPrijs_"'."
-				;Do ..VoegMeldingToe(Melding)
-				w !,Melding
-				Continue
+				Do ..VoegMeldingToe(Melding)
 			}
 			
 			If $$$Not(Eenheid = SalesPriceServiceEenheid) {
 				Set Melding = "Voor Klant '"_KLNr_"'"_KlantNaam_"' komt de SalesPriceService-Eenheid niet overeen voor product '"_PRNr_"'-'"_Identnummer_"'-'"_Korttekst_"'. Bestand: '"_Eenheid_"' t.o.v. SalesPriceService: '"_SalesPriceServiceEenheid_"'."
-				;Do ..VoegMeldingToe(Melding)
-				w !,Melding
-				Continue
+				Do ..VoegMeldingToe(Melding)
 			}
 			
 			If $$$Not(InclBTW = SalesPriceServiceInclBTW) {
 				Set Melding = "Voor Klant '"_KLNr_"'"_KlantNaam_"' komt de SalesPriceService-InclBTW niet overeen voor product '"_PRNr_"'-'"_Identnummer_"'-'"_Korttekst_"'. Bestand: '"_InclBTW_"' t.o.v. SalesPriceService: '"_SalesPriceServiceInclBTW_"'."
-				;Do ..VoegMeldingToe(Melding)
-				w !,Melding
-				Continue
+				Do ..VoegMeldingToe(Melding)
 			}
 		}
 	}
@@ -141,6 +132,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="SkipGlobalHeader">
+<Private>1</Private>
+<Implementation><![CDATA[	Do ..GlobalMultiDimIterator.Next()
+]]></Implementation>
+</Method>
+
 <Method name="Normaliseer">
 <FormalSpec>DecimaalGetal:%String</FormalSpec>
 <Private>1</Private>