ABAP Select data from SAP table FIWTIN_BHEADER into internal table

Get Example source ABAP code based on a different SAP table
  Get ABAP code

Below is a number of ABAP code snippets to demonstrate how to select data from SAP FIWTIN_BHEADER table and store it within an internal table, including using the newer @DATA inline declaration methods. It also shows you various ways to process this data using ABAP work area, inline declaration or field symbols including executing all the relevant CONVERSION_EXIT routines specific to FIWTIN_BHEADER. See here for more generic Select statement tips.

Sometimes data within SAP is stored within the database table in a different format to what it is displayed to the user. These input/output conversation FM routines are what translates the data between the two formats.

There is also a full declaration of the FIWTIN_BHEADER table where each field has a char/string type for you to simply copy and paste. This allows you to use processing that is only available to these field types such as the CONCATENATE statement.

DATA: IT_FIWTIN_BHEADER TYPE STANDARD TABLE OF FIWTIN_BHEADER,
      WA_FIWTIN_BHEADER TYPE FIWTIN_BHEADER,
      GD_STR TYPE STRING.

DATA: lo_typedescr type REF TO cl_abap_typedescr.
DATA: lv_fieldname type fieldname.

FIELD-SYMBOLS: <FIELD> TYPE any.
FIELD-SYMBOLS: <FIWTIN_BHEADER> TYPE FIWTIN_BHEADER.

*Process all fields in table header/work area as string values
  PERFORM process_as_string_field_values CHANGING wa_FIWTIN_BHEADER.

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM FIWTIN_BHEADER
  INTO TABLE IT_FIWTIN_BHEADER.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FIWTIN_BHEADER
*  INTO TABLE @DATA(IT_FIWTIN_BHEADER2).
*--Further methods of using ABAP code to  select data from SAP database tables

