Index: zTryout/WV/FPV1/DOM/impl/SlicedBodemBepaler.cls.xml =================================================================== diff -u -r29477 -r29817 --- zTryout/WV/FPV1/DOM/impl/SlicedBodemBepaler.cls.xml (.../SlicedBodemBepaler.cls.xml) (revision 29477) +++ zTryout/WV/FPV1/DOM/impl/SlicedBodemBepaler.cls.xml (.../impl/SlicedBodemBepaler.cls.xml) (revision 29817) @@ -1,6 +1,6 @@ - + TECH.RegisteredObject Index: vhUnitTest/zTryout/WV/FPV1/DOM/SlicedBodemBepaler/GeefSlicedBodemInfo/Test.cls.xml =================================================================== diff -u -r29098 -r29817 --- vhUnitTest/zTryout/WV/FPV1/DOM/SlicedBodemBepaler/GeefSlicedBodemInfo/Test.cls.xml (.../Test.cls.xml) (revision 29098) +++ vhUnitTest/zTryout/WV/FPV1/DOM/SlicedBodemBepaler/GeefSlicedBodemInfo/Test.cls.xml (.../Test.cls.xml) (revision 29817) @@ -4,7 +4,7 @@ vhUnitTest.TestCase -zTryout.WV.FPV1.DOM.SlicedBodemBepaler +zTryout.WV.FPV1.DOM.impl.SlicedBodemBepaler 1 @@ -13,7 +13,7 @@ #dim TotaleNettoBreedteSlices As %Numeric = 520 #dim MaxToegelatenBreedte As %Numeric = 190 - Set ..SlicedBodemBepaler = ##class(zTryout.WV.FPV1.DOM.SlicedBodemBepaler).%New() + Set ..SlicedBodemBepaler = ##class(zTryout.WV.FPV1.DOM.impl.SlicedBodemBepaler).%New() Do ..SlicedBodemBepaler.GeefSlicedBodemInfo(TotaleNettoBreedteSlices,MaxToegelatenBreedte) ; voorlopig nog geen resultaat teruggeven, de properties zijn momenteel nog Public :-P #dim MaxBreedteZichtkantSlice As %Numeric = ..SlicedBodemBepaler.MaxBreedteZichtkantSlice @@ -40,7 +40,7 @@ #dim TotaleNettoBreedteSlices As %Numeric = 520 #dim MaxToegelatenBreedte As %Numeric = 600 - Set ..SlicedBodemBepaler = ##class(zTryout.WV.FPV1.DOM.SlicedBodemBepaler).%New() + Set ..SlicedBodemBepaler = ##class(zTryout.WV.FPV1.DOM.impl.SlicedBodemBepaler).%New() Do ..SlicedBodemBepaler.GeefSlicedBodemInfo(TotaleNettoBreedteSlices,MaxToegelatenBreedte) ; voorlopig nog geen resultaat teruggeven, de properties zijn momenteel nog Public :-P #dim MaxBreedteZichtkantSlice As %Numeric = ..SlicedBodemBepaler.MaxBreedteZichtkantSlice @@ -71,7 +71,7 @@ #dim VerwachteExceptie = ##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException",OmschrijvingSubStrings) Do ..ZetVerwachteExceptie(VerwachteExceptie) - Set ..SlicedBodemBepaler = ##class(zTryout.WV.FPV1.DOM.SlicedBodemBepaler).%New() + Set ..SlicedBodemBepaler = ##class(zTryout.WV.FPV1.DOM.impl.SlicedBodemBepaler).%New() Do ..SlicedBodemBepaler.GeefSlicedBodemInfo(TotaleNettoBreedteSlices,MaxToegelatenBreedte) ]]> FishEye: Tag 29817 refers to a dead (removed) revision in file `zTryout/WV/FPV1/DOM/SlicedBodemBepaler.cls.xml'. FishEye: No comparison available. Pass `N' to diff? Index: zTryout/WV/FPV1/DOM/impl/FlatpackV1Service.cls.xml =================================================================== diff -u -r29591 -r29817 --- zTryout/WV/FPV1/DOM/impl/FlatpackV1Service.cls.xml (.../FlatpackV1Service.cls.xml) (revision 29591) +++ zTryout/WV/FPV1/DOM/impl/FlatpackV1Service.cls.xml (.../FlatpackV1Service.cls.xml) (revision 29817) @@ -53,7 +53,7 @@ #dim DraagPlaat As zTryout.WV.FPV1.DOM.dto.DraagPlaat = StapelbareBreedteBepaler.GeefDraagPlaat(OnderdelenAfmetingenBepaler.GeefAfmetingLangsteOnderdeel(),OnderdelenAfmetingenBepaler.GeefAfmetingBreedsteOnderdeel()) #dim StapelbareBreedte As %Numeric = StapelbareBreedteBepaler.GeefStapelbareBreedteVoorDraagPlaat(DraagPlaat) - Set SlicedBodemBepaler = ##class(zTryout.WV.FPV1.DOM.SlicedBodemBepaler).%New() + Set SlicedBodemBepaler = ##class(zTryout.WV.FPV1.DOM.impl.SlicedBodemBepaler).%New() Quit SlicedBodemBepaler.GeefSlicedBodemInfo(NettoAfgewerkteBodemBreedte,StapelbareBreedte, DraagPlaat) ]]> @@ -86,9 +86,9 @@ Set StapelbareBreedteBepaler = ##class(zTryout.WV.FPV1.DOM.impl.StapelbareBreedteBepaler).%New() #dim StapelbareBreedte As %Numeric = StapelbareBreedteBepaler.GeefStapelbareBreedte(AfmetingLangsteOnderdeel,AfmetingBreedsteOnderdeel) - #dim NettoAfgewerkteBodemBreedte As %Numeric = "..." ; Lade.GeefDiepteInMM() - AftrekBodem ; dit moet je uit de lade-info halen, of rechtstreeks uit de bodem-builder + #dim NettoAfgewerkteBodemBreedte As %Numeric = "..." ; Lade.GeefDiepteInMM() - AftrekBodem ; dit moet je uit de lade-info halen, of rechtstreeks uit de bodem-builder - Set SlicedBodemBepaler = ##class(zTryout.WV.FPV1.DOM.SlicedBodemBepaler).%New() + Set SlicedBodemBepaler = ##class(zTryout.WV.FPV1.DOM.impl.SlicedBodemBepaler).%New() Do SlicedBodemBepaler.GeefSlicedBodemInfo(NettoAfgewerkteBodemBreedte,StapelbareBreedte) #dim MaxBreedteZichtkantSlice As %Numeric = SlicedBodemBepaler.MaxBreedteZichtkantSlice #dim AantalSlices As %Numeric = SlicedBodemBepaler.AantalSlices