[Home] [Help]
405: x_errbuf OUT NOCOPY VARCHAR2,
406: x_retcode OUT NOCOPY VARCHAR2) IS
407: CURSOR c_entities IS
408: SELECT run_entity_id, status_code
409: FROM gcs_cons_eng_runs
410: WHERE NVL(associated_run_name, run_name) = p_runname
411: START WITH run_entity_id = p_entity_id
412: AND NVL(associated_run_name, run_name) = p_runname
413: CONNECT BY PRIOR run_entity_id = parent_entity_id;
421: IF (entity.status_code <> 'COMPLETED') THEN
422: RAISE gcs_cons_eng_invalid_status;
423: END IF;
424:
425: UPDATE gcs_cons_eng_runs
426: SET locked_flag = decode(p_lock_flag, 'Y', 'N', 'Y')
427: WHERE NVL(associated_run_name, run_name) = p_runname
428: AND run_entity_id = entity.run_entity_id;
429: