151: EXCEPTION
152: WHEN OTHERS THEN
153: retcode := -1;
154: errbuf := substr(SQLERRM,1,150);
155: msd_dem_common_utilities.log_message ('msd_dem_ssl_rs.run_rs - ERROR ...' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
156: msd_dem_common_utilities.log_message ('Error while submitting request for collecting shipment history');
157: msd_dem_common_utilities.log_message (errbuf);
158: raise l_submit_failed;
159:
152: WHEN OTHERS THEN
153: retcode := -1;
154: errbuf := substr(SQLERRM,1,150);
155: msd_dem_common_utilities.log_message ('msd_dem_ssl_rs.run_rs - ERROR ...' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
156: msd_dem_common_utilities.log_message ('Error while submitting request for collecting shipment history');
157: msd_dem_common_utilities.log_message (errbuf);
158: raise l_submit_failed;
159:
160: END;
153: retcode := -1;
154: errbuf := substr(SQLERRM,1,150);
155: msd_dem_common_utilities.log_message ('msd_dem_ssl_rs.run_rs - ERROR ...' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
156: msd_dem_common_utilities.log_message ('Error while submitting request for collecting shipment history');
157: msd_dem_common_utilities.log_message (errbuf);
158: raise l_submit_failed;
159:
160: END;
161:
167:
168: exception
169: when l_submit_failed then
170: errbuf := 'Launching Request Set failed';
171: msd_dem_common_utilities.log_message(errbuf);
172: msd_dem_common_utilities.log_debug(errbuf);
173: retcode := -1;
174: when others then
175: errbuf := substr(SQLERRM,1,150);
168: exception
169: when l_submit_failed then
170: errbuf := 'Launching Request Set failed';
171: msd_dem_common_utilities.log_message(errbuf);
172: msd_dem_common_utilities.log_debug(errbuf);
173: retcode := -1;
174: when others then
175: errbuf := substr(SQLERRM,1,150);
176: msd_dem_common_utilities.log_message(errbuf);
172: msd_dem_common_utilities.log_debug(errbuf);
173: retcode := -1;
174: when others then
175: errbuf := substr(SQLERRM,1,150);
176: msd_dem_common_utilities.log_message(errbuf);
177: msd_dem_common_utilities.log_debug(errbuf);
178: retcode := -1;
179:
180: end;
173: retcode := -1;
174: when others then
175: errbuf := substr(SQLERRM,1,150);
176: msd_dem_common_utilities.log_message(errbuf);
177: msd_dem_common_utilities.log_debug(errbuf);
178: retcode := -1;
179:
180: end;
181: