function get short address

function get short address

เช่น ship to , sold to ในหน้า va02, va03

FORM build_address_short_form
USING if_adrnr LIKE vbpa-adrnr
CHANGING address.

DATA: ls_kupav LIKE kupav,
lf_txtpa TYPE ad_line_s.

DATA : ct_xvbadr TYPE TABLE OF sadrvb.

ls_kupav-adrnr = if_adrnr.
ls_kupav-address_type = ‘1’.

CALL FUNCTION ‘SD_ADDRESS_BUILD’
EXPORTING
i_kupav = ls_kupav
IMPORTING
e_txtpa = lf_txtpa
TABLES
xvbadr = ct_xvbadr.

address = lf_txtpa.

ENDFORM. “build_address_short_form

Add a Comment

Your email address will not be published. Required fields are marked *