Index: AXBizTalk/Customer.cls.xml =================================================================== diff -u -r37812 -r37813 --- AXBizTalk/Customer.cls.xml (.../Customer.cls.xml) (revision 37812) +++ AXBizTalk/Customer.cls.xml (.../Customer.cls.xml) (revision 37813) @@ -67,6 +67,18 @@ %String + +%String + + + +%String + + + +%String + + %Library.CacheSerialState CustomerState @@ -114,6 +126,15 @@ Kwaliteit + +PrijsCodexBeslag + + +PrijsCodexOrgalux + + +PrijsCodexTaor + Index: AXimpl/BizTalkMessage/Converter/CustomerConverter.cls.xml =================================================================== diff -u -r37812 -r37813 --- AXimpl/BizTalkMessage/Converter/CustomerConverter.cls.xml (.../CustomerConverter.cls.xml) (revision 37812) +++ AXimpl/BizTalkMessage/Converter/CustomerConverter.cls.xml (.../CustomerConverter.cls.xml) (revision 37813) @@ -50,6 +50,7 @@ Do ..ConvertAccountInformatie() Do ..ConvertAlgemeneSegmentering() Do ..ConvertAdminSegmentering() + Do ..ConvertPrijsInformatie() Quit ..Customer ]]> @@ -142,6 +143,15 @@ ) ]]> + + +1 + + Index: vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml =================================================================== diff -u -r37812 -r37813 --- vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 37812) +++ vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 37813) @@ -41,6 +41,9 @@ Do ..Klant.IndienMethodCall("GeefActiviteit").DanReturn("") Do ..Klant.IndienMethodCall("GeefKwantitatief").DanReturn("") Do ..Klant.IndienMethodCall("GeefKwaliteit").DanReturn("") + Do ..Klant.IndienMethodCall("GeefPrijsCodexStandaard").DanReturn("L") + Do ..Klant.IndienMethodCall("GeefPrijsCodexOrgalux").DanReturn("L") + Do ..Klant.IndienMethodCall("GeefPrijsCodexTAOR").DanReturn("L") Do ..Partij.IndienMethodCall("GeefActiefStatus").DanReturn("") ]]> @@ -67,6 +70,10 @@ Do $$$AssertEquals(GeconverteerdeKlant.BIDIMedewerker,"Verantwoordelijke") Do $$$AssertEquals(GeconverteerdeKlant.Regio,"9") + + do $$$AssertEquals(GeconverteerdeKlant.PrijsCodexBeslag,"L") + do $$$AssertEquals(GeconverteerdeKlant.PrijsCodexOrgalux,"L") + do $$$AssertEquals(GeconverteerdeKlant.PrijsCodexTaor,"L") ]]>