problem with call screen executable program

[#1]

i have executable program.

mycode.

START-OF-SELECTION.
  PERFORM f_check USING lv_flag.
  IF lv_flag IS NOT INITIAL.
    MESSAGE 'Can''t Print' TYPE 'E'.
    CALL SCREEN 1000.
  ELSE.
    PERFORM f_process_data.
    PERFORM f_show_smartforms.
  ENDIF.

after i run. screen stuck in blank like below.

I want back to first screen.but it's not work.

i hv tried CALL SCREEN 1000, CALL SCREEN 0, SUBMIT, but still stuck in blank.

[michael_piesche]

1. MESSAGE TYPE 'E' will exit your report. CALL SCREEN is not even reached!
Use option 'DISPLAY LIKE' with statement MESSAGE to have different behavior but display it with same severity but not exiting your program logic:

MESSAGE 'Can''t Print' TYPE 'I' DISPLAY LIKE 'E'.

2. Depending on your defined screens and report coding, you might not even have to use the 'CALL SCREEN 1000' statement (In general Screen 1000 is the default screen when using an executable report, so imho, you shouldnt have to call screen 1000 because you are in screen 1000 (but it depends on your entire coding and report definitions).