Index: vhUnitTest/APPS/VKP/Maatwerk/LadeRegistratie/impl/CodeGenerator/Genereer/Test.cls.xml =================================================================== diff -u -r58080 -r58081 --- vhUnitTest/APPS/VKP/Maatwerk/LadeRegistratie/impl/CodeGenerator/Genereer/Test.cls.xml (.../Test.cls.xml) (revision 58080) +++ vhUnitTest/APPS/VKP/Maatwerk/LadeRegistratie/impl/CodeGenerator/Genereer/Test.cls.xml (.../Test.cls.xml) (revision 58081) @@ -74,7 +74,6 @@ Set OrgaluxLadecode = ##class(DOM.VKP.Maatwerk.LadeRegistratie.impl.OrgaluxLadecode).%New() Set OrgaluxLadecode.Basisgetal = ..#Beginwaarde Set OrgaluxLadecode.GegenereerdeCode = ..#Prefix_"000A000" - Set OrgaluxLadecode.Horolog = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog() Do RepositoryMock.VerwachtMethodCall("Bewaar", ..Matches.Object(OrgaluxLadecode)).ExactAantalKeer(Aantal).DanDoeNiks() } Index: DOM/VKP/Maatwerk/LadeRegistratie/impl/OrgaluxLadecode.cls.xml =================================================================== diff -u -r57945 -r58081 --- DOM/VKP/Maatwerk/LadeRegistratie/impl/OrgaluxLadecode.cls.xml (.../OrgaluxLadecode.cls.xml) (revision 57945) +++ DOM/VKP/Maatwerk/LadeRegistratie/impl/OrgaluxLadecode.cls.xml (.../OrgaluxLadecode.cls.xml) (revision 58081) @@ -2,7 +2,7 @@ persistent -TECH.Persistent +TECH.VhChangeInfo %Integer @@ -12,10 +12,6 @@ %String - -TECH.Horolog - - Basisgetal @@ -39,14 +35,26 @@ %%CLASSNAME -Basisgetal +AangemaaktDoor -GegenereerdeCode +AangemaaktOp -Horolog +GewijzigdDoor + +GewijzigdOp + + +Basisgetal + + +GegenereerdeCode + + +InstanceVersion + Index: APPS/VKP/Maatwerk/LadeRegistratie/impl/CodeGenerator.cls.xml =================================================================== diff -u -r58080 -r58081 --- APPS/VKP/Maatwerk/LadeRegistratie/impl/CodeGenerator.cls.xml (.../CodeGenerator.cls.xml) (revision 58080) +++ APPS/VKP/Maatwerk/LadeRegistratie/impl/CodeGenerator.cls.xml (.../CodeGenerator.cls.xml) (revision 58081) @@ -58,9 +58,7 @@ Set OrgaluxLadecode = ##class(DOM.VKP.Maatwerk.LadeRegistratie.impl.OrgaluxLadecode).%New() Set OrgaluxLadecode.Basisgetal = CodeNr Set OrgaluxLadecode.GegenereerdeCode = Prefix_..Calculator.Code - Set OrgaluxLadecode.Horolog = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog() Do ..OrgaluxLadecodeRepository.Bewaar(OrgaluxLadecode) - //Set AantalGegenereerdeCodes = $Increment(AantalGegenereerdeCodes) } } } Catch {