Как получить разрешение экрана

  DATA: lo_consumer       TYPE REF TO cl_gui_props_consumer,
        ls_metric_factors TYPE cntl_metric_factors.

  lo_consumer = cl_gui_props_consumer=>create_consumer( ).
  ls_metric_factors = lo_consumer->get_metric_factors( ).

  WRITE: ls_metric_factors-screen-x,
         ls_metric_factors-screen-y.

Как получить размер окна

  DATA: lv_begin_row TYPE i,
        lv_begin_col TYPE i,
        lv_end_row TYPE i,
        lv_end_col TYPE i.

  CALL 'GET_WINDOW_DATA'
    ID 'BEGROW' FIELD lv_begin_row
    ID 'BEGCOL' FIELD lv_begin_col
    ID 'ENDROW' FIELD lv_end_row
    ID 'ENDCOL' FIELD lv_end_col.

  CALL SCREEN 0900 STARTING AT 5 1 ENDING AT lv_end_col lv_end_row.