6:
7: -- Procedure Name
8: -- notify_payments
9: -- Purpose
10: -- This procedure collects data for payments for cn_not_trx
11: -- History
12: -- 01-05-96 A. Erickson Created
13:
14:
45:
46: cn_periods_api.set_dates(x_start_period, x_end_period, x_org_id,
47: x_start_date, x_end_date);
48:
49: cn_message_pkg.debug('notify_payments: Is collecting payments for CN_NOT_TRX from period '||x_start_date ||' to period '||x_end_date ||'.');
50: fnd_file.put_line(fnd_file.Log, 'notify_payments: Is collecting payments for CN_NOT_TRX from period '||x_start_date ||' to period '||x_end_date ||'.');
51:
52: OPEN batch_size;
53: FETCH batch_size INTO l_sys_batch_size;
46: cn_periods_api.set_dates(x_start_period, x_end_period, x_org_id,
47: x_start_date, x_end_date);
48:
49: cn_message_pkg.debug('notify_payments: Is collecting payments for CN_NOT_TRX from period '||x_start_date ||' to period '||x_end_date ||'.');
50: fnd_file.put_line(fnd_file.Log, 'notify_payments: Is collecting payments for CN_NOT_TRX from period '||x_start_date ||' to period '||x_end_date ||'.');
51:
52: OPEN batch_size;
53: FETCH batch_size INTO l_sys_batch_size;
54: CLOSE batch_size;
53: FETCH batch_size INTO l_sys_batch_size;
54: CLOSE batch_size;
55:
56:
57: INSERT INTO cn_not_trx (
58: not_trx_id,
59: batch_id,
60: notified_date,
61: processed_date,
66: source_doc_type,
67: event_id,
68: org_id)
69: SELECT
70: cn_not_trx_s.NEXTVAL,
71: FLOOR(cn_not_trx_s.CURRVAL/l_sys_batch_size),
72: SYSDATE,
73: ara.gl_date, --AE 02-22-96
74: x_proc_audit_id,
67: event_id,
68: org_id)
69: SELECT
70: cn_not_trx_s.NEXTVAL,
71: FLOOR(cn_not_trx_s.CURRVAL/l_sys_batch_size),
72: SYSDATE,
73: ara.gl_date, --AE 02-22-96
74: x_proc_audit_id,
75: 'N',
89: AND ara.org_id = x_org_id
90: AND cr.org_id = ara.org_id
91: AND NOT EXISTS (
92: SELECT 1
93: FROM cn_not_trx
94: WHERE source_trx_id = ara.receivable_application_id
95: AND event_id= cn_global.pmt_event_id
96: AND org_id = x_org_id) ;
97:
102: 'Finished notification run: Notified ' || x_trx_count || ' payments.');
103:
104: IF ( x_trx_count = 0 ) THEN
105:
106: cn_message_pkg.debug('notify_payments: No rows inserted into CN_NOT_TRX. Possible reason: Transactions have not been posted to GL and gl_date is null.');
107: fnd_file.put_line(fnd_file.Log, 'notify_payments: No rows inserted into CN_NOT_TRX. Possible reason: Transactions have not been posted to GL and gl_date is null.');
108:
109:
110: END IF;
103:
104: IF ( x_trx_count = 0 ) THEN
105:
106: cn_message_pkg.debug('notify_payments: No rows inserted into CN_NOT_TRX. Possible reason: Transactions have not been posted to GL and gl_date is null.');
107: fnd_file.put_line(fnd_file.Log, 'notify_payments: No rows inserted into CN_NOT_TRX. Possible reason: Transactions have not been posted to GL and gl_date is null.');
108:
109:
110: END IF;
111: