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
+
+
+
+
+
+