MIRO Как достучаться до позиций?

Artm

Надо изменить финпозицию при сохранении в MIRO. Форум перечитал, но ничего не подходит.
Пробовал BAdI Interface IF_EX_INVOICE_UPDATE метод CHANGE_AT_SAVE. Возвращаю значение через глобальную таблицу ydrseg. Но данные в строке всеравно не меняются. Система последней версии, exit'ы не работают.
Пробовал через расширение в PAI 6310 экрана, работает только для выделенной строки и если руками изменить значение финпозиции.
Как быть?

LKU

Так может в FM настроить корректно деривацию контировок, чтобы фин позиция правильно определялась? Ну или посмотреть в строну FI замещений.

Удав

Artm написал(а):

Пробовал BAdI Interface IF_EX_INVOICE_UPDATE метод CHANGE_AT_SAVE. Возвращаю значение через глобальную таблицу ydrseg. Но данные в строке всеравно не меняются.

В CHANGE_AT_SAVE все параметры - IMPORTING.
Прислушайтесь к LKU, альтернатива - только модификация стандарта.

Silence1

ф.группа XM08
может подойдет экзит EXIT_SAPLMRMP_010 или EXIT_SAPLMRMH_015?

Удав

В них изменить позиции нельзя.

Code:

FORM USER_EXIT_010 TABLES   P_T_DRSEG TYPE MMCR_TDRSEG
                   USING    p_rbkpv TYPE mrm_rbkpv
                            i_zterm.

  DATA:   h_ydrseg     TYPE mmcr_tdrseg,
          s_rbkpv      TYPE mrm_rbkpv,
          active.

  MOVE-CORRESPONDING p_rbkpv TO s_rbkpv.
  s_rbkpv-zterm = i_zterm.

  CALL FUNCTION 'MODX_FUNCTION_ACTIVE_CHECK'
       EXPORTING
            CPROGNAME  = 'SAPLMRMP'
            FUNCNUMBER = '010'
       IMPORTING
            ACTIVE     = ACTIVE.
  IF ACTIVE = 'X'.                " durchlфuft wenn User-Exit aktiv ist
    H_YDRSEG[] = P_T_DRSEG[].

    CALL CUSTOMER-FUNCTION '010'
         EXPORTING
              e_trbkpv = s_rbkpv
         TABLES
              E_TDRSEG = H_YDRSEG.
  ENDIF.

ENDFORM.                    " USER_EXIT_010

Code:

    t_frseg_user[] = t_tfrseg[].
    t_co_user[]  = t_tco[].
    t_ma_user[]  = t_tma[].
    f_rbkpv = e_rbkpv.
    CALL CUSTOMER-FUNCTION '015'
        IMPORTING   e_change      = f_change
        TABLES      t_frseg       = t_frseg_user
                    t_co          = t_co_user
                    t_ma          = t_ma_user
        CHANGING    e_rbkpv       = f_rbkpv
        EXCEPTIONS  error_message = 01.

Silence1

ну я бы ченить аасигнула тогда для пробы))

Besa

Если честно не поддерживаю такие решения, но бывает деваться некуда и приходится использовать. Меняли и заголовок, и позиции СЧ в методе CHANGE_AT_SAVE, примерно так:
Для позиций -

Code:

  DATA: ydrseg TYPE TABLE OF mmcr_drseg.
  FIELD-SYMBOLS: <fs> LIKE ydrseg.
  FIELD-SYMBOLS: <s> TYPE mmcr_drseg.
  DATA: sss(40).
  sss = '(SAPLMR1M)YDRSEG[]'.
  ASSIGN (sss) TO <fs>.
  READ TABLE <fs> INDEX 1 ASSIGNING <s>.
  <s>-sgtxt = 'zzz'.

Удав

Ну для SGTXT есть ФМ EXIT_SAPLMRMP_004

Besa

Удав написал(а):

Ну для SGTXT есть ФМ EXIT_SAPLMRMP_004

Если честно не приходилось сталкивался с этим экзитом, но и в моем посте всего лишь пример, финпозиция должна поменяться.

Удав

Besa написал:

в моем посте всего лишь пример, финпозиция должна поменяться.

Логично, что если получаешь доступ ко всей структуре, что менять можно любое поле :pivo:

Artm

Методы с расширениями и BADI не помогают. Придется через Замещения FI. Создал через obbh в разделе Финансовая бухгалтерия->Позиция документа новый этап, в нем в предпосылке BKPF-TCODE = 'MIRO', в замещении - программа деривации. Break <uname> не ловится, в позициях тоже ничего не происходит. Как оно отрабатывает?

SDюк

Besa написал:

Если честно не поддерживаю такие решения, но бывает деваться некуда и приходится использовать. Меняли и заголовок, и позиции СЧ в методе CHANGE_AT_SAVE, примерно так:
Для позиций -

Code:

  DATA: ydrseg TYPE TABLE OF mmcr_drseg.
  FIELD-SYMBOLS: <fs> LIKE ydrseg.
  FIELD-SYMBOLS: <s> TYPE mmcr_drseg.
  DATA: sss(40).
  sss = '(SAPLMR1M)YDRSEG[]'.
  ASSIGN (sss) TO <fs>.
  READ TABLE <fs> INDEX 1 ASSIGNING <s>.
  <s>-sgtxt = 'zzz'.

Хотели так сделать, в дамп падает - MOVE_TO_LIT_NOTALLOWED_NODATA

Besa

SDюк написал:

Besa написал:

Если честно не поддерживаю такие решения, но бывает деваться некуда и приходится использовать. Меняли и заголовок, и позиции СЧ в методе CHANGE_AT_SAVE, примерно так:
Для позиций -

Code:

  DATA: ydrseg TYPE TABLE OF mmcr_drseg.
  FIELD-SYMBOLS: <fs> LIKE ydrseg.
  FIELD-SYMBOLS: <s> TYPE mmcr_drseg.
  DATA: sss(40).
  sss = '(SAPLMR1M)YDRSEG[]'.
  ASSIGN (sss) TO <fs>.
  READ TABLE <fs> INDEX 1 ASSIGNING <s>.
  <s>-sgtxt = 'zzz'.

Хотели так сделать, в дамп падает - MOVE_TO_LIT_NOTALLOWED_NODATA

Именно в CHANGE_AT_SAVE и именно (SAPLMR1M)YDRSEG? Не знаю, не должно быть такого по-моему... Это ведь просто глоб переменная. Другое дело когда асинишь протэктэд входные параметры самой бади, там, да, будет такой дамп и то только в новых версия, в старых прокатывало и это. Сорри, не помню в какой версии это было реализовано у нас...

gushsha

Добрый день! заранее прошу прощения, я совсем новичок. у меня проблема: нужно вставить контроль выбранной фин.позиции в miro при сохранении. как это делается? можете подсказать расширение или бади?

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

MIRO Как достучаться до позиций?

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