Dinamik Title Bar

Gui Title 0100 için metni şu şekilde girin

"SAS Raporu : &"

SET TITLEBAR `0100` WITH g_header.

& kısmı g_header ile doldurulacaktır.

Sonuç:  SAS Raporu : 14.09.2020-15.09.2020- PB:TRY

 

datag_header    type char250 VALUE `XX`.

 

form F_SET_TITLE .
    datalv_title type char250.
    clear g_header.
    clear lv_title.
    if  s_bldat-low is not INITIAL.
        write s_bldat-low to lv_title DD/MM/YYYY.
        CONCATENATE lv_title g_header INTO g_header.
    endif.


    if  s_bldat-low is not INITIAL and s_bldat-high is not INITIAL.
        CONCATENATE g_header `-` INTO g_header.
    endif.


    if    s_bldat-high is not INITIAL .
        write s_bldat-high to lv_title DD/MM/YYYY.
        CONCATENATE g_header lv_title INTO g_header.
    endif.
        CONCATENATE g_header `- PB:` p_pbrpr INTO g_header.
endform.                    " F_SET_TITLE

 

 

module status_0100 output.
  set pf-status `0100`.
  SET TITLEBAR `0100` WITH g_header.

endmodule.                 " STATUS_0100  OUTPUT