Index: AXimpl/AxToAdminUtils.cls.xml =================================================================== diff -u -r59167 -r59570 --- AXimpl/AxToAdminUtils.cls.xml (.../AxToAdminUtils.cls.xml) (revision 59167) +++ AXimpl/AxToAdminUtils.cls.xml (.../AxToAdminUtils.cls.xml) (revision 59570) @@ -78,8 +78,6 @@ ; voor legale entiteit hlx is dit misschien gelijk, maar wsl niet ; voor legale entiteit VH is SupplierId = "0" _ LeverancierNr - #dim LeverancierId as %String = SupplierId - Quit:SupplierId="" "" Quit:SupplierId="06347" "L||5026" Quit:SupplierId="05645" "L||5817" Quit:SupplierId="05669" "L||5830" @@ -130,9 +128,13 @@ Quit:SupplierId="06756" "L||8910" Quit:SupplierId="06773" "L||8924" Quit:SupplierId="06787" "L||6675" - ; als we hier komen is het een nieuwe leverancier die we niet voorzien hebben!!! - DO ##class(vhLib.Logger).%New().ErrorMail("AXToAdminUtils","Nieuwe leverancier met id '"_SupplierId_"' gedefinieerd in AX Halux, die nog niet voorzien is in ConvertSupplierIDHLX") - Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Nieuwe leverancier met id '"_SupplierId_"' gedefinieerd in AX Halux, die nog niet voorzien is in Admin Conversiecode.")) + + If ($$$HasLength(SupplierId)) { + Quit "L||"_+SupplierId // Default afhandeling, toepasbaar op alle nieuw aangemaakte leveranciers. + } Else { + Do ##class(vhLib.Logger).%New().ErrorMail("AXToAdminUtils","Nieuwe leverancier met id '"_SupplierId_"' gedefinieerd in AX Halux, die nog niet voorzien is in ConvertSupplierIDHLX") + Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Nieuwe leverancier met id '"_SupplierId_"' gedefinieerd in AX Halux, die nog niet voorzien is in Admin Conversiecode.")) + } ]]>