Index: vhUnitTest/APPS/TRANSP/Transsmart/impl/RequestDataBouwer/Test.cls.xml =================================================================== diff -u -r73780 -r74232 --- vhUnitTest/APPS/TRANSP/Transsmart/impl/RequestDataBouwer/Test.cls.xml (.../Test.cls.xml) (revision 73780) +++ vhUnitTest/APPS/TRANSP/Transsmart/impl/RequestDataBouwer/Test.cls.xml (.../Test.cls.xml) (revision 74232) @@ -69,9 +69,69 @@ ]]> + + + + + + + + + + + + Index: DOM/common/ProjectSettingsAPI.cls.xml =================================================================== diff -u -r73205 -r74232 --- DOM/common/ProjectSettingsAPI.cls.xml (.../ProjectSettingsAPI.cls.xml) (revision 73205) +++ DOM/common/ProjectSettingsAPI.cls.xml (.../ProjectSettingsAPI.cls.xml) (revision 74232) @@ -320,6 +320,11 @@ 1 %Boolean + + +1 +%Boolean + Index: DOM/common/impl/ProjectSettingsAPI.cls.xml =================================================================== diff -u -r73205 -r74232 --- DOM/common/impl/ProjectSettingsAPI.cls.xml (.../ProjectSettingsAPI.cls.xml) (revision 73205) +++ DOM/common/impl/ProjectSettingsAPI.cls.xml (.../ProjectSettingsAPI.cls.xml) (revision 74232) @@ -382,6 +382,12 @@ + + +%Boolean + + Index: vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenkerPREMIUMESchenkerenabled/doBookingRequestSchenker.xml =================================================================== diff -u --- vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenkerPREMIUMESchenkerenabled/doBookingRequestSchenker.xml (revision 0) +++ vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenkerPREMIUMESchenkerenabled/doBookingRequestSchenker.xml (revision 74232) @@ -0,0 +1,86 @@ + + + + 37598 + ESC + WEB + 0 + NL + doBooking + 2.0 + + + referentie + + + DELIVERYID + 12345 + + + CUSTOMER + 37598 + + + OTHER + referentie + + + Dostawa autem z winda + 2011-07-01 + PREMIUM + EXW + 0 + 0 + 2 + + + 1 + Pallet80x60 + 1 + + 0 + 0 + 0 + .25 + CM + KG + + + + 2 + Wwpallet + 1 + + 0 + 0 + 0 + .25 + CM + KG + + + + +
+ SEND + Van Hoecke + Europark Noord + Sint Niklaas + 9 + 9100 + BE +
+
+ RECV + Een Belg + Ankerstraat 91 + Sint-Niklaas + 9100 + BE + Een Belg + Telefoon + test@test.com +
+
+
+
\ No newline at end of file Index: APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml =================================================================== diff -u -r73780 -r74232 --- APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml (.../RequestDataBouwer.cls.xml) (revision 73780) +++ APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml (.../RequestDataBouwer.cls.xml) (revision 74232) @@ -568,7 +568,8 @@ Quit:(Rit.GeefTransporteur() = Transporteur.HamannHDE) "ERB" Quit:(Rit.GeefTransporteur() = Transporteur.Dachser) "DAC" Quit:(Rit.GeefTransporteur() = Transporteur.Weiss) "GWE" - Quit:(Rit.GeefTransporteur() = Transporteur.Schenker) "SNB" + Quit:((Rit.GeefTransporteur() = Transporteur.Schenker) & $$$Not(..ProjectSettingsAPI.IsTranssmartESchenkerConnectieActief())) "SNB" + Quit:((Rit.GeefTransporteur() = Transporteur.Schenker) & ..ProjectSettingsAPI.IsTranssmartESchenkerConnectieActief()) "ESC" Quit "" ]]> @@ -603,12 +604,20 @@ #dim VEenheid as APPS.TRANSP.dto.VerpakkingEenheid = it.Next() Set TotaalPalletPlaatsen = TotaalPalletPlaatsen + ( $Select((VEenheid.Type = PalletType.HalveEuroPallet):0.5,$$$True:1) * VEenheid.Aantal) } - If ( ( TotaalPalletPlaatsen >= 27 ) || ( LeveringInfo.Gewicht >= 19400 ) ) { - Set ServiceLevelTime ="FTL" - } elseif ( (TotaalPalletPlaatsen >= 9) || (LeveringInfo.Gewicht >= 2500) ) { - Set ServiceLevelTime ="LTL" - } else { - Set ServiceLevelTime ="PREMIUM" + if ..ProjectSettingsAPI.IsTranssmartESchenkerConnectieActief(){ + if ( (TotaalPalletPlaatsen >= 9) || (LeveringInfo.Gewicht >= 2500) ) { + Set ServiceLevelTime = "PARTLOAD" + } else { + Set ServiceLevelTime ="PREMIUM" + } + } else { + If ( ( TotaalPalletPlaatsen >= 27 ) || ( LeveringInfo.Gewicht >= 19400 ) ) { + Set ServiceLevelTime ="FTL" + } elseif ( (TotaalPalletPlaatsen >= 9) || (LeveringInfo.Gewicht >= 2500) ) { + Set ServiceLevelTime ="LTL" + } else { + Set ServiceLevelTime ="PREMIUM" + } } } else { Set ServiceLevelTime = "" Index: vhTest/Mock/DOM/common/ProjectSettingsAPI.cls.xml =================================================================== diff -u -r73205 -r74232 --- vhTest/Mock/DOM/common/ProjectSettingsAPI.cls.xml (.../ProjectSettingsAPI.cls.xml) (revision 73205) +++ vhTest/Mock/DOM/common/ProjectSettingsAPI.cls.xml (.../ProjectSettingsAPI.cls.xml) (revision 74232) @@ -372,6 +372,12 @@ ]]> + +%Boolean + + + %Boolean + + + 37598 + ESC + WEB + 0 + NL + doBooking + 2.0 + + + referentie + + + DELIVERYID + 12345 + + + CUSTOMER + 37598 + + + OTHER + referentie + + + Dostawa autem z winda + 2011-07-01 + PARTLOAD + EXW + 0 + 0 + 2 + + + 1 + Pallet80x60 + 1 + + 0 + 0 + 0 + 1250 + CM + KG + + + + 2 + Wwpallet + 1 + + 0 + 0 + 0 + 1250 + CM + KG + + + + +
+ SEND + Van Hoecke + Europark Noord + Sint Niklaas + 9 + 9100 + BE +
+
+ RECV + Een Belg + Ankerstraat 91 + Sint-Niklaas + 9100 + BE + Een Belg + Telefoon + test@test.com +
+
+
+
\ No newline at end of file Index: vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenkerPARTLOADviapalettenESchenkerenabled/doBookingRequestSchenker.xml =================================================================== diff -u --- vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenkerPARTLOADviapalettenESchenkerenabled/doBookingRequestSchenker.xml (revision 0) +++ vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenkerPARTLOADviapalettenESchenkerenabled/doBookingRequestSchenker.xml (revision 74232) @@ -0,0 +1,86 @@ + + + + 37598 + ESC + WEB + 0 + NL + doBooking + 2.0 + + + referentie + + + DELIVERYID + 12345 + + + CUSTOMER + 37598 + + + OTHER + referentie + + + Dostawa autem z winda + 2011-07-01 + PARTLOAD + EXW + 0 + 0 + 2 + + + 1 + Pallet80x60 + 2 + + 0 + 0 + 0 + 1000 + CM + KG + + + + 2 + Wwpallet + 8 + + 0 + 0 + 0 + 1000 + CM + KG + + + + +
+ SEND + Van Hoecke + Europark Noord + Sint Niklaas + 9 + 9100 + BE +
+
+ RECV + Een Belg + Ankerstraat 91 + Sint-Niklaas + 9100 + BE + Een Belg + Telefoon + test@test.com +
+
+
+
\ No newline at end of file Index: vhDeploy/Deploy20241213xIsActiefTranssmartESchenker.cls.xml =================================================================== diff -u --- vhDeploy/Deploy20241213xIsActiefTranssmartESchenker.cls.xml (revision 0) +++ vhDeploy/Deploy20241213xIsActiefTranssmartESchenker.cls.xml (revision 74232) @@ -0,0 +1,19 @@ + + + +vhDeploy.Deploy + + +%String +Deployen van project setting Overschakelen naar ESchenker carrier connectie Transsmart + + + +1 + + + + + +