11-14-2006 11:58 AM
Hi Friends
Can anybody pls let me know any funciton module or method to retrieve cost analysis data from CO03 transaction. CO03 -> GOTO -> COSTS -> ANALYSIS, will give an ALV report.
very urgent.
thanks
11-14-2006 12:49 PM
Hi raghav,
i don't know a FM. I use in Report KOB1 via BDC.
Here a short extract:
DATA BEGIN OF BDCDATA OCCURS 500.
INCLUDE STRUCTURE BDCDATA.
DATA END OF BDCDATA.
*
PERFORM KOB1 USING ITAB-AUFNR BUDAT_LOW BUDAT_HIGH.
FORM KOB1 USING AUFNR BUDAT_LOW BUDAT_HIGH.
*
DATA: BUDAT_LOW_C(10), BUDAT_HIGH_C(10).
*
WRITE BUDAT_LOW TO BUDAT_LOW_C.
WRITE BUDAT_HIGH TO BUDAT_HIGH_C.
*
REFRESH BDCDATA.
*
PERFORM BDC_DYNPRO USING 'RKAEP000' '0110'.
PERFORM BDC_FIELD USING 'BDC_OKCODE' '=ONLI'.
PERFORM BDC_FIELD USING 'AUFNR-LOW' AUFNR.
PERFORM BDC_FIELD USING 'AUFNR-HIGH' SPACE.
PERFORM BDC_FIELD USING 'AUFGR' SPACE.
PERFORM BDC_FIELD USING 'KSTAR-LOW' SPACE.
PERFORM BDC_FIELD USING 'KSTAR-HIGH' SPACE.
PERFORM BDC_FIELD USING 'KOAGR' SPACE.
PERFORM BDC_FIELD USING 'R_BUDAT-LOW' BUDAT_LOW_C.
PERFORM BDC_FIELD USING 'R_BUDAT-HIGH' BUDAT_HIGH_C.
PERFORM BDC_FIELD USING 'P_DISVAR' '/TEL'.
*
CALL TRANSACTION 'KOB1' USING BDCDATA MODE 'E'.
*
ENDFORM.
FORM BDC_DYNPRO USING PROGRAM DYNPRO.
*
CLEAR BDCDATA.
BDCDATA-PROGRAM = PROGRAM.
BDCDATA-DYNPRO = DYNPRO.
BDCDATA-DYNBEGIN = 'X'.
APPEND BDCDATA.
*
ENDFORM.
FORM BDC_FIELD USING FNAM FVAL.
*
CLEAR BDCDATA.
BDCDATA-FNAM = FNAM.
BDCDATA-FVAL = FVAL.
APPEND BDCDATA.
*
ENDFORM.
Hope it helps.
Regards, Dieter
11-14-2006 12:49 PM
Hi raghav,
i don't know a FM. I use in Report KOB1 via BDC.
Here a short extract:
DATA BEGIN OF BDCDATA OCCURS 500.
INCLUDE STRUCTURE BDCDATA.
DATA END OF BDCDATA.
*
PERFORM KOB1 USING ITAB-AUFNR BUDAT_LOW BUDAT_HIGH.
FORM KOB1 USING AUFNR BUDAT_LOW BUDAT_HIGH.
*
DATA: BUDAT_LOW_C(10), BUDAT_HIGH_C(10).
*
WRITE BUDAT_LOW TO BUDAT_LOW_C.
WRITE BUDAT_HIGH TO BUDAT_HIGH_C.
*
REFRESH BDCDATA.
*
PERFORM BDC_DYNPRO USING 'RKAEP000' '0110'.
PERFORM BDC_FIELD USING 'BDC_OKCODE' '=ONLI'.
PERFORM BDC_FIELD USING 'AUFNR-LOW' AUFNR.
PERFORM BDC_FIELD USING 'AUFNR-HIGH' SPACE.
PERFORM BDC_FIELD USING 'AUFGR' SPACE.
PERFORM BDC_FIELD USING 'KSTAR-LOW' SPACE.
PERFORM BDC_FIELD USING 'KSTAR-HIGH' SPACE.
PERFORM BDC_FIELD USING 'KOAGR' SPACE.
PERFORM BDC_FIELD USING 'R_BUDAT-LOW' BUDAT_LOW_C.
PERFORM BDC_FIELD USING 'R_BUDAT-HIGH' BUDAT_HIGH_C.
PERFORM BDC_FIELD USING 'P_DISVAR' '/TEL'.
*
CALL TRANSACTION 'KOB1' USING BDCDATA MODE 'E'.
*
ENDFORM.
FORM BDC_DYNPRO USING PROGRAM DYNPRO.
*
CLEAR BDCDATA.
BDCDATA-PROGRAM = PROGRAM.
BDCDATA-DYNPRO = DYNPRO.
BDCDATA-DYNBEGIN = 'X'.
APPEND BDCDATA.
*
ENDFORM.
FORM BDC_FIELD USING FNAM FVAL.
*
CLEAR BDCDATA.
BDCDATA-FNAM = FNAM.
BDCDATA-FVAL = FVAL.
APPEND BDCDATA.
*
ENDFORM.
Hope it helps.
Regards, Dieter
11-15-2006 7:27 AM
Hi Dieter,
Thanks for your response. Somehow I was able to soleve this issue.
Regards
Raghav