284:
285: CURSOR l_get_lifecycle_csr
286: IS
287: Select 'Y'
288: From dual
289: Where exists(SELECT 'XYZ' from pa_proj_elements
290: WHERE proj_element_id = P_lifecycle_id
291: AND object_type='PA_STRUCTURES'
292: AND project_id=c_project_id);
547:
548: CURSOR l_get_lifecycle_csr
549: IS
550: Select 'Y'
551: From dual
552: Where exists(SELECT 'XYZ' from pa_proj_elements
553: WHERE proj_element_id = P_lifecycle_id
554: AND object_type= c_object_type
555: AND project_id=c_project_id
628:
629: begin
630: select 'Y'
631: into l_project_usage_exists
632: from SYS.DUAL
633: where exists( select 'XYZ' from pa_lifecycle_usages
634: where lifecycle_id=P_lifecycle_id AND
635: usage_type=c_project_type);
636: exception
641:
642: begin
643: select 'Y'
644: into l_product_usage_exists
645: from SYS.DUAL
646: where exists( select 'XYZ' from pa_lifecycle_usages
647: where lifecycle_id=P_lifecycle_id AND
648: usage_type=c_product_type);
649: exception
920:
921: CURSOR l_get_phaseexist_csr
922: IS
923: Select 'Y'
924: From dual
925: Where exists(
926: Select 'XYZ'
927: from pa_proj_element_versions child
928: , pa_proj_element_versions parent
975: -- dbms_output.put_line('After initializing the stack');
976:
977: begin
978: Select 'Y' into l_phase_exists
979: From dual
980: Where exists(
981: Select 'XYZ' from pa_proj_element_versions child
982: , pa_proj_element_versions parent
983: where child.proj_element_id = P_phase_id
1003:
1004: begin
1005: select 'Y'
1006: into l_project_usage_exists
1007: from SYS.DUAL
1008: where exists( select 'XYZ' from pa_lifecycle_usages
1009: where lifecycle_id=P_lifecycle_id AND
1010: usage_type=c_project_type);
1011: exception
1016:
1017: begin
1018: select 'Y'
1019: into l_product_usage_exists
1020: from SYS.DUAL
1021: where exists(select 'XYZ' from pa_lifecycle_usages
1022: where lifecycle_id=P_lifecycle_id AND
1023: usage_type=c_product_type);
1024: exception
1349: IF l_short_name <> P_lifecycle_short_name THEN
1350: BEGIN
1351: Select 'N'
1352: Into l_shname_uniq
1353: from SYS.DUAL
1354: Where exists(Select 'XYZ' from pa_proj_elements
1355: where element_number = P_lifecycle_short_name
1356: AND object_type=c_object_type
1357: AND project_id = c_project_id);
1406:
1407: BEGIN
1408: select 'Y'
1409: into l_lifecycle_project_usage_type
1410: from SYS.DUAL
1411: where exists ( select '1' from pa_lifecycle_usages
1412: where lifecycle_id=l_lifecycle_id
1413: AND usage_type='PROJECTS');
1414: EXCEPTION
1425:
1426: BEGIN
1427: select 'Y'
1428: into l_lifecycle_product_usage_type
1429: from SYS.DUAL
1430: where exists ( select '1' from pa_lifecycle_usages
1431: where lifecycle_id=l_lifecycle_id
1432: AND usage_type='PRODUCTS');
1433: EXCEPTION