Sapforum.Biz

Инструменты => ABAP - Инструментальные средства => SE37 - Построитель функций => Тема розпочата: Uukrul від Лютий 03, 2010, 03:21:56 ПП

Назва: MIGO_DIALOG - Просмотр документа материала
Відправлено: Uukrul від Лютий 03, 2010, 03:21:56 ПП
MIGO_DIALOG - Просмотр документа материала. Ниже вроде как простенький пример вызова данного ФМ

REPORT ytst_test_migo_disp.

TABLES: mkpf, mseg.

PARAMETERS: p_mblnr LIKE mkpf-mblnr DEFAULT '4910000000',
           p_mjahr LIKE mkpf-mjahr DEFAULT '2010',
           p_zeile LIKE mseg-zeile DEFAULT '0001'.

CALL FUNCTION 'MIGO_DIALOG'
EXPORTING
  i_action                  = 'A04'
  i_refdoc                  = 'R02'
  i_notree                  = 'X'
*  I_NO_AUTH_CHECK           =
  i_skip_first_screen       = 'X'
  i_deadend                 = 'X'
  i_okcode                  = 'OK_GO'
*  I_LEAVE_AFTER_POST        =
*  I_NEW_ROLLAREA            = 'X'
*  I_SYTCODE                 =
*  I_EBELN                   =
*  I_EBELP                   =
  i_mblnr                   = p_mblnr
  i_mjahr                   = p_mjahr
  i_zeile                   = p_zeile
EXCEPTIONS
  illegal_combination       = 1
  OTHERS                     = 2.

По параметрам все достаточно просто, хотя кое какие интересные заковырки как обычно есть.

       case i_action.
         when 'A01'. l_tcode = 'MB01'.
         when 'A02'. l_tcode = 'MBRL'.
         when 'A03'. l_tcode = 'MBST'.
         when 'A04'. l_tcode = 'MB03'.
         when 'A05'. l_tcode = 'MBSF'.
         when 'A06'. l_tcode = 'MBNL'.
         when 'A07'. l_tcode = 'MB0A'.               " note 398723

* и чуток ниже для другой операции
         l_tcode = 'MB01'.