HINUPEPL4 SAP ABAP Include - Include ZHINUPEPL4

HINUPEPL4 is a standard ABAP Include available within your SAP system (depending on your version and release level). Below is the standard documentation available for this report and a few details of other objects it interacts with such as tables, function modules, includes etc. If you would like to see the full code listing simply enter HINUPEPL4 into the relevant SAP transaction such as SE38 or SE80

Contribute (Add Comments)
Below is the basic information available for SAP report HINUPEPL4 and is provided for your convenience to access as and when required. Although the basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.

The contribute/comments section below therefore offer's an opportunity for anyone to add additional information. This can be anything from useful hints, tips and screen shots to relevant SAP notes or anything else you feel is relevant to this report.

This will then be available for everyone to easily find by simply searching on the report name HINUPEPL4 or its description.

ABAP code:

ABAP code listing snippet for SAP ABAP Include HINUPEPL4

*&-------------------------------*
*&  INCLUDE           ZHINUPEPL4
*&-------------------------------*
*&-------------------------------*
*&      Form  GET_POLICY_DATA
*&-------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
FORM get_policy_data .
  TYPES: BEGIN OF ty_pogui ,
         pogui TYPE pin_pe_policy_guid,
         versn TYPE pin_pe_version,
         END OF ty_pogui.
  DATA: lt_pogui_ra TYPE TABLE OF  pinpev3,
        lt_t7inpei1 TYPE TABLE OF t7inpei1,
        lt_t7inpei1_temp TYPE TABLE OF t7inpei1,

....See full code listing within your SAP system using transactions such as SE80 and SE38

Includes used within report:

No INCLUDES are used within this report code!

Tables used within report and the associated select statement:

T7INPEL3
  SELECT * FROM t7inpel3 INTO CORRESPONDING FIELDS OF TABLE gt_policy_data. "#EC CI_NOWHERE

T7INPEI1
    SELECT * FROM t7inpei1 INTO TABLE lt_t7inpei1 FOR ALL ENTRIES IN gt_policy_data WHERE pogui EQ gt_policy_data-pogui
                                                                                    AND   versn eq gt_policy_data-versn. "#EC CI_NOWHERE

T7INPEI1T
    SELECT * FROM t7inpei1t INTO TABLE lt_t7inpei1t FOR ALL ENTRIES IN gt_policy_data WHERE pogui EQ gt_policy_data-pogui
                                                                                       AND spras EQ sy-langu.

T7INPEA4
  SELECT * FROM t7inpea4 INTO TABLE lt_t7inpea4 .       "#EC CI_NOWHERE

T7INPEA4T
    SELECT * FROM t7inpea4t INTO TABLE lt_t7inpea4t FOR ALL ENTRIES IN lt_t7inpea4 WHERE areky EQ lt_t7inpea4-areky
                                                                                   AND spras EQ sy-langu .

T7INPEI3
  SELECT * FROM t7inpei3 INTO TABLE lt_t7inpei3 .       "#EC CI_NOWHERE

T7INPEI3T
    SELECT * FROM t7inpei3t INTO TABLE lt_t7inpei3t FOR ALL ENTRIES IN lt_t7inpei3 WHERE grpid EQ lt_t7inpei3-grpid
                                                                                    AND spras EQ sy-langu.

T7INPEI2
  SELECT * FROM t7inpei2 INTO TABLE lt_t7inpei2.        "#EC CI_NOWHERE

T7INPEI2T
    SELECT * FROM t7inpei2t INTO TABLE lt_t7inpei2t FOR ALL ENTRIES IN lt_t7inpei2 WHERE potyp EQ lt_t7inpei2-potyp
                                                                              AND  spras EQ sy-langu.

T7INPEA4.
  SELECT * INTO CORRESPONDING FIELDS OF TABLE lt_areky FROM t7inpea4. "#EC CI_NOWHERE" Where areky Like s_pogrp.

T7INPEA4T
    SELECT * INTO TABLE lt_ardes FROM t7inpea4t FOR ALL ENTRIES IN lt_areky
                                    WHERE   areky EQ lt_areky-areky
                                    AND spras EQ sy-langu.

T7INPEI1.
  SELECT * INTO CORRESPONDING FIELDS OF TABLE lt_ponme FROM t7inpei1. "#EC CI_NOWHERE " Where areky Like s_potyp.

T7INPEI1T
    SELECT * INTO TABLE lt_podes FROM t7inpei1t FOR ALL ENTRIES IN lt_ponme
                                                WHERE pogui EQ lt_ponme-pogui
                                                AND   versn EQ lt_ponme-versn
                                                AND   spras EQ sy-langu.

