*&---------------------------------------------------------------------*
*& Form DISPLAY_PO_HISTORY
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* -->P_LS_BASE_EBELN text
* -->P_LS_BASE_EBELP text
*----------------------------------------------------------------------*
FORM DISPLAY_PO_HISTORY USING PV_EBELN
PV_EBELP.
DATA : LV_EBELN TYPE EKKO-EBELN,
LV_EBELP TYPE EKPO-EBELP.
CLEAR : LV_EBELN, LV_EBELP.
CHECK PV_EBELN IS NOT INITIAL.
LV_EBELN = PV_EBELN.
LV_EBELP = PV_EBELP.
CALL FUNCTION 'MM_HISTORY_POPUP_SHOW'
EXPORTING
PI_EBELN = LV_EBELN
PI_EBELP = LV_EBELP
EXCEPTIONS
ERROR = 1
OTHERS = 2.
IF SY-SUBRC <> 0.
* Implement suitable error handling here
ENDIF.
ENDFORM. " DISPLAY_PO_HISTORY
*& Form DISPLAY_PO_HISTORY
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* -->P_LS_BASE_EBELN text
* -->P_LS_BASE_EBELP text
*----------------------------------------------------------------------*
FORM DISPLAY_PO_HISTORY USING PV_EBELN
PV_EBELP.
DATA : LV_EBELN TYPE EKKO-EBELN,
LV_EBELP TYPE EKPO-EBELP.
CLEAR : LV_EBELN, LV_EBELP.
CHECK PV_EBELN IS NOT INITIAL.
LV_EBELN = PV_EBELN.
LV_EBELP = PV_EBELP.
CALL FUNCTION 'MM_HISTORY_POPUP_SHOW'
EXPORTING
PI_EBELN = LV_EBELN
PI_EBELP = LV_EBELP
EXCEPTIONS
ERROR = 1
OTHERS = 2.
IF SY-SUBRC <> 0.
* Implement suitable error handling here
ENDIF.
ENDFORM. " DISPLAY_PO_HISTORY
PO History 펑션 감사합니다.
아이템번호도 필수로 꼭 넣어야 되네요.