Автор Тема: FOR_ALL_SKC1A - Сегмент оборота ОСч, выведенный из GLDB (ВнутрВалюта)  (Прочитано 3786 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн Uukrul

  • SAP ECC 6.0 Ehp(*)
  • Administrator
  • Epic Member
  • *****
  • Сообщений: 3 761
  • Репутация: +47/-0
  • Пол: Мужской
  • YearsYearsYearsYearsYearsYearsYearsYearsYearsYearsYearsYearsYears
    • Sapforum.BIZ
FOR_ALL_SKC1A - Сегмент оборота ОСч, выведенный из GLDB (ВнутрВалюта). Собственно больше описывать наверное нет смысла, возвращается очень неплохая структура SKC1A в которой по счету очень много полезной информации. Из плюшек данного ФМ не очень хорошо, что тип счета должен быть S. А вообще типы счетов бывают:
Цитировать
A   Приложения
D   Дебиторы
K   Кредиторы
M   Материал
S   Основные счета
Из хорошего проверка полномочий на счет и код БЕ, внутри проверяются следующие объекты:
Код: You are not allowed to view links. Register or Login
* Полномочия на счет вида S
  authority-check object 'F_BKPF_KOA'
              id 'KOART' field 'S'
              id 'ACTVT' field '03'.
      if sy-subrc <> 0. raise not_authorized. endif.

* Код БЕ
  authority-check object 'F_SKA1_BUK'
              id 'BUKRS' field xbukrs
              id 'ACTVT' field '03'.
  if sy-subrc ne 0. raise not_authorized. endif.
Ну и пример вызова, кстати счет надо передавать в полном формате с ведущими нулями, ну если есть, поэтому для этого надо использовать ФМ CONVERSION_EXIT_ALPHA_INPUT.
Код: You are not allowed to view links. Register or Login
DATA: l_xbukrs LIKE skc1a-bukrs,
      l_xsaknr LIKE skc1a-saknr,
      lt_xskc1a LIKE skc1a OCCURS 1 WITH HEADER LINE.

l_xbukrs = '1000'.
l_xsaknr = '900000'.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
  EXPORTING
    input  = l_xsaknr
  IMPORTING
    output = l_xsaknr.

CALL FUNCTION 'FOR_ALL_SKC1A'
  EXPORTING
    xbukrs         = l_xbukrs
    xsaknr         = l_xsaknr
  TABLES
    xskc1a         = lt_xskc1a
  EXCEPTIONS
    key_incomplete = 1
    not_authorized = 2
    not_found      = 3
    OTHERS         = 4.

IF sy-subrc = 0.
ENDIF.