ABAP Select data from SAP table FMSAMTVENDOR 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 FMSAMTVENDOR 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 FMSAMTVENDOR. 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 FMSAMTVENDOR 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_FMSAMTVENDOR TYPE STANDARD TABLE OF FMSAMTVENDOR,
      WA_FMSAMTVENDOR TYPE FMSAMTVENDOR,
      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: <FMSAMTVENDOR> TYPE FMSAMTVENDOR.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FMSAMTVENDOR
*  INTO TABLE @DATA(IT_FMSAMTVENDOR2).
*--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_FMSAMTVENDOR INDEX 1 INTO DATA(WA_FMSAMTVENDOR2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<FMSAMTVENDOR>-MANDT = 1.
<FMSAMTVENDOR>-SAM_UE_ID = 1.
<FMSAMTVENDOR>-SAM_EFT_IND = 1.
<FMSAMTVENDOR>-DUNS = 1.
<FMSAMTVENDOR>-CAGE = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FMSAMTVENDOR-DODAAC, sy-vline,
  WA_FMSAMTVENDOR-EXCODE, sy-vline,
  WA_FMSAMTVENDOR-PUR_REG_CODE, sy-vline,
  WA_FMSAMTVENDOR-REGSTAT, sy-vline,
  WA_FMSAMTVENDOR-REGDATE, sy-vline,
  WA_FMSAMTVENDOR-EXPDATE, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_FMSAMTVENDOR 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_FMSAMTVENDOR 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_FMSAMTVENDOR INTO WA_FMSAMTVENDOR.


*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.
ENDFORM. 

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

TYPES: BEGIN OF T_FMSAMTVENDOR_STR, 
MANDT TYPE STRING,
SAM_UE_ID TYPE STRING,
SAM_EFT_IND TYPE STRING,
DUNS TYPE STRING,
CAGE TYPE STRING,
DODAAC TYPE STRING,
EXCODE TYPE STRING,
PUR_REG_CODE TYPE STRING,
REGSTAT TYPE STRING,
REGDATE TYPE STRING,
EXPDATE TYPE STRING,
LASTUPDATE TYPE STRING,
ACTDATE TYPE STRING,
BUSNAME TYPE STRING,
DBANAME TYPE STRING,
COMPDIV TYPE STRING,
DIVNUM TYPE STRING,
STADD1 TYPE STRING,
STADD2 TYPE STRING,
CITY TYPE STRING,
STATE_PROVINCE TYPE STRING,
ZIP_POSTAL_CODE TYPE STRING,
ZIP_CODE_4 TYPE STRING,
COUNTRY TYPE STRING,
DISTRICT TYPE STRING,
DBOPENDATAFLG TYPE STRING,
BUSSTART TYPE STRING,
FISCEND TYPE STRING,
COSECLVL TYPE STRING,
EMSECLVL TYPE STRING,
URL TYPE STRING,
ENTSTRUCT TYPE STRING,
STATEINC TYPE STRING,
COUNTRYINC TYPE STRING,
BUSTYPECNT TYPE STRING,
BUSTYPES TYPE STRING,
BUSTYP01 TYPE STRING,
BUSTYP02 TYPE STRING,
BUSTYP03 TYPE STRING,
BUSTYP04 TYPE STRING,
BUSTYP05 TYPE STRING,
BUSTYP06 TYPE STRING,
BUSTYP07 TYPE STRING,
BUSTYP08 TYPE STRING,
BUSTYP09 TYPE STRING,
BUSTYP10 TYPE STRING,
AGCY_BUS_PUR TYPE STRING,
PRIMARY_NAICS TYPE STRING,
NAICSCNT TYPE STRING,
NAICS TYPE STRING,
NAICS01 TYPE STRING,
NAICS02 TYPE STRING,
NAICS03 TYPE STRING,
NAICS04 TYPE STRING,
NAICS05 TYPE STRING,
NAICS06 TYPE STRING,
NAICS07 TYPE STRING,
NAICS08 TYPE STRING,
NAICS09 TYPE STRING,
NAICS10 TYPE STRING,
NAICS11 TYPE STRING,
NAICS12 TYPE STRING,
NAICS13 TYPE STRING,
NAICS14 TYPE STRING,
NAICS15 TYPE STRING,
NAICS16 TYPE STRING,
NAICS17 TYPE STRING,
NAICS18 TYPE STRING,
NAICS19 TYPE STRING,
NAICS20 TYPE STRING,
PSCCODECNT TYPE STRING,
PSCCODE TYPE STRING,
PSC01 TYPE STRING,
PSC02 TYPE STRING,
PSC03 TYPE STRING,
PSC04 TYPE STRING,
PSC05 TYPE STRING,
PSC06 TYPE STRING,
PSC07 TYPE STRING,
PSC08 TYPE STRING,
PSC09 TYPE STRING,
PSC10 TYPE STRING,
CREDCARD TYPE STRING,
CORRFLAG TYPE STRING,
EVSOUTOFBUS TYPE STRING,
EVSMLASTUPD TYPE STRING,
EVSMSTATUS TYPE STRING,
EDI TYPE STRING,
EDIVAN TYPE STRING,
EDIISAQ TYPE STRING,
EDIISASQ TYPE STRING,
FUNCGRPID TYPE STRING,
EDIREC820 TYPE STRING,
TAXIDTYP TYPE STRING,
TAXID TYPE STRING,
AVGNUMEMP TYPE STRING,
ANNUALREV TYPE STRING,
FININST TYPE STRING,
ACCNTNO TYPE STRING,
ABAROUTE TYPE STRING,
ACCNTTYPE TYPE STRING,
LOCKBOXNO TYPE STRING,
AUTHDATE TYPE STRING,
EFTWAIVER TYPE STRING,
MPIN TYPE STRING,
NAICSEXCCNT TYPE STRING,
NAICSEXC01 TYPE STRING,
NAICSEXC02 TYPE STRING,
NAICSEXC03 TYPE STRING,
NAICSEXC04 TYPE STRING,
NAICSEXC05 TYPE STRING,
NAICSEXC06 TYPE STRING,
NAICSEXC07 TYPE STRING,
NAICSEXC08 TYPE STRING,
NAICSEXC09 TYPE STRING,
NAICSEXC10 TYPE STRING,
DEBTOFFSET TYPE STRING,
EXCLSTATFLAG TYPE STRING,
SBABUSTYPCNT TYPE STRING,
SBABUSTYP01 TYPE STRING,
SBABUSTYP02 TYPE STRING,
SBABUSTYP03 TYPE STRING,
SBABUSTYP04 TYPE STRING,
SBABUSTYP05 TYPE STRING,
SBABUSTYP06 TYPE STRING,
SBABUSTYP07 TYPE STRING,
SBABUSTYP08 TYPE STRING,
SBABUSTYP09 TYPE STRING,
SBABUSTYP10 TYPE STRING,
SAMNUMCNT TYPE STRING,
NUMCODE01 TYPE STRING,
NUMCODE02 TYPE STRING,
NUMCODE03 TYPE STRING,
NUMCODE04 TYPE STRING,
NUMCODE05 TYPE STRING,
NUMCODE06 TYPE STRING,
NUMCODE07 TYPE STRING,
NUMCODE08 TYPE STRING,
NUMCODE09 TYPE STRING,
NUMCODE10 TYPE STRING,
NOPUBDISPLAY TYPE STRING,
DISRESPCNT TYPE STRING,
DISRESP01 TYPE STRING,
DISRESP02 TYPE STRING,
DISRESP03 TYPE STRING,
DISRESP04 TYPE STRING,
DISRESP05 TYPE STRING,
DISRESP06 TYPE STRING,
DISRESP07 TYPE STRING,
DISRESP08 TYPE STRING,
DISRESP09 TYPE STRING,
DISRESP10 TYPE STRING,
ANNUAL_IGT_REV TYPE STRING,
MERCHANTID1 TYPE STRING,
MERCHANTID2 TYPE STRING,
ACCNT_STATION TYPE STRING,
SOURCE TYPE STRING,
DEPARTMENT_CODE TYPE STRING,
HIER_DEP_CODE TYPE STRING,
HIER_DEP_NAME TYPE STRING,
HIER_AGCY_CODE TYPE STRING,
HIER_AGCY_NAME TYPE STRING,
HIER_OFFICE_CODE TYPE STRING,
TAXPAYERNAME TYPE STRING,
PARENTDUNS TYPE STRING,
PARENTUEI TYPE STRING,
ACH_US_PHONE TYPE STRING,
ACH_NUS_PHONE TYPE STRING,
ACH_FAX TYPE STRING,
ACH_EMAIL TYPE STRING,END OF T_EKKO_STR.
DATA: WA_FMSAMTVENDOR_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_FMSAMTVENDOR_STR-MANDT sy-vline 
WA_FMSAMTVENDOR_STR-SAM_UE_ID sy-vline 
WA_FMSAMTVENDOR_STR-SAM_EFT_IND sy-vline 
WA_FMSAMTVENDOR_STR-DUNS sy-vline 
WA_FMSAMTVENDOR_STR-CAGE sy-vline 
WA_FMSAMTVENDOR_STR-DODAAC sy-vline 
WA_FMSAMTVENDOR_STR-EXCODE sy-vline 
WA_FMSAMTVENDOR_STR-PUR_REG_CODE sy-vline 
WA_FMSAMTVENDOR_STR-REGSTAT sy-vline 
WA_FMSAMTVENDOR_STR-REGDATE sy-vline 
WA_FMSAMTVENDOR_STR-EXPDATE sy-vline 
WA_FMSAMTVENDOR_STR-LASTUPDATE sy-vline 
WA_FMSAMTVENDOR_STR-ACTDATE sy-vline 
WA_FMSAMTVENDOR_STR-BUSNAME sy-vline 
WA_FMSAMTVENDOR_STR-DBANAME sy-vline 
WA_FMSAMTVENDOR_STR-COMPDIV sy-vline 
WA_FMSAMTVENDOR_STR-DIVNUM sy-vline 
WA_FMSAMTVENDOR_STR-STADD1 sy-vline 
WA_FMSAMTVENDOR_STR-STADD2 sy-vline 
WA_FMSAMTVENDOR_STR-CITY sy-vline 
WA_FMSAMTVENDOR_STR-STATE_PROVINCE sy-vline 
WA_FMSAMTVENDOR_STR-ZIP_POSTAL_CODE sy-vline 
WA_FMSAMTVENDOR_STR-ZIP_CODE_4 sy-vline 
WA_FMSAMTVENDOR_STR-COUNTRY sy-vline 
WA_FMSAMTVENDOR_STR-DISTRICT sy-vline 
WA_FMSAMTVENDOR_STR-DBOPENDATAFLG sy-vline 
WA_FMSAMTVENDOR_STR-BUSSTART sy-vline 
WA_FMSAMTVENDOR_STR-FISCEND sy-vline 
WA_FMSAMTVENDOR_STR-COSECLVL sy-vline 
WA_FMSAMTVENDOR_STR-EMSECLVL sy-vline 
WA_FMSAMTVENDOR_STR-URL sy-vline 
WA_FMSAMTVENDOR_STR-ENTSTRUCT sy-vline 
WA_FMSAMTVENDOR_STR-STATEINC sy-vline 
WA_FMSAMTVENDOR_STR-COUNTRYINC sy-vline 
WA_FMSAMTVENDOR_STR-BUSTYPECNT sy-vline 
WA_FMSAMTVENDOR_STR-BUSTYPES sy-vline 
WA_FMSAMTVENDOR_STR-BUSTYP01 sy-vline 
WA_FMSAMTVENDOR_STR-BUSTYP02 sy-vline 
WA_FMSAMTVENDOR_STR-BUSTYP03 sy-vline 
WA_FMSAMTVENDOR_STR-BUSTYP04 sy-vline 
WA_FMSAMTVENDOR_STR-BUSTYP05 sy-vline 
WA_FMSAMTVENDOR_STR-BUSTYP06 sy-vline 
WA_FMSAMTVENDOR_STR-BUSTYP07 sy-vline 
WA_FMSAMTVENDOR_STR-BUSTYP08 sy-vline 
WA_FMSAMTVENDOR_STR-BUSTYP09 sy-vline 
WA_FMSAMTVENDOR_STR-BUSTYP10 sy-vline 
WA_FMSAMTVENDOR_STR-AGCY_BUS_PUR sy-vline 
WA_FMSAMTVENDOR_STR-PRIMARY_NAICS sy-vline 
WA_FMSAMTVENDOR_STR-NAICSCNT sy-vline 
WA_FMSAMTVENDOR_STR-NAICS sy-vline 
WA_FMSAMTVENDOR_STR-NAICS01 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS02 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS03 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS04 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS05 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS06 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS07 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS08 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS09 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS10 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS11 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS12 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS13 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS14 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS15 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS16 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS17 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS18 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS19 sy-vline 
WA_FMSAMTVENDOR_STR-NAICS20 sy-vline 
WA_FMSAMTVENDOR_STR-PSCCODECNT sy-vline 
WA_FMSAMTVENDOR_STR-PSCCODE sy-vline 
WA_FMSAMTVENDOR_STR-PSC01 sy-vline 
WA_FMSAMTVENDOR_STR-PSC02 sy-vline 
WA_FMSAMTVENDOR_STR-PSC03 sy-vline 
WA_FMSAMTVENDOR_STR-PSC04 sy-vline 
WA_FMSAMTVENDOR_STR-PSC05 sy-vline 
WA_FMSAMTVENDOR_STR-PSC06 sy-vline 
WA_FMSAMTVENDOR_STR-PSC07 sy-vline 
WA_FMSAMTVENDOR_STR-PSC08 sy-vline 
WA_FMSAMTVENDOR_STR-PSC09 sy-vline 
WA_FMSAMTVENDOR_STR-PSC10 sy-vline 
WA_FMSAMTVENDOR_STR-CREDCARD sy-vline 
WA_FMSAMTVENDOR_STR-CORRFLAG sy-vline 
WA_FMSAMTVENDOR_STR-EVSOUTOFBUS sy-vline 
WA_FMSAMTVENDOR_STR-EVSMLASTUPD sy-vline 
WA_FMSAMTVENDOR_STR-EVSMSTATUS sy-vline 
WA_FMSAMTVENDOR_STR-EDI sy-vline 
WA_FMSAMTVENDOR_STR-EDIVAN sy-vline 
WA_FMSAMTVENDOR_STR-EDIISAQ sy-vline 
WA_FMSAMTVENDOR_STR-EDIISASQ sy-vline 
WA_FMSAMTVENDOR_STR-FUNCGRPID sy-vline 
WA_FMSAMTVENDOR_STR-EDIREC820 sy-vline 
WA_FMSAMTVENDOR_STR-TAXIDTYP sy-vline 
WA_FMSAMTVENDOR_STR-TAXID sy-vline 
WA_FMSAMTVENDOR_STR-AVGNUMEMP sy-vline 
WA_FMSAMTVENDOR_STR-ANNUALREV sy-vline 
WA_FMSAMTVENDOR_STR-FININST sy-vline 
WA_FMSAMTVENDOR_STR-ACCNTNO sy-vline 
WA_FMSAMTVENDOR_STR-ABAROUTE sy-vline 
WA_FMSAMTVENDOR_STR-ACCNTTYPE sy-vline 
WA_FMSAMTVENDOR_STR-LOCKBOXNO sy-vline 
WA_FMSAMTVENDOR_STR-AUTHDATE sy-vline 
WA_FMSAMTVENDOR_STR-EFTWAIVER sy-vline 
WA_FMSAMTVENDOR_STR-MPIN sy-vline 
WA_FMSAMTVENDOR_STR-NAICSEXCCNT sy-vline 
WA_FMSAMTVENDOR_STR-NAICSEXC01 sy-vline 
WA_FMSAMTVENDOR_STR-NAICSEXC02 sy-vline 
WA_FMSAMTVENDOR_STR-NAICSEXC03 sy-vline 
WA_FMSAMTVENDOR_STR-NAICSEXC04 sy-vline 
WA_FMSAMTVENDOR_STR-NAICSEXC05 sy-vline 
WA_FMSAMTVENDOR_STR-NAICSEXC06 sy-vline 
WA_FMSAMTVENDOR_STR-NAICSEXC07 sy-vline 
WA_FMSAMTVENDOR_STR-NAICSEXC08 sy-vline 
WA_FMSAMTVENDOR_STR-NAICSEXC09 sy-vline 
WA_FMSAMTVENDOR_STR-NAICSEXC10 sy-vline 
WA_FMSAMTVENDOR_STR-DEBTOFFSET sy-vline 
WA_FMSAMTVENDOR_STR-EXCLSTATFLAG sy-vline 
WA_FMSAMTVENDOR_STR-SBABUSTYPCNT sy-vline 
WA_FMSAMTVENDOR_STR-SBABUSTYP01 sy-vline 
WA_FMSAMTVENDOR_STR-SBABUSTYP02 sy-vline 
WA_FMSAMTVENDOR_STR-SBABUSTYP03 sy-vline 
WA_FMSAMTVENDOR_STR-SBABUSTYP04 sy-vline 
WA_FMSAMTVENDOR_STR-SBABUSTYP05 sy-vline 
WA_FMSAMTVENDOR_STR-SBABUSTYP06 sy-vline 
WA_FMSAMTVENDOR_STR-SBABUSTYP07 sy-vline 
WA_FMSAMTVENDOR_STR-SBABUSTYP08 sy-vline 
WA_FMSAMTVENDOR_STR-SBABUSTYP09 sy-vline 
WA_FMSAMTVENDOR_STR-SBABUSTYP10 sy-vline 
WA_FMSAMTVENDOR_STR-SAMNUMCNT sy-vline 
WA_FMSAMTVENDOR_STR-NUMCODE01 sy-vline 
WA_FMSAMTVENDOR_STR-NUMCODE02 sy-vline 
WA_FMSAMTVENDOR_STR-NUMCODE03 sy-vline 
WA_FMSAMTVENDOR_STR-NUMCODE04 sy-vline 
WA_FMSAMTVENDOR_STR-NUMCODE05 sy-vline 
WA_FMSAMTVENDOR_STR-NUMCODE06 sy-vline 
WA_FMSAMTVENDOR_STR-NUMCODE07 sy-vline 
WA_FMSAMTVENDOR_STR-NUMCODE08 sy-vline 
WA_FMSAMTVENDOR_STR-NUMCODE09 sy-vline 
WA_FMSAMTVENDOR_STR-NUMCODE10 sy-vline 
WA_FMSAMTVENDOR_STR-NOPUBDISPLAY sy-vline 
WA_FMSAMTVENDOR_STR-DISRESPCNT sy-vline 
WA_FMSAMTVENDOR_STR-DISRESP01 sy-vline 
WA_FMSAMTVENDOR_STR-DISRESP02 sy-vline 
WA_FMSAMTVENDOR_STR-DISRESP03 sy-vline 
WA_FMSAMTVENDOR_STR-DISRESP04 sy-vline 
WA_FMSAMTVENDOR_STR-DISRESP05 sy-vline 
WA_FMSAMTVENDOR_STR-DISRESP06 sy-vline 
WA_FMSAMTVENDOR_STR-DISRESP07 sy-vline 
WA_FMSAMTVENDOR_STR-DISRESP08 sy-vline 
WA_FMSAMTVENDOR_STR-DISRESP09 sy-vline 
WA_FMSAMTVENDOR_STR-DISRESP10 sy-vline 
WA_FMSAMTVENDOR_STR-ANNUAL_IGT_REV sy-vline 
WA_FMSAMTVENDOR_STR-MERCHANTID1 sy-vline 
WA_FMSAMTVENDOR_STR-MERCHANTID2 sy-vline 
WA_FMSAMTVENDOR_STR-ACCNT_STATION sy-vline 
WA_FMSAMTVENDOR_STR-SOURCE sy-vline 
WA_FMSAMTVENDOR_STR-DEPARTMENT_CODE sy-vline 
WA_FMSAMTVENDOR_STR-HIER_DEP_CODE sy-vline 
WA_FMSAMTVENDOR_STR-HIER_DEP_NAME sy-vline 
WA_FMSAMTVENDOR_STR-HIER_AGCY_CODE sy-vline 
WA_FMSAMTVENDOR_STR-HIER_AGCY_NAME sy-vline 
WA_FMSAMTVENDOR_STR-HIER_OFFICE_CODE sy-vline 
WA_FMSAMTVENDOR_STR-TAXPAYERNAME sy-vline 
WA_FMSAMTVENDOR_STR-PARENTDUNS sy-vline 
WA_FMSAMTVENDOR_STR-PARENTUEI sy-vline 
WA_FMSAMTVENDOR_STR-ACH_US_PHONE sy-vline 
WA_FMSAMTVENDOR_STR-ACH_NUS_PHONE sy-vline 
WA_FMSAMTVENDOR_STR-ACH_FAX sy-vline 
WA_FMSAMTVENDOR_STR-ACH_EMAIL sy-vline      INTO ld_text SEPARATED BY SPACE.

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