Index: APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml =================================================================== diff -u -r59856 -r59860 --- APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml (.../RequestDataBouwer.cls.xml) (revision 59856) +++ APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml (.../RequestDataBouwer.cls.xml) (revision 59860) @@ -212,13 +212,25 @@ 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) + Set Bestemmeling.zipCode = ..BeperkLengteTot(..FormatteerPostcode(LeveringInfo.LeverAdres.Postcode),16) Set Bestemmeling.countryCode = ..BeperkLengteTot(LeveringInfo.LeverAdres.LandCode,3) Quit Bestemmeling ]]> + +LandCode:%String,Postcode:%String +1 +%String + + + LeveringInfo:APPS.TRANSP.dto.LeveringInfo 1