Помогите пожалуйста с кодом

Olga_83

Code:

FUNCTION Z_DR_READ_PARTNER_ADR.
*"  IMPORTING
.....
*"  CHANGING
......
*"     REFERENCE(P_VBADR) LIKE  SADRVB STRUCTURE  SADRVB
*"     REFERENCE(P_SMTP_ADDR) LIKE  ADR6-SMTP_ADDR OPTIONAL
.....

data: t_adr6   like adr6   occurs 0 with header line.

loop at t_adr6.
    move t_adr6-smtp_addr to p_smtp_addr.
    exit.
  endloop.

Здесь делаю точку прерывания : p_smtp_addr = 'user@firma.com'
Дальше

Code:

read table ct_vbadr into p_vbadr
                      with key adrnr = p_vbpa-adrnr.

И здесь p_smtp_addr почему-то обнуляеться

Подскажите пожалуйста в чём может быть проблема...

sibrin

Из того, что приведено ясно, что всё запущено, но чтобы сказать что-то конкретное, нужно видеть весь код или, если он очень громоздкий, хотя бы некоторую его часть, которая охватывает все необходимые переменные.

Но лучше попробуйте сами в отладчике повнимательнее по шагам посмотреть, где и что у Вас присваивается и пропадает.

Из того, что написано можно предположить, что P_VBADR SADRVB и P_SMTP_ADDR в вызывающей программе ссылаются на одну и ту же область памяти, чего на практике можно добиться, например, балуясь с указателями.

Olga_83

Спасибо за поддержку!

Разобралась!

CALL FUNCTION 'Z_DR_READ_PARTNER_ADR'
EXPORTING
......
CHANGING
....
P_VBADR = Z_VBADR
P_SMTP_ADDR = Z_VBADR-SMTP_ADDR.

Правила форума

Помогите пожалуйста с кодом

Кто сейчас на конференции