Index: WSimpl/Vhisie4/QRcodeNaarKenmerkenService.cls.xml =================================================================== diff -u -r62495 -r62496 --- WSimpl/Vhisie4/QRcodeNaarKenmerkenService.cls.xml (.../QRcodeNaarKenmerkenService.cls.xml) (revision 62495) +++ WSimpl/Vhisie4/QRcodeNaarKenmerkenService.cls.xml (.../QRcodeNaarKenmerkenService.cls.xml) (revision 62496) @@ -137,6 +137,10 @@ Set RegistratieCode = ##class(TECH.StringUtils).StringStrippenVanLeestekensSpatiesTabs(RegistratieCode) } + If ##class(TECH.StringUtils).StartsWith(RegistratieCode,"BAO"){ + Set RegistratieCode = ##class(TECH.StringUtils).Replace(RegistratieCode,"BAO","BA0") + } + Quit RegistratieCode ]]> Index: vhUnitTest/WSimpl/Vhisie4/QRcodeNaarKenmerken/GeefKenmerken/Test.cls.xml =================================================================== diff -u -r62495 -r62496 --- vhUnitTest/WSimpl/Vhisie4/QRcodeNaarKenmerken/GeefKenmerken/Test.cls.xml (.../Test.cls.xml) (revision 62495) +++ vhUnitTest/WSimpl/Vhisie4/QRcodeNaarKenmerken/GeefKenmerken/Test.cls.xml (.../Test.cls.xml) (revision 62496) @@ -430,6 +430,22 @@ Do LadeRegistratieServiceMock.Verifieer() ]]> + + + +