ABAP Select data from SAP table ISUWA_GUARANTOR_CONTRACT 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 ISUWA_GUARANTOR_CONTRACT 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 ISUWA_GUARANTOR_CONTRACT. 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 ISUWA_GUARANTOR_CONTRACT 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_ISUWA_GUARANTOR_CONTRACT TYPE STANDARD TABLE OF ISUWA_GUARANTOR_CONTRACT,
      WA_ISUWA_GUARANTOR_CONTRACT TYPE ISUWA_GUARANTOR_CONTRACT,
      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: <ISUWA_GUARANTOR_CONTRACT> TYPE ISUWA_GUARANTOR_CONTRACT.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM ISUWA_GUARANTOR_CONTRACT
*  INTO TABLE @DATA(IT_ISUWA_GUARANTOR_CONTRACT2).
*--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_ISUWA_GUARANTOR_CONTRACT INDEX 1 INTO DATA(WA_ISUWA_GUARANTOR_CONTRACT2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<ISUWA_GUARANTOR_CONTRACT>-PUBLIC = 1.
<ISUWA_GUARANTOR_CONTRACT>-SUB_REPID = 1.
<ISUWA_GUARANTOR_CONTRACT>-SUB_DYNNR = 1.
<ISUWA_GUARANTOR_CONTRACT>-SUBSL_REPID = 1.
<ISUWA_GUARANTOR_CONTRACT>-SUBSL_DYNNR = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_ISUWA_GUARANTOR_CONTRACT-CONTR, sy-vline,
  WA_ISUWA_GUARANTOR_CONTRACT-UI_OPENED, sy-vline,
  WA_ISUWA_GUARANTOR_CONTRACT-DUMMY_MAINSCREEN, sy-vline,
  WA_ISUWA_GUARANTOR_CONTRACT-TREE_ACTIONS, sy-vline,
  WA_ISUWA_GUARANTOR_CONTRACT-SUBS_ACTIONS, sy-vline,
  WA_ISUWA_GUARANTOR_CONTRACT-EXCLUDE_ACTIONS, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_ISUWA_GUARANTOR_CONTRACT 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_ISUWA_GUARANTOR_CONTRACT 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_ISUWA_GUARANTOR_CONTRACT INTO WA_ISUWA_GUARANTOR_CONTRACT.


*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 GGVERTRAG
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_ISUWA_GUARANTOR_CONTRACT-GGVERTRAG
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ISUWA_GUARANTOR_CONTRACT-GGVERTRAG.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field KSDVERTRAG
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_ISUWA_GUARANTOR_CONTRACT-KSDVERTRAG
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ISUWA_GUARANTOR_CONTRACT-KSDVERTRAG.
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_ISUWA_GUARANTOR_CONTRACT_STR, 
PUBLIC TYPE STRING,
SUB_REPID TYPE STRING,
SUB_DYNNR TYPE STRING,
SUBSL_REPID TYPE STRING,
SUBSL_DYNNR TYPE STRING,
CONTR TYPE STRING,
UI_OPENED TYPE STRING,
DUMMY_MAINSCREEN TYPE STRING,
TREE_ACTIONS TYPE STRING,
SUBS_ACTIONS TYPE STRING,
EXCLUDE_ACTIONS TYPE STRING,
TREE_INPERR TYPE STRING,
MAIN_INPERR TYPE STRING,
PROGRAM_ID TYPE STRING,
DYNPRO TYPE STRING,
WMODE TYPE STRING,
OPEN_WMODE TYPE STRING,
UPD_ONLINE TYPE STRING,
NO_DIALOG TYPE STRING,
NUM_RANGE TYPE STRING,
NO_CHANGE TYPE STRING,
NO_OTHER TYPE STRING,
NO_EVENT TYPE STRING,
NO_STATISTIC TYPE STRING,
NO_CHANGE_DOC TYPE STRING,
CALLED_BY_IDOC TYPE STRING,
PROPRICE TYPE STRING,
INPERR TYPE STRING,
ENQ_DONE TYPE STRING,
CURFIELD TYPE STRING,
CURLINE TYPE STRING,
CURDYNNR TYPE STRING,
SETCURFIELD TYPE STRING,
SETCURLINE TYPE STRING,
SETCURDYNNR TYPE STRING,
TEXT_CHANGED TYPE STRING,
EXTINTKZ TYPE STRING,
EXIT_TYPE TYPE STRING,
FULLSCREEN TYPE STRING,
SAVE_OKCODE TYPE STRING,
TEILOBJ TYPE STRING,
S_FUBA TYPE STRING,
INPUT_FIELD_OFF TYPE STRING,
NOFULLSCREEN TYPE STRING,
DB_UPDATE TYPE STRING,
CHANGEFLAG TYPE STRING,
WA_ADR_DONE TYPE STRING,
ACTUAL_DATA TYPE STRING,
GUARANTOR TYPE STRING,
MANDT TYPE STRING,
GGVERTRAG TYPE STRING,
GGTYP TYPE STRING,
GVERTRAG TYPE STRING,
KVERTRAG TYPE STRING,
VERTRAGSGEBIET TYPE STRING,
ANFALLSTELLENNR TYPE STRING,
WERK_GG TYPE STRING,
LGORT_GG TYPE STRING,
GSDVERTRAG TYPE STRING,
KSDVERTRAG TYPE STRING,
ERDAT TYPE STRING,
ERNAM TYPE STRING,
AEDAT TYPE STRING,
AENAM TYPE STRING,
BEGRU TYPE STRING,
LOEVM TYPE STRING,
GUARANTORH TYPE STRING,
TIMESLC TYPE STRING,
MANDT TYPE STRING,
GGVERTRAG TYPE STRING,
BIS TYPE STRING,
AB TYPE STRING,
FRAKTION TYPE STRING,
PRICE_GG TYPE STRING,
PRICE_CUST TYPE STRING,
QUANT_GG TYPE STRING,
QUANT_CUST TYPE STRING,
EX_WAKEY TYPE STRING,
DECKELMENGE TYPE STRING,
DYNPRO TYPE STRING,
GGVERTRAG TYPE STRING,
BIS TYPE STRING,
PARTNER TYPE STRING,
GUARANTOR TYPE STRING,
WERKTXT TYPE STRING,
LGOBE TYPE STRING,
FRAKTION_TXT TYPE STRING,
PARTNER_TXT TYPE STRING,
GUARANTOR_TXT TYPE STRING,
VBEZ_GG TYPE STRING,
VBEZ_KK TYPE STRING,
SDVBEZ_GG TYPE STRING,
SDVBEZ_KK TYPE STRING,
GGTYP TYPE STRING,
GVERTRAG TYPE STRING,
KVERTRAG TYPE STRING,
VERTRAGSGEBIET TYPE STRING,
ANFALLSTELLENNR TYPE STRING,
WERK_GG TYPE STRING,
LGORT_GG TYPE STRING,
GSDVERTRAG TYPE STRING,
KSDVERTRAG TYPE STRING,
AB TYPE STRING,
FRAKTION TYPE STRING,
PRICE_GG TYPE STRING,
PRICE_CUST TYPE STRING,
QUANT_GG TYPE STRING,
QUANT_CUST TYPE STRING,
EX_WAKEY TYPE STRING,
DECKELMENGE TYPE STRING,
OTHER TYPE STRING,
OPEN_DONE TYPE STRING,
IS_CHANGED TYPE STRING,
MSG TYPE STRING,
MSGID TYPE STRING,
MSGTY TYPE STRING,
MSGNO TYPE STRING,
MSGV1 TYPE STRING,
MSGV2 TYPE STRING,
MSGV3 TYPE STRING,
MSGV4 TYPE STRING,
IEMSG TYPE STRING,
EBELP TYPE STRING,
BANFN TYPE STRING,
BNFPO TYPE STRING,
MSGID TYPE STRING,
MSGTY TYPE STRING,
MSGNO TYPE STRING,
MSGV1 TYPE STRING,
MSGV2 TYPE STRING,
MSGV3 TYPE STRING,
MSGV4 TYPE STRING,
MSGTX TYPE STRING,
AUTO TYPE STRING,
GUARANTOR TYPE STRING,
MANDT TYPE STRING,
GGVERTRAG TYPE STRING,
GGTYP TYPE STRING,
GVERTRAG TYPE STRING,
KVERTRAG TYPE STRING,
VERTRAGSGEBIET TYPE STRING,
ANFALLSTELLENNR TYPE STRING,
WERK_GG TYPE STRING,
LGORT_GG TYPE STRING,
GSDVERTRAG TYPE STRING,
KSDVERTRAG TYPE STRING,
ERDAT TYPE STRING,
ERNAM TYPE STRING,
AEDAT TYPE STRING,
AENAM TYPE STRING,
BEGRU TYPE STRING,
LOEVM TYPE STRING,
GUARANTORH TYPE STRING,
SEL_SCREEN TYPE STRING,
GGVERTRAG TYPE STRING,
PARTNER TYPE STRING,
GUARANTOR TYPE STRING,
DB_DATA TYPE STRING,
GUARANTOR TYPE STRING,
MANDT TYPE STRING,
GGVERTRAG TYPE STRING,
GGTYP TYPE STRING,
GVERTRAG TYPE STRING,
KVERTRAG TYPE STRING,
VERTRAGSGEBIET TYPE STRING,
ANFALLSTELLENNR TYPE STRING,
WERK_GG TYPE STRING,
LGORT_GG TYPE STRING,
GSDVERTRAG TYPE STRING,
KSDVERTRAG TYPE STRING,
ERDAT TYPE STRING,
ERNAM TYPE STRING,
AEDAT TYPE STRING,
AENAM TYPE STRING,
BEGRU TYPE STRING,
LOEVM TYPE STRING,
GUARANTORH TYPE STRING,
SELOBJECTS TYPE STRING,
SELOBJECT TYPE STRING,
OBJECTS TYPE STRING,
SF_EXISTS TYPE STRING,
GGABRKZ TYPE STRING,END OF T_EKKO_STR.
DATA: WA_ISUWA_GUARANTOR_CONTRACT_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_ISUWA_GUARANTOR_CONTRACT_STR-PUBLIC sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-SUB_REPID sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-SUB_DYNNR sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-SUBSL_REPID sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-SUBSL_DYNNR sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-CONTR sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-UI_OPENED sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-DUMMY_MAINSCREEN sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-TREE_ACTIONS sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-SUBS_ACTIONS sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-EXCLUDE_ACTIONS sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-TREE_INPERR sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MAIN_INPERR sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-PROGRAM_ID sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-DYNPRO sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-WMODE sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-OPEN_WMODE sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-UPD_ONLINE sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-NO_DIALOG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-NUM_RANGE sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-NO_CHANGE sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-NO_OTHER sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-NO_EVENT sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-NO_STATISTIC sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-NO_CHANGE_DOC sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-CALLED_BY_IDOC sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-PROPRICE sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-INPERR sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-ENQ_DONE sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-CURFIELD sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-CURLINE sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-CURDYNNR sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-SETCURFIELD sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-SETCURLINE sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-SETCURDYNNR sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-TEXT_CHANGED sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-EXTINTKZ sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-EXIT_TYPE sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-FULLSCREEN sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-SAVE_OKCODE sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-TEILOBJ sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-S_FUBA sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-INPUT_FIELD_OFF sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-NOFULLSCREEN sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-DB_UPDATE sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-CHANGEFLAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-WA_ADR_DONE sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-ACTUAL_DATA sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GUARANTOR sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MANDT sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GGVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GGTYP sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-KVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-VERTRAGSGEBIET sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-ANFALLSTELLENNR sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-WERK_GG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-LGORT_GG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GSDVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-KSDVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-ERDAT sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-ERNAM sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-AEDAT sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-AENAM sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-BEGRU sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-LOEVM sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GUARANTORH sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-TIMESLC sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MANDT sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GGVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-BIS sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-AB sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-FRAKTION sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-PRICE_GG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-PRICE_CUST sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-QUANT_GG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-QUANT_CUST sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-EX_WAKEY sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-DECKELMENGE sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-DYNPRO sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GGVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-BIS sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-PARTNER sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GUARANTOR sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-WERKTXT sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-LGOBE sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-FRAKTION_TXT sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-PARTNER_TXT sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GUARANTOR_TXT sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-VBEZ_GG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-VBEZ_KK sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-SDVBEZ_GG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-SDVBEZ_KK sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GGTYP sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-KVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-VERTRAGSGEBIET sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-ANFALLSTELLENNR sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-WERK_GG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-LGORT_GG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GSDVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-KSDVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-AB sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-FRAKTION sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-PRICE_GG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-PRICE_CUST sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-QUANT_GG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-QUANT_CUST sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-EX_WAKEY sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-DECKELMENGE sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-OTHER sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-OPEN_DONE sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-IS_CHANGED sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MSG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MSGID sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MSGTY sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MSGNO sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MSGV1 sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MSGV2 sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MSGV3 sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MSGV4 sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-IEMSG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-EBELP sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-BANFN sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-BNFPO sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MSGID sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MSGTY sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MSGNO sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MSGV1 sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MSGV2 sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MSGV3 sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MSGV4 sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MSGTX sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-AUTO sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GUARANTOR sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MANDT sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GGVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GGTYP sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-KVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-VERTRAGSGEBIET sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-ANFALLSTELLENNR sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-WERK_GG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-LGORT_GG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GSDVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-KSDVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-ERDAT sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-ERNAM sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-AEDAT sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-AENAM sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-BEGRU sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-LOEVM sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GUARANTORH sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-SEL_SCREEN sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GGVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-PARTNER sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GUARANTOR sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-DB_DATA sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GUARANTOR sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-MANDT sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GGVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GGTYP sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-KVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-VERTRAGSGEBIET sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-ANFALLSTELLENNR sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-WERK_GG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-LGORT_GG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GSDVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-KSDVERTRAG sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-ERDAT sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-ERNAM sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-AEDAT sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-AENAM sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-BEGRU sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-LOEVM sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GUARANTORH sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-SELOBJECTS sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-SELOBJECT sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-OBJECTS sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-SF_EXISTS sy-vline 
WA_ISUWA_GUARANTOR_CONTRACT_STR-GGABRKZ sy-vline      INTO ld_text SEPARATED BY SPACE.

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