Index: vhUnitTest/DataHelper.cls.xml =================================================================== diff -u -r42419 -r48447 --- vhUnitTest/DataHelper.cls.xml (.../DataHelper.cls.xml) (revision 42419) +++ vhUnitTest/DataHelper.cls.xml (.../DataHelper.cls.xml) (revision 48447) @@ -22,7 +22,7 @@ #dim LijnID As %String = $piece(LijnRec,"\",15) #dim ProductID As %String = $piece(LijnRec,"\",2) set ^TO("IU",ToeleveringNr,LijnID)=LijnNr - Set ^TO("IP",ProductID,ToeleveringNr,LijnID) = LijnNr + Set:$$$HasLength(ProductID) ^TO("IP",ProductID,ToeleveringNr,LijnID) = LijnNr } set ^KTO(LeverancierNr,ToeleveringNr,0)=$order(^KTO(LeverancierNr,ToeleveringNr,""),-1)+1 @@ -43,7 +43,7 @@ #dim LijnID As %String = $piece(LijnRec,"\",15) #dim ProductID As %String = $piece(LijnRec,"\",2) Kill ^TO("IU",ToeleveringNr,LijnID) - Kill ^TO("IP",ProductID,ToeleveringNr,LijnID) + Kill:$$$HasLength(ProductID) ^TO("IP",ProductID,ToeleveringNr,LijnID) } Kill ^KTO1(ToeleveringNr) Kill ^KTO3(ToeleveringNr)