2008 Jul 28 11:35 AM
Hi,
I am using a back flush transaction, which updates the stock. After the commit work you will be able to see the updated stock, now my intension is to call a function module in asynchronous mode after the commit work.
Can anybody help me.
Thanks.
hi may be this is not the exact answer but may it helps you in using the function module ...
FORM start_onhand_extract_task .
DO.
IF g_num_running < g_avail_wps.
EXIT.
ENDIF.
WAIT UP TO 5 SECONDS.
ENDDO.
Creating the file name with task number
ADD 1 TO g_task_num.
CONCATENATE p_file1 g_task_num INTO g_task_name.
CONCATENATE g_filename g_task_name INTO task_tab-filename1.
CONDENSE task_tab-filename1 NO-GAPS.
task_tab-task_name = g_task_name.
APPEND task_tab.
CLEAR g_msg_text.
CALL FUNCTION 'GET_MARD_DATA'
STARTING NEW TASK g_task_name
DESTINATION IN GROUP p_grp
PERFORMING decrease_wp ON END OF TASK
EXPORTING
i_filename = task_tab-filename1
TABLES
i_matnr = r_matnr
i_werks = r_werks.
CASE sy-subrc.
WHEN 0.
ADD 1 TO g_num_running.
g_num_submitted = g_num_submitted + 1.
WHEN 1.
error_rec-task_name = g_task_name.
error_rec-filename1 = task_tab-filename1.
APPEND error_rec.
APPEND it_exp_t001w TO it_err_t001w.
ADD 1 TO g_num_err.
g_hold_num = g_num_running.
WAIT UNTIL g_num_running < g_hold_num OR
g_hold_num = 0
UP TO 5 SECONDS.
WHEN OTHERS.
error_rec-task_name = g_task_name.
error_rec-filename1 = task_tab-filename1..
error_rec-msg_text = g_msg_text.
APPEND error_rec.
APPEND it_exp_t001w TO it_err_t001w.
ADD 1 TO g_num_err.
ENDCASE.
ENDFORM. " start_onhand_extract_task
2008 Jul 28 11:38 AM
hi may be this is not the exact answer but may it helps you in using the function module ...
FORM start_onhand_extract_task .
DO.
IF g_num_running < g_avail_wps.
EXIT.
ENDIF.
WAIT UP TO 5 SECONDS.
ENDDO.
Creating the file name with task number
ADD 1 TO g_task_num.
CONCATENATE p_file1 g_task_num INTO g_task_name.
CONCATENATE g_filename g_task_name INTO task_tab-filename1.
CONDENSE task_tab-filename1 NO-GAPS.
task_tab-task_name = g_task_name.
APPEND task_tab.
CLEAR g_msg_text.
CALL FUNCTION 'GET_MARD_DATA'
STARTING NEW TASK g_task_name
DESTINATION IN GROUP p_grp
PERFORMING decrease_wp ON END OF TASK
EXPORTING
i_filename = task_tab-filename1
TABLES
i_matnr = r_matnr
i_werks = r_werks.
CASE sy-subrc.
WHEN 0.
ADD 1 TO g_num_running.
g_num_submitted = g_num_submitted + 1.
WHEN 1.
error_rec-task_name = g_task_name.
error_rec-filename1 = task_tab-filename1.
APPEND error_rec.
APPEND it_exp_t001w TO it_err_t001w.
ADD 1 TO g_num_err.
g_hold_num = g_num_running.
WAIT UNTIL g_num_running < g_hold_num OR
g_hold_num = 0
UP TO 5 SECONDS.
WHEN OTHERS.
error_rec-task_name = g_task_name.
error_rec-filename1 = task_tab-filename1..
error_rec-msg_text = g_msg_text.
APPEND error_rec.
APPEND it_exp_t001w TO it_err_t001w.
ADD 1 TO g_num_err.
ENDCASE.
ENDFORM. " start_onhand_extract_task
| User | Count |
|---|---|
| 6 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 |