Index: vhUnitTest/BL/MB/UGLYPicking/Receptie/BuildBufferViaDnaCode/Test.cls.xml =================================================================== diff -u -r55865 -r56044 --- vhUnitTest/BL/MB/UGLYPicking/Receptie/BuildBufferViaDnaCode/Test.cls.xml (.../Test.cls.xml) (revision 55865) +++ vhUnitTest/BL/MB/UGLYPicking/Receptie/BuildBufferViaDnaCode/Test.cls.xml (.../Test.cls.xml) (revision 56044) @@ -47,6 +47,8 @@ Do ##class(DOM.Halux.AAP.DnaCodeRepository).%New().Bewaar(..DnaCode1) Set ^TO("IP",1304468,271044,300) = "103" + Set ^KTO(6332,271044,103)="\\7" + Set ^KTO1(271044)="6332\" #dim VolgNummer As %String = "" Do ##class(BL.MB.UGLYPicking.Receptie).BuildBufferViaDnaCode(..DnaCode1.Toelevering,..DnaCode1.InitialenScanner,.VolgNummer) @@ -72,6 +74,8 @@ Do ##class(DOM.Halux.AAP.DnaCodeRepository).%New().Bewaar(..DnaCode2) Set ^TO("IP",1304468,271044,300) = "103" + Set ^KTO(6332,271044,103)="\\7" + Set ^KTO1(271044)="6332\" #dim VolgNummer As %String = "" Do ##class(BL.MB.UGLYPicking.Receptie).BuildBufferViaDnaCode(..DnaCode1.Toelevering,..DnaCode1.InitialenScanner,.VolgNummer) @@ -100,6 +104,8 @@ Do ##class(DOM.Halux.AAP.DnaCodeRepository).%New().Bewaar(..DnaCode2) Set ^TO("IP",1304468,271044,300) = "103" + Set ^KTO(6332,271044,103)="\\7" + Set ^KTO1(271044)="6332\" #dim VolgNummer As %String = "" Do ##class(BL.MB.UGLYPicking.Receptie).BuildBufferViaDnaCode(..DnaCode1.Toelevering,..DnaCode1.InitialenScanner,.VolgNummer)