Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

Urgently regarding company address

Former Member
0 Kudos

May i knw how can we retrieve the company address based on the company code.Need relation between the company code and company address.

1 ACCEPTED SOLUTION

Former Member
0 Kudos

hi aditiya

do like this.

*SELECTING ADDRESS NUMBER FOR PARTICULAR COMPANY CODE

SELECT SINGLE ADRNR

FROM T001

INTO V_ADRNR

WHERE BUKRS = companycode.

*SELECTING ADDRESS FOR THAT ADRNR

IF SY-SUBRC EQ 0.

SELECT SINGLE *

FROM ADRC

INTO IT_ADDRESS

WHERE ADDRNUMBER = V_ADRNR.

ENDIF.

reward if helpfull.

5 REPLIES 5

RichHeilman
Developer Advocate
Developer Advocate
0 Kudos

Get the address number from field ADRNR in table T001, then use this and go to the ADRC tables to get the address .

Regards,

Rich Heilman

Former Member
0 Kudos

get ADRNR from T001, then goto ADRC.

Regards

Peram

Former Member
0 Kudos

hi aditiya

do like this.

*SELECTING ADDRESS NUMBER FOR PARTICULAR COMPANY CODE

SELECT SINGLE ADRNR

FROM T001

INTO V_ADRNR

WHERE BUKRS = companycode.

*SELECTING ADDRESS FOR THAT ADRNR

IF SY-SUBRC EQ 0.

SELECT SINGLE *

FROM ADRC

INTO IT_ADDRESS

WHERE ADDRNUMBER = V_ADRNR.

ENDIF.

reward if helpfull.

0 Kudos

thank , it was very useful

Pawan_Kesari
Active Contributor
0 Kudos

try this code


REPORT zpwtest.

TYPE-POOLS szadr .

DATA : v_adrnr TYPE t001-adrnr ,
       address TYPE szadr_printform_table ,
       w_ad    TYPE szadr_printform_table_line .

PARAMETERS : p_bukrs TYPE t001-bukrs OBLIGATORY .

SELECT SINGLE adrnr
INTO v_adrnr
FROM t001
WHERE bukrs = p_bukrs .


CALL FUNCTION 'ADDRESS_INTO_PRINTFORM'
     EXPORTING
          address_type            = '1'
          address_number          = v_adrnr
     IMPORTING
          address_printform_table = address.

LOOP AT address INTO w_ad.
  WRITE / w_ad-address_line .
ENDLOOP.