Index: APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml =================================================================== diff -u -r71270 -r71494 --- APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml (.../RequestDataBouwer.cls.xml) (revision 71270) +++ APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml (.../RequestDataBouwer.cls.xml) (revision 71494) @@ -163,9 +163,6 @@ if (Rit.GeefTransporteur() = Transporteur.VRD) { Set ShipmentInfo.requestedDeliveryDate = ##class(TECH.Format.impl.FormatAPI).%New().FormatHorolog(LeveringInfo.AfleverDatum,"JJJJ-MM-DD") } - if ((Rit.GeefTransporteur() = Transporteur.Dachser) & (LeveringInfo.LeverAdres.LandCode = "IT")) { - Set ShipmentInfo.description = "FURNITURE WOODEN DRAWERS" - } try { #dim GewichtPerEenheid as %Numeric = ##class(TECH.Math).Round(LeveringInfo.Gewicht / LeveringInfo.AantalVerpakkingEenhedenTotaal,2) @@ -191,8 +188,10 @@ Do ShipmentInfo.additionalReferences.Insert(..GeefVrachtwagenAdditionalReference(Rit)) Do ShipmentInfo.additionalReferences.Insert(..GeefKlantAdditionalReference(LeveringInfo)) Do ShipmentInfo.additionalReferences.Insert(..GeefZendingAdditionalReference(LeveringInfo)) + if ((Rit.GeefTransporteur() = Transporteur.Dachser) & (LeveringInfo.LeverAdres.LandCode = "IT")) { + Do ShipmentInfo.additionalReferences.Insert(..GeefProjectAdditionalReference(LeveringInfo)) + } - Quit ShipmentInfo ]]> @@ -212,6 +211,10 @@ Set ServiceLevelOther = "PREADVICE" } + if ((Rit.GeefTransporteur() = Transporteur.Dachser) & (LeveringInfo.LeverAdres.LandCode = "IT")){ + Set ServiceLevelOther = "IMO" + } + Quit ServiceLevelOther ]]> @@ -318,6 +321,18 @@ ]]> + +LeveringInfo:APPS.TRANSP.dto.LeveringInfo +1 +WS.Transsmart.tns.additionalReference + + + LeveringInfo:APPS.TRANSP.dto.LeveringInfo,Rit:DOM.TRANSP.Rit 1 Index: vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingDachserItalie/doBookingRequestDachser.xml =================================================================== diff -u -r71270 -r71494 --- vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingDachserItalie/doBookingRequestDachser.xml (.../doBookingRequestDachser.xml) (revision 71270) +++ vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingDachserItalie/doBookingRequestDachser.xml (.../doBookingRequestDachser.xml) (revision 71494) @@ -23,10 +23,14 @@ OTHER referentie + + PROJECT + FURNITURE WOODEN DRAWERS + - FURNITURE WOODEN DRAWERS 2011-06-30 TARGOFLEX + IMO CPT 0 0