Ansicht
Dokumentation

PPEHI_CMPVSTATUS_GETLIST - NOTRANSL: iPPE: Status nach Attribut finden

CL_GUI_FRONTEND_SERVICES - Frontend Services   BAL Application Log Documentation  
This documentation is copyright by SAP AG.

Functionality

You can use this API to determine status objects for a historical status of one or more variants from the product structure (assembly items and component variants).

Example

You can use the following report to test the module:

REPORT ZZZ.
************************************************************************
* Test function PPEHI_CMPVSTATUS_GETLIST
************************************************************************
DATA: ls_return,,,,,,TYPE bapiret2.
DATA: lt_return ,,,,TYPE TABLE OF bapiret2.

DATA: ls_changenoselection,,TYPE pvshi_cmpchangeno_id.
DATA: lt_changenoselection ,,TYPE TABLE OF pvshi_cmpchangeno_id.

DATA: ls_variantselection ,,,,TYPE pvshi_cmpvariant_list.
DATA: lt_variantselection ,,,,TYPE TABLE OF pvshi_cmpvariant_list.

DATA: ls_variantstatuslist ,,,,TYPE ppehi_cmpvstatus_list.
DATA: lt_variantstatuslist ,,,,TYPE TABLE OF ppehi_cmpvstatus_list.


SELECTION-SCREEN BEGIN OF BLOCK a WITH FRAME.
PARAMETERS: ,,mode_all ,,TYPE ppe_mode_all DEFAULT 'X'.
PARAMETERS: ,,msg_hand ,,TYPE ppe_msg_handler DEFAULT 'A'.
SELECTION-SCREEN END OF BLOCK a.
SELECTION-SCREEN SKIP.

SELECTION-SCREEN BEGIN OF BLOCK b WITH FRAME.
PARAMETERS: ,,aennr ,,TYPE pvs_aennr. ,,"Änderungsnummer
PARAMETERS: ,,variant ,,TYPE posvid-pvguid.,,"Variantenguid
SELECTION-SCREEN END OF BLOCK b.

* initialize
CALL FUNCTION 'PVSHI_INIT'.

IF NOT aennr IS INITIAL.
ls_changenoselection-change_no = aennr.
APPEND ls_changenoselection TO lt_changenoselection.
ENDIF.

IF NOT variant IS INITIAL.
ls_variantselection-variant_id = variant.
APPEND ls_variantselection TO lt_variantselection.
ENDIF.

CALL FUNCTION 'PPEHI_CMPVSTATUS_GETLIST'
EXPORTING
i_mode_all ,,,,= mode_all
i_msg_handling ,,= msg_hand
TABLES
changenoselection ,,= lt_changenoselection
variantselection ,,,,= lt_variantselection
variantstatuslist ,,,,= lt_variantstatuslist
return ,,,,= lt_return.

LOOP AT lt_variantstatuslist INTO ls_variantstatuslist.

WRITE:/ ,,ls_variantstatuslist-status_id,
,,ls_variantstatuslist-status_type.

ENDLOOP.
IF sy-subrc NE 0.
WRITE:/ 'No status values exist'.
ENDIF.

LOOP AT lt_return INTO ls_return.
WRITE:/ ,,ls_return-type, ls_return-id, ls_return-number.
WRITE:/ ,,ls_return-message(100).
ENDLOOP.

Notes

Further information

Parameters

CHANGENOSELECTION
I_MODE_ALL
I_MSG_HANDLING
RETURN
VARIANTSELECTION
VARIANTSTATUSLIST

Exceptions

Function Group

PPEHI_SCMPV

General Data in Customer Master   Fill RESBD Structure from EBP Component Structure  
This documentation is copyright by SAP AG.

Length: 3262 Date: 20240523 Time: 121631     sap01-206 ( 29 ms )