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