159: l_min_date := l_min_date +1;
160: EXCEPTION
161: WHEN OTHERS THEN
162: ams_utility_pvt.write_conc_log('Error inserting bim_intl_dates ' || sqlerrm(sqlcode));
163: RAISE FND_API.g_exc_error;
164: END;
165: END LOOP;
166: --ams_utility_pvt.write_conc_log('After the loop');
167: --ams_utility_pvt.write_conc_log('Update the month flag');
172: GROUP BY fiscal_month);
173: EXCEPTION
174: WHEN OTHERS THEN
175: ams_utility_pvt.write_conc_log('Error updating bim_intl_dates ' || sqlerrm(sqlcode));
176: RAISE FND_API.g_exc_error;
177: END;
178:
179: --ams_utility_pvt.write_conc_log('Update the quarter flag');
180: BEGIN
184: GROUP BY fiscal_qtr);
185: EXCEPTION
186: WHEN OTHERS THEN
187: ams_utility_pvt.write_conc_log('Error updating bim_intl_dates ' || sqlerrm(sqlcode));
188: RAISE FND_API.g_exc_error;
189: END;
190: --ams_utility_pvt.write_conc_log('Update the year flag');
191: BEGIN
192: update bim_intl_dates p set year_flag = 'Y'
195: GROUP BY fiscal_year);
196: EXCEPTION
197: WHEN OTHERS THEN
198: ams_utility_pvt.write_conc_log('Error updating bim_intl_dates ' || sqlerrm(sqlcode));
199: RAISE FND_API.g_exc_error;
200: END;
201:
202: DELETE FROM bim_rep_history
203: WHERE object='DATES';
221: --ams_utility_pvt.write_conc_log('Successfully finished pop date');
222: EXCEPTION
223: WHEN OTHERS THEN
224: ams_utility_pvt.write_conc_log('Error in procedure' || sqlerrm(sqlcode));
225: RAISE FND_API.g_exc_unexpected_error;
226: END POP_INTL_DATES;
227: END BIM_POPDATES_PKG;