90:
91: --
92: BEGIN
93: -- cep_standard.enable_debug;
94: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
95: xtr_debug_pkg.debug('>XTR_AUTO_RECONCILIATION.auto_reconciliation');
96: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>set parameters...');
97: END IF;
98: --
91: --
92: BEGIN
93: -- cep_standard.enable_debug;
94: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
95: xtr_debug_pkg.debug('>XTR_AUTO_RECONCILIATION.auto_reconciliation');
96: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>set parameters...');
97: END IF;
98: --
99: -- set parameters
92: BEGIN
93: -- cep_standard.enable_debug;
94: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
95: xtr_debug_pkg.debug('>XTR_AUTO_RECONCILIATION.auto_reconciliation');
96: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>set parameters...');
97: END IF;
98: --
99: -- set parameters
100: --
107: date_from := to_date(G_value_date_from, 'DD/MM/RRRR');
108: date_to := to_date(G_value_date_to, 'DD/MM/RRRR');
109: G_incl_rtm := p_incl_rtm;
110:
111: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
112: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference_from = ' || to_char(G_import_reference_from));
113: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference_to = ' || to_char(G_import_reference_to));
114: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_source = ' || G_source);
115: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_acct_num = ' || G_acct_num);
108: date_to := to_date(G_value_date_to, 'DD/MM/RRRR');
109: G_incl_rtm := p_incl_rtm;
110:
111: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
112: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference_from = ' || to_char(G_import_reference_from));
113: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference_to = ' || to_char(G_import_reference_to));
114: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_source = ' || G_source);
115: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_acct_num = ' || G_acct_num);
116: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_value_date_from = ' || G_value_date_from);
109: G_incl_rtm := p_incl_rtm;
110:
111: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
112: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference_from = ' || to_char(G_import_reference_from));
113: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference_to = ' || to_char(G_import_reference_to));
114: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_source = ' || G_source);
115: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_acct_num = ' || G_acct_num);
116: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_value_date_from = ' || G_value_date_from);
117: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_value_date_to = ' || G_value_date_to);
110:
111: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
112: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference_from = ' || to_char(G_import_reference_from));
113: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference_to = ' || to_char(G_import_reference_to));
114: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_source = ' || G_source);
115: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_acct_num = ' || G_acct_num);
116: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_value_date_from = ' || G_value_date_from);
117: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_value_date_to = ' || G_value_date_to);
118: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_incl_rtm = ' || G_incl_rtm);
111: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
112: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference_from = ' || to_char(G_import_reference_from));
113: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference_to = ' || to_char(G_import_reference_to));
114: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_source = ' || G_source);
115: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_acct_num = ' || G_acct_num);
116: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_value_date_from = ' || G_value_date_from);
117: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_value_date_to = ' || G_value_date_to);
118: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_incl_rtm = ' || G_incl_rtm);
119: END IF;
112: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference_from = ' || to_char(G_import_reference_from));
113: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference_to = ' || to_char(G_import_reference_to));
114: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_source = ' || G_source);
115: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_acct_num = ' || G_acct_num);
116: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_value_date_from = ' || G_value_date_from);
117: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_value_date_to = ' || G_value_date_to);
118: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_incl_rtm = ' || G_incl_rtm);
119: END IF;
120:
113: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference_to = ' || to_char(G_import_reference_to));
114: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_source = ' || G_source);
115: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_acct_num = ' || G_acct_num);
116: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_value_date_from = ' || G_value_date_from);
117: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_value_date_to = ' || G_value_date_to);
118: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_incl_rtm = ' || G_incl_rtm);
119: END IF;
120:
121: IF (G_import_reference_to IS NOT NULL
114: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_source = ' || G_source);
115: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_acct_num = ' || G_acct_num);
116: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_value_date_from = ' || G_value_date_from);
117: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_value_date_to = ' || G_value_date_to);
118: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_incl_rtm = ' || G_incl_rtm);
119: END IF;
120:
121: IF (G_import_reference_to IS NOT NULL
122: OR G_import_reference_from IS NOT NULL) THEN
123: --
124: -- if user specify import reference number
125: -- as auto reconciliation drive and not account information
126: --
127: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
128: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>OPEN CURSOR IMREF');
129: END IF;
130:
131: OPEN IMREF;
124: -- if user specify import reference number
125: -- as auto reconciliation drive and not account information
126: --
127: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
128: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>OPEN CURSOR IMREF');
129: END IF;
130:
131: OPEN IMREF;
132:
129: END IF;
130:
131: OPEN IMREF;
132:
133: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
134: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> LOOP ');
135: END IF;
136: LOOP
137: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
130:
131: OPEN IMREF;
132:
133: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
134: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> LOOP ');
135: END IF;
136: LOOP
137: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
138: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>>FETCH CURSOR IMREF');
133: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
134: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> LOOP ');
135: END IF;
136: LOOP
137: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
138: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>>FETCH CURSOR IMREF');
139: END IF;
140: Fetch IMREF into G_verification_method,
141: G_import_reference,
134: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> LOOP ');
135: END IF;
136: LOOP
137: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
138: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>>FETCH CURSOR IMREF');
139: END IF;
140: Fetch IMREF into G_verification_method,
141: G_import_reference,
142: G_currency,
142: G_currency,
143: G_account_number;
144: EXIT WHEN IMREF%NOTFOUND;
145:
146: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
147: xtr_debug_pkg.debug('>>call XTR_AUTO_RECONCILIATION.P_RECONCILE...');
148: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>>pass in -----------> ');
149: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_verfication_method ' || G_verification_method);
150: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
143: G_account_number;
144: EXIT WHEN IMREF%NOTFOUND;
145:
146: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
147: xtr_debug_pkg.debug('>>call XTR_AUTO_RECONCILIATION.P_RECONCILE...');
148: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>>pass in -----------> ');
149: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_verfication_method ' || G_verification_method);
150: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
151: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_currency ' || G_currency);
144: EXIT WHEN IMREF%NOTFOUND;
145:
146: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
147: xtr_debug_pkg.debug('>>call XTR_AUTO_RECONCILIATION.P_RECONCILE...');
148: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>>pass in -----------> ');
149: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_verfication_method ' || G_verification_method);
150: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
151: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_currency ' || G_currency);
152: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_account_number ' || G_account_number);
145:
146: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
147: xtr_debug_pkg.debug('>>call XTR_AUTO_RECONCILIATION.P_RECONCILE...');
148: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>>pass in -----------> ');
149: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_verfication_method ' || G_verification_method);
150: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
151: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_currency ' || G_currency);
152: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_account_number ' || G_account_number);
153: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_incl_rtm ' || G_incl_rtm);
146: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
147: xtr_debug_pkg.debug('>>call XTR_AUTO_RECONCILIATION.P_RECONCILE...');
148: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>>pass in -----------> ');
149: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_verfication_method ' || G_verification_method);
150: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
151: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_currency ' || G_currency);
152: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_account_number ' || G_account_number);
153: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_incl_rtm ' || G_incl_rtm);
154: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '----------------> end pass in parameters');
147: xtr_debug_pkg.debug('>>call XTR_AUTO_RECONCILIATION.P_RECONCILE...');
148: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>>pass in -----------> ');
149: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_verfication_method ' || G_verification_method);
150: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
151: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_currency ' || G_currency);
152: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_account_number ' || G_account_number);
153: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_incl_rtm ' || G_incl_rtm);
154: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '----------------> end pass in parameters');
155: END IF;
148: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>>pass in -----------> ');
149: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_verfication_method ' || G_verification_method);
150: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
151: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_currency ' || G_currency);
152: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_account_number ' || G_account_number);
153: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_incl_rtm ' || G_incl_rtm);
154: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '----------------> end pass in parameters');
155: END IF;
156:
149: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_verfication_method ' || G_verification_method);
150: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
151: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_currency ' || G_currency);
152: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_account_number ' || G_account_number);
153: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_incl_rtm ' || G_incl_rtm);
154: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '----------------> end pass in parameters');
155: END IF;
156:
157: XTR_AUTO_RECONCILIATION.P_RECONCILE ( G_verification_method,
150: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
151: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_currency ' || G_currency);
152: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_account_number ' || G_account_number);
153: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_incl_rtm ' || G_incl_rtm);
154: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '----------------> end pass in parameters');
155: END IF;
156:
157: XTR_AUTO_RECONCILIATION.P_RECONCILE ( G_verification_method,
158: x_pass_code,
173: G_incl_rtm);
174:
175: IF (x_rec_num IS NOT NULL AND NVL(G_incl_rtm, 'Y') = 'Y') THEN
176:
177: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
178: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> call UPDATE_ROLL_TRANS -------->');
179: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'x_min_rec_nos = ' || to_char(x_min_rec_nos));
180: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'x_max_rec_nos = ' || to_char(x_max_rec_nos));
181: END IF;
174:
175: IF (x_rec_num IS NOT NULL AND NVL(G_incl_rtm, 'Y') = 'Y') THEN
176:
177: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
178: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> call UPDATE_ROLL_TRANS -------->');
179: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'x_min_rec_nos = ' || to_char(x_min_rec_nos));
180: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'x_max_rec_nos = ' || to_char(x_max_rec_nos));
181: END IF;
182:
175: IF (x_rec_num IS NOT NULL AND NVL(G_incl_rtm, 'Y') = 'Y') THEN
176:
177: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
178: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> call UPDATE_ROLL_TRANS -------->');
179: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'x_min_rec_nos = ' || to_char(x_min_rec_nos));
180: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'x_max_rec_nos = ' || to_char(x_max_rec_nos));
181: END IF;
182:
183: UPDATE_ROLL_TRANS( G_verification_method,
176:
177: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
178: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> call UPDATE_ROLL_TRANS -------->');
179: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'x_min_rec_nos = ' || to_char(x_min_rec_nos));
180: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'x_max_rec_nos = ' || to_char(x_max_rec_nos));
181: END IF;
182:
183: UPDATE_ROLL_TRANS( G_verification_method,
184: x_min_rec_nos,
185: x_max_rec_nos,
186: 'AUTO');
187: END IF;
188:
189: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
190: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '> END LOOP ');
191: END IF;
192: END LOOP;
193: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
186: 'AUTO');
187: END IF;
188:
189: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
190: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '> END LOOP ');
191: END IF;
192: END LOOP;
193: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
194: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '> CLOSE CURSOR IMREF ');
189: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
190: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '> END LOOP ');
191: END IF;
192: END LOOP;
193: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
194: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '> CLOSE CURSOR IMREF ');
195: END IF;
196: CLOSE IMREF;
197: ELSE --
190: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '> END LOOP ');
191: END IF;
192: END LOOP;
193: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
194: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '> CLOSE CURSOR IMREF ');
195: END IF;
196: CLOSE IMREF;
197: ELSE --
198: -- if user specify account information
197: ELSE --
198: -- if user specify account information
199: -- and not by import reference #
200: --
201: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
202: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '> OPEN CURSOR ACCT_INFO ');
203: END IF;
204: OPEN ACCT_INFO;
205:
198: -- if user specify account information
199: -- and not by import reference #
200: --
201: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
202: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '> OPEN CURSOR ACCT_INFO ');
203: END IF;
204: OPEN ACCT_INFO;
205:
206: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
202: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '> OPEN CURSOR ACCT_INFO ');
203: END IF;
204: OPEN ACCT_INFO;
205:
206: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
207: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> LOOP ');
208: END IF;
209: LOOP
210: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
203: END IF;
204: OPEN ACCT_INFO;
205:
206: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
207: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> LOOP ');
208: END IF;
209: LOOP
210: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
211: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> FETCH CURSOR ACCT_INFO ');
206: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
207: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> LOOP ');
208: END IF;
209: LOOP
210: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
211: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> FETCH CURSOR ACCT_INFO ');
212: END IF;
213: Fetch ACCT_INFO into G_verification_method,
214: G_import_reference,
207: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> LOOP ');
208: END IF;
209: LOOP
210: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
211: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> FETCH CURSOR ACCT_INFO ');
212: END IF;
213: Fetch ACCT_INFO into G_verification_method,
214: G_import_reference,
215: G_currency,
215: G_currency,
216: G_account_number;
217: EXIT WHEN ACCT_INFO%NOTFOUND;
218:
219: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
220: xtr_debug_pkg.debug('>>call XTR_AUTO_RECONCILIATION.P_RECONCILE...');
221: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>>pass in -----------> ');
222: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_verfication_method ' || G_verification_method);
223: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
216: G_account_number;
217: EXIT WHEN ACCT_INFO%NOTFOUND;
218:
219: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
220: xtr_debug_pkg.debug('>>call XTR_AUTO_RECONCILIATION.P_RECONCILE...');
221: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>>pass in -----------> ');
222: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_verfication_method ' || G_verification_method);
223: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
224: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_currency ' || G_currency);
217: EXIT WHEN ACCT_INFO%NOTFOUND;
218:
219: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
220: xtr_debug_pkg.debug('>>call XTR_AUTO_RECONCILIATION.P_RECONCILE...');
221: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>>pass in -----------> ');
222: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_verfication_method ' || G_verification_method);
223: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
224: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_currency ' || G_currency);
225: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_account_number ' || G_account_number);
218:
219: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
220: xtr_debug_pkg.debug('>>call XTR_AUTO_RECONCILIATION.P_RECONCILE...');
221: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>>pass in -----------> ');
222: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_verfication_method ' || G_verification_method);
223: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
224: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_currency ' || G_currency);
225: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_account_number ' || G_account_number);
226: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_incl_rtm ' || G_incl_rtm);
219: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
220: xtr_debug_pkg.debug('>>call XTR_AUTO_RECONCILIATION.P_RECONCILE...');
221: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>>pass in -----------> ');
222: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_verfication_method ' || G_verification_method);
223: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
224: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_currency ' || G_currency);
225: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_account_number ' || G_account_number);
226: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_incl_rtm ' || G_incl_rtm);
227: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '----------------> end pass in parameters');
220: xtr_debug_pkg.debug('>>call XTR_AUTO_RECONCILIATION.P_RECONCILE...');
221: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>>pass in -----------> ');
222: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_verfication_method ' || G_verification_method);
223: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
224: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_currency ' || G_currency);
225: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_account_number ' || G_account_number);
226: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_incl_rtm ' || G_incl_rtm);
227: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '----------------> end pass in parameters');
228: END IF;
221: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>>pass in -----------> ');
222: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_verfication_method ' || G_verification_method);
223: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
224: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_currency ' || G_currency);
225: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_account_number ' || G_account_number);
226: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_incl_rtm ' || G_incl_rtm);
227: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '----------------> end pass in parameters');
228: END IF;
229:
222: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_verfication_method ' || G_verification_method);
223: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
224: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_currency ' || G_currency);
225: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_account_number ' || G_account_number);
226: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_incl_rtm ' || G_incl_rtm);
227: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '----------------> end pass in parameters');
228: END IF;
229:
230: XTR_AUTO_RECONCILIATION.P_RECONCILE ( G_verification_method,
223: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_import_reference ' || to_char(G_import_reference));
224: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_currency ' || G_currency);
225: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_account_number ' || G_account_number);
226: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'G_incl_rtm ' || G_incl_rtm);
227: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '----------------> end pass in parameters');
228: END IF;
229:
230: XTR_AUTO_RECONCILIATION.P_RECONCILE ( G_verification_method,
231: x_pass_code,
246: G_incl_rtm);
247:
248: IF (x_rec_num IS NOT NULL AND NVL(G_incl_rtm, 'Y') = 'Y') THEN
249:
250: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
251: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> call UPDATE_ROLL_TRANS -------->');
252: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'x_min_rec_nos = ' || to_char(x_min_rec_nos));
253: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'x_max_rec_nos = ' || to_char(x_max_rec_nos));
254: END IF;
247:
248: IF (x_rec_num IS NOT NULL AND NVL(G_incl_rtm, 'Y') = 'Y') THEN
249:
250: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
251: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> call UPDATE_ROLL_TRANS -------->');
252: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'x_min_rec_nos = ' || to_char(x_min_rec_nos));
253: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'x_max_rec_nos = ' || to_char(x_max_rec_nos));
254: END IF;
255:
248: IF (x_rec_num IS NOT NULL AND NVL(G_incl_rtm, 'Y') = 'Y') THEN
249:
250: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
251: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> call UPDATE_ROLL_TRANS -------->');
252: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'x_min_rec_nos = ' || to_char(x_min_rec_nos));
253: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'x_max_rec_nos = ' || to_char(x_max_rec_nos));
254: END IF;
255:
256: UPDATE_ROLL_TRANS( G_verification_method,
249:
250: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
251: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '>> call UPDATE_ROLL_TRANS -------->');
252: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'x_min_rec_nos = ' || to_char(x_min_rec_nos));
253: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || 'x_max_rec_nos = ' || to_char(x_max_rec_nos));
254: END IF;
255:
256: UPDATE_ROLL_TRANS( G_verification_method,
257: x_min_rec_nos,
258: x_max_rec_nos,
259: 'AUTO');
260: END IF;
261:
262: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
263: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '> END LOOOP ');
264: END IF;
265: END LOOP;
266: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
259: 'AUTO');
260: END IF;
261:
262: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
263: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '> END LOOOP ');
264: END IF;
265: END LOOP;
266: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
267: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '> CLOSE CURSOR ACCT_INFO');
262: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
263: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '> END LOOOP ');
264: END IF;
265: END LOOP;
266: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
267: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '> CLOSE CURSOR ACCT_INFO');
268: END IF;
269: CLOSE ACCT_INFO;
270:
263: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '> END LOOOP ');
264: END IF;
265: END LOOP;
266: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
267: xtr_debug_pkg.debug('AUTO_RECONCILIATION: ' || '> CLOSE CURSOR ACCT_INFO');
268: END IF;
269: CLOSE ACCT_INFO;
270:
271: END IF;
271: END IF;
272:
273: EXCEPTION
274: WHEN OTHERS THEN
275: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
276: xtr_debug_pkg.debug('EXCEPTION: XTR_AUTO_RECONCILIATION.auto_reconciliation');
277: END IF;
278: RAISE;
279: END AUTO_RECONCILIATION;
272:
273: EXCEPTION
274: WHEN OTHERS THEN
275: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
276: xtr_debug_pkg.debug('EXCEPTION: XTR_AUTO_RECONCILIATION.auto_reconciliation');
277: END IF;
278: RAISE;
279: END AUTO_RECONCILIATION;
280:
398: ELSIF l_start_date < l_lowest_start then
399: l_lowest_start := l_start_date;
400: END IF;
401: -- Store previous deal to compare with the fetch for the next deal
402: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
403: xtr_debug_pkg.debug('UPDATE_ROLL_TRANS: ' || 'old_rec_ref = ' ||to_char(l_rec_ref));
404: END IF;
405: old_deal_no := l_deal_no;
406: old_trans_no := l_trans_no;
399: l_lowest_start := l_start_date;
400: END IF;
401: -- Store previous deal to compare with the fetch for the next deal
402: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
403: xtr_debug_pkg.debug('UPDATE_ROLL_TRANS: ' || 'old_rec_ref = ' ||to_char(l_rec_ref));
404: END IF;
405: old_deal_no := l_deal_no;
406: old_trans_no := l_trans_no;
407: old_rec_ref :=l_rec_ref;
424: --
425: CLOSE DDA_REC_ROW;
426: EXCEPTION
427: WHEN OTHERS THEN
428: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
429: xtr_debug_pkg.debug('EXCEPTION: XTR_AUTO_RECONCILIATION.update_roll_trans');
430: END IF;
431: RAISE;
432: END UPDATE_ROLL_TRANS;
425: CLOSE DDA_REC_ROW;
426: EXCEPTION
427: WHEN OTHERS THEN
428: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
429: xtr_debug_pkg.debug('EXCEPTION: XTR_AUTO_RECONCILIATION.update_roll_trans');
430: END IF;
431: RAISE;
432: END UPDATE_ROLL_TRANS;
433:
527: l_limit_code);
528: END IF;
529: EXCEPTION
530: WHEN OTHERS THEN
531: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
532: xtr_debug_pkg.debug('EXCEPTION: XTR_AUTO_RECONCILIATION.recalc_roll_details');
533: END IF;
534: RAISE;
535: END RECALC_ROLL_DETAILS;
528: END IF;
529: EXCEPTION
530: WHEN OTHERS THEN
531: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
532: xtr_debug_pkg.debug('EXCEPTION: XTR_AUTO_RECONCILIATION.recalc_roll_details');
533: END IF;
534: RAISE;
535: END RECALC_ROLL_DETAILS;
536:
1150: close DT_ROW;
1151: end if;
1152: EXCEPTION
1153: WHEN OTHERS THEN
1154: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1155: xtr_debug_pkg.debug('EXCEPTION: XTR_AUTO_RECONCILIATION.recalc_dt_details');
1156: END IF;
1157: RAISE;
1158: END RECALC_DT_DETAILS;
1151: end if;
1152: EXCEPTION
1153: WHEN OTHERS THEN
1154: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1155: xtr_debug_pkg.debug('EXCEPTION: XTR_AUTO_RECONCILIATION.recalc_dt_details');
1156: END IF;
1157: RAISE;
1158: END RECALC_DT_DETAILS;
1159: /* ---------------------------------------------------------------------
1419:
1420: --
1421: -- set parameteres
1422: --
1423: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1424: xtr_debug_pkg.debug('>>>XTR_AUTO_RECONCILIATION.p_reconcile ');
1425: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>> set parameteres ---------------->');
1426: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_verification_method = ' || p_verification_method);
1427: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_pass_code = ' || p_pass_code);
1420: --
1421: -- set parameteres
1422: --
1423: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1424: xtr_debug_pkg.debug('>>>XTR_AUTO_RECONCILIATION.p_reconcile ');
1425: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>> set parameteres ---------------->');
1426: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_verification_method = ' || p_verification_method);
1427: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_pass_code = ' || p_pass_code);
1428: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_import_reference = ' || to_char(p_import_reference));
1421: -- set parameteres
1422: --
1423: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1424: xtr_debug_pkg.debug('>>>XTR_AUTO_RECONCILIATION.p_reconcile ');
1425: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>> set parameteres ---------------->');
1426: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_verification_method = ' || p_verification_method);
1427: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_pass_code = ' || p_pass_code);
1428: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_import_reference = ' || to_char(p_import_reference));
1429: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_currency = ' || p_currency);
1422: --
1423: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1424: xtr_debug_pkg.debug('>>>XTR_AUTO_RECONCILIATION.p_reconcile ');
1425: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>> set parameteres ---------------->');
1426: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_verification_method = ' || p_verification_method);
1427: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_pass_code = ' || p_pass_code);
1428: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_import_reference = ' || to_char(p_import_reference));
1429: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_currency = ' || p_currency);
1430: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_account_number = ' || p_account_number);
1423: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1424: xtr_debug_pkg.debug('>>>XTR_AUTO_RECONCILIATION.p_reconcile ');
1425: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>> set parameteres ---------------->');
1426: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_verification_method = ' || p_verification_method);
1427: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_pass_code = ' || p_pass_code);
1428: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_import_reference = ' || to_char(p_import_reference));
1429: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_currency = ' || p_currency);
1430: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_account_number = ' || p_account_number);
1431: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_incl_rtm = '|| p_incl_rtm);
1424: xtr_debug_pkg.debug('>>>XTR_AUTO_RECONCILIATION.p_reconcile ');
1425: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>> set parameteres ---------------->');
1426: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_verification_method = ' || p_verification_method);
1427: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_pass_code = ' || p_pass_code);
1428: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_import_reference = ' || to_char(p_import_reference));
1429: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_currency = ' || p_currency);
1430: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_account_number = ' || p_account_number);
1431: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_incl_rtm = '|| p_incl_rtm);
1432: END IF;
1425: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>> set parameteres ---------------->');
1426: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_verification_method = ' || p_verification_method);
1427: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_pass_code = ' || p_pass_code);
1428: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_import_reference = ' || to_char(p_import_reference));
1429: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_currency = ' || p_currency);
1430: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_account_number = ' || p_account_number);
1431: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_incl_rtm = '|| p_incl_rtm);
1432: END IF;
1433:
1426: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_verification_method = ' || p_verification_method);
1427: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_pass_code = ' || p_pass_code);
1428: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_import_reference = ' || to_char(p_import_reference));
1429: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_currency = ' || p_currency);
1430: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_account_number = ' || p_account_number);
1431: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_incl_rtm = '|| p_incl_rtm);
1432: END IF;
1433:
1434: P_MIN_REC_NOS := NULL;
1427: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_pass_code = ' || p_pass_code);
1428: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_import_reference = ' || to_char(p_import_reference));
1429: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_currency = ' || p_currency);
1430: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_account_number = ' || p_account_number);
1431: xtr_debug_pkg.debug('P_RECONCILE: ' || 'p_incl_rtm = '|| p_incl_rtm);
1432: END IF;
1433:
1434: P_MIN_REC_NOS := NULL;
1435: P_MAX_REC_NOS := NULL;
1434: P_MIN_REC_NOS := NULL;
1435: P_MAX_REC_NOS := NULL;
1436: P_REC_NOS := NULL;
1437:
1438: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1439: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>> OPEN CURSOR PASSES ');
1440: END IF;
1441: open PASSES;
1442: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1435: P_MAX_REC_NOS := NULL;
1436: P_REC_NOS := NULL;
1437:
1438: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1439: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>> OPEN CURSOR PASSES ');
1440: END IF;
1441: open PASSES;
1442: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1443: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>> LOOP --2 ');
1438: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1439: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>> OPEN CURSOR PASSES ');
1440: END IF;
1441: open PASSES;
1442: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1443: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>> LOOP --2 ');
1444: END IF;
1445: LOOP -- 2
1446:
1439: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>> OPEN CURSOR PASSES ');
1440: END IF;
1441: open PASSES;
1442: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1443: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>> LOOP --2 ');
1444: END IF;
1445: LOOP -- 2
1446:
1447: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1443: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>> LOOP --2 ');
1444: END IF;
1445: LOOP -- 2
1446:
1447: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1448: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>> FETCH PASSES into P_PASS_CODE, l_days');
1449: END IF;
1450: fetch PASSES INTO P_PASS_CODE,l_days;
1451:
1444: END IF;
1445: LOOP -- 2
1446:
1447: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1448: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>> FETCH PASSES into P_PASS_CODE, l_days');
1449: END IF;
1450: fetch PASSES INTO P_PASS_CODE,l_days;
1451:
1452: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1448: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>> FETCH PASSES into P_PASS_CODE, l_days');
1449: END IF;
1450: fetch PASSES INTO P_PASS_CODE,l_days;
1451:
1452: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1453: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_PASS_CODE = ' || P_PASS_CODE);
1454: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_days = ' || to_char(l_days));
1455: END IF;
1456:
1449: END IF;
1450: fetch PASSES INTO P_PASS_CODE,l_days;
1451:
1452: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1453: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_PASS_CODE = ' || P_PASS_CODE);
1454: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_days = ' || to_char(l_days));
1455: END IF;
1456:
1457: EXIT WHEN PASSES%NOTFOUND;
1450: fetch PASSES INTO P_PASS_CODE,l_days;
1451:
1452: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1453: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_PASS_CODE = ' || P_PASS_CODE);
1454: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_days = ' || to_char(l_days));
1455: END IF;
1456:
1457: EXIT WHEN PASSES%NOTFOUND;
1458: l_bk_acct := NULL;l_party := NULL;l_deal_no := NULL;l_serial_ref := NULL;
1458: l_bk_acct := NULL;l_party := NULL;l_deal_no := NULL;l_serial_ref := NULL;
1459: l_amount := NULL;l_sum_date := NULL;l_sum_range := NULL;l_date :=NULL;
1460: l_deal_type := NULL;
1461: l_subtype := NULL;l_product := NULL;l_portfolio := NULL; v_netoff_number := NULL;
1462: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1463: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>> OPEN CURSOR PASS_DETAILS ');
1464: END IF;
1465: open PASS_DETAILS;
1466: LOOP -- 3 (in 2)
1459: l_amount := NULL;l_sum_date := NULL;l_sum_range := NULL;l_date :=NULL;
1460: l_deal_type := NULL;
1461: l_subtype := NULL;l_product := NULL;l_portfolio := NULL; v_netoff_number := NULL;
1462: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1463: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>> OPEN CURSOR PASS_DETAILS ');
1464: END IF;
1465: open PASS_DETAILS;
1466: LOOP -- 3 (in 2)
1467: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1463: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>> OPEN CURSOR PASS_DETAILS ');
1464: END IF;
1465: open PASS_DETAILS;
1466: LOOP -- 3 (in 2)
1467: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1468: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> LOOP --3 ');
1469: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> FETCH PASS_DETAILS into p_det');
1470: END IF;
1471: fetch PASS_DETAILS INTO p_det;
1464: END IF;
1465: open PASS_DETAILS;
1466: LOOP -- 3 (in 2)
1467: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1468: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> LOOP --3 ');
1469: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> FETCH PASS_DETAILS into p_det');
1470: END IF;
1471: fetch PASS_DETAILS INTO p_det;
1472:
1465: open PASS_DETAILS;
1466: LOOP -- 3 (in 2)
1467: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1468: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> LOOP --3 ');
1469: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> FETCH PASS_DETAILS into p_det');
1470: END IF;
1471: fetch PASS_DETAILS INTO p_det;
1472:
1473: --xtr_debug_pkg.debug('p_det.RECONCILE_ON_COLUMN = ' || REOCNCILE_ON_COLUMN);
1469: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> FETCH PASS_DETAILS into p_det');
1470: END IF;
1471: fetch PASS_DETAILS INTO p_det;
1472:
1473: --xtr_debug_pkg.debug('p_det.RECONCILE_ON_COLUMN = ' || REOCNCILE_ON_COLUMN);
1474: EXIT WHEN PASS_DETAILS%NOTFOUND;
1475: if p_det.RECONCILE_ON_COLUMN = 'BANK ACCT' then
1476: if p_det.RECONCILE_DETAIL = 'MATCH' then
1477: l_bk_acct := 'Y'; -----FOR BUG 6664952--l_bk_acct := '%';
1501: l_product := substr(p_det.RECONCILE_DETAIL,1,10);
1502: elsif p_det.RECONCILE_ON_COLUMN = 'SUBTYPE' then
1503: l_portfolio := substr(p_det.RECONCILE_DETAIL,1,7);
1504: end if;
1505: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1506: xtr_debug_pkg.debug('P_RECONCILE: ' || 'values----------------------');
1507: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_party = ' || l_party);
1508: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_serial_ref = ' || l_serial_ref);
1509: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_no = ' || l_deal_no);
1502: elsif p_det.RECONCILE_ON_COLUMN = 'SUBTYPE' then
1503: l_portfolio := substr(p_det.RECONCILE_DETAIL,1,7);
1504: end if;
1505: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1506: xtr_debug_pkg.debug('P_RECONCILE: ' || 'values----------------------');
1507: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_party = ' || l_party);
1508: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_serial_ref = ' || l_serial_ref);
1509: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_no = ' || l_deal_no);
1510: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_amount = ' || l_amount);
1503: l_portfolio := substr(p_det.RECONCILE_DETAIL,1,7);
1504: end if;
1505: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1506: xtr_debug_pkg.debug('P_RECONCILE: ' || 'values----------------------');
1507: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_party = ' || l_party);
1508: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_serial_ref = ' || l_serial_ref);
1509: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_no = ' || l_deal_no);
1510: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_amount = ' || l_amount);
1511: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_date = ' || l_sum_date);
1504: end if;
1505: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1506: xtr_debug_pkg.debug('P_RECONCILE: ' || 'values----------------------');
1507: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_party = ' || l_party);
1508: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_serial_ref = ' || l_serial_ref);
1509: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_no = ' || l_deal_no);
1510: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_amount = ' || l_amount);
1511: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_date = ' || l_sum_date);
1512: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_range = ' || l_sum_range);
1505: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1506: xtr_debug_pkg.debug('P_RECONCILE: ' || 'values----------------------');
1507: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_party = ' || l_party);
1508: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_serial_ref = ' || l_serial_ref);
1509: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_no = ' || l_deal_no);
1510: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_amount = ' || l_amount);
1511: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_date = ' || l_sum_date);
1512: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_range = ' || l_sum_range);
1513: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_date = ' || l_date);
1506: xtr_debug_pkg.debug('P_RECONCILE: ' || 'values----------------------');
1507: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_party = ' || l_party);
1508: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_serial_ref = ' || l_serial_ref);
1509: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_no = ' || l_deal_no);
1510: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_amount = ' || l_amount);
1511: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_date = ' || l_sum_date);
1512: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_range = ' || l_sum_range);
1513: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_date = ' || l_date);
1514: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_type = ' || l_deal_type);
1507: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_party = ' || l_party);
1508: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_serial_ref = ' || l_serial_ref);
1509: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_no = ' || l_deal_no);
1510: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_amount = ' || l_amount);
1511: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_date = ' || l_sum_date);
1512: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_range = ' || l_sum_range);
1513: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_date = ' || l_date);
1514: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_type = ' || l_deal_type);
1515: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_subtype = ' || l_subtype);
1508: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_serial_ref = ' || l_serial_ref);
1509: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_no = ' || l_deal_no);
1510: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_amount = ' || l_amount);
1511: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_date = ' || l_sum_date);
1512: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_range = ' || l_sum_range);
1513: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_date = ' || l_date);
1514: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_type = ' || l_deal_type);
1515: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_subtype = ' || l_subtype);
1516: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_product = ' || l_product);
1509: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_no = ' || l_deal_no);
1510: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_amount = ' || l_amount);
1511: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_date = ' || l_sum_date);
1512: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_range = ' || l_sum_range);
1513: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_date = ' || l_date);
1514: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_type = ' || l_deal_type);
1515: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_subtype = ' || l_subtype);
1516: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_product = ' || l_product);
1517: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_portfolio = ' || l_portfolio);
1510: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_amount = ' || l_amount);
1511: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_date = ' || l_sum_date);
1512: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_range = ' || l_sum_range);
1513: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_date = ' || l_date);
1514: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_type = ' || l_deal_type);
1515: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_subtype = ' || l_subtype);
1516: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_product = ' || l_product);
1517: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_portfolio = ' || l_portfolio);
1518: xtr_debug_pkg.debug('P_RECONCILE: ' || '---------------------------');
1511: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_date = ' || l_sum_date);
1512: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_range = ' || l_sum_range);
1513: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_date = ' || l_date);
1514: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_type = ' || l_deal_type);
1515: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_subtype = ' || l_subtype);
1516: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_product = ' || l_product);
1517: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_portfolio = ' || l_portfolio);
1518: xtr_debug_pkg.debug('P_RECONCILE: ' || '---------------------------');
1519: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>> END LOOP --3 ');
1512: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_range = ' || l_sum_range);
1513: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_date = ' || l_date);
1514: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_type = ' || l_deal_type);
1515: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_subtype = ' || l_subtype);
1516: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_product = ' || l_product);
1517: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_portfolio = ' || l_portfolio);
1518: xtr_debug_pkg.debug('P_RECONCILE: ' || '---------------------------');
1519: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>> END LOOP --3 ');
1520: END IF;
1513: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_date = ' || l_date);
1514: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_type = ' || l_deal_type);
1515: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_subtype = ' || l_subtype);
1516: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_product = ' || l_product);
1517: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_portfolio = ' || l_portfolio);
1518: xtr_debug_pkg.debug('P_RECONCILE: ' || '---------------------------');
1519: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>> END LOOP --3 ');
1520: END IF;
1521: END LOOP; -- 3 (in 2)
1514: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_type = ' || l_deal_type);
1515: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_subtype = ' || l_subtype);
1516: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_product = ' || l_product);
1517: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_portfolio = ' || l_portfolio);
1518: xtr_debug_pkg.debug('P_RECONCILE: ' || '---------------------------');
1519: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>> END LOOP --3 ');
1520: END IF;
1521: END LOOP; -- 3 (in 2)
1522: close PASS_DETAILS;
1515: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_subtype = ' || l_subtype);
1516: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_product = ' || l_product);
1517: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_portfolio = ' || l_portfolio);
1518: xtr_debug_pkg.debug('P_RECONCILE: ' || '---------------------------');
1519: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>> END LOOP --3 ');
1520: END IF;
1521: END LOOP; -- 3 (in 2)
1522: close PASS_DETAILS;
1523: if l_days is NULL then
1525: end if;
1526:
1527: open REC;
1528:
1529: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1530: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> LOOP --4 ');
1531: END IF;
1532: LOOP -- 4 (in 2)
1533: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1526:
1527: open REC;
1528:
1529: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1530: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> LOOP --4 ');
1531: END IF;
1532: LOOP -- 4 (in 2)
1533: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1534: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> FETCH REC into rec_det');
1529: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1530: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> LOOP --4 ');
1531: END IF;
1532: LOOP -- 4 (in 2)
1533: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1534: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> FETCH REC into rec_det');
1535: END IF;
1536:
1537: fetch REC INTO rec_det;
1530: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> LOOP --4 ');
1531: END IF;
1532: LOOP -- 4 (in 2)
1533: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1534: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> FETCH REC into rec_det');
1535: END IF;
1536:
1537: fetch REC INTO rec_det;
1538: EXIT WHEN REC%NOTFOUND;
1541: P_SERIAL_REFERENCE := rec_det.SERIAL_REFERENCE;
1542: P_DEBIT_AMOUNT := rec_det.DEBIT_AMOUNT;
1543: P_CREDIT_AMOUNT := rec_det.CREDIT_AMOUNT;
1544: P_RECONCILED_YN := NULL;
1545: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1546: xtr_debug_pkg.debug('P_RECONCILE: ' || 'value--------------------');
1547: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_IMPORT_REFERENCE = ' || to_char(P_IMPORT_REFERENCE));
1548: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_RECORD_IN_PROCESS = ' || to_char(P_RECORD_IN_PROCESS));
1549: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_PARTY_NAME = ' || P_PARTY_NAME);
1542: P_DEBIT_AMOUNT := rec_det.DEBIT_AMOUNT;
1543: P_CREDIT_AMOUNT := rec_det.CREDIT_AMOUNT;
1544: P_RECONCILED_YN := NULL;
1545: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1546: xtr_debug_pkg.debug('P_RECONCILE: ' || 'value--------------------');
1547: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_IMPORT_REFERENCE = ' || to_char(P_IMPORT_REFERENCE));
1548: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_RECORD_IN_PROCESS = ' || to_char(P_RECORD_IN_PROCESS));
1549: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_PARTY_NAME = ' || P_PARTY_NAME);
1550: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_SERIAL_REFERENCE = ' || P_SERIAL_REFERENCE);
1543: P_CREDIT_AMOUNT := rec_det.CREDIT_AMOUNT;
1544: P_RECONCILED_YN := NULL;
1545: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1546: xtr_debug_pkg.debug('P_RECONCILE: ' || 'value--------------------');
1547: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_IMPORT_REFERENCE = ' || to_char(P_IMPORT_REFERENCE));
1548: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_RECORD_IN_PROCESS = ' || to_char(P_RECORD_IN_PROCESS));
1549: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_PARTY_NAME = ' || P_PARTY_NAME);
1550: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_SERIAL_REFERENCE = ' || P_SERIAL_REFERENCE);
1551: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_DEBIT_AMOUNT = ' || to_char(P_DEBIT_AMOUNT));
1544: P_RECONCILED_YN := NULL;
1545: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1546: xtr_debug_pkg.debug('P_RECONCILE: ' || 'value--------------------');
1547: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_IMPORT_REFERENCE = ' || to_char(P_IMPORT_REFERENCE));
1548: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_RECORD_IN_PROCESS = ' || to_char(P_RECORD_IN_PROCESS));
1549: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_PARTY_NAME = ' || P_PARTY_NAME);
1550: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_SERIAL_REFERENCE = ' || P_SERIAL_REFERENCE);
1551: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_DEBIT_AMOUNT = ' || to_char(P_DEBIT_AMOUNT));
1552: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_CREDIT_AMOUNT = ' || to_char(P_CREDIT_AMOUNT));
1545: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1546: xtr_debug_pkg.debug('P_RECONCILE: ' || 'value--------------------');
1547: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_IMPORT_REFERENCE = ' || to_char(P_IMPORT_REFERENCE));
1548: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_RECORD_IN_PROCESS = ' || to_char(P_RECORD_IN_PROCESS));
1549: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_PARTY_NAME = ' || P_PARTY_NAME);
1550: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_SERIAL_REFERENCE = ' || P_SERIAL_REFERENCE);
1551: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_DEBIT_AMOUNT = ' || to_char(P_DEBIT_AMOUNT));
1552: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_CREDIT_AMOUNT = ' || to_char(P_CREDIT_AMOUNT));
1553: xtr_debug_pkg.debug('P_RECONCILED_YN = ' || P_RECONCILED_YN);
1546: xtr_debug_pkg.debug('P_RECONCILE: ' || 'value--------------------');
1547: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_IMPORT_REFERENCE = ' || to_char(P_IMPORT_REFERENCE));
1548: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_RECORD_IN_PROCESS = ' || to_char(P_RECORD_IN_PROCESS));
1549: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_PARTY_NAME = ' || P_PARTY_NAME);
1550: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_SERIAL_REFERENCE = ' || P_SERIAL_REFERENCE);
1551: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_DEBIT_AMOUNT = ' || to_char(P_DEBIT_AMOUNT));
1552: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_CREDIT_AMOUNT = ' || to_char(P_CREDIT_AMOUNT));
1553: xtr_debug_pkg.debug('P_RECONCILED_YN = ' || P_RECONCILED_YN);
1554: END IF;
1547: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_IMPORT_REFERENCE = ' || to_char(P_IMPORT_REFERENCE));
1548: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_RECORD_IN_PROCESS = ' || to_char(P_RECORD_IN_PROCESS));
1549: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_PARTY_NAME = ' || P_PARTY_NAME);
1550: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_SERIAL_REFERENCE = ' || P_SERIAL_REFERENCE);
1551: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_DEBIT_AMOUNT = ' || to_char(P_DEBIT_AMOUNT));
1552: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_CREDIT_AMOUNT = ' || to_char(P_CREDIT_AMOUNT));
1553: xtr_debug_pkg.debug('P_RECONCILED_YN = ' || P_RECONCILED_YN);
1554: END IF;
1555:
1548: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_RECORD_IN_PROCESS = ' || to_char(P_RECORD_IN_PROCESS));
1549: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_PARTY_NAME = ' || P_PARTY_NAME);
1550: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_SERIAL_REFERENCE = ' || P_SERIAL_REFERENCE);
1551: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_DEBIT_AMOUNT = ' || to_char(P_DEBIT_AMOUNT));
1552: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_CREDIT_AMOUNT = ' || to_char(P_CREDIT_AMOUNT));
1553: xtr_debug_pkg.debug('P_RECONCILED_YN = ' || P_RECONCILED_YN);
1554: END IF;
1555:
1556: /* dda_sum_date */
1549: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_PARTY_NAME = ' || P_PARTY_NAME);
1550: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_SERIAL_REFERENCE = ' || P_SERIAL_REFERENCE);
1551: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_DEBIT_AMOUNT = ' || to_char(P_DEBIT_AMOUNT));
1552: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_CREDIT_AMOUNT = ' || to_char(P_CREDIT_AMOUNT));
1553: xtr_debug_pkg.debug('P_RECONCILED_YN = ' || P_RECONCILED_YN);
1554: END IF;
1555:
1556: /* dda_sum_date */
1557: if nvl(l_sum_date,'N') = 'Y' then
1554: END IF;
1555:
1556: /* dda_sum_date */
1557: if nvl(l_sum_date,'N') = 'Y' then
1558: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1559: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>>DDA_SUM_DATE..............');
1560: END IF;
1561:
1562: open DDA_SUM_DATE;
1555:
1556: /* dda_sum_date */
1557: if nvl(l_sum_date,'N') = 'Y' then
1558: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1559: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>>DDA_SUM_DATE..............');
1560: END IF;
1561:
1562: open DDA_SUM_DATE;
1563:
1561:
1562: open DDA_SUM_DATE;
1563:
1564: LOOP -- 5 (in 4)
1565: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1566: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>>> LOOP --5 ');
1567: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>>> FETCH DDA_SUM_DATE into l_s_date, l_sum_amt, l_num_recs');
1568: END IF;
1569: fetch DDA_SUM_DATE INTO l_s_date,l_sum_amt,l_num_recs, v_netoff_number;
1562: open DDA_SUM_DATE;
1563:
1564: LOOP -- 5 (in 4)
1565: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1566: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>>> LOOP --5 ');
1567: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>>> FETCH DDA_SUM_DATE into l_s_date, l_sum_amt, l_num_recs');
1568: END IF;
1569: fetch DDA_SUM_DATE INTO l_s_date,l_sum_amt,l_num_recs, v_netoff_number;
1570: --dbms_output.put_line(' DDA_SUM_DATE date, amt, no-rec, net# '||l_s_date||' - '||l_sum_amt||' - '||l_num_recs||' - '||v_netoff_number);
1563:
1564: LOOP -- 5 (in 4)
1565: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1566: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>>> LOOP --5 ');
1567: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>>> FETCH DDA_SUM_DATE into l_s_date, l_sum_amt, l_num_recs');
1568: END IF;
1569: fetch DDA_SUM_DATE INTO l_s_date,l_sum_amt,l_num_recs, v_netoff_number;
1570: --dbms_output.put_line(' DDA_SUM_DATE date, amt, no-rec, net# '||l_s_date||' - '||l_sum_amt||' - '||l_num_recs||' - '||v_netoff_number);
1571:
1908: end if;
1909: END LOOP; -- 5 (in 4)
1910: close DDA_SUM_DATE;
1911: elsif nvl(l_sum_range,'N') = 'Y' then
1912: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1913: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> DDA_SUM_RANGE .............');
1914: END IF;
1915:
1916: open DDA_SUM_RANGE;
1909: END LOOP; -- 5 (in 4)
1910: close DDA_SUM_DATE;
1911: elsif nvl(l_sum_range,'N') = 'Y' then
1912: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1913: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> DDA_SUM_RANGE .............');
1914: END IF;
1915:
1916: open DDA_SUM_RANGE;
1917: -- Sum records on Deal Date Amounts ACROSS a Range of Dates
1915:
1916: open DDA_SUM_RANGE;
1917: -- Sum records on Deal Date Amounts ACROSS a Range of Dates
1918: LOOP -- 6 (in 4)
1919: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1920: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>>> LOOP --6 ');
1921: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>>> FETCH DDA_SUM_RANGE into l_sum_amt, l_num_recs');
1922: END IF;
1923: fetch DDA_SUM_RANGE INTO l_sum_amt,l_num_recs, v_netoff_number;
1916: open DDA_SUM_RANGE;
1917: -- Sum records on Deal Date Amounts ACROSS a Range of Dates
1918: LOOP -- 6 (in 4)
1919: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1920: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>>> LOOP --6 ');
1921: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>>> FETCH DDA_SUM_RANGE into l_sum_amt, l_num_recs');
1922: END IF;
1923: fetch DDA_SUM_RANGE INTO l_sum_amt,l_num_recs, v_netoff_number;
1924: --dbms_output.put_line('DDA_SUM_RANGE amt, no-recs, net# '||l_sum_amt||' - '||l_num_recs||' - '||v_netoff_number);
1917: -- Sum records on Deal Date Amounts ACROSS a Range of Dates
1918: LOOP -- 6 (in 4)
1919: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
1920: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>>> LOOP --6 ');
1921: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>>> FETCH DDA_SUM_RANGE into l_sum_amt, l_num_recs');
1922: END IF;
1923: fetch DDA_SUM_RANGE INTO l_sum_amt,l_num_recs, v_netoff_number;
1924: --dbms_output.put_line('DDA_SUM_RANGE amt, no-recs, net# '||l_sum_amt||' - '||l_num_recs||' - '||v_netoff_number);
1925:
2269: END LOOP; -- 6 (in 4)
2270: close DDA_SUM_RANGE;
2271: else
2272: /* else check amount equal to each other --> no sum */
2273: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2274: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> ELSE check amount equal each other, NO SUM! ');
2275: END IF;
2276: -- Check amounts equal each other.Do Not Sum amounts for a date or range of dates.
2277: -- The imported amount has to equal a single transaction amount.
2270: close DDA_SUM_RANGE;
2271: else
2272: /* else check amount equal to each other --> no sum */
2273: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2274: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> ELSE check amount equal each other, NO SUM! ');
2275: END IF;
2276: -- Check amounts equal each other.Do Not Sum amounts for a date or range of dates.
2277: -- The imported amount has to equal a single transaction amount.
2278: open DDA;
2277: -- The imported amount has to equal a single transaction amount.
2278: open DDA;
2279: l_num_recs :=0;
2280:
2281: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2282: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> FETCH DDA into l_sum_amt, l_num_recs, l_one_date ');
2283: END IF;
2284: fetch DDA INTO l_sum_amt,l_num_recs,l_one_date, v_netoff_number;
2285: --dbms_output.put_line('DDA amt, no-recs, date, net# '||l_sum_amt||' - '||l_num_recs||' - '||l_one_date||' - '||v_netoff_number);
2278: open DDA;
2279: l_num_recs :=0;
2280:
2281: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2282: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> FETCH DDA into l_sum_amt, l_num_recs, l_one_date ');
2283: END IF;
2284: fetch DDA INTO l_sum_amt,l_num_recs,l_one_date, v_netoff_number;
2285: --dbms_output.put_line('DDA amt, no-recs, date, net# '||l_sum_amt||' - '||l_num_recs||' - '||l_one_date||' - '||v_netoff_number);
2286: /***************/
2288: utl_file.put_line (l_file,'>>----net#, date, amt, no-recs '||v_netoff_number||' - '||l_one_date||' - '||l_sum_amt||' - '||l_num_recs);
2289: utl_file.put_line (l_file,'>>------------------------------');
2290: /***************/
2291:
2292: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2293: xtr_debug_pkg.debug('P_RECONCILE: ' || 'value after fetch -----------------');
2294: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_no = ' || l_deal_no);
2295: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.value_date = ' || to_char(rec_det.value_date));
2296: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_date = ' || l_date);
2289: utl_file.put_line (l_file,'>>------------------------------');
2290: /***************/
2291:
2292: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2293: xtr_debug_pkg.debug('P_RECONCILE: ' || 'value after fetch -----------------');
2294: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_no = ' || l_deal_no);
2295: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.value_date = ' || to_char(rec_det.value_date));
2296: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_date = ' || l_date);
2297: END IF;
2290: /***************/
2291:
2292: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2293: xtr_debug_pkg.debug('P_RECONCILE: ' || 'value after fetch -----------------');
2294: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_no = ' || l_deal_no);
2295: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.value_date = ' || to_char(rec_det.value_date));
2296: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_date = ' || l_date);
2297: END IF;
2298: xtr_debug_pkg.debug('P_CGU$SYSDATE = ' || P_CGU$SYSDATE);
2291:
2292: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2293: xtr_debug_pkg.debug('P_RECONCILE: ' || 'value after fetch -----------------');
2294: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_no = ' || l_deal_no);
2295: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.value_date = ' || to_char(rec_det.value_date));
2296: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_date = ' || l_date);
2297: END IF;
2298: xtr_debug_pkg.debug('P_CGU$SYSDATE = ' || P_CGU$SYSDATE);
2299: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2292: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2293: xtr_debug_pkg.debug('P_RECONCILE: ' || 'value after fetch -----------------');
2294: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_no = ' || l_deal_no);
2295: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.value_date = ' || to_char(rec_det.value_date));
2296: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_date = ' || l_date);
2297: END IF;
2298: xtr_debug_pkg.debug('P_CGU$SYSDATE = ' || P_CGU$SYSDATE);
2299: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2300: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_CURRENCY = ' || P_CURRENCY);
2294: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_deal_no = ' || l_deal_no);
2295: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.value_date = ' || to_char(rec_det.value_date));
2296: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_date = ' || l_date);
2297: END IF;
2298: xtr_debug_pkg.debug('P_CGU$SYSDATE = ' || P_CGU$SYSDATE);
2299: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2300: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_CURRENCY = ' || P_CURRENCY);
2301: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_bk_acct = ' || l_bk_acct);
2302: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.DEBIT_AMOUNT = ' || to_char(rec_det.DEBIT_AMOUNT));
2295: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.value_date = ' || to_char(rec_det.value_date));
2296: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_date = ' || l_date);
2297: END IF;
2298: xtr_debug_pkg.debug('P_CGU$SYSDATE = ' || P_CGU$SYSDATE);
2299: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2300: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_CURRENCY = ' || P_CURRENCY);
2301: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_bk_acct = ' || l_bk_acct);
2302: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.DEBIT_AMOUNT = ' || to_char(rec_det.DEBIT_AMOUNT));
2303: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.CREDIT_AMOUNT = ' || to_char(rec_det.CREDIT_AMOUNT));
2296: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_date = ' || l_date);
2297: END IF;
2298: xtr_debug_pkg.debug('P_CGU$SYSDATE = ' || P_CGU$SYSDATE);
2299: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2300: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_CURRENCY = ' || P_CURRENCY);
2301: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_bk_acct = ' || l_bk_acct);
2302: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.DEBIT_AMOUNT = ' || to_char(rec_det.DEBIT_AMOUNT));
2303: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.CREDIT_AMOUNT = ' || to_char(rec_det.CREDIT_AMOUNT));
2304: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_amt = '|| to_char(l_sum_amt));
2297: END IF;
2298: xtr_debug_pkg.debug('P_CGU$SYSDATE = ' || P_CGU$SYSDATE);
2299: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2300: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_CURRENCY = ' || P_CURRENCY);
2301: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_bk_acct = ' || l_bk_acct);
2302: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.DEBIT_AMOUNT = ' || to_char(rec_det.DEBIT_AMOUNT));
2303: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.CREDIT_AMOUNT = ' || to_char(rec_det.CREDIT_AMOUNT));
2304: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_amt = '|| to_char(l_sum_amt));
2305: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_num_recs = '|| to_char(l_num_recs));
2298: xtr_debug_pkg.debug('P_CGU$SYSDATE = ' || P_CGU$SYSDATE);
2299: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2300: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_CURRENCY = ' || P_CURRENCY);
2301: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_bk_acct = ' || l_bk_acct);
2302: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.DEBIT_AMOUNT = ' || to_char(rec_det.DEBIT_AMOUNT));
2303: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.CREDIT_AMOUNT = ' || to_char(rec_det.CREDIT_AMOUNT));
2304: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_amt = '|| to_char(l_sum_amt));
2305: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_num_recs = '|| to_char(l_num_recs));
2306: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_one_date = '|| to_char(l_one_date));
2299: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2300: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_CURRENCY = ' || P_CURRENCY);
2301: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_bk_acct = ' || l_bk_acct);
2302: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.DEBIT_AMOUNT = ' || to_char(rec_det.DEBIT_AMOUNT));
2303: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.CREDIT_AMOUNT = ' || to_char(rec_det.CREDIT_AMOUNT));
2304: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_amt = '|| to_char(l_sum_amt));
2305: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_num_recs = '|| to_char(l_num_recs));
2306: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_one_date = '|| to_char(l_one_date));
2307: xtr_debug_pkg.debug('P_RECONCILE: ' || '-------------------------------');
2300: xtr_debug_pkg.debug('P_RECONCILE: ' || 'P_CURRENCY = ' || P_CURRENCY);
2301: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_bk_acct = ' || l_bk_acct);
2302: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.DEBIT_AMOUNT = ' || to_char(rec_det.DEBIT_AMOUNT));
2303: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.CREDIT_AMOUNT = ' || to_char(rec_det.CREDIT_AMOUNT));
2304: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_amt = '|| to_char(l_sum_amt));
2305: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_num_recs = '|| to_char(l_num_recs));
2306: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_one_date = '|| to_char(l_one_date));
2307: xtr_debug_pkg.debug('P_RECONCILE: ' || '-------------------------------');
2308: END IF;
2301: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_bk_acct = ' || l_bk_acct);
2302: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.DEBIT_AMOUNT = ' || to_char(rec_det.DEBIT_AMOUNT));
2303: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.CREDIT_AMOUNT = ' || to_char(rec_det.CREDIT_AMOUNT));
2304: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_amt = '|| to_char(l_sum_amt));
2305: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_num_recs = '|| to_char(l_num_recs));
2306: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_one_date = '|| to_char(l_one_date));
2307: xtr_debug_pkg.debug('P_RECONCILE: ' || '-------------------------------');
2308: END IF;
2309:
2302: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.DEBIT_AMOUNT = ' || to_char(rec_det.DEBIT_AMOUNT));
2303: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.CREDIT_AMOUNT = ' || to_char(rec_det.CREDIT_AMOUNT));
2304: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_amt = '|| to_char(l_sum_amt));
2305: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_num_recs = '|| to_char(l_num_recs));
2306: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_one_date = '|| to_char(l_one_date));
2307: xtr_debug_pkg.debug('P_RECONCILE: ' || '-------------------------------');
2308: END IF;
2309:
2310: if nvl(l_num_recs,0) > 0 then --- bug 5353780
2303: xtr_debug_pkg.debug('P_RECONCILE: ' || 'rec_det.CREDIT_AMOUNT = ' || to_char(rec_det.CREDIT_AMOUNT));
2304: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_sum_amt = '|| to_char(l_sum_amt));
2305: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_num_recs = '|| to_char(l_num_recs));
2306: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_one_date = '|| to_char(l_one_date));
2307: xtr_debug_pkg.debug('P_RECONCILE: ' || '-------------------------------');
2308: END IF;
2309:
2310: if nvl(l_num_recs,0) > 0 then --- bug 5353780
2311: p_tot_recon := nvl(p_tot_recon,0) + 1;
2312: P_RECONCILED_YN :='Y';
2313: l_sum_amt := nvl(rec_det.DEBIT_AMOUNT,0) +
2314: nvl(rec_det.CREDIT_AMOUNT,0);
2315: open REC_NUM;
2316: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2317: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> FETCH REC_NUM into l_rec_nos');
2318: END IF;
2319: fetch REC_NUM INTO l_rec_nos;
2320: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2313: l_sum_amt := nvl(rec_det.DEBIT_AMOUNT,0) +
2314: nvl(rec_det.CREDIT_AMOUNT,0);
2315: open REC_NUM;
2316: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2317: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> FETCH REC_NUM into l_rec_nos');
2318: END IF;
2319: fetch REC_NUM INTO l_rec_nos;
2320: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2321: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_rec_nos = '|| to_char(l_rec_nos));
2316: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2317: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> FETCH REC_NUM into l_rec_nos');
2318: END IF;
2319: fetch REC_NUM INTO l_rec_nos;
2320: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2321: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_rec_nos = '|| to_char(l_rec_nos));
2322: END IF;
2323: close REC_NUM;
2324: if nvl(P_MIN_REC_NOS,9999999) >= l_rec_nos then
2317: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> FETCH REC_NUM into l_rec_nos');
2318: END IF;
2319: fetch REC_NUM INTO l_rec_nos;
2320: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2321: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_rec_nos = '|| to_char(l_rec_nos));
2322: END IF;
2323: close REC_NUM;
2324: if nvl(P_MIN_REC_NOS,9999999) >= l_rec_nos then
2325: P_MIN_REC_NOS := l_rec_nos;
2329: end if;
2330: if P_REC_NOS is NULL then
2331: P_REC_NOS := l_rec_nos;
2332: end if;
2333: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2334: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> UPDATE DDA >>>>>>>>>>>>>>');
2335: END IF;
2336:
2337: --dbms_output.put_line('bef UPD ');
2330: if P_REC_NOS is NULL then
2331: P_REC_NOS := l_rec_nos;
2332: end if;
2333: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2334: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> UPDATE DDA >>>>>>>>>>>>>>');
2335: END IF;
2336:
2337: --dbms_output.put_line('bef UPD ');
2338: If v_netoff_number is null then
2485: End Loop;
2486: End if;
2487: End if;
2488:
2489: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2490: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> UPDATE XTR_PAY_REC_REOCNCILIATION ');
2491: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_rec_nos = ' || to_char(l_rec_nos));
2492: END IF;
2493: update XTR_PAY_REC_RECONCILIATION
2486: End if;
2487: End if;
2488:
2489: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2490: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> UPDATE XTR_PAY_REC_REOCNCILIATION ');
2491: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_rec_nos = ' || to_char(l_rec_nos));
2492: END IF;
2493: update XTR_PAY_REC_RECONCILIATION
2494: set RECONCILED_REFERENCE = l_rec_nos,
2487: End if;
2488:
2489: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2490: xtr_debug_pkg.debug('P_RECONCILE: ' || '>>>>> UPDATE XTR_PAY_REC_REOCNCILIATION ');
2491: xtr_debug_pkg.debug('P_RECONCILE: ' || 'l_rec_nos = ' || to_char(l_rec_nos));
2492: END IF;
2493: update XTR_PAY_REC_RECONCILIATION
2494: set RECONCILED_REFERENCE = l_rec_nos,
2495: RECONCILED_PASS_CODE = P_PASS_CODE
2499: close DDA;
2500: end if;
2501:
2502: END LOOP; -- 4 (in 2)
2503: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2504: xtr_debug_pkg.debug('P_RECONCILE: ' || 'END LOOP -- 4 ');
2505: END IF;
2506: close REC;
2507: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2500: end if;
2501:
2502: END LOOP; -- 4 (in 2)
2503: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2504: xtr_debug_pkg.debug('P_RECONCILE: ' || 'END LOOP -- 4 ');
2505: END IF;
2506: close REC;
2507: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2508: xtr_debug_pkg.debug('P_RECONCILE: ' || 'END LOOP -- 2 ');
2503: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2504: xtr_debug_pkg.debug('P_RECONCILE: ' || 'END LOOP -- 4 ');
2505: END IF;
2506: close REC;
2507: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2508: xtr_debug_pkg.debug('P_RECONCILE: ' || 'END LOOP -- 2 ');
2509: END IF;
2510: END LOOP; -- 2
2511: close PASSES;
2504: xtr_debug_pkg.debug('P_RECONCILE: ' || 'END LOOP -- 4 ');
2505: END IF;
2506: close REC;
2507: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2508: xtr_debug_pkg.debug('P_RECONCILE: ' || 'END LOOP -- 2 ');
2509: END IF;
2510: END LOOP; -- 2
2511: close PASSES;
2512: if PASSES%ISOPEN then close PASSES; end if;
2515: if REC_NUM%ISOPEN then close REC_NUM; end if;
2516: if DDA%ISOPEN then close DDA; end if;
2517: if DDA_SUM_DATE%ISOPEN then close DDA_SUM_DATE; end if;
2518: if DDA_SUM_RANGE%ISOPEN then close DDA_SUM_RANGE; end if;
2519: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2520: xtr_debug_pkg.debug('END P_RECONCILE >>>>>>>>>>');
2521: END IF;
2522:
2523: utl_file.put_line (l_file,' ');
2516: if DDA%ISOPEN then close DDA; end if;
2517: if DDA_SUM_DATE%ISOPEN then close DDA_SUM_DATE; end if;
2518: if DDA_SUM_RANGE%ISOPEN then close DDA_SUM_RANGE; end if;
2519: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2520: xtr_debug_pkg.debug('END P_RECONCILE >>>>>>>>>>');
2521: END IF;
2522:
2523: utl_file.put_line (l_file,' ');
2524: utl_file.put_line (l_file,'>> Log file is located at '||l_dirname||'/xtraurec.log');