Index: vhUnitTest/BL/MB/UGLYPicking/Receptie/BuildBufferViaDnaCode/Test.cls.xml =================================================================== diff -u -r60318 -r60660 --- vhUnitTest/BL/MB/UGLYPicking/Receptie/BuildBufferViaDnaCode/Test.cls.xml (.../Test.cls.xml) (revision 60318) +++ vhUnitTest/BL/MB/UGLYPicking/Receptie/BuildBufferViaDnaCode/Test.cls.xml (.../Test.cls.xml) (revision 60660) @@ -54,7 +54,7 @@ Set ^KTO1(271044)="6332\" #dim VolgNummer As %String = "" - Do ##class(BL.MB.UGLYPicking.Receptie).BuildBufferViaDnaCode(..DnaCode1.Toelevering, , ..DnaCode1.InitialenScanner,.VolgNummer) + Do ##class(BL.MB.UGLYPicking.Receptie).BuildBufferViaDnaCode(..DnaCode1.Toelevering, , ..DnaCode1.InitialenScanner,.VolgNummer,"~tmp") Do $$$AssertEquals(VolgNummer,"1") Do ..AssertDnaCode(..DnaCode1, VolgNummer, 1) @@ -75,7 +75,7 @@ Set ^KTO1(271044)="6332\" #dim VolgNummer As %String = "" - Do ##class(BL.MB.UGLYPicking.Receptie).BuildBufferViaDnaCode(..DnaCode1.Toelevering, , ..DnaCode1.InitialenScanner,.VolgNummer) + Do ##class(BL.MB.UGLYPicking.Receptie).BuildBufferViaDnaCode(..DnaCode1.Toelevering, , ..DnaCode1.InitialenScanner,.VolgNummer,"~tmp") Do $$$AssertEquals(VolgNummer,"1") Do ..AssertDnaCode(..DnaCode1, 1, 2) @@ -99,7 +99,7 @@ Set ^KTO1(271044)="6332\" #dim VolgNummer As %String = "" - Do ##class(BL.MB.UGLYPicking.Receptie).BuildBufferViaDnaCode(..DnaCode1.Toelevering, , ..DnaCode1.InitialenScanner,.VolgNummer) + Do ##class(BL.MB.UGLYPicking.Receptie).BuildBufferViaDnaCode(..DnaCode1.Toelevering, , ..DnaCode1.InitialenScanner,.VolgNummer,"~tmp") Do $$$AssertEquals(VolgNummer,"1") Do ..AssertDnaCode(..DnaCode1) @@ -125,7 +125,7 @@ Set ^KTO1(271044)="6332\" #dim VolgNummer As %String = "" - Do ##class(BL.MB.UGLYPicking.Receptie).BuildBufferViaDnaCode(..DnaCode1.Toelevering, , ..DnaCode1.InitialenScanner,.VolgNummer) + Do ##class(BL.MB.UGLYPicking.Receptie).BuildBufferViaDnaCode(..DnaCode1.Toelevering, , ..DnaCode1.InitialenScanner,.VolgNummer,"~tmp") Do $$$AssertEquals(VolgNummer,"1") Do ..AssertDnaCode(..DnaCode1, 1) @@ -140,7 +140,7 @@ Do ##class(DOM.Halux.AAP.DnaCodeRepository).%New().Bewaar(..DnaCode1) #dim VolgNummer As %String = "" - Do ##class(BL.MB.UGLYPicking.Receptie).BuildBufferViaDnaCode($$$DummyString, , ..DnaCode1.InitialenScanner,.VolgNummer) + Do ##class(BL.MB.UGLYPicking.Receptie).BuildBufferViaDnaCode($$$DummyString, , ..DnaCode1.InitialenScanner,.VolgNummer,"~tmp") Do $$$AssertFalse($Data(^UPRCP("B","~tmp",VolgNummer))) ]]>