Index: BL/Flow/Proxy/pxLevering.cls.xml =================================================================== diff -u -r55961 -r56676 --- BL/Flow/Proxy/pxLevering.cls.xml (.../pxLevering.cls.xml) (revision 55961) +++ BL/Flow/Proxy/pxLevering.cls.xml (.../pxLevering.cls.xml) (revision 56676) @@ -459,11 +459,7 @@ If AfzenderHoofdingDto.HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).HaefeleNL() { Set ..LEVERINGSNR="" Set ..CheckDigitLevNr="" - Set ..BarCodeBONNr="" } - If AfzenderHoofdingDto.HeaderType = ##class(BL.FOP.Proxy.enu.HoofdingType).Dupont() { - Set ..BarCodeBONNr="" - } #dim KlantID As DOM.VKP.VanHoeckeKlantID = ##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI().GeefKlantPartijID(KLNr) Set ..KlantType=$S(##class(DOM.DomeinContext).Instance().GeefKlantTypeAPI().IsIndustriePoolKlant(KlantID):"I", 1:"K") ; Industrie klant of KS Index: vhUnitTest/BL/Flow/Proxy/pxLevering/TestAfzenderHoofding.cls.xml =================================================================== diff -u -r56002 -r56676 --- vhUnitTest/BL/Flow/Proxy/pxLevering/TestAfzenderHoofding.cls.xml (.../TestAfzenderHoofding.cls.xml) (revision 56002) +++ vhUnitTest/BL/Flow/Proxy/pxLevering/TestAfzenderHoofding.cls.xml (.../TestAfzenderHoofding.cls.xml) (revision 56676) @@ -96,7 +96,7 @@ Do $$$AssertEquals(pxLevering.BTWNR,"") Do $$$AssertEquals(pxLevering.FactuurAan,"","""Factuur aan: "" niet ingevuld") Do $$$AssertEquals(pxLevering.CheckSumBon,"","Checksum niet ingevuld") - Do $$$AssertEquals(pxLevering.BarCodeBONNr,"","Barcodenummer leeg") + Do $$$AssertEquals(pxLevering.BarCodeBONNr,"900000") Do $$$AssertEquals(pxLevering.LEVERINGSNR,"","Leveringsnummer leeg") Quit $$$OK @@ -179,7 +179,7 @@ Do $$$AssertEquals(pxLevering.BTWNR,"") Do $$$AssertEquals(pxLevering.FactuurAan,"","""Factuur aan: "" niet ingevuld") Do $$$AssertEquals(pxLevering.CheckSumBon,"","Checksum niet ingevuld") - Do $$$AssertEquals(pxLevering.BarCodeBONNr,"") + Do $$$AssertEquals(pxLevering.BarCodeBONNr,"900000") Do $$$AssertEquals(pxLevering.LEVERINGSNR,"900000") }