Was die QP01 macht steht unter Umständen in der Online-Hilfe: http://help.sap.com//saphelp_47x200/hel ... ameset.htmWas genau macht die qp01 denn nun wo speichert sie und wie könnte ich das nachahmen ?
Folgende Benutzer bedankten sich beim Autor Alexander D. für den Beitrag:
Pinguincommander
Folgende Benutzer bedankten sich beim Autor ratsnus für den Beitrag:
Pinguincommander
Folgende Benutzer bedankten sich beim Autor a-dead-trousers für den Beitrag:
Pinguincommander
Code: Alles auswählen.
COMMIT WORK.
Code: Alles auswählen.
*&---------------------------------------------------------------------*
*& Report ZPHO_TEST_PRUEFPLAN_ANLEGEN
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT ZPHO_TEST_PRUEFPLAN_ANLEGEN.
DATA: WA_MATERIAL LIKE BAPI1191_MTK_C,
WA_TASK LIKE BAPI1191_TSK_C,
WA_REFERENCE LIKE BAPI1191_REF_OPR_C,
WA_OPERATION LIKE BAPI1191_OPR_C.
DATA: I_MATERIAL LIKE TABLE OF BAPI1191_MTK_C,
I_TASK LIKE TABLE OF BAPI1191_TSK_C,
I_REFERENCE LIKE TABLE OF BAPI1191_REF_OPR_C,
I_RETURN LIKE TABLE OF BAPIRET2,
I_OPERATION LIKE TABLE OF BAPI1191_OPR_C.
DATA: W_GROUP LIKE BAPI1191_MTK_C-TASK_LIST_GROUP,
W_COUNTER LIKE BAPI1191_MTK_C-GROUP_COUNTER.
*fülle i_MATERIAL.
MOVE '0007' TO WA_MATERIAL-PLANT.
MOVE '137-00-311-02' TO WA_MATERIAL-MATERIAL.
MOVE SY-DATUM TO WA_MATERIAL-VALID_FROM.
MOVE '99991231' TO WA_MATERIAL-VALID_TO_DATE.
APPEND WA_MATERIAL TO I_MATERIAL.
*fülle I_TASK.
WA_TASK-VALID_FROM = SY-DATUM.
WA_TASK-VALID_TO_DATE = '99991231'.
WA_TASK-TASK_LIST_USAGE = '11'.
WA_TASK-PLANT = '0007'.
WA_TASK-TASK_LIST_STATUS = '4'.
WA_TASK-TASK_MEASURE_UNIT = 'ST'.
WA_TASK-LOT_SIZE_FROM = '0'.
WA_TASK-LOT_SIZE_TO = '99999999'.
WA_TASK-RESP_PLANNER_GROUP = 'VF'.
WA_TASK-DESCRIPTION = 'Referenzplan für QS in Eigenfertigung'.
WA_TASK-DYN_MODIF_LEVEL = '3'.
WA_TASK-DYN_MODIF_RULE = 'V01'.
APPEND WA_TASK TO I_TASK.
*fülle I_REFERENCE.
WA_REFERENCE-REFERENCED_TASK_LIST_GROUP = '50000113'.
WA_REFERENCE-REFERENCED_GROUP_COUNTER = '01'.
WA_REFERENCE-ACTIVITY = '0010'.
APPEND WA_REFERENCE TO I_REFERENCE.
CALL FUNCTION 'BAPI_INSPECTIONPLAN_CREATE'
* EXPORTING
* TESTRUN = ' '
* PROFILE =
IMPORTING
GROUP = W_GROUP
GROUPCOUNTER = W_COUNTER
TABLES
TASK = I_TASK
MATERIALTASKALLOCATION = I_MATERIAL
* OPERATION = I_OPERATION
REFERENCEOPERATION = I_REFERENCE
* PRODUCTIONRESOURCE =
* INSPCHARACTERISTIC =
* TEXTALLOCATION =
* TEXT =
RETURN = I_RETURN
* INSP_CHAR_VALUES =
.
COMMIT WORK.
Eigentlich solltest du BAPI_TRANSACTION_COMMIT verwenden. In den meisten Fällen wird es aber auf's Gleiche hinaus laufen.Pinguincommander hat geschrieben:ein commit work ist dahinter.....
ist doch dann einfach nur:
oder ?Code: Alles auswählen.
COMMIT WORK.
Folgende Benutzer bedankten sich beim Autor ewx für den Beitrag:
Pinguincommander
Folgende Benutzer bedankten sich beim Autor ratsnus für den Beitrag:
Pinguincommander