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

Часовой пояс: 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 часа


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

Сейчас этот форум просматривают: нет зарегистрированных пользователей


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

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