T7INPEI1.
  SELECT * INTO CORRESPONDING FIELDS OF TABLE lt_ponme FROM t7inpei1. "#EC CI_NOWHERE " Where areky Like s_potyp.

T7INPEI1T
    SELECT * INTO TABLE lt_podes FROM t7inpei1t FOR ALL ENTRIES IN lt_ponme
                                                WHERE pogui EQ lt_ponme-pogui
                                                AND   versn EQ lt_ponme-versn
                                                AND   spras EQ sy-langu.

T7INPEI1
    SELECT * FROM t7inpei1 INTO CORRESPONDING FIELDS OF TABLE lt_t7inpei1 WHERE polid IN s_polid. "#EC CI_NOFIELD

T7INPEI1
    SELECT * FROM t7inpei1 INTO CORRESPONDING FIELDS OF TABLE lt_t7inpei1 . "#EC CI_NOWHERE

T7INPEI1
    SELECT * FROM t7inpei1 INTO CORRESPONDING FIELDS OF TABLE lt_t7inpei1 WHERE polid IN s_polid. "#EC CI_NOFIELD

T7INPEI1
    SELECT * FROM t7inpei1 INTO CORRESPONDING FIELDS OF TABLE lt_t7inpei1 . "#EC CI_NOWHERE

Function Modules used within report and the associated call statement:

GET_DOMAIN_VALUES CALL FUNCTION 'GET_DOMAIN_VALUES' EXPORTING domname = 'PIN_PE_POL_STATUS' text = 'X' * FILL_DD07L_TAB = ' ' TABLES values_tab = lt_posts * VALUES_DD07L = * EXCEPTIONS * NO_VALUES_FOUND = 1 * OTHERS = 2 .

GET_DOMAIN_VALUES CALL FUNCTION 'GET_DOMAIN_VALUES' EXPORTING domname = 'PIN_PE_POL_ACTVITY' text = 'X' * FILL_DD07L_TAB = ' ' TABLES values_tab = lt_poact * VALUES_DD07L = * EXCEPTIONS * NO_VALUES_FOUND = 1 * OTHERS = 2 .

DDIF_FIELDINFO_GET CALL FUNCTION 'DDIF_FIELDINFO_GET' EXPORTING tabname = 'T7INPEA4' fieldname = 'AREKY' TABLES dfies_tab = lt_field_data EXCEPTIONS not_found = 1 internal_error = 2 OTHERS = 3. "#EC FB_RC

DDIF_FIELDINFO_GET CALL FUNCTION 'DDIF_FIELDINFO_GET' EXPORTING tabname = 'T7INPEA4T' fieldname = 'DESCR' TABLES dfies_tab = lt_field_data EXCEPTIONS not_found = 1 internal_error = 2 OTHERS = 3. "#EC FB_RC

F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING retfield = 'P_AREKY' dynpprog = sy-repid dynpnr = sy-dynnr dynprofield = 'P_AREKY' value_org = 'C' TABLES value_tab = lt_values field_tab = lt_field_tab return_tab = lt_return_tab dynpfld_mapping = lt_dselc.

DDIF_FIELDINFO_GET CALL FUNCTION 'DDIF_FIELDINFO_GET' EXPORTING tabname = 'T7INPEI1' fieldname = 'POLID' TABLES dfies_tab = lt_field_data EXCEPTIONS not_found = 1 internal_error = 2 OTHERS = 3. "#EC FB_RC

DDIF_FIELDINFO_GET CALL FUNCTION 'DDIF_FIELDINFO_GET' EXPORTING tabname = 'T7INPEI1T' fieldname = 'DESCR' TABLES dfies_tab = lt_field_data EXCEPTIONS not_found = 1 internal_error = 2 OTHERS = 3. "#EC FB_RC

F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING retfield = 'S_POLID' dynpprog = sy-repid dynpnr = sy-dynnr dynprofield = 'S_POLID' value_org = 'C' TABLES value_tab = lt_values field_tab = lt_field_tab return_tab = lt_return_tab dynpfld_mapping = lt_dselc.

DDIF_FIELDINFO_GET CALL FUNCTION 'DDIF_FIELDINFO_GET' EXPORTING tabname = 'T7INPEI1' fieldname = 'VERSN' TABLES dfies_tab = lt_field_data EXCEPTIONS not_found = 1 internal_error = 2 OTHERS = 3. "#EC FB_RC

F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING retfield = 'S_VERSN' dynpprog = sy-repid dynpnr = sy-dynnr dynprofield = 'S_VERSN' value_org = 'C' TABLES value_tab = lt_values field_tab = lt_field_tab return_tab = lt_return_tab dynpfld_mapping = lt_dselc.

Text pool values

Title: Include ZHINUPEPL4

HINUPEPL3

HINUPERL01