SAP R/3 форум ABAP консультантов
Russian ABAP Developer's Club

Home - FAQ - Search - Memberlist - Usergroups - Profile - Log in to check your private messages - Register - Log in - English
Blogs - Weblogs News

CALL TRANSACTION xk03



 
Post new topic   Reply to topic    Russian ABAP Developer's Club Forum Index -> ABAP
View previous topic :: View next topic  
Author Message
z01
Специалист
Специалист



Joined: 18 Jan 2008
Posts: 59
PostPosted: Fri Sep 12, 2008 12:15 pm    Post subject: CALL TRANSACTION xk03 Reply with quote
Здравствуйте, в моей drill-down отчете нужно запустить транзакцию
xk03 для просмотра покупателя.

Нужно чтобы на первом экране эаполнилось поля с номером покупателя и поставилась галочка General data - Control и автоматически перешло на следующий экран.

Использовать BDC не получается. Потому что выскакивает окно с кодом и после его нажатия выходит из транзакции.

Code:
AT LINE-SELECTION.

  DATA: bdcdata TYPE TABLE OF bdcdata.

  DATA: itab TYPE TABLE OF bdcmsgcoll.

  DATA: program LIKE sy-repid,
        wa_bdcdata TYPE bdcdata.

  REFRESH bdcdata.

  wa_bdcdata-program  = 'SAPMF02K'.
  wa_bdcdata-dynpro   = '0101'.
  wa_bdcdata-dynbegin = 'X'.
  APPEND wa_bdcdata TO bdcdata.

  CLEAR wa_bdcdata.
  wa_bdcdata-fnam     = 'BDC_CURSOR'.
  wa_bdcdata-fval     = 'RF02K-D0120'.
  APPEND wa_bdcdata TO bdcdata.

  CLEAR wa_bdcdata.
  wa_bdcdata-fnam     = 'BDC_OKCODE'.
  wa_bdcdata-fval     = '/00'.
  APPEND wa_bdcdata TO bdcdata.

  CLEAR wa_bdcdata.
  wa_bdcdata-fnam     = 'RF02K-LIFNR'.
  wa_bdcdata-fval     = vend_list-lifnr.
  APPEND wa_bdcdata TO bdcdata.

  CLEAR wa_bdcdata.
  wa_bdcdata-fnam     = 'RF02K-BUKRS'.
  wa_bdcdata-fval     = vend_list-bukrs.
  APPEND wa_bdcdata TO bdcdata.

  CLEAR wa_bdcdata.
  wa_bdcdata-fnam     = 'RF02K-EKORG'.
  wa_bdcdata-fval     = vend_list-ekorg.
  APPEND wa_bdcdata TO bdcdata.

  CLEAR wa_bdcdata.
  wa_bdcdata-fnam     = 'RF02K-D0120'.
  wa_bdcdata-fval     = 'X'.
  APPEND wa_bdcdata TO bdcdata.

*  SET PARAMETER ID 'LIF' FIELD vend_list-lifnr.
*  SET PARAMETER ID 'BUK' FIELD vend_list-bukrs.
*  SET PARAMETER ID 'EKO' FIELD vend_list-ekorg.

  CALL TRANSACTION 'XK03' USING bdcdata
                          MODE 'A'
                          UPDATE 'S'
                          AND SKIP FIRST SCREEN.
Back to top
View user's profile Send private message
XXX_:)
Аналитик
Аналитик


Age: 40
Joined: 01 Feb 2008
Posts: 387
Location: Воронеж
PostPosted: Fri Sep 12, 2008 1:20 pm    Post subject: Reply with quote
поставьте mode 'N'
_________________
Hормальные люди делают вещи намного более безумные чем всё, что делают сумасшедшие (c) С.Лем
Back to top
View user's profile Send private message Blog
z01
Специалист
Специалист



Joined: 18 Jan 2008
Posts: 59
PostPosted: Fri Sep 12, 2008 1:27 pm    Post subject: Reply with quote
Мне надо не выполнить транзакцию и завершить, а чтобы она запустиласть и пользователь мог с ней работать. Но при этом пропустить первый ( не селекционный ) экран. Mode 'N' выполнит и выйдет, на экране ничего не покажется.
Back to top
View user's profile Send private message
Alex80
Старший специалист
Старший специалист


