FBL3N Submit rfitemgl

Yıl ve Ay argümanları structure da olmalıdır...

form f_call_fbl3n using  prm_mizanaylik type ztr_fi_mizan_aylik
                         prm_fieldname type lvc_fname.
  data: lv_gjahr type gjahr.
  data: lv_monat type monat.

  data: lv_date_from type char8.
  data: lv_date_to type char8.
  data: lv_date_in  type datum.
  data: lv_date_out  type datum.

  case prm_fieldname+0(2).
    when gc_field_prefix.
      lv_gjahr = prm_fieldname+2(4).
      lv_monat = prm_fieldname+6(2).

      if lv_monat = `00` .
        concatenate lv_gjahr `0101` into lv_date_from.
        concatenate lv_gjahr `1231` into lv_date_to.

      else.
        concatenate lv_gjahr lv_monat `01` into lv_date_from.
        lv_date_in+0(8) = lv_date_from.
        call function `LAST_DAY_OF_MONTHS`
          exporting
            day_in            = lv_date_in
          importing
            last_day_of_month = lv_date_out.
        lv_date_to+0(8) = lv_date_out.


      endif.


    when others. 
      exit. 
  endcase.

  submit rfitemgl
     with sd_saknr-low = prm_mizanaylik-hesap " <- pass GL account here
     with sd_bukrs-low = prm_mizanaylik-bukrs " <- pass company code here
     with x_opsel = ` ` " <- disable radiobutton Open items
     with x_clsel = ` ` " <- disable radiobutton Cleared items
     with x_aisel = `X` " <- enable radiobutton All items
     with so_budat between lv_date_from and lv_date_to " <- pass date range here
     and return.
endform.                    "f_call_FBL3N