使用API创建AR 贷项通知单

DECLARE
  --8000000063
  l_dummy              varchar2(240);
  l_customer_trx_id    ra_customer_trx.customer_trx_id%type;
  l_line_credits_flag  ra_cm_requests.line_credits_flag%type;
  l_line_amount        number;
  l_freight_amount     number := 0;
  l_cm_lines_tbl       arw_cmreq_cover.cm_line_tbl_type_cover;
  l_cm_reason_code     varchar2(150);
  l_comments           varchar2(150);

  l_msg_count          number := 0;
  l_msg_data           varchar2(20000) := null;
  l_return_status      varchar2(1);
  l_request_id         NUMBER;
  l_batch_source_name  varchar2(150) default null;

  cm_trx_id            number;

BEGIN

   -- c. Set the applications and org context
   fnd_global.apps_initialize(1110,50683,222);

   mo_global.init('AR'); 
   mo_global.set_policy_context('S',121);


   -- d. provide CUSTOMER_TRX_ID of the invoice to credit
   l_customer_trx_id := 165023;
  
   l_comments := 'Demo for Create_Requ