Выгрузка в АПП

bird

Господа, абапщики!!
Помогите кто знает: необходимо вазрузить платежные поручения в файл для клиент-банка.
Я порыла в таблицах regup, reguh - но там многие поля не выгружаются.
просто откуда их брать не знаю.

Если кто писал такое - подскажите, где рыть еще.

ВН

а каких конкретно данных не можешь найти?

bird

Многие....
может их надо прям из документа брать

назначение платежа
назначение платежа
сообщение от отправителя к получателю третья строка назначения платежа
сведения о банке получателя платежа
Показатель статуса плательщика
КПП плательщика
КПП получателя
Код бюджетной классификации
Код ОКАТО
Показатель основания платежа
Показатель налогового периода
Показатель номера документов
Дата налогового документа
Показатель типа платежа

ВН

1. Основные данные платежа BKPF/BSEG
2. Основные данные получателя платежа KNA1/LFA1
3. Основные собственные данные - ADRC (елси у вас ведется центральное управление адресами), а можно и зашить, как вариант
4. Данные банков - по БИКу в таблице BNKA

zSEA

Посмотри программу J_3RFZKR и хелп к ней .... а потом возми и переделай еЁ под свои нужды ...
https://websmp201.sap-ag.de/~form/sapnet?_SHORTKEY=01200252310000039218&

KuAI

У меня похожая проблема, и я воспользовался программой J_3RFZKR. Поставил в ней точку прерывания непосредственно перед вызовом формуляра. И хотя просмотрел все таблицы и структуры, но так и не нашёл значений поля "Назначение платежа".

В REGUD есть поля ZWCK1, ZWCK2, которые называются "Назначение платежа", но они пустые. После возобновления программы на экран выводится платёжное поручение со строками "Назначение платежа". Откуда они взялись?

Eugene

а назначение платежа это не тексты случаем?

CALL FUNCTION 'FI_TEXTS_DOCUMENT'
ну или READ_TEXT

идентификатор BELEG вроде

DiVo

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

а назначение платежа это не тексты случаем?

Они самые... У нас для назначения платежа используется "Доп. информация" -> "Тексты..." -> "Заметка"

Code:

      ...
      CLEAR t_lines. REFRESH t_lines.
* --- try retrieving the payment text from the note if any
* --- [ Extras -> Texts... ]
      CONCATENATE regup-bukrs regup-belnr regup-gjahr INTO belname.
      CALL FUNCTION 'READ_TEXT'
           EXPORTING
                ID                      = '0002'
                LANGUAGE                = t001-spras
                NAME                    = belname
                OBJECT                  = 'BELEG'
           TABLES
                LINES                   = t_lines
           EXCEPTIONS
                OTHERS                  = 8.
      ...

Если в поле "Заметка" пусто, то формируем текст автоматически по определенному соглашению с пользователями...

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

Выгрузка в АПП

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