DECLARE p_api_versionNUMBER; p_init_msg_listVARCHAR2(200); p_commitVARCHAR2(200); p_validation_levelNUMBER; x_return_statusVARCHAR2(200); x_msg_countNUMBER; x_msg_dataVARCHAR2(200); p_cash_receipt_idNUMBER; p_pay_from_customerNUMBER; p_commentsVARCHAR2(200); p_payment_trxn_extension_id NUMBER; x_statusVARCHAR2(200); p_customer_bank_account_id NUMBER; p_countNUMBER;BEGIN — fnd_global.apps_initialize(1110, 50683, 222); — p_api_version:= 1.0; p_init_msg_list:= fnd_api.g_true; p_commit:= fnd_api.g_false; p_validation_level := fnd_api.g_valid_level_full; p_cash_receipt_id := 78043; –参数只能指定客户账户，，没有提供事业所字段 p_pay_from_customer := 1885; –hz_cust_accounts.cust_account_id p_comments:= 'TEST RECEIPT_API';ar_receipt_update_api_pub.update_receipt_unid_to_unapp(p_api_version=> p_api_version,p_init_msg_list=> p_init_msg_list,p_commit=> p_commit,p_validation_level=> p_validation_level,x_return_status=> x_return_status,x_msg_count=> x_msg_count,x_msg_data=> x_msg_data,p_cash_receipt_id=> p_cash_receipt_id,p_pay_from_customer=> p_pay_from_customer,p_comments=> p_comments,p_payment_trxn_extension_id => p_payment_trxn_extension_id,x_status=> x_status,p_customer_bank_account_id => p_customer_bank_account_id); dbms_output.put_line('X_RETURN_STATUS = ' || x_return_status); dbms_output.put_line('X_MSG_COUNT = ' || x_msg_count); dbms_output.put_line('X_MSG_DATA = ' || x_msg_data); dbms_output.put_line('X_STATUS = ' || x_status); IF x_msg_count = 1 THENdbms_output.put_line('l_msg_data ' || x_msg_data); ELSIF x_msg_count > 1 THENLOOPp_count := p_count + 1;x_msg_data := fnd_msg_pub.get(fnd_msg_pub.g_next, fnd_api.g_false);IF x_msg_data IS NULL THENEXIT;END IF;dbms_output.put_line('Message' || p_count || ' —' || x_msg_data);END LOOP; END IF;END;
没有了爱的语言，所有的文字都是乏味的
