Index: vhDeploy/D20250818xBudiRegioWijzigingen.cls.xml
===================================================================
diff -u
--- vhDeploy/D20250818xBudiRegioWijzigingen.cls.xml	(revision 0)
+++ vhDeploy/D20250818xBudiRegioWijzigingen.cls.xml	(revision 75100)
@@ -0,0 +1,46 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.D20250818xBudiRegioWijzigingen">
+<Description>
+Do ##class(vhDeploy.D20250818xBudiRegioWijzigingen).ExecCode()</Description>
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Regiowijzigingen op vraag van DPO</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do ..ZetBudiVanRegio("45", "BLE")
+	Do ..ZetBudiVanRegio("46", "PST")
+	
+	Do ..PasAanRegioOmschrijvingen()
+]]></Implementation>
+</Method>
+
+<Method name="PasAanRegioOmschrijvingen">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Set ^RES("KLANT","PI","REGIO","D",2) = "3`IP - BENELUX Key-accounts Benelux-LDS`1`10`4682||1129`Industrie`1````````4682||11````4682||30`Industrie``IP BENELUX````"
+	Set ^RES("KLANT","PI","REGIO","D",12) = "12`IP - EXP Duitsland-LDS`10`10`4682||1070`Industrie`````````4682||11````4682||30`Industrie``IP EX````"
+	Set ^RES("KLANT","PI","REGIO","D",14) = "14`IP - Häfele Duitsland-PVH`10`10`4682||1070`Industrie`````````4682||20````4682||30`Industrie``0````"
+	Set ^RES("KLANT","PI","REGIO","D",45) = "36`KS - NL Zuid Centraal Nederland Zuid-BLE`40`40`4682||1174`KS NL`10````````4682||1103````4682||1102`KS`1147`KS NL````"
+	Set ^RES("KLANT","PI","REGIO","D",46) =	"37`KS - NL Oost-Brabant-PST`40`40`4682||1023`KS NL`10````````4682||1035````4682||1102`KS`1147`KS NL````"
+]]></Implementation>
+</Method>
+
+<Method name="ZetBudiVanRegio">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>RegioNummer:%String,BudiInitialen:%String</FormalSpec>
+<Implementation><![CDATA[
+	#dim Regio As DOM.VKP.impl.Regio = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefRegio(RegioNummer)
+	Do Regio.ZetExterneVerantwoordelijke(##class(DOM.DomeinContext).Instance().GeefGebruikerAPI().GeefVanHoeckeGebruikerBeheerder().GeefGebruiker($$USERID^vhUSER(BudiInitialen)))
+	Do Regio.Save()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>