Index: vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestMVXKenmerken.cls.xml =================================================================== diff -u -r63490 -r63491 --- vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestMVXKenmerken.cls.xml (.../TestMVXKenmerken.cls.xml) (revision 63490) +++ vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestMVXKenmerken.cls.xml (.../TestMVXKenmerken.cls.xml) (revision 63491) @@ -5,7 +5,7 @@ %String -;V;\\;\\;\\;OG;40;0;I;TOB;0;0;0;1;580;500;M;OG-M;Z;;M;Hout;{ToepassingPlaceHolder};Probox;Metaal;0;15;Pure;;;;Zonder +;V;\\;\\;\{UitsparingPlaceHolder}\;OG;40;0;I;TOB;0;0;0;1;580;500;M;OG-M;Z;;M;Hout;{ToepassingPlaceHolder};Probox;Metaal;0;15;Pure;;;;Zonder @@ -44,8 +44,7 @@ Set MvxKenmerken.NietMeeleveren = ##class(TECH.ListUtils).CreateListOfDataTypes("Rol3","Rol1","Rol2") #dim VerwachteCanonischeWaarde As %String = ..GeefVerwachteCanonischeWaarde() - Set VerwachteCanonischeWaarde = ##class(TECH.StringUtils).Replace(VerwachteCanonischeWaarde,";\\",";\RolA;RolB;RolC\",0,1) ; StartPos = 0, ReplaceCount = 1 --> enkel het eerste item vervangen - Set VerwachteCanonischeWaarde = ##class(TECH.StringUtils).Replace(VerwachteCanonischeWaarde,";\\",";\Rol1;Rol2;Rol3\",0,1) ; StartPos = 0, ReplaceCount = 1 --> enkel het eerste item vervangen + Set VerwachteCanonischeWaarde = ##class(TECH.StringUtils).Replace(VerwachteCanonischeWaarde, ";\\;\\;\\;" , ";\RolA;RolB;RolC\;\Rol1;Rol2;Rol3\;\\;" ,0,1) ; StartPos = 0, ReplaceCount = 1 --> enkel het eerste item vervangen Do ..AssertCanonischeWaarde(MvxKenmerken,VerwachteCanonischeWaarde) ]]> @@ -62,8 +61,7 @@ Set MvxKenmerken.Toepassing = ##class(DOM.PM.enu.MVXToepassing).Sifon() Set MvxKenmerken.UitsparingData = ..GeefUitsparingDataDubbel() - #dim VerwachteCanonischeWaarde As %String =..GeefVerwachteCanonischeWaarde("SY") - Set VerwachteCanonischeWaarde = ##class(TECH.StringUtils).Replace(VerwachteCanonischeWaarde,";\\",";\"_..GeefVerwachteCanonischeWaardeUitsparingDubbel()_"\",2,1) ; Skip First 2, ReplaceCount = 1 --> enkel het eerstvolgende item vervangen + #dim VerwachteCanonischeWaarde As %String =..GeefVerwachteCanonischeWaarde("SY", ..GeefVerwachteCanonischeWaardeUitsparingDubbel()) Do ..AssertCanonischeWaarde(MvxKenmerken,VerwachteCanonischeWaarde) ]]> @@ -75,8 +73,7 @@ Set MvxKenmerken.Toepassing = ##class(DOM.PM.enu.MVXToepassing).Spoelbak() Set MvxKenmerken.UitsparingData = ..GeefUitsparingDataEnkel() - #dim VerwachteCanonischeWaarde As %String =..GeefVerwachteCanonischeWaarde("SP") - Set VerwachteCanonischeWaarde = ##class(TECH.StringUtils).Replace(VerwachteCanonischeWaarde,";\\",";\"_..GeefVerwachteCanonischeWaardeUitsparingEnkel()_"\",2,1) ; ReplaceCount = 1 --> enkel het eerste item vervangen + #dim VerwachteCanonischeWaarde As %String =..GeefVerwachteCanonischeWaarde("SP", ..GeefVerwachteCanonischeWaardeUitsparingEnkel()) Do ..AssertCanonischeWaarde(MvxKenmerken,VerwachteCanonischeWaarde) ]]> @@ -130,10 +127,12 @@ -Toepassing:%String="L" +Toepassing:%String="L",UitsparingData:%String="" 1