REPORT  ZPM_X_FORECOST_INFO.

tables: marc,
        mapr,
        prow,
        makt.

types: begin of t_outtab,
          werks type mapr-werks,
          matnr type mapr-matnr,
          maktx type makt-maktx,
          ertag type prow-ertag,
          prwtr type prow-prwrt,
          koprw type prow-koprw,
          exprw type prow-exprw,
       end of t_outtab.

data: gt_outtab type table of t_outtab.
data: gr_table type ref to cl_salv_table.

*
parameters: p_werks type mapr-werks.
select-options: s_matnr for mapr-matnr.
*

start-of-selection.

select mapr~werks mapr~matnr
       makt~maktx
       prow~ertag prow~prwrt prow~koprw prow~exprw
       into table gt_outtab
       from mapr left outer join prow on prow~pnum2 = mapr~pnum1
                      inner join makt on makt~matnr = mapr~matnr
                                     and makt~spras = sy-langu
      where mapr~werks = p_werks
        and mapr~matnr in s_matnr.

end-of-selection.

cl_salv_table=>factory(
  importing
    r_salv_table = gr_table
  changing
    t_table      = gt_outtab ).

gr_table->display( ).