Index: APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml
===================================================================
diff -u -r59989 -r59996
--- APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml (.../RequestDataBouwer.cls.xml) (revision 59989)
+++ APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml (.../RequestDataBouwer.cls.xml) (revision 59996)
@@ -115,7 +115,6 @@
Set ShipmentInfo.loadmeter = 0
Set ShipmentInfo.noOfPackages = LeveringInfo.AantalVerpakkingEenhedenTotaal
Set ShipmentInfo.instruction = ..GeefInstruction(LeveringInfo)
- Set ShipmentInfo.description = ..BeperkLengteTot(..GeefOpmerking1en2(LeveringInfo),48) ; op etiket voor VRD
#dim GewichtPerEenheid as %Numeric = ##class(TECH.Math).Round(LeveringInfo.Gewicht / LeveringInfo.AantalVerpakkingEenhedenTotaal,2)
set it = ##class(TECH.ListIterator).%New(LeveringInfo.VerpakkingEenheden)
#dim Linecounter as %Integer = 0
@@ -209,7 +208,6 @@
Set Bestemmeling.name = ..BeperkLengteTot(LeveringInfo.LeverAdres.Naam,64)
Set Bestemmeling.street1 = ..BeperkLengteTot(..FormatteerStraat(LeveringInfo.LeverAdres.Straat), 64)
- Set Bestemmeling.street2 = ..BeperkLengteTot(..GeefOpmerking1en2(LeveringInfo),64)
Set Bestemmeling.city = ..BeperkLengteTot(LeveringInfo.LeverAdres.Woonplaats,64)
Set Bestemmeling.zipCode = ..BeperkLengteTot(..FormatteerPostcode(LeveringInfo.LeverAdres.LandCode , LeveringInfo.LeverAdres.Postcode),16)
Set Bestemmeling.countryCode = ..BeperkLengteTot(LeveringInfo.LeverAdres.LandCode,3)
@@ -238,22 +236,6 @@
]]>
-
-LeveringInfo:APPS.TRANSP.dto.LeveringInfo
-1
-%String
- 0) {
- set Opmerking = LeveringInfo.LeverAdres.Opmerkingen.GetAt(1)
- }
- If (LeveringInfo.LeverAdres.Opmerkingen.Count() > 1) {
- set Opmerking = Opmerking _ $Select($Length(Opmerking):" ",1:"")_ LeveringInfo.LeverAdres.Opmerkingen.GetAt(2)
- }
- Quit Opmerking
-]]>
-
-
Lijnnummmer:%Integer,VerpakkingEenheid:APPS.TRANSP.dto.VerpakkingEenheid,Gewicht:%Numeric
1