Index: CHUI/Orgalux/PrintSelect.cls.xml =================================================================== diff -u -r1133 -r2423 --- CHUI/Orgalux/PrintSelect.cls.xml (.../PrintSelect.cls.xml) (revision 1133) +++ CHUI/Orgalux/PrintSelect.cls.xml (.../PrintSelect.cls.xml) (revision 2423) @@ -386,12 +386,17 @@ } else { set Klant = $$$CRMGeefKlant(..ExportFilter.KlantNr) - set LandKlant = Klant.GeefAdres().GeefLandNr() - if (LandKlant'=1019)&&(LandKlant'=1147) { //&&(LandKlant'=1120) + Set LocatieAPI = ##class(DOM.DomeinContext).Instance().GeefLocatieAPI() + Set Belgie = LocatieAPI.GeefBelgie() + Set Nederland = LocatieAPI.GeefNederland() + Set Luxemburg = LocatieAPI.GeefLuxemburg() + + set LandKlant = Klant.GeefAdres().GeefLand().GeefID() + if (LandKlant'=Belgie.GeefID())&&(LandKlant'=Nederland.GeefID()) { //&&(LandKlant'=1120) if (..pmTaal.Value'="K")&&(..pmBTW.Value'="K") // Taal en BTW hebben een geldige waarde else set errMessage=errMessage_"De ORGALUX prijslijst voor klanten buiten Belgie of"_$$$CRLF_"Nederland is enkel mogelijk indien men een taal en"_$$$CRLF_"BTW-tarief heeft gekozen"_$$$CRLF } - if 0&&(LandKlant'=1019)&&(LandKlant'=1147) //&&(LandKlant'=1120) + if 0&&(LandKlant'=Belgie.GeefID())&&(LandKlant'=Nederland.GeefID()) //&&(LandKlant'=1120) { set errMessage=errMessage_"Klant is niet afkomstig van Belgie of Nederland"_$$$CRLF } if ..pmTaal.Value = "K" { set TaalKlant = Klant.GeefTaal() @@ -408,9 +413,9 @@ } if ..pmBTW.Value= "K" { - if LandKlant=1019 { set ..ExportFilter.BTW = "InclBTW-BE" } - elseif LandKlant=1147 { set ..ExportFilter.BTW = "InclBTW-NL" } - elseif LandKlant=1120 { set ..ExportFilter.BTW = "InclBTW-BE" } + if LandKlant=Belgie.GeefID() { set ..ExportFilter.BTW = "InclBTW-BE" } + elseif LandKlant=Nederland.GeefID() { set ..ExportFilter.BTW = "InclBTW-NL" } + elseif LandKlant=Luxemburg.GeefID() { set ..ExportFilter.BTW = "InclBTW-BE" } } else { set ..ExportFilter.BTW = ..pmBTW.Value } }