VL06F Submit JOB
VL06F (
WS_MONITOR_OUTB_DEL_FREE
) programı JOB olarak çağırıldığında WS_DELIVERY_MONITOR fonksiyonu
WS_LM_BACKGROUND_PROCESSING fonksiyonuna yönlendirilir.
GUI`den çağırıldığında ise
WS_LM_LIST_DISPLAY fonksiyonu ile rapor sonucu ekranda gösterilir.
İlgili kontrol :
if ( sy-batch ne space and sy-binpt eq space "50A
and lf_cattactive eq space
and lf_cattneu eq space )
and ( if_c_proctype eq proctype_gdsi
or if_c_proctype eq proctype_inbgdrc
or if_c_proctype eq proctype_pick
or if_c_proctype eq proctype_inbpick
or if_c_proctype eq proctype_conf
or if_c_proctype eq proctype_unch "AIP
or if_c_proctype eq proctype_inbconf
or if_c_proctype eq proctype_dist
or if_c_proctype eq proctype_inbdist
or if_c_proctype eq proctype_free
or ( if_c_proctype eq proctype_error_mon
and if_c_select_code eq gc_ret_mon_sel_close ) ). SPAN { font-family: "Courier New"; font-size: 10pt; color: #000000; background: #FFFFFF; }
and lf_cattactive eq space
and lf_cattneu eq space )
and ( if_c_proctype eq proctype_gdsi
or if_c_proctype eq proctype_inbgdrc
or if_c_proctype eq proctype_pick
or if_c_proctype eq proctype_inbpick
or if_c_proctype eq proctype_conf
or if_c_proctype eq proctype_unch "AIP
or if_c_proctype eq proctype_inbconf
or if_c_proctype eq proctype_dist
or if_c_proctype eq proctype_inbdist
or if_c_proctype eq proctype_free
or ( if_c_proctype eq proctype_error_mon
and if_c_select_code eq gc_ret_mon_sel_close ) ). SPAN { font-family: "Courier New"; font-size: 10pt; color: #000000; background: #FFFFFF; }
JOB`ta da rapor gibi çalışmasını sağlamak için fonskiyonun girişindeki import parametrelerinin submitten evvel set edilmesi gereklidir. Eğer bu import parametreleri fonksiyonda yok ise repair ile eklenebilir (önerilmez).
* Import CATT flags from memory
import cattaktiv to lf_cattactive from memory id `CATT`. "50A
import cattneu to lf_cattneu from memory id `CATTNEU`.
import cattneu to lf_cattneu from memory id `CATTNEU`.
Submit`in çağırıldığı kodda sonuç dönecektir.:
if i_report = `WS_MONITOR_OUTB_DEL_FREE`.
data: cattneu type c VALUE `X`.
EXPORT cattneu FROM cattneu TO MEMORY ID `CATTNEU`.
endif.
submit (i_report) using selection-set i_variant_report
and return .
data: cattneu type c VALUE `X`.
EXPORT cattneu FROM cattneu TO MEMORY ID `CATTNEU`.
endif.
submit (i_report) using selection-set i_variant_report
and return .
try.
cl_salv_bs_runtime_info=>get_data_ref( importing r_data = lobj_data ).
assign lobj_data->* to <lfs_table> .
catch cx_salv_bs_sc_runtime_info.
endtry.
cl_salv_bs_runtime_info=>get_data_ref( importing r_data = lobj_data ).
assign lobj_data->* to <lfs_table> .
catch cx_salv_bs_sc_runtime_info.
endtry.