*You can also declare the header/work area using the in-line DATA declaration method
READ TABLE IT_FIWTIN_BHEADER INDEX 1 INTO DATA(WA_FIWTIN_BHEADER2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_FIWTIN_BHEADER ASSIGNING <FIWTIN_BHEADER>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
<FIWTIN_BHEADER>-BRECTYP = 1.
<FIWTIN_BHEADER>-BATCHNO = 1.
<FIWTIN_BHEADER>-CHALLANCNT = 1.
<FIWTIN_BHEADER>-FORMNO = 1.
<FIWTIN_BHEADER>-PRERRRNO = 1.

ENDLOOP.

LOOP AT IT_FIWTIN_BHEADER INTO WA_FIWTIN_BHEADER.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FIWTIN_BHEADER-TANNO, sy-vline,
  WA_FIWTIN_BHEADER-RECEIPTNO, sy-vline,
  WA_FIWTIN_BHEADER-PANNO, sy-vline,
  WA_FIWTIN_BHEADER-ASSESMENTYEAR, sy-vline,
  WA_FIWTIN_BHEADER-FISCALYEAR, sy-vline,
  WA_FIWTIN_BHEADER-PERIOD, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_FIWTIN_BHEADER you want to display...

  WRITE:/ sy-uline.
* Aternatively use generic code to Write field values (and NAME) to screen report
  DO.
    ASSIGN COMPONENT sy-index OF STRUCTURE wa_FIWTIN_BHEADER TO <field>.
    IF sy-subrc <> 0. EXIT. ENDIF.
    WRITE:/ 'Field Value', <field>, sy-vline.
    gd_str = <field> .
    lo_typedescr ?= CL_ABAP_DATADESCR=>DESCRIBE_BY_DATA( <field> ).
    lv_fieldname = lo_typedescr->GET_RELATIVE_NAME( ).
    WRITE:/ 'Field Name', lv_fieldname.
  ENDDO.

  
*Redo loop but convert all fields from internal to out value  
LOOP AT IT_FIWTIN_BHEADER INTO WA_FIWTIN_BHEADER.


*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Convert all fields to display/output versions using conversion routines
  PERFORM convert_all_field_values CHANGING wa_EKKO.
	 
ENDLOOP.

  
*&---------------------------------------------------------------------*
*& Form convert_all_field_values
*&---------------------------------------------------------------------*
FORM convert_all_field_values CHANGING p_EKKO LIKE wa_EKKO.
DATA: ld_input(1000) TYPE c, ld_output(1000) TYPE C.

*Conversion exit AU152, internal->external for field TOTDEPAMT
CALL FUNCTION 'CONVERSION_EXIT_AU152_OUTPUT'
  EXPORTING
    input =                      WA_FIWTIN_BHEADER-TOTDEPAMT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FIWTIN_BHEADER-TOTDEPAMT.
WRITE:/ 'New Value:', ld_input.
ENDFORM. 

*&---------------------------------------------------------------------*
*& Form process_as_string_field_values
*&---------------------------------------------------------------------*
FORM process_as_string_field_values CHANGING p_EKKO LIKE wa_EKKO.

TYPES: BEGIN OF T_FIWTIN_BHEADER_STR, 
BRECTYP TYPE STRING,
BATCHNO TYPE STRING,
CHALLANCNT TYPE STRING,
FORMNO TYPE STRING,
PRERRRNO TYPE STRING,
TANNO TYPE STRING,
RECEIPTNO TYPE STRING,
PANNO TYPE STRING,
ASSESMENTYEAR TYPE STRING,
FISCALYEAR TYPE STRING,
PERIOD TYPE STRING,
DEDU_NAME TYPE STRING,
DEDU_BRANCH TYPE STRING,
DEDU_ADDR1 TYPE STRING,
DEDU_ADDR2 TYPE STRING,
DEDU_ADDR3 TYPE STRING,
DEDU_ADDR4 TYPE STRING,
DEDU_ADDR5 TYPE STRING,
DEDU_STATE TYPE STRING,
DEDU_PINCODE TYPE STRING,
DEDU_MAILID TYPE STRING,
DEDU_STD TYPE STRING,
DEDU_TELNO TYPE STRING,
DEDU_ADDRCHANGE TYPE STRING,
DEDU_TYPE TYPE STRING,
RESP_NAME TYPE STRING,
RESP_DESIG TYPE STRING,
RESP_ADDR1 TYPE STRING,
RESP_ADDR2 TYPE STRING,
RESP_ADDR3 TYPE STRING,
RESP_ADDR4 TYPE STRING,
RESP_ADDR5 TYPE STRING,
RESP_STATE TYPE STRING,
RESP_PINCODE TYPE STRING,
RESP_EMAILID TYPE STRING,
RESP_MOBILE TYPE STRING,
RESP_STD TYPE STRING,
RESP_TELNO TYPE STRING,
RESP_ADDRCHANGE TYPE STRING,
TOTDEPAMT TYPE STRING,
CHALLAN_UNMATCH TYPE STRING,
AOAPPROVAL TYPE STRING,
AOAPPROVALNO TYPE STRING,
LASTDEDTYPE TYPE STRING,
STATE TYPE STRING,
PAOCODE TYPE STRING,
DDOCODE TYPE STRING,
MINISTRY TYPE STRING,
MINISTRYNAME TYPE STRING,
RESPANNO TYPE STRING,
PAOREGNO TYPE STRING,
DDOREGNO TYPE STRING,
ALT_DEDU_STD TYPE STRING,
ALT_DEDU_TELNO TYPE STRING,
ALT_DEDU_EMAILID TYPE STRING,
ALT_RESP_STD TYPE STRING,
ALT_RESP_TELNO TYPE STRING,
ALT_RESP_EMAILID TYPE STRING,
AIN TYPE STRING,
GSTN_NUMBER TYPE STRING,END OF T_EKKO_STR.
DATA: WA_FIWTIN_BHEADER_STR type T_EKKO_STR.

DATA: ld_text TYPE string.

LOOP AT IT_EKKO INTO WA_EKKO.
  MOVE-CORRESPONDING wa_EKKO TO WA_EKKO_STR.
  CONCATENATE: sy-vline
WA_FIWTIN_BHEADER_STR-BRECTYP sy-vline 
WA_FIWTIN_BHEADER_STR-BATCHNO sy-vline 
WA_FIWTIN_BHEADER_STR-CHALLANCNT sy-vline 
WA_FIWTIN_BHEADER_STR-FORMNO sy-vline 
WA_FIWTIN_BHEADER_STR-PRERRRNO sy-vline 
WA_FIWTIN_BHEADER_STR-TANNO sy-vline 
WA_FIWTIN_BHEADER_STR-RECEIPTNO sy-vline 
WA_FIWTIN_BHEADER_STR-PANNO sy-vline 
WA_FIWTIN_BHEADER_STR-ASSESMENTYEAR sy-vline 
WA_FIWTIN_BHEADER_STR-FISCALYEAR sy-vline 
WA_FIWTIN_BHEADER_STR-PERIOD sy-vline 
WA_FIWTIN_BHEADER_STR-DEDU_NAME sy-vline 
WA_FIWTIN_BHEADER_STR-DEDU_BRANCH sy-vline 
WA_FIWTIN_BHEADER_STR-DEDU_ADDR1 sy-vline 
WA_FIWTIN_BHEADER_STR-DEDU_ADDR2 sy-vline 
WA_FIWTIN_BHEADER_STR-DEDU_ADDR3 sy-vline 
WA_FIWTIN_BHEADER_STR-DEDU_ADDR4 sy-vline 
WA_FIWTIN_BHEADER_STR-DEDU_ADDR5 sy-vline 
WA_FIWTIN_BHEADER_STR-DEDU_STATE sy-vline 
WA_FIWTIN_BHEADER_STR-DEDU_PINCODE sy-vline 
WA_FIWTIN_BHEADER_STR-DEDU_MAILID sy-vline 
WA_FIWTIN_BHEADER_STR-DEDU_STD sy-vline 
WA_FIWTIN_BHEADER_STR-DEDU_TELNO sy-vline 
WA_FIWTIN_BHEADER_STR-DEDU_ADDRCHANGE sy-vline 
WA_FIWTIN_BHEADER_STR-DEDU_TYPE sy-vline 
WA_FIWTIN_BHEADER_STR-RESP_NAME sy-vline 
WA_FIWTIN_BHEADER_STR-RESP_DESIG sy-vline 
WA_FIWTIN_BHEADER_STR-RESP_ADDR1 sy-vline 
WA_FIWTIN_BHEADER_STR-RESP_ADDR2 sy-vline 
WA_FIWTIN_BHEADER_STR-RESP_ADDR3 sy-vline 
WA_FIWTIN_BHEADER_STR-RESP_ADDR4 sy-vline 
WA_FIWTIN_BHEADER_STR-RESP_ADDR5 sy-vline 
WA_FIWTIN_BHEADER_STR-RESP_STATE sy-vline 
WA_FIWTIN_BHEADER_STR-RESP_PINCODE sy-vline 
WA_FIWTIN_BHEADER_STR-RESP_EMAILID sy-vline 
WA_FIWTIN_BHEADER_STR-RESP_MOBILE sy-vline 
WA_FIWTIN_BHEADER_STR-RESP_STD sy-vline 
WA_FIWTIN_BHEADER_STR-RESP_TELNO sy-vline 
WA_FIWTIN_BHEADER_STR-RESP_ADDRCHANGE sy-vline 
WA_FIWTIN_BHEADER_STR-TOTDEPAMT sy-vline 
WA_FIWTIN_BHEADER_STR-CHALLAN_UNMATCH sy-vline 
WA_FIWTIN_BHEADER_STR-AOAPPROVAL sy-vline 
WA_FIWTIN_BHEADER_STR-AOAPPROVALNO sy-vline 
WA_FIWTIN_BHEADER_STR-LASTDEDTYPE sy-vline 
WA_FIWTIN_BHEADER_STR-STATE sy-vline 
WA_FIWTIN_BHEADER_STR-PAOCODE sy-vline 
WA_FIWTIN_BHEADER_STR-DDOCODE sy-vline 
WA_FIWTIN_BHEADER_STR-MINISTRY sy-vline 
WA_FIWTIN_BHEADER_STR-MINISTRYNAME sy-vline 
WA_FIWTIN_BHEADER_STR-RESPANNO sy-vline 
WA_FIWTIN_BHEADER_STR-PAOREGNO sy-vline 
WA_FIWTIN_BHEADER_STR-DDOREGNO sy-vline 
WA_FIWTIN_BHEADER_STR-ALT_DEDU_STD sy-vline 
WA_FIWTIN_BHEADER_STR-ALT_DEDU_TELNO sy-vline 
WA_FIWTIN_BHEADER_STR-ALT_DEDU_EMAILID sy-vline 
WA_FIWTIN_BHEADER_STR-ALT_RESP_STD sy-vline 
WA_FIWTIN_BHEADER_STR-ALT_RESP_TELNO sy-vline 
WA_FIWTIN_BHEADER_STR-ALT_RESP_EMAILID sy-vline 
WA_FIWTIN_BHEADER_STR-AIN sy-vline 
WA_FIWTIN_BHEADER_STR-GSTN_NUMBER sy-vline      INTO ld_text SEPARATED BY SPACE.

*Add any further fields from structure WA_EKKO_STR you want to CONCATENATE...
ENDLOOP.
ENDFORM.