Sapforum.Biz
Логистика => Техническое обслуживание и ремонт оборудования (PM) => Тема начата: mangetik от Июнь 16, 2010, 08:23:42 am
-
Добрый день, возникла следующая проблема. Создаю сеанс пакетного ввода для транзакции IR01. При переходе на экран создания мощностей(SAPLCRA0 0101) не берутся данные из BDCDATA, соответсвенно пакетник стопорится. Когда пробую в SM35 выполнить запись на основании которой создан пакетник, то отрабатывает все нормально. Поставила точку останова в sm35 при call transaction, и в своей программе, сравнила что лежит в BDCDATA все параметры идентичны. Не пойму в чем проблема.
-
Что данные не берутся вы как определили? Прошли пакетник с ключом "A" пошагово?
-
Естественно пошагово. Поля на этом экране просто не заполняются, при чем из программы не заполняются, а пакетник выполняется из SM35 ну ура. Прога идентична пакетнику 1 в 1.
-
Как я уже писала уже и точки останова ставила и в SM35и при колл транзакшен. BDCDATA заполнены абсолютно идентично. но в SM35 отрабатывает, а из проги - нет.
-
Естественно пошагово. Поля на этом экране просто не заполняются, при чем из программы не заполняются, а пакетник выполняется из SM35 ну ура. Прога идентична пакетнику 1 в 1.
Ага так увидел... странно, ладно гляну сейчас на этот экран...
-
Там вообще-то транзакция CRAH вызывается причем для IR01 написано что ее реализация устарела, плюс к этому IR01 вызывает CRAH с флажком пропустить первый экран. В общем попробуйте сами вызвать создание через CRAH.
-
Спасибо, попробую.
-
Спасибо, попробую.
Ну про результат надеюсь расскажите ::)
-
Попробовала - та же проблема с тем-же экраном
-
Попробовала - та же проблема с тем-же экраном
Ну давайте начало своего пакетника с проходом этого экрана... если можно. Будем смотреть.
-
конечно можно :))
PERFORM fill_bdc USING:
'X' 'SAPLCRA0' '0099',
'' 'BDC_CURSOR' 'RC68A-VERWE',
'' 'BDC_OKCODE' '/00',
'' 'RC68A-VERWE' '0005',
'X' 'SAPLCRA0' '0101',
'' 'BDC_CURSOR' 'RC68A-ARBPL',
'' 'BDC_OKCODE' '=NEXT',
'' 'RC68A-WERKS' 'PU02',
'' 'RC68A-ARBPL' 'PM-00003',
'' 'RC68A-VERWE' '0005',
'X' 'SAPLCRA0' '4000',
'' 'BDC_OKCODE' '=VORA',
'' 'BDC_SUBSCR' 'SAPLCRA0 0001HEADER',
'' 'BDC_CURSOR' 'P1000-STEXT',
'' 'P1000-STEXT' '123',
'' 'BDC_SUBSCR' 'SAPLCRA0 3000SUBSCREEN_BODY',
'' 'P3000-VERAN' 'usr',
'' 'P3000-PLANV' '004',
'' 'P3000-VGWTS' 'SAP0',
'' 'BDC_SUBSCR' 'SAPLCRA0 3999SHIFTREPORT_SHIFTNOTE',
'X' 'SAPLCRA0' '4000',
'' 'BDC_OKCODE' '=VK11',
'' 'BDC_SUBSCR' 'SAPLCRA0 0001HEADER',
'' 'BDC_SUBSCR' 'SAPLCRA0 3003SUBSCREEN_BODY',
'' 'BDC_CURSOR' 'P3003-STEUS_REF',
'' 'P3003-STEUS' 'PM01',
'' 'P3003-STEUS_REF' 'X',
'X' 'SAPLCRA0' '4000',
'' 'BDC_OKCODE' '=KAUE',
'' 'BDC_SUBSCR' 'SAPLCRA0 0001HEADER',
'' 'BDC_SUBSCR' 'SAPLCRA0 1004SUBSCREEN_BODY',
'' 'BDC_CURSOR' 'PAD011-FORN1',
'' 'P1001-BEGDA' '15.06.2010',
'' 'P1001-ENDDA' '31.12.9999',
'' 'CRKEYK-KOSTL' 'PU01001239',
'' 'PAD011-LARN1' 'PMPS01',
'' 'PAD011-LARN1_REF' 'X',
'' 'PAD011-FORN1' 'SAP008',
'X' 'SAPLCRA0' '4000',
'' 'BDC_OKCODE' '=NPOS',
'' 'BDC_SUBSCR' 'SAPLCRA0 0001HEADER',
'' 'BDC_SUBSCR' 'SAPLCRA0 0306SUBSCREEN_BODY',
'' 'BDC_CURSOR' 'P3006-FORKN(01)',
'' 'RC68A-KAPART(01)' '002',
'' 'P3006-FORKN(01)' 'SAP008',
'X' 'SAPLCRA0' '0101',
'' 'BDC_OKCODE' '=KAZA',
'' 'BDC_SUBSCR' 'SAPLCRK0 0002HEADER',
'' 'KAKT-KTEXT' '123',
'' 'BDC_SUBSCR' 'SAPLCRK0 0131GENERAL',
'' 'KAKO-PLANR' '001',
'' 'BDC_SUBSCR' 'SAPLCRK0 0133STANDARD_CAP',
'' 'BDC_CURSOR' 'RC68K-PAUSE',
'' 'RC68K-BEGZT' '02:00:00',
'' 'RC68K-ENDZT' '02:00:00',
'' 'KAKO-NGRAD' '100',
'' 'RC68K-PAUSE' '02:00:00',
'' 'KAKO-AZNOR' '22',
'' 'BDC_SUBSCR' 'SAPLCRK0 0132AVAIL_CAP',
'' 'KAKO-VERSA' '1',
'' 'KAKO-MEINS' '×ÀÑ',
'' 'BDC_SUBSCR' 'SAPLCRK0 0135PLAN_DETAILS',
'' 'RC68K-KAPLPL' 'X',
'' 'BDC_SUBSCR' 'SAPLCRK0 0130RESSOURCE',
'X' 'SAPLCRA0' '0116',
'' 'BDC_CURSOR' 'KAZA-DATUV(01)',
'' 'BDC_OKCODE' '=INSI',
'' 'RC68K-VERSN' '1',
'' 'KAZA_DEFAULT-BEGZT' '02:00:00',
'' 'KAZA_DEFAULT-ENDZT' '02:00:00',
'' 'KAZA_DEFAULT-PAUSE' '00:00:00',
'' 'KAZA_DEFAULT-NGRAD' '100',
'' 'KAZA_DEFAULT-ANZHL' '22',
'' 'BDC_SUBSCR' 'SAPLCRK0 0002HEADER',
'' 'KAKT-KTEXT' '123',
'X' 'SAPLCRA0' '0116',
'' 'BDC_CURSOR' 'KAZA-DATUB(01)',
'' 'BDC_OKCODE' '/00',
'' 'RC68K-VERSN' '1',
'' 'KAZA_DEFAULT-BEGZT' '02:00:00',
'' 'KAZA_DEFAULT-ENDZT' '02:00:00',
'' 'KAZA_DEFAULT-PAUSE' '00:00:00',
'' 'KAZA_DEFAULT-NGRAD' '100',
'' 'KAZA_DEFAULT-ANZHL' '22',
'' 'KAZA-DATUV(01)' '01.01.2010',
'' 'KAZA-DATUB(01)' '01.01.9999',
'' 'KAZA-ANZTG(01)' '1',
'' 'BDC_SUBSCR' 'SAPLCRK0 0002HEADER',
'' 'KAKT-KTEXT' '123',
'X' 'SAPLCRA0' '0116',
'' 'BDC_CURSOR' 'KAZA-TPROG(02)',
'' 'BDC_OKCODE' '=INSS',
'' 'RC68K-VERSN' '1',
'' 'KAZA_DEFAULT-BEGZT' '02:00:00',
'' 'KAZA_DEFAULT-ENDZT' '02:00:00',
'' 'KAZA_DEFAULT-PAUSE' '00:00:00',
'' 'KAZA_DEFAULT-NGRAD' '100',
'' 'KAZA_DEFAULT-ANZHL' '22',
'' 'KAZA-BEGZT(02)' '16:00:00',
'' 'KAZA-ENDZT(02)' '17:00:00',
'' 'BDC_SUBSCR' 'SAPLCRK0 0002HEADER',
'' 'KAKT-KTEXT' '123 ',
'X' 'SAPLCRA0' '0116',
'' 'BDC_CURSOR' 'KAZA-TPROG(02)',
'' 'BDC_OKCODE' '=INSS',
'' 'RC68K-VERSN' '1',
'' 'KAZA_DEFAULT-BEGZT' '02:00:00',
'' 'KAZA_DEFAULT-ENDZT' '02:00:00',
'' 'KAZA_DEFAULT-PAUSE' '00:00:00',
'' 'KAZA_DEFAULT-NGRAD' '100',
'' 'KAZA_DEFAULT-ANZHL' '22',
'' 'KAZA-BEGZT(02)' '12:00:00',
'' 'KAZA-ENDZT(02)' '13:00:00',
'' 'KAZA-PAUSE(02)' '01:00:00',
'' 'BDC_SUBSCR' 'SAPLCRK0 0002HEADER',
'' 'KAKT-KTEXT' '123',
'X' 'SAPLCRA0' '0116',
'' 'BDC_CURSOR' 'KAZA-PAUSE(02)',
'' 'BDC_OKCODE' '=UPD',
'' 'RC68K-VERSN' '1',
'' 'KAZA_DEFAULT-BEGZT' '02:00:00',
'' 'KAZA_DEFAULT-ENDZT' '02:00:00',
'' 'KAZA_DEFAULT-PAUSE' '00:00:00',
'' 'KAZA_DEFAULT-NGRAD' '100',
'' 'KAZA_DEFAULT-ANZHL' '22',
'' 'KAZA-BEGZT(02)' '10:00:00',
'' 'KAZA-ENDZT(02)' '11:00:00',
'' 'KAZA-PAUSE(02)' '01:00:00',
'' 'BDC_SUBSCR' 'SAPLCRK0 0002HEADER',
'' 'KAKT-KTEXT' '123'
.
ls_options-dismode = 'A'.
ls_options-UPDMODE = 'A'.
ls_options-nobinpt = 'X'.
ls_options-defsize = 'X'.
CALL TRANSACTION 'CRAH'
USING bdcdata
OPTIONS FROM ls_options
MESSAGES INTO gt_mes.
А у Вас подобный пакетник отрабатывает? По идее того что происходит у меня не должно быть. Я бы подумала что пропустила что-то или не заметила, но уже пару чел. смотрели на это действо.
-
*&---------------------------------------------------------------------*
*& Report YUUK_TEST_IR01
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT yuuk_test_ir01.
DATA: BEGIN OF bdcdata OCCURS 0.
INCLUDE STRUCTURE bdcdata.
DATA: END OF bdcdata.
DATA BEGIN OF gt_mes OCCURS 10.
INCLUDE STRUCTURE bdcmsgcoll.
DATA END OF gt_mes.
PERFORM fill_bdc USING:
'X' 'SAPLCRA0' '0099',
'' 'BDC_CURSOR' 'RC68A-VERWE',
'' 'BDC_OKCODE' '/00',
'' 'RC68A-VERWE' '0005',
'X' 'SAPLCRA0' '0101',
'' 'BDC_CURSOR' 'RC68A-ARBPL',
'' 'BDC_OKCODE' '=NEXT',
'' 'RC68A-WERKS' '1000', "PU02 (Ну у меня такого завода нет :-) но название как-то знакомо )
'' 'RC68A-ARBPL' 'PM-00003',
'' 'RC68A-VERWE' '0005',
'' 'RC68A-REF_WERKS' space, "Так как может быть проблема
'' 'RC68A-REF_ARBPL' space,
'X' 'SAPLCRA0' '4000',
'' 'BDC_OKCODE' '=VORA',
'' 'BDC_SUBSCR' 'SAPLCRA0 0001HEADER',
'' 'BDC_CURSOR' 'P1000-STEXT',
'' 'P1000-STEXT' '123',
'' 'BDC_SUBSCR' 'SAPLCRA0 3000SUBSCREEN_BODY',
'' 'P3000-VERAN' 'usr',
'' 'P3000-PLANV' '004',
'' 'P3000-VGWTS' 'SAP0',
'' 'BDC_SUBSCR' 'SAPLCRA0 3999SHIFTREPORT_SHIFTNOTE',
'X' 'SAPLCRA0' '4000',
'' 'BDC_OKCODE' '=VK11',
'' 'BDC_SUBSCR' 'SAPLCRA0 0001HEADER',
'' 'BDC_SUBSCR' 'SAPLCRA0 3003SUBSCREEN_BODY',
'' 'BDC_CURSOR' 'P3003-STEUS_REF',
'' 'P3003-STEUS' 'PM01',
'' 'P3003-STEUS_REF' 'X',
'X' 'SAPLCRA0' '4000',
'' 'BDC_OKCODE' '=KAUE',
'' 'BDC_SUBSCR' 'SAPLCRA0 0001HEADER',
'' 'BDC_SUBSCR' 'SAPLCRA0 1004SUBSCREEN_BODY',
'' 'BDC_CURSOR' 'PAD011-FORN1',
'' 'P1001-BEGDA' '15.06.2010',
'' 'P1001-ENDDA' '31.12.9999',
'' 'CRKEYK-KOSTL' 'PU01001239',
'' 'PAD011-LARN1' 'PMPS01',
'' 'PAD011-LARN1_REF' 'X',
'' 'PAD011-FORN1' 'SAP008',
'X' 'SAPLCRA0' '4000',
'' 'BDC_OKCODE' '=NPOS',
'' 'BDC_SUBSCR' 'SAPLCRA0 0001HEADER',
'' 'BDC_SUBSCR' 'SAPLCRA0 0306SUBSCREEN_BODY',
'' 'BDC_CURSOR' 'P3006-FORKN(01)',
'' 'RC68A-KAPART(01)' '002',
'' 'P3006-FORKN(01)' 'SAP008',
'X' 'SAPLCRA0' '0101',
'' 'BDC_OKCODE' '=KAZA',
'' 'BDC_SUBSCR' 'SAPLCRK0 0002HEADER',
'' 'KAKT-KTEXT' '123',
'' 'BDC_SUBSCR' 'SAPLCRK0 0131GENERAL',
'' 'KAKO-PLANR' '001',
'' 'BDC_SUBSCR' 'SAPLCRK0 0133STANDARD_CAP',
'' 'BDC_CURSOR' 'RC68K-PAUSE',
'' 'RC68K-BEGZT' '02:00:00',
'' 'RC68K-ENDZT' '02:00:00',
'' 'KAKO-NGRAD' '100',
'' 'RC68K-PAUSE' '02:00:00',
'' 'KAKO-AZNOR' '22',
'' 'BDC_SUBSCR' 'SAPLCRK0 0132AVAIL_CAP',
'' 'KAKO-VERSA' '1',
'' 'KAKO-MEINS' '×ÀÑ',
'' 'BDC_SUBSCR' 'SAPLCRK0 0135PLAN_DETAILS',
'' 'RC68K-KAPLPL' 'X',
'' 'BDC_SUBSCR' 'SAPLCRK0 0130RESSOURCE',
'X' 'SAPLCRA0' '0116',
'' 'BDC_CURSOR' 'KAZA-DATUV(01)',
'' 'BDC_OKCODE' '=INSI',
'' 'RC68K-VERSN' '1',
'' 'KAZA_DEFAULT-BEGZT' '02:00:00',
'' 'KAZA_DEFAULT-ENDZT' '02:00:00',
'' 'KAZA_DEFAULT-PAUSE' '00:00:00',
'' 'KAZA_DEFAULT-NGRAD' '100',
'' 'KAZA_DEFAULT-ANZHL' '22',
'' 'BDC_SUBSCR' 'SAPLCRK0 0002HEADER',
'' 'KAKT-KTEXT' '123',
'X' 'SAPLCRA0' '0116',
'' 'BDC_CURSOR' 'KAZA-DATUB(01)',
'' 'BDC_OKCODE' '/00',
'' 'RC68K-VERSN' '1',
'' 'KAZA_DEFAULT-BEGZT' '02:00:00',
'' 'KAZA_DEFAULT-ENDZT' '02:00:00',
'' 'KAZA_DEFAULT-PAUSE' '00:00:00',
'' 'KAZA_DEFAULT-NGRAD' '100',
'' 'KAZA_DEFAULT-ANZHL' '22',
'' 'KAZA-DATUV(01)' '01.01.2010',
'' 'KAZA-DATUB(01)' '01.01.9999',
'' 'KAZA-ANZTG(01)' '1',
'' 'BDC_SUBSCR' 'SAPLCRK0 0002HEADER',
'' 'KAKT-KTEXT' '123',
'X' 'SAPLCRA0' '0116',
'' 'BDC_CURSOR' 'KAZA-TPROG(02)',
'' 'BDC_OKCODE' '=INSS',
'' 'RC68K-VERSN' '1',
'' 'KAZA_DEFAULT-BEGZT' '02:00:00',
'' 'KAZA_DEFAULT-ENDZT' '02:00:00',
'' 'KAZA_DEFAULT-PAUSE' '00:00:00',
'' 'KAZA_DEFAULT-NGRAD' '100',
'' 'KAZA_DEFAULT-ANZHL' '22',
'' 'KAZA-BEGZT(02)' '16:00:00',
'' 'KAZA-ENDZT(02)' '17:00:00',
'' 'BDC_SUBSCR' 'SAPLCRK0 0002HEADER',
'' 'KAKT-KTEXT' '123 ',
'X' 'SAPLCRA0' '0116',
'' 'BDC_CURSOR' 'KAZA-TPROG(02)',
'' 'BDC_OKCODE' '=INSS',
'' 'RC68K-VERSN' '1',
'' 'KAZA_DEFAULT-BEGZT' '02:00:00',
'' 'KAZA_DEFAULT-ENDZT' '02:00:00',
'' 'KAZA_DEFAULT-PAUSE' '00:00:00',
'' 'KAZA_DEFAULT-NGRAD' '100',
'' 'KAZA_DEFAULT-ANZHL' '22',
'' 'KAZA-BEGZT(02)' '12:00:00',
'' 'KAZA-ENDZT(02)' '13:00:00',
'' 'KAZA-PAUSE(02)' '01:00:00',
'' 'BDC_SUBSCR' 'SAPLCRK0 0002HEADER',
'' 'KAKT-KTEXT' '123',
'X' 'SAPLCRA0' '0116',
'' 'BDC_CURSOR' 'KAZA-PAUSE(02)',
'' 'BDC_OKCODE' '=UPD',
'' 'RC68K-VERSN' '1',
'' 'KAZA_DEFAULT-BEGZT' '02:00:00',
'' 'KAZA_DEFAULT-ENDZT' '02:00:00',
'' 'KAZA_DEFAULT-PAUSE' '00:00:00',
'' 'KAZA_DEFAULT-NGRAD' '100',
'' 'KAZA_DEFAULT-ANZHL' '22',
'' 'KAZA-BEGZT(02)' '10:00:00',
'' 'KAZA-ENDZT(02)' '11:00:00',
'' 'KAZA-PAUSE(02)' '01:00:00',
'' 'BDC_SUBSCR' 'SAPLCRK0 0002HEADER',
'' 'KAKT-KTEXT' '123'
.
*ls_options-dismode = 'A'.
*ls_options-updmode = 'A'.
*ls_options-nobinpt = 'X'.
*ls_options-defsize = 'X'.
CALL TRANSACTION 'CRAH'
USING bdcdata
MODE 'A' UPDATE 'S'
MESSAGES INTO gt_mes.
*&---------------------------------------------------------------------*
*& Form DYNPRO
*&---------------------------------------------------------------------*
* Генерация полей для BATCH-INPUT
*----------------------------------------------------------------------*
FORM fill_bdc USING dynbegin name value.
IF dynbegin = 'X'.
CLEAR bdcdata.
MOVE: name TO bdcdata-program,
value TO bdcdata-dynpro,
'X' TO bdcdata-dynbegin.
APPEND bdcdata.
ELSE.
CLEAR bdcdata.
MOVE: name TO bdcdata-fnam,
value TO bdcdata-fval.
APPEND bdcdata.
ENDIF.
ENDFORM. "fill_bdc
В общем-то я чуток модифицировал код, ну если не считать завода, то дополнительно поставил очистку ссылочного завода это раз и немного переделал вызов на такой код:
CALL TRANSACTION 'CRAH'
USING bdcdata
MODE 'A' UPDATE 'S'
MESSAGES INTO gt_mes.
т.е. явно указал режим запуска (потом можно с А поменять на E), так вот исходя из картинок как видим все передается. Попробуйте сделать тоже у себя.
-
Ну у меня ведь тоже в коде стоит ls_options-dismode = 'A'., а не ls_options-dismode = 'E'. Просто у Вас явно указано mode. Насчет завода, то попробую сделать так как Вы советуете.
-
Ну у меня ведь тоже в коде стоит ls_options-dismode = 'A'., а не ls_options-dismode = 'E'. Просто у Вас явно указано mode. Насчет завода, то попробую сделать так как Вы советуете.
Да завод, то дело такое.. вы лучше колтранзакшен явно укажите опции вызова...
-
все то-же самое (((
-
все то-же самое (((
В общем виде проблема таки с этим экраном, там размещено 5 подэкранов и в момент обработки, похоже система теряется какой экран вызван. В общем похоже проблема решается путем изменения порядка обхода закладок... У меня руки не дошли, а девушка если захочет сама расскажет про правильную последовательность обхода, так как я понял она ее нашла. ;D
-
может бапишку какую поискать, чтоб не мучить эти пакетники ?
-
может бапишку какую поискать, чтоб не мучить эти пакетники ?
Ну я первым делом это и сделал.. но ее похоже нет, там есть функции записи внутри, но они похоже мало применимы...