Текущее время: Пн, авг 04 2025, 13:43

Часовой пояс: UTC + 3 часа


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


ВНИМАНИЕ!

Вопросы по SAP Query и Quick View - сюда



Начать новую тему Ответить на тему  [ Сообщений: 8 ] 
Автор Сообщение
 Заголовок сообщения: Проблема с DYNP_UPDATE_FIELDS
СообщениеДобавлено: Вс, май 04 2008, 11:37 
Начинающий
Начинающий

Зарегистрирован:
Чт, апр 24 2008, 08:37
Сообщения: 13
Подскажите, пожалуйста!
вызываю СП, получаю из него несколько значений, пытаюсь вывести в поля экрана при помощи ФМ DYNP_UPDATE_FIELDS, но ничего не выводится, поля остаются пустыми. В чем может быть дело?
Вот часть кода:

call function 'F4IF_FIELD_VALUE_REQUEST'
exporting
tabname = 'ZMM_250_NDOCUM_MSEG'
fieldname = 'MBLNR'
searchhelp = 'ZMM_250_NDOCUM_MSEG'
callback_program = sy-cprog
callback_form = 'CB_F4_VALUE_REQUEST'
tables
return_tab = return_tab
exceptions
field_not_found = 1
no_help_for_field = 2
inconsistent_help = 3
no_values_found = 4
others = 5.

clear dyn_tbl.
if not return_tab[] is initial.
read table return_tab with key shlpname = 'ZMM_250_NDOCUM_MSEG'
fieldname = 'MBLNR'.
dyn_tbl-fieldname = 'f_mblnr'.
dyn_tbl-fieldvalue = return_tab-fieldval.
append dyn_tbl.

read table return_tab with key shlpname = 'ZMM_250_NDOCUM_MSEG'
fieldname = 'MJAHR'.
dyn_tbl-fieldname = 'f_mjahr'.
dyn_tbl-fieldvalue = return_tab-fieldval.
append dyn_tbl.
endif.

call FUNCTION 'DYNP_UPDATE_FIELDS'
EXPORTING
dyname = sy-cprog
dynumb = sy-dynnr
TABLES
dynpfields = dyn_tbl
EXCEPTIONS
invalid_abapworkarea = 1
invalid_dynprofield = 2
invalid_dynproname = 3
invalid_dynpronummer = 4
invalid_request = 5
no_fielddescription = 6
undefind_error = 7
OTHERS = 8.


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Вс, май 04 2008, 11:52 
Гуру-эксперт
Гуру-эксперт
Аватара пользователя

Зарегистрирован:
Ср, ноя 03 2004, 14:51
Сообщения: 1912
Откуда: КраснАдар
Пол: Мужской
А почему ФМ DYNP_VALUES_UPDATE не используете? Вроде бы он значения апдейтит.

Добавил: может еще с параметром REQUEST в интерфейсе ФМ поиграться (значения A & B попробовать)?


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Вс, май 04 2008, 12:01 
Начинающий
Начинающий

Зарегистрирован:
Чт, апр 24 2008, 08:37
Сообщения: 13
его тоже пробовала, но все равно не получается.


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Вс, май 04 2008, 12:02 
Гуру-эксперт
Гуру-эксперт
Аватара пользователя

Зарегистрирован:
Ср, ноя 03 2004, 14:51
Сообщения: 1912
Откуда: КраснАдар
Пол: Мужской
+ значение полей в апперкейс перевести бы...


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Вс, май 04 2008, 12:05 
Начинающий
Начинающий

Зарегистрирован:
Чт, апр 24 2008, 08:37
Сообщения: 13
на REQUEST тоже не реагирует


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Вс, май 04 2008, 12:18 
Начинающий
Начинающий

Зарегистрирован:
Чт, апр 24 2008, 08:37
Сообщения: 13
в апперкейс перевела, результат тот же :(


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Вс, май 04 2008, 12:47 
Модератор
Модератор
Аватара пользователя

Зарегистрирован:
Пт, июн 16 2006, 00:43
Сообщения: 1686
Откуда: Москва <-> Красноярск
Пол: Мужской
Вот кусочек моего кода, который работает корректно:

Code:
  CLEAR: gs_sh_vals, gs_dyn_vals.

  REFRESH: gt_sh_vals, gt_dyn_vals.

  CALL FUNCTION 'F4IF_FIELD_VALUE_REQUEST'
    EXPORTING
      tabname    = 'LFA1'
      fieldname  = 'LIFNR'
      searchhelp = 'KRED'
    TABLES
      return_tab = gt_sh_vals
    EXCEPTIONS
      OTHERS     = 0.

  READ TABLE gt_sh_vals INTO gs_sh_vals INDEX 1.

  IF sy-subrc NE 0. RETURN. ENDIF.

  g_lifnr = gs_sh_vals-fieldval.

  gs_dyn_vals-fieldname  = 'ZNN_MIGO_HEADER_A01R10-CONSIGNOR_NUM'.
  gs_dyn_vals-fieldvalue = gs_sh_vals-fieldval.

  APPEND gs_dyn_vals TO gt_dyn_vals.

  CALL FUNCTION 'DYNP_VALUES_UPDATE'
    EXPORTING
      dyname     = 'ZNN_MM_MIGO_HEADER_ADD_TABS'
      dynumb     = '0100'
    TABLES
      dynpfields = gt_dyn_vals
    EXCEPTIONS
      OTHERS     = 0.


Вызывается в PROCESS ON VALUE-REQUEST.


Принять этот ответ
Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения:
СообщениеДобавлено: Вс, май 04 2008, 12:57 
Гуру-эксперт
Гуру-эксперт
Аватара пользователя

Зарегистрирован:
Ср, ноя 03 2004, 14:51
Сообщения: 1912
Откуда: КраснАдар
Пол: Мужской
Если обработка находиться в POV подэкрана, то попробуйте вместо sy-dynnr указать номер основного экрана жестко.


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Пн, май 05 2008, 08:59 
Менеджер
Менеджер
Аватара пользователя

Зарегистрирован:
Чт, мар 09 2006, 10:12
Сообщения: 565
Откуда: Волгодонск
Пол: Мужской
попробуйте в место:
EXPORTING
dyname = sy-cprog
dynumb = sy-dynnr

явно указать имя программы и номер экрана.


Принять этот ответ
Вернуться к началу
 Профиль  
 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 8 ] 

Часовой пояс: UTC + 3 часа


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

Сейчас этот форум просматривают: Yandex [Bot]


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
cron
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Русская поддержка phpBB