Report without a selection-screen, just a dynpro

Question

Hi experts,
I wrote a small report, which reads out a file. After this I want to display it in a tablecontrol of my dynpro. In the dynpro there is a button to push the data of the tablecontrol in the R/3 via BDC.
Now I have the problem of a automatic generated Selection-Screen. Which has some fields of my used variables (e.g. file-name, file-typ) and even maybe 10 fields (input-fields and checkboxes) from the BDC program.
The fact is that it is not possible to use this code, simply without any "START-OF-SELECTION" statement:
REPORT ZMM_REPORT01.
TABLES: mseg.
TYPES:  BEGIN of input_struk,
          matnr TYPE mseg-matnr,
          erfmg TYPE mseg-erfmg,
        END   of input_struk,
       tt_input TYPE TABLE OF input_struk.
DATA: it_input TYPE tt_input.
DATA: wa_input LIKE LINE OF it_input.
CALL SCREEN 100.
The error is: "Statement 'CALL SCREEN 100' couldnt be reached."
If I use the program-type M for PROGRAM and not type 1 for REPORT. Then fails with the necessary INCLUDE statement of the BDC program.
Regards,
Steffen

Answer 1

ok, if I decode your big letters, I have to put the CALL SCREEN at the end of my program.
so I do that but I didn't work . error: the call-statement could be reached.
REPORT ZMM_REPORT01.
TABLES: mseg.
TYPES:  BEGIN of input_struk,
          matnr TYPE mseg-matnr,
          erfmg TYPE mseg-erfmg,
        END   of input_struk,
       tt_input TYPE TABLE OF input_struk.
DATA: it_input TYPE tt_input.
DATA: wa_input LIKE LINE OF it_input.
PARAMETERS: fname TYPE rlgrap-filename DEFAULT 'c:lagerver.dat',
            ftype TYPE rlgrap-filetype DEFAULT 'ASC',
            bwart TYPE MSEG-BWART DEFAULT 201,
            werks TYPE MSEG-WERKS DEFAULT 2000,
            lgort TYPE MSEG-LGORT DEFAULT 2500,
            kostl TYPE COBL-KOSTL DEFAULT 201300.
START-OF-SELECTION.
* PBO Module
MODULE pbo_0100 OUTPUT.
  SET TITLEBAR 'TITLE_100'.
  SET PF-STATUS 'SCREEN_100'.
  PERFORM z_daten_input.
  PERFORM z_convert_dummy.
ENDMODULE.
* PAI Module
MODULE pai_0100 INPUT.
  IF sy-ucomm = 'BACK' OR
     sy-ucomm = 'EXIT' OR
     sy-ucomm = 'CANCEL'.
     LEAVE PROGRAM.
  ELSE.
  DATA: l_date TYPE sy-datum.
  >THE BDC PROGRAM statements<
  ENDIF.
ENDMODULE.
FORM z_daten_input.
DATA: filename TYPE string,   " UNICODE
      result   TYPE boolean.
      filename = fname.
REFRESH: it_input.
CALL METHOD cl_gui_frontend_services=>file_exist
  EXPORTING    file       = filename
  RECEIVING    RESULT     = result.
CALL METHOD CL_GUI_FRONTEND_SERVICES=>GUI_UPLOAD
EXPORTING
   filename                      = filename
   filetype                      = 'ASC'
   READ_BY_LINE                  = 'X'
   REPLACEMENT                   = '#'
CHANGING
   data_tab                      = t_dummy[].
ENDFORM.
FORM z_convert_dummy.
  LOOP AT T_DUMMY.
    wa_input-matnr = T_DUMMY-VAR+0(11).
    wa_input-erfmg = T_DUMMY-VAR+33(5).
    APPEND wa_input TO it_input.
  ENDLOOP.
ENDFORM.
*&spwizard: declaration of tablecontrol 'TC_FILE' itself
controls: TC_FILE type tableview using screen 0100.
*&spwizard: output module for tc 'TC_FILE'. do not change this line!
*&spwizard: update lines for equivalent scrollbar
module TC_FILE_change_tc_attr output.
  describe table IT_INPUT lines TC_FILE-lines.
endmodule.
CALL SCREEN 100.