--取消发票 created by jenrry 20170425
declare
l_result BOOLEAN;
l_message_name VARCHAR2(240);
l_invoice_amount NUMBER;
l_base_amount NUMBER;
l_temp_cancelled_amount NUMBER;
l_cancelled_by NUMBER;
l_cancelled_amount NUMBER;
l_cancelled_date DATE;
l_last_update_date DATE;
l_original_prepayment_amount NUMBER;
l_pay_curr_invoice_amount NUMBER;
l_token VARCHAR2(240);
l_calling_sequence VARCHAR2(240);
begin
FND_GLOBAL.APPS_INITIALIZE(USER_ID => 1111,
RESP_ID => 50737,
RESP_APPL_ID => 20005);
mo_global.init('SQLAP');
mo_global.set_policy_context(p_access_mode => 'S', p_org_id => 142);
l_result := AP_CANCEL_PKG.Ap_Cancel_Single_Invoice(
P_invoice_id => 13020,
P_last_updated_by => 1111,