DBA Data[Home] [Help]

APPS.QA_CUSTOMER dependencies on QA_CUSTOMER

Line 1: PACKAGE BODY qa_customer AS

1: PACKAGE BODY qa_customer AS
2: /* $Header: qarcb.pls 120.0 2005/05/24 19:11:56 appldev noship $ */
3:
4: PROCEDURE merge(
5: req_id IN NUMBER,

Line 22: arp_message.set_line('QA_CUSTOMER.MERGE()+');

18: from_cust_id NUMBER;
19: Veto_Reason varchar2(300) := 'During account merge an old customer ID is found in QA_RESULTS table. The table is used to store archival info of test data. The customer name can be used for auditing purpose and cannot be deleted';
20:
21: BEGIN
22: arp_message.set_line('QA_CUSTOMER.MERGE()+');
23:
24: IF process_mode = 'LOCK' THEN
25: null; -- no update will be allowed later
26: ELSE

Line 48: arp_message.set_line('QA_CUSTOMER.MERGE()-');

44: arp_message.set_name('AR', 'AR_ROWS_UPDATED');
45: arp_message.set_token('NUM_ROWS', '0');
46: END IF;
47: END IF;
48: arp_message.set_line('QA_CUSTOMER.MERGE()-');
49:
50: EXCEPTION
51: /*
52: WHEN MERGE_NOT_ALLOWED THEN

Line 53: arp_message.set_error('QA_CUSTOMER.MERGE');

49:
50: EXCEPTION
51: /*
52: WHEN MERGE_NOT_ALLOWED THEN
53: arp_message.set_error('QA_CUSTOMER.MERGE');
54: */
55: WHEN OTHERS THEN
56: arp_message.set_error('QA_CUSTOMER.MERGE');
57: RAISE;

Line 56: arp_message.set_error('QA_CUSTOMER.MERGE');

52: WHEN MERGE_NOT_ALLOWED THEN
53: arp_message.set_error('QA_CUSTOMER.MERGE');
54: */
55: WHEN OTHERS THEN
56: arp_message.set_error('QA_CUSTOMER.MERGE');
57: RAISE;
58: END merge;
59:
60: END qa_customer;

Line 60: END qa_customer;

56: arp_message.set_error('QA_CUSTOMER.MERGE');
57: RAISE;
58: END merge;
59:
60: END qa_customer;