Application Development and Automation 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: 
Read only

email address

Former Member
0 Likes
1,662

Hi,

I need to select the email address of the person present in contact address tab in VD03 transaction who is having deparment number '0011'.I found that the department number is present in knvk table.So I have used the below query in my program.

SELECT SINGLE kunnr

INTO lv_kunnr

FROM vbpa

WHERE vbeln = lv_vbeln

AND parvw EQ 'AG'.

IF sy-subrc = 0.

SELECT SINGLE prsnr

INTO lv_prsnr

FROM knvk

WHERE kunnr = lv_kunnr

AND abtnr = c_0011.

IF sy-subrc = 0.

CLEAR lv_addr.

SELECT SINGLE smtp_addr

INTO lv_addr

FROM adr6

WHERE persnumber = lv_prsnr.

I have selected kunnr from vbpa table based on vbeln and parvw fields.

I have selected person number( prsnr ) based on customer number( kunnr) and department number( abtnr) fields.

When I checked in debugging mode,lv_kunnr value is empty and that select statement is failing.So,it is not retrieving any email address.

Can anyone tell me from which table should i select kunnr value to get the email address?

Hi,

I need to select the email address of the person present in contact address tab in VD03 transaction who is having deparment number '0011'.I found that the department number is present in knvk table.So I have used the below query in my program.

SELECT SINGLE kunnr

INTO lv_kunnr

FROM vbpa

WHERE vbeln = lv_vbeln

AND parvw EQ 'AG'.

IF sy-subrc = 0.

SELECT SINGLE prsnr

INTO lv_prsnr

FROM knvk

WHERE kunnr = lv_kunnr

AND abtnr = c_0011.

IF sy-subrc = 0.

CLEAR lv_addr.

SELECT SINGLE smtp_addr

INTO lv_addr

FROM adr6

WHERE persnumber = lv_prsnr.

I have selected kunnr from vbpa table based on vbeln and parvw fields.

I have selected person number( prsnr ) based on customer number( kunnr) and department number( abtnr) fields.

When I checked in debugging mode,lv_kunnr value is empty and that select statement is failing.So,it is not retrieving any email address.

Can anyone tell me from which table should i select kunnr value to get the email address?

6 REPLIES 6
Read only

Former Member
0 Likes
1,315

Send me ur code ......for my id look into my business card.

Thanks

Read only

Former Member
0 Likes
1,315

Hi,

Use VBRK table for kunnar get field KUNAG its same as kunnr.

the goto KNA1 pass this vbrk-kunag to kna1-kunnr and get adrnr

Use ADR6 Table or ADRC table for E-mail Address

passing address number (kna1-adrnr)

Thanks

Murugan.B

Read only

ritesh_dugad2
Active Participant
0 Likes
1,315

You can use Function Module ADDR_GET_COMPLETE. Just pass the address number to it. It wil give you all the details.

Read only

Former Member
0 Likes
1,315

Hi,

use the below code to get email address.

**Fetch the partner where partner function is 'SP'.

**internally 'SP' will be stored as 'AG'

CALL FUNCTION 'PM_PARTNER_GET_XIHPA'

TABLES

h_xihpa = ihpa.

READ TABLE ihpa WITH KEY parvw = 'AG'.

if sy-subrc eq 0.

SELECT SINGLE adrnr INTO l_adrnr

FROM kna1

WHERE kunnr = ihpa-parnr.

if sy-subrc eq 0.

SELECT SINGLE smtp_addr

INTO l_emailadr

FROM adr6

WHERE addrnumber = l_adrnr.

endif.

endif.

Read only

0 Likes
1,315

Hi,

I have used this code in the program.It is giving error CALL_FUNCTION_CONFLICT_LENG.

Read only

0 Likes
1,315

Hi,

Could you please tell me how to declare ihpa?