165: tq.id = x_data_profile_id
166: AND tql.id = tq.id
167: AND gt.group_table_id = tql.level_id
168: AND flv.lookup_type = 'MSD_DEM_LEVELS'
169: AND to_number(msd_dem_common_utilities.get_app_id_text('MSD_DEM_DEMANTRA_OBJECT_ID',
170: flv.meaning,
171: 1,
172: 'group_table_id')) = gt.group_table_id;
173:
293:
294: ELSE
295: retcode := -1;
296: errbuf:='INVALID_DATA_PROFILE';
297: msd_dem_common_utilities.log_message ('Error: can not assign plan name to forecast' );
298: msd_dem_common_utilities.log_message(errbuf);
299: msd_dem_common_utilities.log_message ('Exiting: MSD_WS_DEM_RENAME_FORECAST.ASSIGN_PLAN_NAME_TO_FORECAST- ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
300:
301: RETURN;
294: ELSE
295: retcode := -1;
296: errbuf:='INVALID_DATA_PROFILE';
297: msd_dem_common_utilities.log_message ('Error: can not assign plan name to forecast' );
298: msd_dem_common_utilities.log_message(errbuf);
299: msd_dem_common_utilities.log_message ('Exiting: MSD_WS_DEM_RENAME_FORECAST.ASSIGN_PLAN_NAME_TO_FORECAST- ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
300:
301: RETURN;
302: END IF;
295: retcode := -1;
296: errbuf:='INVALID_DATA_PROFILE';
297: msd_dem_common_utilities.log_message ('Error: can not assign plan name to forecast' );
298: msd_dem_common_utilities.log_message(errbuf);
299: msd_dem_common_utilities.log_message ('Exiting: MSD_WS_DEM_RENAME_FORECAST.ASSIGN_PLAN_NAME_TO_FORECAST- ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
300:
301: RETURN;
302: END IF;
303:
316: IF (x_retcode = '1')
317: THEN
318: retcode := x_retcode;
319: errbuf:= x_errbuf;
320: msd_dem_common_utilities.log_message ('Warning: IN assign plan name to forecast' );
321: msd_dem_common_utilities.log_debug ('Warning: IN assign plan name to forecast' );
322: msd_dem_common_utilities.log_debug (errbuf);
323:
324: ELSIF(x_retcode = '-1')
317: THEN
318: retcode := x_retcode;
319: errbuf:= x_errbuf;
320: msd_dem_common_utilities.log_message ('Warning: IN assign plan name to forecast' );
321: msd_dem_common_utilities.log_debug ('Warning: IN assign plan name to forecast' );
322: msd_dem_common_utilities.log_debug (errbuf);
323:
324: ELSIF(x_retcode = '-1')
325: THEN
318: retcode := x_retcode;
319: errbuf:= x_errbuf;
320: msd_dem_common_utilities.log_message ('Warning: IN assign plan name to forecast' );
321: msd_dem_common_utilities.log_debug ('Warning: IN assign plan name to forecast' );
322: msd_dem_common_utilities.log_debug (errbuf);
323:
324: ELSIF(x_retcode = '-1')
325: THEN
326: retcode := x_retcode;
324: ELSIF(x_retcode = '-1')
325: THEN
326: retcode := x_retcode;
327: errbuf:= x_errbuf;
328: msd_dem_common_utilities.log_message ('Error: In assign plan name to forecast' );
329: msd_dem_common_utilities.log_message(errbuf);
330: msd_dem_common_utilities.log_message ('Exiting: MSD_WS_DEM_RENAME_FORECAST.ASSIGN_PLAN_NAME_TO_FORECAST- ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
331: RETURN;
332: END IF;
325: THEN
326: retcode := x_retcode;
327: errbuf:= x_errbuf;
328: msd_dem_common_utilities.log_message ('Error: In assign plan name to forecast' );
329: msd_dem_common_utilities.log_message(errbuf);
330: msd_dem_common_utilities.log_message ('Exiting: MSD_WS_DEM_RENAME_FORECAST.ASSIGN_PLAN_NAME_TO_FORECAST- ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
331: RETURN;
332: END IF;
333:
326: retcode := x_retcode;
327: errbuf:= x_errbuf;
328: msd_dem_common_utilities.log_message ('Error: In assign plan name to forecast' );
329: msd_dem_common_utilities.log_message(errbuf);
330: msd_dem_common_utilities.log_message ('Exiting: MSD_WS_DEM_RENAME_FORECAST.ASSIGN_PLAN_NAME_TO_FORECAST- ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
331: RETURN;
332: END IF;
333:
334: EXCEPTION
334: EXCEPTION
335: WHEN OTHERS THEN
336: retcode:= -1;
337: errbuf := substr(SQLERRM,1,150);
338: msd_dem_common_utilities.log_message ('Error: can not assign plan name to forecast' );
339: msd_dem_common_utilities.log_message ('Exception: MSD_WS_DEM_RENAME_FORECAST.ASSIGN_PLAN_NAME_TO_FORECAST - ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS') );
340: msd_dem_common_utilities.log_message (errbuf);
341: RETURN;
342:
335: WHEN OTHERS THEN
336: retcode:= -1;
337: errbuf := substr(SQLERRM,1,150);
338: msd_dem_common_utilities.log_message ('Error: can not assign plan name to forecast' );
339: msd_dem_common_utilities.log_message ('Exception: MSD_WS_DEM_RENAME_FORECAST.ASSIGN_PLAN_NAME_TO_FORECAST - ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS') );
340: msd_dem_common_utilities.log_message (errbuf);
341: RETURN;
342:
343:
336: retcode:= -1;
337: errbuf := substr(SQLERRM,1,150);
338: msd_dem_common_utilities.log_message ('Error: can not assign plan name to forecast' );
339: msd_dem_common_utilities.log_message ('Exception: MSD_WS_DEM_RENAME_FORECAST.ASSIGN_PLAN_NAME_TO_FORECAST - ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS') );
340: msd_dem_common_utilities.log_message (errbuf);
341: RETURN;
342:
343:
344: END ASSIGN_PLAN_NAME_INT;
684:
685:
686: BEGIN
687:
688: msd_dem_common_utilities.log_debug ('Entering: msd_ws_dem_rename_forecast.delete_plan - ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
689: msd_dem_common_utilities.log_debug (' ');
690:
691: msd_dem_common_utilities.log_message (' ' || rpad('Plan Scenario Id', 30) || ' - ' || to_char(p_plan_scn_id));
692: msd_dem_common_utilities.log_message (' ' || rpad('Delete Associations', 30) || ' - ' || to_char(p_delete_assoc));
685:
686: BEGIN
687:
688: msd_dem_common_utilities.log_debug ('Entering: msd_ws_dem_rename_forecast.delete_plan - ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
689: msd_dem_common_utilities.log_debug (' ');
690:
691: msd_dem_common_utilities.log_message (' ' || rpad('Plan Scenario Id', 30) || ' - ' || to_char(p_plan_scn_id));
692: msd_dem_common_utilities.log_message (' ' || rpad('Delete Associations', 30) || ' - ' || to_char(p_delete_assoc));
693: msd_dem_common_utilities.log_message (' ');
687:
688: msd_dem_common_utilities.log_debug ('Entering: msd_ws_dem_rename_forecast.delete_plan - ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
689: msd_dem_common_utilities.log_debug (' ');
690:
691: msd_dem_common_utilities.log_message (' ' || rpad('Plan Scenario Id', 30) || ' - ' || to_char(p_plan_scn_id));
692: msd_dem_common_utilities.log_message (' ' || rpad('Delete Associations', 30) || ' - ' || to_char(p_delete_assoc));
693: msd_dem_common_utilities.log_message (' ');
694:
695: /* Get the scenario_id of given Plan scenario id */
688: msd_dem_common_utilities.log_debug ('Entering: msd_ws_dem_rename_forecast.delete_plan - ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
689: msd_dem_common_utilities.log_debug (' ');
690:
691: msd_dem_common_utilities.log_message (' ' || rpad('Plan Scenario Id', 30) || ' - ' || to_char(p_plan_scn_id));
692: msd_dem_common_utilities.log_message (' ' || rpad('Delete Associations', 30) || ' - ' || to_char(p_delete_assoc));
693: msd_dem_common_utilities.log_message (' ');
694:
695: /* Get the scenario_id of given Plan scenario id */
696: x_sql_stmt := 'SELECT nvl(sum(scenario_id), 0) '
689: msd_dem_common_utilities.log_debug (' ');
690:
691: msd_dem_common_utilities.log_message (' ' || rpad('Plan Scenario Id', 30) || ' - ' || to_char(p_plan_scn_id));
692: msd_dem_common_utilities.log_message (' ' || rpad('Delete Associations', 30) || ' - ' || to_char(p_delete_assoc));
693: msd_dem_common_utilities.log_message (' ');
694:
695: /* Get the scenario_id of given Plan scenario id */
696: x_sql_stmt := 'SELECT nvl(sum(scenario_id), 0) '
697: || ' FROM msd_dp_scenarios mds '
700: || ' AND mds.scenario_id = ' || p_plan_scn_id ;
701:
702: EXECUTE IMMEDIATE x_sql_stmt INTO x_scenario_id ;
703:
704: msd_dem_common_utilities.log_debug (x_sql_stmt);
705: msd_dem_common_utilities.log_debug (' ');
706:
707: /* Check if the scenario_id is attached to any ascp plan */
708: x_sql_stmt := 'SELECT nvl(sum(1),0) FROM msc_plan_schedules WHERE input_schedule_id = ' || x_scenario_id ;
701:
702: EXECUTE IMMEDIATE x_sql_stmt INTO x_scenario_id ;
703:
704: msd_dem_common_utilities.log_debug (x_sql_stmt);
705: msd_dem_common_utilities.log_debug (' ');
706:
707: /* Check if the scenario_id is attached to any ascp plan */
708: x_sql_stmt := 'SELECT nvl(sum(1),0) FROM msc_plan_schedules WHERE input_schedule_id = ' || x_scenario_id ;
709:
708: x_sql_stmt := 'SELECT nvl(sum(1),0) FROM msc_plan_schedules WHERE input_schedule_id = ' || x_scenario_id ;
709:
710: EXECUTE IMMEDIATE x_sql_stmt INTO x_attached_flag ;
711:
712: msd_dem_common_utilities.log_debug (x_sql_stmt);
713: msd_dem_common_utilities.log_debug (' ');
714:
715: msd_dem_common_utilities.log_debug ('***Variables***');
716: msd_dem_common_utilities.log_debug ('x_scenario_id - ' || x_scenario_id);
709:
710: EXECUTE IMMEDIATE x_sql_stmt INTO x_attached_flag ;
711:
712: msd_dem_common_utilities.log_debug (x_sql_stmt);
713: msd_dem_common_utilities.log_debug (' ');
714:
715: msd_dem_common_utilities.log_debug ('***Variables***');
716: msd_dem_common_utilities.log_debug ('x_scenario_id - ' || x_scenario_id);
717: msd_dem_common_utilities.log_debug ('x_attached_flag - ' || x_attached_flag);
711:
712: msd_dem_common_utilities.log_debug (x_sql_stmt);
713: msd_dem_common_utilities.log_debug (' ');
714:
715: msd_dem_common_utilities.log_debug ('***Variables***');
716: msd_dem_common_utilities.log_debug ('x_scenario_id - ' || x_scenario_id);
717: msd_dem_common_utilities.log_debug ('x_attached_flag - ' || x_attached_flag);
718: msd_dem_common_utilities.log_debug ('p_delete_assoc - ' || p_delete_assoc);
719: msd_dem_common_utilities.log_debug (' ');
712: msd_dem_common_utilities.log_debug (x_sql_stmt);
713: msd_dem_common_utilities.log_debug (' ');
714:
715: msd_dem_common_utilities.log_debug ('***Variables***');
716: msd_dem_common_utilities.log_debug ('x_scenario_id - ' || x_scenario_id);
717: msd_dem_common_utilities.log_debug ('x_attached_flag - ' || x_attached_flag);
718: msd_dem_common_utilities.log_debug ('p_delete_assoc - ' || p_delete_assoc);
719: msd_dem_common_utilities.log_debug (' ');
720:
713: msd_dem_common_utilities.log_debug (' ');
714:
715: msd_dem_common_utilities.log_debug ('***Variables***');
716: msd_dem_common_utilities.log_debug ('x_scenario_id - ' || x_scenario_id);
717: msd_dem_common_utilities.log_debug ('x_attached_flag - ' || x_attached_flag);
718: msd_dem_common_utilities.log_debug ('p_delete_assoc - ' || p_delete_assoc);
719: msd_dem_common_utilities.log_debug (' ');
720:
721: IF (x_attached_flag <> 0 AND p_delete_assoc = C_NO) THEN -- scenario_id is attached, delete_assoc is NO
714:
715: msd_dem_common_utilities.log_debug ('***Variables***');
716: msd_dem_common_utilities.log_debug ('x_scenario_id - ' || x_scenario_id);
717: msd_dem_common_utilities.log_debug ('x_attached_flag - ' || x_attached_flag);
718: msd_dem_common_utilities.log_debug ('p_delete_assoc - ' || p_delete_assoc);
719: msd_dem_common_utilities.log_debug (' ');
720:
721: IF (x_attached_flag <> 0 AND p_delete_assoc = C_NO) THEN -- scenario_id is attached, delete_assoc is NO
722:
715: msd_dem_common_utilities.log_debug ('***Variables***');
716: msd_dem_common_utilities.log_debug ('x_scenario_id - ' || x_scenario_id);
717: msd_dem_common_utilities.log_debug ('x_attached_flag - ' || x_attached_flag);
718: msd_dem_common_utilities.log_debug ('p_delete_assoc - ' || p_delete_assoc);
719: msd_dem_common_utilities.log_debug (' ');
720:
721: IF (x_attached_flag <> 0 AND p_delete_assoc = C_NO) THEN -- scenario_id is attached, delete_assoc is NO
722:
723: retcode := -1;
721: IF (x_attached_flag <> 0 AND p_delete_assoc = C_NO) THEN -- scenario_id is attached, delete_assoc is NO
722:
723: retcode := -1;
724: errbuf := 'There are associations for this plan, hence the plan cannot be deleted.';
725: msd_dem_common_utilities.log_message ('ERROR(1): msd_ws_dem_rename_forecast.delete_plan - ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
726: msd_dem_common_utilities.log_message ('There are associations for this plan, hence the plan cannot be deleted.');
727: msd_dem_common_utilities.log_message ('If you still want to delete, rerun program with parameter "Delete Associations to Supply Plans" set to yes');
728: msd_dem_common_utilities.log_message (' ');
729:
722:
723: retcode := -1;
724: errbuf := 'There are associations for this plan, hence the plan cannot be deleted.';
725: msd_dem_common_utilities.log_message ('ERROR(1): msd_ws_dem_rename_forecast.delete_plan - ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
726: msd_dem_common_utilities.log_message ('There are associations for this plan, hence the plan cannot be deleted.');
727: msd_dem_common_utilities.log_message ('If you still want to delete, rerun program with parameter "Delete Associations to Supply Plans" set to yes');
728: msd_dem_common_utilities.log_message (' ');
729:
730: RETURN;
723: retcode := -1;
724: errbuf := 'There are associations for this plan, hence the plan cannot be deleted.';
725: msd_dem_common_utilities.log_message ('ERROR(1): msd_ws_dem_rename_forecast.delete_plan - ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
726: msd_dem_common_utilities.log_message ('There are associations for this plan, hence the plan cannot be deleted.');
727: msd_dem_common_utilities.log_message ('If you still want to delete, rerun program with parameter "Delete Associations to Supply Plans" set to yes');
728: msd_dem_common_utilities.log_message (' ');
729:
730: RETURN;
731:
724: errbuf := 'There are associations for this plan, hence the plan cannot be deleted.';
725: msd_dem_common_utilities.log_message ('ERROR(1): msd_ws_dem_rename_forecast.delete_plan - ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
726: msd_dem_common_utilities.log_message ('There are associations for this plan, hence the plan cannot be deleted.');
727: msd_dem_common_utilities.log_message ('If you still want to delete, rerun program with parameter "Delete Associations to Supply Plans" set to yes');
728: msd_dem_common_utilities.log_message (' ');
729:
730: RETURN;
731:
732: ELSIF (x_attached_flag = 0 OR (x_attached_flag <> 0 AND p_delete_assoc = C_YES) ) THEN -- scenario_id is NOT attached OR scenario_id is attached, delete_assoc is YES
736: EXECUTE IMMEDIATE x_del_stmt;
737: x_count := SQL%ROWCOUNT;
738: COMMIT;
739:
740: msd_dem_common_utilities.log_debug (x_del_stmt);
741: msd_dem_common_utilities.log_debug ('Rows Deleted - ' || x_count );
742: msd_dem_common_utilities.log_debug (' ');
743:
744: /* msd_dp_scenario_output_levels */
737: x_count := SQL%ROWCOUNT;
738: COMMIT;
739:
740: msd_dem_common_utilities.log_debug (x_del_stmt);
741: msd_dem_common_utilities.log_debug ('Rows Deleted - ' || x_count );
742: msd_dem_common_utilities.log_debug (' ');
743:
744: /* msd_dp_scenario_output_levels */
745: x_del_stmt := 'DELETE FROM msd_dp_scenario_output_levels WHERE scenario_id = ' || x_scenario_id ;
738: COMMIT;
739:
740: msd_dem_common_utilities.log_debug (x_del_stmt);
741: msd_dem_common_utilities.log_debug ('Rows Deleted - ' || x_count );
742: msd_dem_common_utilities.log_debug (' ');
743:
744: /* msd_dp_scenario_output_levels */
745: x_del_stmt := 'DELETE FROM msd_dp_scenario_output_levels WHERE scenario_id = ' || x_scenario_id ;
746: EXECUTE IMMEDIATE x_del_stmt;
746: EXECUTE IMMEDIATE x_del_stmt;
747: x_count := SQL%ROWCOUNT;
748: COMMIT;
749:
750: msd_dem_common_utilities.log_debug (x_del_stmt);
751: msd_dem_common_utilities.log_debug ('Rows Deleted - ' || x_count );
752: msd_dem_common_utilities.log_debug (' ');
753:
754: /* msd_dp_scn_entries_denorm */
747: x_count := SQL%ROWCOUNT;
748: COMMIT;
749:
750: msd_dem_common_utilities.log_debug (x_del_stmt);
751: msd_dem_common_utilities.log_debug ('Rows Deleted - ' || x_count );
752: msd_dem_common_utilities.log_debug (' ');
753:
754: /* msd_dp_scn_entries_denorm */
755: x_del_stmt := 'DELETE FROM msd_dp_scn_entries_denorm WHERE scenario_id = ' || x_scenario_id ;
748: COMMIT;
749:
750: msd_dem_common_utilities.log_debug (x_del_stmt);
751: msd_dem_common_utilities.log_debug ('Rows Deleted - ' || x_count );
752: msd_dem_common_utilities.log_debug (' ');
753:
754: /* msd_dp_scn_entries_denorm */
755: x_del_stmt := 'DELETE FROM msd_dp_scn_entries_denorm WHERE scenario_id = ' || x_scenario_id ;
756: EXECUTE IMMEDIATE x_del_stmt;
756: EXECUTE IMMEDIATE x_del_stmt;
757: x_count := SQL%ROWCOUNT;
758: COMMIT;
759:
760: msd_dem_common_utilities.log_debug (x_del_stmt);
761: msd_dem_common_utilities.log_debug ('Rows Deleted - ' || x_count );
762: msd_dem_common_utilities.log_debug (' ');
763:
764:
757: x_count := SQL%ROWCOUNT;
758: COMMIT;
759:
760: msd_dem_common_utilities.log_debug (x_del_stmt);
761: msd_dem_common_utilities.log_debug ('Rows Deleted - ' || x_count );
762: msd_dem_common_utilities.log_debug (' ');
763:
764:
765: IF (x_attached_flag <> 0 AND p_delete_assoc = C_YES) THEN
758: COMMIT;
759:
760: msd_dem_common_utilities.log_debug (x_del_stmt);
761: msd_dem_common_utilities.log_debug ('Rows Deleted - ' || x_count );
762: msd_dem_common_utilities.log_debug (' ');
763:
764:
765: IF (x_attached_flag <> 0 AND p_delete_assoc = C_YES) THEN
766: /* msc_plan_schedules */
768: EXECUTE IMMEDIATE x_del_stmt;
769: x_count := SQL%ROWCOUNT;
770: COMMIT;
771:
772: msd_dem_common_utilities.log_debug (x_del_stmt);
773: msd_dem_common_utilities.log_debug ('Rows Deleted - ' || x_count );
774: msd_dem_common_utilities.log_debug (' ');
775: END IF;
776:
769: x_count := SQL%ROWCOUNT;
770: COMMIT;
771:
772: msd_dem_common_utilities.log_debug (x_del_stmt);
773: msd_dem_common_utilities.log_debug ('Rows Deleted - ' || x_count );
774: msd_dem_common_utilities.log_debug (' ');
775: END IF;
776:
777: END IF;
770: COMMIT;
771:
772: msd_dem_common_utilities.log_debug (x_del_stmt);
773: msd_dem_common_utilities.log_debug ('Rows Deleted - ' || x_count );
774: msd_dem_common_utilities.log_debug (' ');
775: END IF;
776:
777: END IF;
778:
775: END IF;
776:
777: END IF;
778:
779: msd_dem_common_utilities.log_debug ('Exiting: msd_ws_dem_rename_forecast.delete_plan - ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
780: msd_dem_common_utilities.log_debug (' ');
781:
782:
783: EXCEPTION
776:
777: END IF;
778:
779: msd_dem_common_utilities.log_debug ('Exiting: msd_ws_dem_rename_forecast.delete_plan - ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
780: msd_dem_common_utilities.log_debug (' ');
781:
782:
783: EXCEPTION
784: WHEN others THEN
783: EXCEPTION
784: WHEN others THEN
785: errbuf := substr(SQLERRM,1,150);
786: retcode := -1 ;
787: msd_dem_common_utilities.log_message ('Exception: msd_ws_dem_rename_forecast.delete_plan - ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
788: msd_dem_common_utilities.log_message (errbuf);
789: msd_dem_common_utilities.log_message (' ');
790: ROLLBACK;
791:
784: WHEN others THEN
785: errbuf := substr(SQLERRM,1,150);
786: retcode := -1 ;
787: msd_dem_common_utilities.log_message ('Exception: msd_ws_dem_rename_forecast.delete_plan - ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
788: msd_dem_common_utilities.log_message (errbuf);
789: msd_dem_common_utilities.log_message (' ');
790: ROLLBACK;
791:
792: END DELETE_PLAN;
785: errbuf := substr(SQLERRM,1,150);
786: retcode := -1 ;
787: msd_dem_common_utilities.log_message ('Exception: msd_ws_dem_rename_forecast.delete_plan - ' || TO_CHAR(systimestamp, 'DD-MON-YYYY HH24:MI:SS'));
788: msd_dem_common_utilities.log_message (errbuf);
789: msd_dem_common_utilities.log_message (' ');
790: ROLLBACK;
791:
792: END DELETE_PLAN;
793: