topic Re: How to initialize the structure fields with the same value in Application Development and Automation Discussions

How to initialize the structure fields with the same value

Former Member — Wed, 05 May 2010 19:13:32 GMT

Hello Expert,

Suppose the structure S has more than 50 fields. I want to initial every field with the same value '/'. If I initialize the fields one by one by the statement: S-field = '/', I have to write more than 50 statements. It's time-consuming and the program is also urgly.

How can I initial the structure fields with value '/' by one or two statements?

Thnanks for help.

Best Regards, Johnny.

Re: How to initialize the structure fields with the same value

asik_shameem — Wed, 05 May 2010 19:21:55 GMT

Hello Yongbo,

Just use field symbols to achieve this. Try something as below.

DATA: gs_makt TYPE makt.
FIELD-SYMBOLS: <gfs_field>.
CONSTANTS: gc_nodata TYPE c VALUE '/'.

CLEAR sy-subrc.
WHILE sy-subrc EQ 0.
  ASSIGN COMPONENT sy-index OF STRUCTURE gs_makt TO <gfs_field>.
  WRITE gc_nodata TO <gfs_field> LEFT-JUSTIFIED.
ENDWHILE.

Re: How to initialize the structure fields with the same value

karol_seman — Wed, 05 May 2010 19:23:20 GMT


field-symbols: <fs> type any.

do.
  assign component sy-index of structure S to <fs>.
  if sy-subrc NE 0.
    exit.
  endif.

  <fs> = '/'.
enddo.

Re: How to initialize the structure fields with the same value

kesavadas_thekkillath — Wed, 05 May 2010 19:25:33 GMT


field-symbols<fs>.
clear sy-subrc.
  WHILE sy-subrc EQ 0.
    ASSIGN COMPONENT sy-index OF STRUCTURE ST1 TO <fs>.
    WRITE '/' TO <fs> LEFT-JUSTIFIED.
  ENDWHILE.