[Home] [Help]
889: sExplType CZ_IMP_DEVL_PROJECT.EXPLOSION_TYPE%TYPE;
890: nModelId CZ_DEVL_PROJECTS.DEVL_PROJECT_ID%TYPE;
891: sModelId CZ_DEVL_PROJECTS.DEVL_PROJECT_ID%TYPE;
892: nExplId NUMBER;
893: COPY_CHILD_MODELS CZ_XFR_PROJECT_BILLS.COPY_ADDL_CHILD_MODELS%TYPE;
894: nModelType CZ_IMP_DEVL_PROJECT.MODEL_TYPE%TYPE;
895: sModelType CZ_IMP_DEVL_PROJECT.MODEL_TYPE%TYPE;
896:
897: /* Internal vars */
985:
986: BEGIN
987:
988: SELECT NVL(copy_addl_child_models,'0') INTO COPY_CHILD_MODELS
989: FROM cz_xfr_project_bills
990: WHERE model_ps_node_id = REFRESH_MODEL_ID;
991:
992: EXCEPTION
993: WHEN OTHERS THEN
1557: x_xfr_devl_project_f BOOLEAN:=FALSE;
1558: x_error BOOLEAN:=FALSE;
1559: p_xfr_devl_project c_xfr_devl_project%ROWTYPE;
1560:
1561: copy_child_models cz_xfr_project_bills.copy_addl_child_models%TYPE;
1562: server_id cz_xfr_project_bills.source_server%TYPE;
1563:
1564: dbModelType cz_devl_projects.model_type%TYPE;
1565:
1558: x_error BOOLEAN:=FALSE;
1559: p_xfr_devl_project c_xfr_devl_project%ROWTYPE;
1560:
1561: copy_child_models cz_xfr_project_bills.copy_addl_child_models%TYPE;
1562: server_id cz_xfr_project_bills.source_server%TYPE;
1563:
1564: dbModelType cz_devl_projects.model_type%TYPE;
1565:
1566: -- Internal vars --
1662: WHERE DEVL_PROJECT_ID=p_xfr_devl_project.DEVL_PROJECT_ID
1663: AND RUN_ID=inRUN_ID
1664: AND DISPOSITION='N';
1665:
1666: UPDATE CZ_XFR_PROJECT_BILLS
1667: SET LAST_IMPORT_RUN_ID=inRUN_ID,
1668: LAST_IMPORT_DATE=SYSDATE
1669: WHERE ORGANIZATION_ID=p_xfr_devl_project.ORGANIZATION_ID AND
1670: TOP_ITEM_ID=p_xfr_devl_project.TOP_ITEM_ID AND
1724: (ENCLOSING_FOLDER=p_rp_folder_id AND NAME=p_xfr_devl_project.name)));
1725:
1726:
1727: IF(p_xfr_devl_project.plan_level = 0)THEN
1728: UPDATE CZ_XFR_PROJECT_BILLS SET
1729: MODEL_PS_NODE_ID=p_xfr_devl_project.devl_project_id,
1730: DESCRIPTION=p_xfr_devl_project.desc_text,
1731: COMPONENT_ITEM_ID=p_xfr_devl_project.top_item_id,
1732: LAST_IMPORT_RUN_ID=inRUN_ID,
1737: MODEL_PS_NODE_ID = p_xfr_devl_project.model_id
1738: RETURNING copy_addl_child_models,source_server INTO copy_child_models, server_id;
1739:
1740: ELSE
1741: INSERT INTO cz_xfr_project_bills
1742: (model_ps_node_id, description, component_item_id, last_import_run_id,
1743: last_import_date, organization_id, top_item_id, explosion_type,
1744: copy_addl_child_models, source_server, deleted_flag)
1745: SELECT p_xfr_devl_project.devl_project_id, p_xfr_devl_project.desc_text,
1746: p_xfr_devl_project.top_item_id, inRUN_ID, SYSDATE,
1747: NVL(p_xfr_devl_project.ORGANIZATION_ID, 0), NVL(p_xfr_devl_project.TOP_ITEM_ID, 0),
1748: NVL(p_xfr_devl_project.EXPLOSION_TYPE, 'GENERIC'), '0', NVL(server_id, 0), '0'
1749: FROM DUAL WHERE NOT EXISTS
1750: (SELECT NULL FROM cz_xfr_project_bills
1751: WHERE model_ps_node_id = p_xfr_devl_project.devl_project_id
1752: AND deleted_flag = '0');
1753: END IF;
1754:
1803: AND NAME=p_xfr_devl_project.name
1804: AND deleted_flag = '0');
1805: -- dbms_output.put_line ('Updating .. M : ' || p_xfr_devl_project.devl_project_id);
1806:
1807: UPDATE CZ_XFR_PROJECT_BILLS SET
1808: DESCRIPTION=DECODE(NOUPDATE_DESC_TEXT,0,p_xfr_devl_project.desc_text,description),
1809: COMPONENT_ITEM_ID=p_xfr_devl_project.top_item_id,
1810: LAST_IMPORT_RUN_ID=inRUN_ID,
1811: LAST_IMPORT_DATE=SYSDATE,