Создание SD заказа со ссылкой

CrecerRu

Привет.

Есть задача написать интерфейс для создание SD заказа со ссылкой на счет-фактуру.
Некий аналог VA01 и кнопки "Создать со ссылкой".
Есть разные BAPI, например BAPI_SALESDOCU_CREATEFROMDAT, но они сразу сохраняют заказ в базе.

А мне нужно, чтобы по Z кнопке сработал стандарт по созданию SD заказа из SD фактуры (отработали правила копирования), и созданный заказ открылся пользователю. И пользователь уже сам решал,сохранять или нет. Не хочется заполнять кучу структур и таблиц для функционального модуля.
Хотелось бы что то простое, на входе документ образец, минимум параметров (сбыт орг, сектор, канал) и на выходе готовый SDзаказ.

Подскажите ФМ, чтобы реализовать такую задачу.

Удав

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

Хотелось бы что то простое, на входе документ образец, минимум параметров (сбыт орг, сектор, канал) и на выходе готовый SDзаказ.

Подскажите ФМ, чтобы реализовать такую задачу.

Пакетный ввод на VA01.

olegbash

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

минимум параметров (сбыт орг, сектор, канал)

в общем случае, не нужны - они тянутся из фактуры

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

на выходе готовый SDзаказ.

если пользователь будет решать сохранять или нет - это не готовый заказ :-)

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

Пакетный ввод на VA01.

Согласен.
Пример

Code:

REPORT  ZZZTESTCA03.
data:
      p_auart like VBAK-AUART,
      f1 like bdcdata-fnam VALUE 'VBRK-VBELN'
   "   p_vkorg like VBAK-VKORG,
   "   p_vtweg like VBAK-VTWEG,
   "   p_spart like VBAK-SPART,
   "   p_vkbur like VBAK-VKBUR,
   "   p_vkgrp like VBAK-VKGRP
.

DATA BEGIN OF BDCDATA OCCURS 100.
  INCLUDE STRUCTURE BDCDATA.
DATA END OF BDCDATA.

DATA BEGIN OF MESSTAB OCCURS 10.
  INCLUDE STRUCTURE BDCMSGCOLL.
DATA END OF MESSTAB.

PARAMETERS P1 TYPE VBRK-VBELN.

*SELECT VKORG VTWEG SPART
*  INTO p_vkorg  p_vtweg  p_spart
*   FROM VBRK
*  WHERE VBELN = vbrk_vb.

PERFORM bdc_dynpro USING 'SAPMV45A' '0101'.
PERFORM bdc_field USING 'BDC_CURSOR' 'VBAK-AUART'.
PERFORM bdc_field USING 'BDC_OKCODE' '=COPY'.
PERFORM bdc_field USING 'VBAK-AUART' 'G2'.

PERFORM bdc_dynpro USING 'SAPLV45C' '0100'.
PERFORM bdc_field USING 'BDC_OKCODE' '=UEBR'.
PERFORM bdc_field USING 'BDC_SUBSCR' 'SAPLV45C                                0304SUB1'.
PERFORM bdc_field USING 'BDC_CURSOR' 'VBRK-VBELN'.
PERFORM bdc_field USING f1 p1.


PERFORM bdc_dynpro USING 'SAPMV45A' '4001'.


CALL TRANSACTION 'VA01' USING BDCDATA MODE 'E' "'N' - невидимый режим ; 'A' - режим просмотра
MESSAGES INTO MESSTAB.

*----------------------------------------------------------------------*
*        Start new screen                                              *
*----------------------------------------------------------------------*
FORM bdc_dynpro USING program dynpro.
  CLEAR bdcdata.
  bdcdata-program  = program.
  bdcdata-dynpro   = dynpro.
  bdcdata-dynbegin = 'X'.
  APPEND bdcdata.
ENDFORM.                    "BDC_DYNPRO

*----------------------------------------------------------------------*
*        Insert field                                                  *
*----------------------------------------------------------------------*
FORM bdc_field USING fnam fval.
  CLEAR bdcdata.
  bdcdata-fnam = fnam.
  bdcdata-fval = fval.
  APPEND bdcdata.
ENDFORM.                    "BDC_FIELD

olegbash

не заметил, что про ФМ шла речь...

тогда так :-)

Code:

FUNCTION ZZZ_FM_CALL_ZZZTESTCA03.
*"----------------------------------------------------------------------
*"*"Локальный интерфейс:
*"  IMPORTING
*"     REFERENCE(VBELN) TYPE  VBRK-VBELN
*"     REFERENCE(VBAK_T) TYPE  VBAK-AUART DEFAULT 'G2'
*"----------------------------------------------------------------------

 " SUBMIT ZZZTESTCA03 AND RETURN.
SUBMIT ZZZTESTCA03 with P1 = vbeln.

ENDFUNCTION.

mj23

можно использовать ФМ BAPI_SALESDOCU_CREATEWITHDIA.

Документ откроется в диалоге, не сохраняясь. Можно со ссылкой на позиции другого документа.
Работют правила копирования.

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

Создание SD заказа со ссылкой

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