Index: zTryout/FM/probox/VolumeTest.cls.xml =================================================================== diff -u -r29059 -r37460 --- zTryout/FM/probox/VolumeTest.cls.xml (.../VolumeTest.cls.xml) (revision 29059) +++ zTryout/FM/probox/VolumeTest.cls.xml (.../VolumeTest.cls.xml) (revision 37460) @@ -12,16 +12,16 @@ //IsBinnenlade As %Boolean, LadeDiepte As %Integer, LadeHoogte As %String, LadeBreedte As %Float // // Hardcoded probox testbestelling (toelevering is al weg) - Set VolumeAandeel1=##class(APPS.PM.Maatwerk.Probox.Calculator).GeefVolumeAandeel( + Set VolumeAandeel1=##class(APPS.PM.Maatwerk.impl.Verpakking.Probox.Calculator).GeefVolumeAandeel( ##class(DOM.PM.enu.LadeVariant).TBXPlus(), 0,450,"K","K",763) - Set VolumeAandeel2=##class(APPS.PM.Maatwerk.Probox.Calculator).GeefVolumeAandeel( + Set VolumeAandeel2=##class(APPS.PM.Maatwerk.impl.Verpakking.Probox.Calculator).GeefVolumeAandeel( ##class(DOM.PM.enu.LadeVariant).TBXPlus(), 0,550,"M","M",563) - Set VolumeAandeel3=##class(APPS.PM.Maatwerk.Probox.Calculator).GeefVolumeAandeel( + Set VolumeAandeel3=##class(APPS.PM.Maatwerk.impl.Verpakking.Probox.Calculator).GeefVolumeAandeel( ##class(DOM.PM.enu.LadeVariant).TBXPlus(), 0,550,"D","M",763) - Set VolumeAandeel4=##class(APPS.PM.Maatwerk.Probox.Calculator).GeefVolumeAandeel( + Set VolumeAandeel4=##class(APPS.PM.Maatwerk.impl.Verpakking.Probox.Calculator).GeefVolumeAandeel( ##class(DOM.PM.enu.LadeVariant).TBXPlus(), 1,500,"B","M",763) Set Totaal = (VolumeAandeel1 *1) + (VolumeAandeel2 * 3) + (VolumeAandeel3 *4) + (VolumeAandeel4 * 2) @@ -79,9 +79,9 @@ . Set VPK=$LG(##class(Prod.Kenmerk.DataDefinitie).Get("TBX",PRNr,"VERPAK")) ; Verpakking . Quit:((VPK '= "X") && (VPK '= "Y")) . Set Lade = ##class(DOM.DomeinContext).Instance().GeefProductAPI().GeefProduct(PRNr) - . Set WikkelInfo = ##class(APPS.PM.Maatwerk.Probox.Calculator).GeefWikkelInfoViaLade(Lade) + . Set WikkelInfo = ##class(APPS.PM.Maatwerk.impl.Verpakking.Probox.Calculator).GeefWikkelInfoViaLade(Lade) . Set WikkelLengte = WikkelInfo.GeefWikkelLengte() - . Set WikkelDiepte = ##class(APPS.PM.Maatwerk.Probox.Calculator).GeefWikkelDiepte(Lade.GeefLadeDiepte()) + . Set WikkelDiepte = ##class(APPS.PM.Maatwerk.impl.Verpakking.Probox.Calculator).GeefWikkelDiepte(Lade.GeefLadeDiepte()) . Set WikkelAfmeting = WikkelLengte_"x"_WikkelDiepte . Set Wikkels(WikkelAfmeting) = $G(Wikkels(WikkelAfmeting)) + WikkelInfo.GeefAantal() . Write oQ.Sequence, ": ", oQ.Product.KortTekst, " Probox wikkel: ", WikkelAfmeting, " * ", WikkelInfo.GeefAantal(), !