I create Program for sending report to many users with BEx Broadcasting concept.
I have a loop for sending report out to many users.
For the first time, the report will be sent out.
But the second time, the report won't be send out.
What's wrong with my code?
Here is my coding.
=============================================================================
LOOP AT gt_variant INTO gs_variant.
*Change E-mail of BEx Broadcaster
SELECT SINGLE * FROM /bic/azopa_d0100 INTO wa_dso
WHERE co_area = gs_variant-zco_area
AND rspl_cha = gs_variant-zcost_center
AND /bic/zreptype = gs_variant-zreptype.
IF wa_dso-/bic/zbimail1 IS NOT INITIAL.
mail = wa_dso-/bic/zbimail1.
ENDIF.
IF wa_dso-/bic/zbimail2 IS NOT INITIAL.
CONCATENATE mail ';' wa_dso-/bic/zbimail2 INTO mail.
ENDIF.
IF wa_dso-/bic/zbimail3 IS NOT INITIAL.
CONCATENATE mail ';' wa_dso-/bic/zbimail3 INTO mail.
ENDIF.
SELECT SINGLE * FROM rsrd_sett_node_a INTO wa_email
WHERE setting_id = 'ZOPA_KPI_REPORT_BEXBC_PP'
AND id = 'DI_EMAIL' AND rsr_index = '0'.
wa_email-value = mail.
UPDATE rsrd_sett_node_a FROM wa_email.
*Using Program 'rsrd_broadcast_starter' to run BEx broadcaster name 'ZOPA_KPI_REPORT_BEXBC'
SUBMIT rsrd_broadcast_starter WITH p_settng = 'zopa_kpi_report_bexbc_pp' WITH p_online = 'X' AND RETURN.
*Send mail out
WAIT UP TO 5 SECONDS.
IF sy-subrc EQ 0.
SUBMIT rsconn01 WITH mode = 'INT' WITH output = ' '.
ENDIF.
ENDLOOP.
