ABAP Select data from SAP table FLVN_LFB1_MEM into internal table

Get Example source ABAP code based on a different SAP table
  

Below is a number of ABAP code snippets to demonstrate how to select data from SAP FLVN_LFB1_MEM 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 FLVN_LFB1_MEM. 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 FLVN_LFB1_MEM 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_FLVN_LFB1_MEM TYPE STANDARD TABLE OF FLVN_LFB1_MEM,
      WA_FLVN_LFB1_MEM TYPE FLVN_LFB1_MEM,
      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: <FLVN_LFB1_MEM> TYPE FLVN_LFB1_MEM.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FLVN_LFB1_MEM
*  INTO TABLE @DATA(IT_FLVN_LFB1_MEM2).
*--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_FLVN_LFB1_MEM INDEX 1 INTO DATA(WA_FLVN_LFB1_MEM2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_FLVN_LFB1_MEM ASSIGNING <FLVN_LFB1_MEM>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<FLVN_LFB1_MEM>-MANDT = 1.
<FLVN_LFB1_MEM>-LIFNR = 1.
<FLVN_LFB1_MEM>-BUKRS = 1.
<FLVN_LFB1_MEM>-PERNR = 1.
<FLVN_LFB1_MEM>-ERDAT = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FLVN_LFB1_MEM-ERNAM, sy-vline,
WA_FLVN_LFB1_MEM-SPERR, sy-vline,
WA_FLVN_LFB1_MEM-LOEVM, sy-vline,
WA_FLVN_LFB1_MEM-ZUAWA, sy-vline,
WA_FLVN_LFB1_MEM-AKONT, sy-vline,
WA_FLVN_LFB1_MEM-BEGRU, sy-vline.
ENDLOOP. *Add any further fields from structure WA_FLVN_LFB1_MEM 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_FLVN_LFB1_MEM 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_FLVN_LFB1_MEM INTO WA_FLVN_LFB1_MEM. *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 ALPHA, internal->external for field LIFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_FLVN_LFB1_MEM-LIFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FLVN_LFB1_MEM-LIFNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field AKONT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_FLVN_LFB1_MEM-AKONT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FLVN_LFB1_MEM-AKONT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field FDGRV CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_FLVN_LFB1_MEM-FDGRV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FLVN_LFB1_MEM-FDGRV.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field LNRZE CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_FLVN_LFB1_MEM-LNRZE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FLVN_LFB1_MEM-LNRZE.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field LNRZB CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_FLVN_LFB1_MEM-LNRZB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FLVN_LFB1_MEM-LNRZB.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field WRBTR CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_FLVN_LFB1_MEM-WRBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FLVN_LFB1_MEM-WRBTR.
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_FLVN_LFB1_MEM_STR,
MANDT TYPE STRING,
LIFNR TYPE STRING,
BUKRS TYPE STRING,
PERNR TYPE STRING,
ERDAT TYPE STRING,
ERNAM TYPE STRING,
SPERR TYPE STRING,
LOEVM TYPE STRING,
ZUAWA TYPE STRING,
AKONT TYPE STRING,
BEGRU TYPE STRING,
VZSKZ TYPE STRING,
ZWELS TYPE STRING,
XVERR TYPE STRING,
ZAHLS TYPE STRING,
ZTERM TYPE STRING,
EIKTO TYPE STRING,
ZSABE TYPE STRING,
KVERM TYPE STRING,
FDGRV TYPE STRING,
BUSAB TYPE STRING,
LNRZE TYPE STRING,
LNRZB TYPE STRING,
ZINDT TYPE STRING,
ZINRT TYPE STRING,
DATLZ TYPE STRING,
XDEZV TYPE STRING,
WEBTR TYPE STRING,
KULTG TYPE STRING,
REPRF TYPE STRING,
TOGRU TYPE STRING,
HBKID TYPE STRING,
XPORE TYPE STRING,
QSZNR TYPE STRING,
QSZDT TYPE STRING,
QSSKZ TYPE STRING,
BLNKZ TYPE STRING,
MINDK TYPE STRING,
ALTKN TYPE STRING,
ZGRUP TYPE STRING,
MGRUP TYPE STRING,
UZAWE TYPE STRING,
QSREC TYPE STRING,
QSBGR TYPE STRING,
QLAND TYPE STRING,
XEDIP TYPE STRING,
FRGRP TYPE STRING,
TOGRR TYPE STRING,
TLFXS TYPE STRING,
INTAD TYPE STRING,
XLFZB TYPE STRING,
GUZTE TYPE STRING,
GRICD TYPE STRING,
GRIDT TYPE STRING,
XAUSZ TYPE STRING,
CERDT TYPE STRING,
CONFS TYPE STRING,
UPDAT TYPE STRING,
UPTIM TYPE STRING,
NODEL TYPE STRING,
TLFNS TYPE STRING,
AVSND TYPE STRING,
AD_HASH TYPE STRING,
CVP_XBLCK_B TYPE STRING,
CIIUCODE TYPE STRING,
PAYMENTCLEARINGGRPID TYPE STRING,
PAYTRSN TYPE STRING,
LFB1_EEW_CC TYPE STRING,
ZBOKD TYPE STRING,
ZQSSKZ TYPE STRING,
ZQSZDT TYPE STRING,
ZQSZNR TYPE STRING,
ZMINDAT TYPE STRING,
J_SC_SUBCONTYPE TYPE STRING,
J_SC_COMPDATE TYPE STRING,
J_SC_OFFSM TYPE STRING,
J_SC_OFFSR TYPE STRING,
BASIS_PNT TYPE STRING,
GMVKZK TYPE STRING,
BRSCH TYPE STRING,
WRBTR TYPE STRING,
WAERS TYPE STRING,
FORGN TYPE STRING,
SHARE_IN_FOREIGN TYPE STRING,
NOTES TYPE STRING,
ACTIVE TYPE STRING,
US_REC_COUNTRY TYPE STRING,
US_GIIN TYPE STRING,
US_FTID TYPE STRING,
US_REC_DOB TYPE STRING,
US_LOB_CODE TYPE STRING,
US_W8_RECVDATE TYPE STRING,
US_W9_RECVDATE TYPE STRING,
US_TIN_NOTICE TYPE STRING,
US_PARTNERSHIP_IND TYPE STRING,
US_FATCA_IND TYPE STRING,
PREPAY_RELEVANT TYPE STRING,
ASSIGN_TEST TYPE STRING,
KZ TYPE STRING,END OF T_EKKO_STR. DATA: WA_FLVN_LFB1_MEM_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_FLVN_LFB1_MEM_STR-MANDT sy-vline
WA_FLVN_LFB1_MEM_STR-LIFNR sy-vline
WA_FLVN_LFB1_MEM_STR-BUKRS sy-vline
WA_FLVN_LFB1_MEM_STR-PERNR sy-vline
WA_FLVN_LFB1_MEM_STR-ERDAT sy-vline
WA_FLVN_LFB1_MEM_STR-ERNAM sy-vline
WA_FLVN_LFB1_MEM_STR-SPERR sy-vline
WA_FLVN_LFB1_MEM_STR-LOEVM sy-vline
WA_FLVN_LFB1_MEM_STR-ZUAWA sy-vline
WA_FLVN_LFB1_MEM_STR-AKONT sy-vline
WA_FLVN_LFB1_MEM_STR-BEGRU sy-vline
WA_FLVN_LFB1_MEM_STR-VZSKZ sy-vline
WA_FLVN_LFB1_MEM_STR-ZWELS sy-vline
WA_FLVN_LFB1_MEM_STR-XVERR sy-vline
WA_FLVN_LFB1_MEM_STR-ZAHLS sy-vline
WA_FLVN_LFB1_MEM_STR-ZTERM sy-vline
WA_FLVN_LFB1_MEM_STR-EIKTO sy-vline
WA_FLVN_LFB1_MEM_STR-ZSABE sy-vline
WA_FLVN_LFB1_MEM_STR-KVERM sy-vline
WA_FLVN_LFB1_MEM_STR-FDGRV sy-vline
WA_FLVN_LFB1_MEM_STR-BUSAB sy-vline
WA_FLVN_LFB1_MEM_STR-LNRZE sy-vline
WA_FLVN_LFB1_MEM_STR-LNRZB sy-vline
WA_FLVN_LFB1_MEM_STR-ZINDT sy-vline
WA_FLVN_LFB1_MEM_STR-ZINRT sy-vline
WA_FLVN_LFB1_MEM_STR-DATLZ sy-vline
WA_FLVN_LFB1_MEM_STR-XDEZV sy-vline
WA_FLVN_LFB1_MEM_STR-WEBTR sy-vline
WA_FLVN_LFB1_MEM_STR-KULTG sy-vline
WA_FLVN_LFB1_MEM_STR-REPRF sy-vline
WA_FLVN_LFB1_MEM_STR-TOGRU sy-vline
WA_FLVN_LFB1_MEM_STR-HBKID sy-vline
WA_FLVN_LFB1_MEM_STR-XPORE sy-vline
WA_FLVN_LFB1_MEM_STR-QSZNR sy-vline
WA_FLVN_LFB1_MEM_STR-QSZDT sy-vline
WA_FLVN_LFB1_MEM_STR-QSSKZ sy-vline
WA_FLVN_LFB1_MEM_STR-BLNKZ sy-vline
WA_FLVN_LFB1_MEM_STR-MINDK sy-vline
WA_FLVN_LFB1_MEM_STR-ALTKN sy-vline
WA_FLVN_LFB1_MEM_STR-ZGRUP sy-vline
WA_FLVN_LFB1_MEM_STR-MGRUP sy-vline
WA_FLVN_LFB1_MEM_STR-UZAWE sy-vline
WA_FLVN_LFB1_MEM_STR-QSREC sy-vline
WA_FLVN_LFB1_MEM_STR-QSBGR sy-vline
WA_FLVN_LFB1_MEM_STR-QLAND sy-vline
WA_FLVN_LFB1_MEM_STR-XEDIP sy-vline
WA_FLVN_LFB1_MEM_STR-FRGRP sy-vline
WA_FLVN_LFB1_MEM_STR-TOGRR sy-vline
WA_FLVN_LFB1_MEM_STR-TLFXS sy-vline
WA_FLVN_LFB1_MEM_STR-INTAD sy-vline
WA_FLVN_LFB1_MEM_STR-XLFZB sy-vline
WA_FLVN_LFB1_MEM_STR-GUZTE sy-vline
WA_FLVN_LFB1_MEM_STR-GRICD sy-vline
WA_FLVN_LFB1_MEM_STR-GRIDT sy-vline
WA_FLVN_LFB1_MEM_STR-XAUSZ sy-vline
WA_FLVN_LFB1_MEM_STR-CERDT sy-vline
WA_FLVN_LFB1_MEM_STR-CONFS sy-vline
WA_FLVN_LFB1_MEM_STR-UPDAT sy-vline
WA_FLVN_LFB1_MEM_STR-UPTIM sy-vline
WA_FLVN_LFB1_MEM_STR-NODEL sy-vline
WA_FLVN_LFB1_MEM_STR-TLFNS sy-vline
WA_FLVN_LFB1_MEM_STR-AVSND sy-vline
WA_FLVN_LFB1_MEM_STR-AD_HASH sy-vline
WA_FLVN_LFB1_MEM_STR-CVP_XBLCK_B sy-vline
WA_FLVN_LFB1_MEM_STR-CIIUCODE sy-vline
WA_FLVN_LFB1_MEM_STR-PAYMENTCLEARINGGRPID sy-vline
WA_FLVN_LFB1_MEM_STR-PAYTRSN sy-vline
WA_FLVN_LFB1_MEM_STR-LFB1_EEW_CC sy-vline
WA_FLVN_LFB1_MEM_STR-ZBOKD sy-vline
WA_FLVN_LFB1_MEM_STR-ZQSSKZ sy-vline
WA_FLVN_LFB1_MEM_STR-ZQSZDT sy-vline
WA_FLVN_LFB1_MEM_STR-ZQSZNR sy-vline
WA_FLVN_LFB1_MEM_STR-ZMINDAT sy-vline
WA_FLVN_LFB1_MEM_STR-J_SC_SUBCONTYPE sy-vline
WA_FLVN_LFB1_MEM_STR-J_SC_COMPDATE sy-vline
WA_FLVN_LFB1_MEM_STR-J_SC_OFFSM sy-vline
WA_FLVN_LFB1_MEM_STR-J_SC_OFFSR sy-vline
WA_FLVN_LFB1_MEM_STR-BASIS_PNT sy-vline
WA_FLVN_LFB1_MEM_STR-GMVKZK sy-vline
WA_FLVN_LFB1_MEM_STR-BRSCH sy-vline
WA_FLVN_LFB1_MEM_STR-WRBTR sy-vline
WA_FLVN_LFB1_MEM_STR-WAERS sy-vline
WA_FLVN_LFB1_MEM_STR-FORGN sy-vline
WA_FLVN_LFB1_MEM_STR-SHARE_IN_FOREIGN sy-vline
WA_FLVN_LFB1_MEM_STR-NOTES sy-vline
WA_FLVN_LFB1_MEM_STR-ACTIVE sy-vline
WA_FLVN_LFB1_MEM_STR-US_REC_COUNTRY sy-vline
WA_FLVN_LFB1_MEM_STR-US_GIIN sy-vline
WA_FLVN_LFB1_MEM_STR-US_FTID sy-vline
WA_FLVN_LFB1_MEM_STR-US_REC_DOB sy-vline
WA_FLVN_LFB1_MEM_STR-US_LOB_CODE sy-vline
WA_FLVN_LFB1_MEM_STR-US_W8_RECVDATE sy-vline
WA_FLVN_LFB1_MEM_STR-US_W9_RECVDATE sy-vline
WA_FLVN_LFB1_MEM_STR-US_TIN_NOTICE sy-vline
WA_FLVN_LFB1_MEM_STR-US_PARTNERSHIP_IND sy-vline
WA_FLVN_LFB1_MEM_STR-US_FATCA_IND sy-vline
WA_FLVN_LFB1_MEM_STR-PREPAY_RELEVANT sy-vline
WA_FLVN_LFB1_MEM_STR-ASSIGN_TEST sy-vline
WA_FLVN_LFB1_MEM_STR-KZ sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.