Ansicht
Dokumentation
PPEHI_CMPVSTATUS_READ - iPPE: Status lesen
ABAP Short Reference ABAP Short ReferenceDiese Dokumentation steht unter dem Copyright der SAP AG.
Funktionalität
Mit dem Funktionsbaustein PPEHI_CMPVSTATUS_READ können Status und Vorbedingungen an den Varianten der Produktstruktur gelesen werden.
Beispiel
REPORT ZZZ.
************************************************************************
* Test function PPEHI_CMPVSTATUS_READ
************************************************************************
DATA: ls_return TYPE bapiret2.
DATA: lt_return TYPE TABLE OF bapiret2.
DATA: ls_variantstatusdata TYPE bapi1176002_variantstatus.
DATA: lt_variantstatusdata TYPE TABLE OF bapi1176002_variantstatus.
DATA: ls_variantpreconddata TYPE bapi1176002_variantprecond.
DATA: lt_variantpreconddata TYPE TABLE OF bapi1176002_variantprecond.
data: ls_ADMINDATA type PPEHI_CMPVSTATUS_ADMINDATA.
data: lt_ADMINDATA type table of PPEHI_CMPVSTATUS_ADMINDATA.
SELECTION-SCREEN BEGIN OF BLOCK a WITH FRAME.
PARAMETERS: mode TYPE ppe_mode_all DEFAULT 'X'.
PARAMETERS: msg_hand TYPE ppe_msg_handler DEFAULT 'A'.
SELECTION-SCREEN END OF BLOCK a.
SELECTION-SCREEN BEGIN OF BLOCK b WITH FRAME.
PARAMETERS: status TYPE pvs_guid.
PARAMETERS: type TYPE bapi1176002_variantstatus-status_type.
SELECTION-SCREEN END OF BLOCK b.
* initialize
CALL FUNCTION 'PVSHI_INIT'
exporting
I_MSG_HANDLING = mode
I_MSG_HANDLER = msg_hand.
ls_variantstatusdata-status_id = status.
ls_variantstatusdata-status_type = type.
APPEND ls_variantstatusdata TO lt_variantstatusdata.
CALL FUNCTION 'PPEHI_CMPVSTATUS_READ'
EXPORTING
I_MODE_ALL = 'X'
I_MSG_HANDLING = 'A'
TABLES
VARIANTSTATUSDATA = lt_variantstatusdata
VARIANTPRECONDDATA = lt_variantpreconddata
ADMINDATA = lt_ADMINDATA
RETURN = lt_return.
LOOP AT lt_variantstatusdata INTO ls_variantstatusdata.
WRITE:/ ls_variantstatusdata-status_id,
ls_variantstatusdata-status_type.
ENDLOOP.
IF sy-subrc NE 0.
WRITE:/ 'Keine Statuswerte vorhanden'.
ENDIF.
LOOP AT lt_variantpreconddata INTO ls_variantpreconddata.
WRITE:/ ls_variantpreconddata-status_id,
ls_variantpreconddata-status_type,
ls_variantpreconddata-PRECOND_TYPE,
ls_variantpreconddata-PRECOND_OK.
ENDLOOP.
IF sy-subrc NE 0.
WRITE:/ 'Keine Vorbedingungen vorhanden'.
ENDIF.
LOOP AT lt_ADMINDATA INTO ls_ADMINDATA.
WRITE:/ ls_ADMINDATA-status_id,
ls_ADMINDATA-status_type,
ls_ADMINDATA-PRECOND_TYPE,
ls_ADMINDATA-CREATED_BY,
ls_ADMINDATA-CREATED_DATE,
ls_ADMINDATA-CHANGED_BY,
ls_ADMINDATA-CHANGED_DATE.
ENDLOOP.
IF sy-subrc NE 0.
WRITE:/ 'Keine Admindaten vorhanden'.
ENDIF.
LOOP AT lt_return INTO ls_return.
WRITE:/ ls_return-type, ls_return-id, ls_return-number.
WRITE:/ ls_return-message(100).
ENDLOOP.
Hinweise
Weiterführende Informationen
Parameter
ADMINDATAI_MODE_ALL
I_MSG_HANDLING
RETURN
VARIANTPRECONDDATA
VARIANTSTATUSDATA
Ausnahmen
Funktionsgruppe
PPEHI_SCMPVFill RESBD Structure from EBP Component Structure RFUMSV00 - Advance Return for Tax on Sales/Purchases
Diese Dokumentation steht unter dem Copyright der SAP AG.
Length: 4013 Date: 20240523 Time: 082819 sap01-206 ( 30 ms )
