EBS开发_收款核销API

--收款注销 Tony环境实现 20190703
DECLARE
  l_org_id        NUMBER;
  x_return_status VARCHAR2(60);
  x_msg_count     NUMBER;
  g_pkg_name      VARCHAR2(60) := 'cux_test_scripts';
  g_api_type      VARCHAR2(60) := 'cux_test_scripts';
  x_msg_data      VARCHAR2(32676);

  l_api_name    CONSTANT VARCHAR2(30) := 'act_app_prc';
  l_api_version CONSTANT NUMBER := 1.0;

  l_receivable_application_id    NUMBER;
  l_attribute_rec                ar_receipt_api_pub.attribute_rec_type;
  l_global_att_rec               ar_receipt_api_pub.global_attribute_rec_type;
  l_application_ref_type         ar_receivable_applications.application_ref_type%TYPE;
  l_application_ref_id           ar_receivable_applications.application_ref_id%TYPE;
  l_application_ref_num          ar_receivable_applications.application_ref_num%TYPE;
  l_secondary_application_ref_id ar_receivable_appl