FORM set_log.
  FIELD-SYMBOLS:
    <fs_field> TYPE any.
  LOOP AT total.
    CHECK <action> EQ aendern.
    ASSIGN COMPONENT 'z_update_date' OF STRUCTURE 
    <vim_total_struc> TO <fs_field>.
    IF sy-subrc = 0.
      <fs_field> = sy-datum.
    ENDIF.
    ASSIGN COMPONENT 'z_update_time' OF STRUCTURE 
    <vim_total_struc> TO <fs_field>.
    IF sy-subrc = 0.
      <fs_field> = sy-uzeit.
    ENDIF.
    ASSIGN COMPONENT 'z_update_user' OF STRUCTURE 
    <vim_total_struc> TO <fs_field>.
    IF sy-subrc = 0.
      <fs_field> = sy-uname.
    ENDIF.
    ASSIGN COMPONENT 'z_update_repid' OF STRUCTURE 
    <vim_total_struc> TO <fs_field>.
    IF sy-subrc = 0.
      <fs_field> = 'ZPPT9607'.
    ENDIF.
    MODIFY total.
  ENDLOOP.
ENDFORM.