Return to program after calling a screen

Hi --this might seem elementary but I can't seem to make it work anymore

I want to retrurn to the statement AFTER the CALL SCREEN 100

It doesn't seem to work

CREATE DATA dref TYPE s_elements.
  ASSIGN dref->* TO <fs>.
  i_routine = 'POPULATE_DYNAMIC_ITAB'.
*  i_names   = 'NAME_COLUMNS'.
  i_gridtitle = 'any'.
  invoker = sy-repid.
  i_zebra = ' '.
  i_edit = ' '.

*free it_fldcat.
*free dy_table.
    call method dog->build_dynamic_structures
  exporting
    my_line = <fs>
    calling_program = invoker
  importing
    dy_table = dy_table
  changing
    it_fldcat = it_fldcat.
    break-point 1.

perform populate_dynamic_itab
  changing dy_table.

  call screen 100.

* Want return back here after all the Screen processing

After PBO and PAI how to I get back to the line I want.

Cheers

Jimbo