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: 

Saving e-mail address - Urgent :(

Former Member
0 Kudos

Hi gurus,

See this scenario:

I created a sales order in VA01, then I needed to update the address from the ship-to-party by using the Tab- Partners-select ship-toparty line and click on the button to show the pop-up that allow me to change this information.

I have a Zprogram that is simulating a sales order creation, I have the same functionality that we have in VA01 to change the partner dependent address by using Function Module 'SD_PARTNER_ADDRESS_DIALOG'. ---> This function allows me to show the same pop-up we have in VA01.

I am able to change everything by using this function module and another one: SD_PARTNER_ADDRESSES_TO_DB. But I am not able to save the e-mail address... I know that this works in a different way and we need to update table ADR6.. But when I enter in debugging mode in this function SD_PARTNER_ADDRESSES_TO_DB (in VA01) I can see that in ADDR_SINGLE_SAVE ---> if i search for table adr6 i can see that this table is filled with the e-mail address... but in my case i am not able to get this..

Do you have any idea of this?

Please help,

Best regards

2 REPLIES 2

Former Member
0 Kudos

Hi!

It seems for me, email is not part of this function module, you mentioned.

Have you tried this one: SD_PARTNER_BAPI_ADDRESS_CREATE ?

Regards

Tamá

0 Kudos

Is not working this function... or i am not able to put it working..

I don't get the e-mail saved...see my example bellow.

Please how can i save e-mail partner address to a sales order?

Thanks

PT_VBPA2KOM-VBELN = '5020001620'.

PT_VBPA2KOM-POSNR = '0000'.

PT_VBPA2KOM-BPARVW_OLD = 'WE'.

PT_VBPA2KOM-BPARNR_OLD = '0004001294'.

PT_VBPA2KOM-BPARVW = 'WE'.

PT_VBPA2KOM-BPARNR = '0004001294'.

PT_VBPA2KOM-ADRNR = '9000004476'.

PT_VBPA2KOM-ADDR_LINK = '9000004476'.

PT_VBPA2KOM-ADDRESS_ORIGIN = 'E'.

APPEND PT_VBPA2KOM.

PT_PARTNERADDRESS-ADDR_NO = '9000004476'.

PT_PARTNERADDRESS-NAME = 'MESTERGRUPPEN AS - testname'.

PT_PARTNERADDRESS-STREET = 'street test test'.

PT_PARTNERADDRESS-E_MAIL = 'teste@teste.com'.

APPEND PT_PARTNERADDRESS.

CALL FUNCTION 'SD_PARTNER_BAPI_ADDRESS_CREATE'

EXPORTING

FIF_ADDRESS_CHECK = 'X'

TABLES

FRT_VBPA2KOM = PT_VBPA2KOM

FRT_TYPE_1_ADDRESSES = PT_PARTNERADDRESS

FET_VBADR = LT_VBADR

EXCEPTIONS

BROKEN_ADRNR_LINK = 1

NO_HANDLE_AVAILABLE = 2

ADDRESS_INSERT_ERROR = 3

OTHERS = 4.

COMMIT WORK AND WAIT.

Message was edited by:

yukimai Maio