Index: APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml =================================================================== diff -u -r59812 -r59852 --- APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml (.../RequestDataBouwer.cls.xml) (revision 59812) +++ APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml (.../RequestDataBouwer.cls.xml) (revision 59852) @@ -210,6 +210,7 @@ Set Bestemmeling.name = ..BeperkLengteTot(LeveringInfo.LeverAdres.Naam,64) Set Bestemmeling.street1 = ..BeperkLengteTot(LeveringInfo.LeverAdres.Straat, 64) + Set Bestemmeling.street2 = ..BeperkLengteTot(..GeefOpmerking1en2(LeveringInfo),64) Set Bestemmeling.city = ..BeperkLengteTot(LeveringInfo.LeverAdres.Woonplaats,64) ; Set Bestemmeling.houseNo = LeveringInfo.LeverAdres. ??? Set Bestemmeling.zipCode = ..BeperkLengteTot(LeveringInfo.LeverAdres.Postcode,16) @@ -218,6 +219,22 @@ ]]> + +LeveringInfo:APPS.TRANSP.dto.LeveringInfo +1 +%String + 0) { + set Opmerking = LeveringInfo.LeveringAdres.Opmerkingen.GetAt(1) + } + If (LeveringInfo.LeveringAdres.Opmerkingen.Count() > 1) { + set Opmerking = $Select($Length(Opmerking):" ",1:"")_ LeveringInfo.LeveringAdres.Opmerkingen.GetAt(2) + } + Quit Opmerking +]]> + + Lijnnummmer:%Integer,VerpakkingEenheid:APPS.TRANSP.dto.VerpakkingEenheid,Gewicht:%Numeric 1