-- Created on 2013-8-2 by ADMINISTRATOR
declare
-- Local variables here
i integer;
x_return_status varchar2(1);
x_msg_count number;
x_msg_data varchar2(2000);
v_cash_receipt_id number := 110152; --收款ID
v_receivable_application_id number := 357971/*357969*/; --核销标识RECEIVABLE_APPLICATION_ID
begin
-- Test statements here
mo_global.init('AR');
mo_global.set_policy_context('S', 4555);
ar_receipt_api_pub.Unapply_on_account(p_api_version => 1.0
,p_init_msg_list => fnd_api.G_TRUE
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_cash_receipt_id => v_cash_receipt_id
,p_receivable_application_id => v_receivable_application_id
);
dbms_output.put_line('return status:'||x_return_status);
dbms_output.put_line('msg count:'||x_msg_count);
dbms_output.put_line('msg data:'||x_msg_data);
if x_msg_count > 0 then
for i in 1 .. x_msg_count loop
dbms_output.put_line(i||':'||substr(fnd_msg_pub.Get(p_msg_index => i,p_encoded => fnd_api.G_FALSE),1,255));
end loop;
end if;
end;
declare
-- Local variables here
i integer;
x_return_status varchar2(1);
x_msg_count number;
x_msg_data varchar2(2000);
v_cash_receipt_id number := 110152; --收款ID
v_receivable_application_id number := 357971/*357969*/; --核销标识RECEIVABLE_APPLICATION_ID
begin
-- Test statements here
mo_global.init('AR');
mo_global.set_policy_context('S', 4555);
ar_receipt_api_pub.Unapply_on_account(p_api_version => 1.0
,p_init_msg_list => fnd_api.G_TRUE
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
,p_cash_receipt_id => v_cash_receipt_id
,p_receivable_application_id => v_receivable_application_id
);
dbms_output.put_line('return status:'||x_return_status);
dbms_output.put_line('msg count:'||x_msg_count);
dbms_output.put_line('msg data:'||x_msg_data);
if x_msg_count > 0 then
for i in 1 .. x_msg_count loop
dbms_output.put_line(i||':'||substr(fnd_msg_pub.Get(p_msg_index => i,p_encoded => fnd_api.G_FALSE),1,255));
end loop;
end if;
end;
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/13387766/viewspace-767678/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/13387766/viewspace-767678/