Age: 44
Joined: 24 Jan 2008
Posts: 129
PostPosted: Fri Sep 12, 2008 2:04 pm    Post subject: Reply with quote
Code:
SET PARAMETER ID 'KDY' FIELD '/120'."Здесь список экранов можно задать '/110/120/130'
SET PARAMETER ID 'LIF' FIELD кредитор.
SET PARAMETER ID 'BUK' FIELD БЕ.
SET PARAMETER ID 'EKO' FIELD Закупочноая организация.

CALL TRANSACTION 'XK03' AND SKIP FIRST SCREEN.
Back to top
View user's profile Send private message
Удав
Гуру
Гуру


Age: 48
Joined: 25 Jan 2008
Posts: 580
Location: Москва
PostPosted: Fri Sep 12, 2008 2:47 pm    Post subject: Reply with quote
Значит поставьте MODE 'E' и почитайте документацию к CALL TRANSACTION.
AND SKIP FIRST SCREEN выводить не обязательно.
Еще советую в конце указать экран 120 программы SAPMF02K и использовать инклюд BDCRECXY для заполнения BDC-таблицы.

Code:

  INCLUDE bdcrecxy.

  REFRESH BDCDATA.

  PERFORM bdc_dynpro USING 'SAPMF02K' '0101'.

  PERFORM bdc_field USING 'BDC_OKCODE' '/00'.
  PERFORM bdc_field USING 'RF02K-LIFNR' vend_list-lifnr.
  PERFORM bdc_field USING 'RF02K-D0120' 'X'.

  PERFORM bdc_dynpro USING 'SAPMF02K' '0120'.

  PERFORM bdc_transaction TABLES it_messtab
                                        USING 'XK03' 'X' 'E' 'S'.

_________________
С уважением,
Удав.
Back to top
View user's profile Send private message
Удав
Гуру
Гуру


Age: 48
Joined: 25 Jan 2008
Posts: 580
Location: Москва
PostPosted: Fri Sep 12, 2008 2:56 pm    Post subject: Reply with quote
Alex80 wrote:
Code:
SET PARAMETER ID 'KDY' FIELD '/120'."Здесь список экранов можно задать '/110/120/130'
SET PARAMETER ID 'LIF' FIELD кредитор.
SET PARAMETER ID 'BUK' FIELD БЕ.
SET PARAMETER ID 'EKO' FIELD Закупочноая организация.

CALL TRANSACTION 'XK03' AND SKIP FIRST SCREEN.

Вот это лучший вариант.
_________________
С уважением,
Удав.
Back to top
View user's profile Send private message
z01
Специалист
Специалист



Joined: 18 Jan 2008
Posts: 59
PostPosted: Fri Sep 12, 2008 3:09 pm    Post subject: Reply with quote
Коллеги, спасибо за ответы.

Удав, через bdc сделать не получилость. Ваш вариат отработал так же как и мой, только без отображения на экране из-за замены mode 'A' на 'E'.

Пример Alex80 полностью устроил. Отдельное спасибо за 'KDY' FIELD '/120', не знал о такой возможности.
Back to top
View user's profile Send private message
Alex80
Старший специалист
Старший специалист


Age: 44
Joined: 24 Jan 2008
Posts: 129
PostPosted: Fri Sep 12, 2008 3:12 pm    Post subject: Reply with quote
z01 wrote:
Отдельное спасибо за 'KDY' FIELD '/120', не знал о такой возможности.
Тоже не знал, но природная нелюбовь к пакетникам и отладчик сделали своё дело Wink
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    Russian ABAP Developer's Club Forum Index -> ABAP All times are GMT + 4 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot attach files in this forum
You can download files in this forum


All product names are trademarks of their respective companies. SAPNET.RU websites are in no way affiliated with SAP AG.
SAP, SAP R/3, R/3 software, mySAP, ABAP, BAPI, xApps, SAP NetWeaver and any other are registered trademarks of SAP AG.
Every effort is made to ensure content integrity. Use information on this site at your own risk.