Skip to Content
0
Former Member
Feb 26, 2009 at 11:30 AM

Problem with BAPI_PROCORDCONF_CREATE_TT

176 Views

Dear Gurus,

I am trying to change the indicator "Final delivery" in a process order .

I am trying to do it with a BAPI .

I can't do it ...

And the funny is that the system say that the Order was saved !!!!

Look my code ...

**&---------------------------------------------------------------------*
*& Report  YDP_METAL_BOOK_CHECK_V13
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  YDP_METAL_BOOK_CHECK_V10.

TABLES : AFKO , AFPO .

DATA BEGIN OF AAA OCCURS 0.
        INCLUDE STRUCTURE BAPI_ORDER_HEADER1.
DATA END OF AAA.

DATA BEGIN OF BBB OCCURS 0.
        INCLUDE STRUCTURE BAPI_ORDER_ITEM.
DATA END OF BBB.

DATA BEGIN OF CCC OCCURS 0.
        INCLUDE STRUCTURE BAPI_PI_ORDER_OBJECTS.
DATA END OF CCC.

DATA BEGIN OF DDD OCCURS 0.
        INCLUDE STRUCTURE BAPI2017_GM_ITEM_CREATE.
DATA END OF DDD.

DATA BEGIN OF MMM OCCURS 0.
        INCLUDE STRUCTURE BAPI_ORDER_PHASE.
DATA END OF MMM.

DATA BEGIN OF NNN OCCURS 0.
        INCLUDE STRUCTURE BAPI_ORDER_TRIGGER_POINT.
DATA END OF NNN.


DATA BEGIN OF LOCK OCCURS 0.
        INCLUDE STRUCTURE BAPI_CORU_PARAM.
DATA END OF LOCK.


DATA BEGIN OF EEE OCCURS 0.
        INCLUDE STRUCTURE BAPI_PI_TIMETICKET1.
DATA END OF EEE.

DATA BEGIN OF DETAILS OCCURS 0.
        INCLUDE STRUCTURE BAPI_CORU_RETURN.
DATA END OF DETAILS.

DATA BEGIN OF LLL OCCURS 0.
        INCLUDE STRUCTURE BAPI_ORDER_STATUS.
DATA END OF LLL.

START-OF-SELECTION.

CLEAR AFKO.
SELECT SINGLE * FROM AFKO WHERE AUFNR = '000039085004'.

IF SY-SUBRC = 0.


  CCC-HEADER = 'X'.
  CCC-POSITIONS = 'X'.
  APPEND CCC.

CALL FUNCTION 'BAPI_PROCORD_GET_DETAIL'
  EXPORTING
    NUMBER                 = AFKO-AUFNR
   COLLECTIVE_ORDER       = 'X'
    ORDER_OBJECTS          = CCC
* IMPORTING
*   RETURN                 =
 TABLES
   HEADER                 = AAA
   POSITION               = BBB
*   SEQUENCE               =
   PHASE                  = MMM
   TRIGGER_POINT          = NNN
*   COMPONENT              =
*   PROD_REL_TOOL          =
    .

EEE-ORDERID     = AFKO-AUFNR.
EEE-PHASE       = '0500'.
DDD-NO_MORE_GR = 'X'.

APPEND EEE.
APPEND DDD.


CALL FUNCTION 'BAPI_PROCORDCONF_CREATE_TT'
 EXPORTING
   POST_WRONG_ENTRIES       = '0' "LOCK              " '0'
*   TESTRUN                  =
* IMPORTING
*   RETURN                   =
  TABLES
    TIMETICKETS              = EEE
    GOODSMOVEMENTS           = DDD
*   LINK_CONF_GOODSMOV       =
   DETAIL_RETURN            = DETAILS          .

CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
* EXPORTING
*   WAIT          =
* IMPORTING
*   RETURN        =
          .
ENDIF.

END-OF-SELECTION.