[Home] [Help]
529: var_quoteable_flag CZ_ITEM_MASTERS.quoteable_flag%TYPE;
530: var_tree_seq CZ_PS_NODES.tree_seq%TYPE;
531: var_node_name CZ_PS_NODES.name%TYPE;
532: var_key CZ_PS_NODES.user_str03%TYPE;
533: var_fk_key CZ_IMP_PS_NODES.FSK_PSNODE_3_EXT%TYPE;
534: var_instantiable_flag CZ_PS_NODES.instantiable_flag%TYPE;
535: var_minimum CZ_PS_NODES.minimum%TYPE;
536: var_maximum CZ_PS_NODES.maximum%TYPE;
537: var_text_str CZ_INTL_TEXTS.text_str%TYPE;
658: SELECT devl_project_id INTO var_project_id FROM CZ_PS_NODES
659: WHERE ps_node_id=var_ps_node_id;
660:
661: --
662: -- Allocate run_id for CZ_IMP_PS_NODES
663: --
664: SELECT CZ_XFR_RUN_INFOS_S.NEXTVAL INTO p_run_id FROM dual;
665:
666: --
859: IF ps_node_already_exists AND exists_in_t_names THEN
860:
861: -- Need to update the previous entry
862: --LOG_REPORT('CZ_POPULATORS_PKG.preview','Updating previous entry');
863: UPDATE CZ_IMP_PS_NODES
864: SET PROPERTY_BACKPTR = var_property_ptr,ITEM_TYPE_BACKPTR = var_item_type_ptr,INTL_TEXT_ID = var_new_text_id,
865: ITEM_ID = var_item_id,USER_STR03 = var_key,FSK_PSNODE_3_EXT = var_fk_key,
866: PRIMARY_UOM_CODE = var_primary_uom_code,
867: QUOTEABLE_FLAG = var_quoteable_flag,
885: IF (NOT ps_node_already_exists) THEN
886: var_new_text_id := get_Next_Seq_Id(mINTL_TEXT_SEQUENCE);
887: INTL_ID_DESC_TEXT_ARRAY(var_new_text_id) := var_desc_text;
888: END IF;
889: INSERT INTO CZ_IMP_PS_NODES
890: (RUN_ID,
891: PS_NODE_ID,
892: PARENT_ID,
893: DEVL_PROJECT_ID,
1054: <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<*/
1055:
1056: --
1057: -- populate PS Tree :
1058: -- insert/update data from CZ_IMP_PS_NODES into CZ_PS_NODES
1059: --
1060: PROCEDURE Execute_unsec
1061: (p_populator_id IN INTEGER,
1062: p_run_id IN OUT NOCOPY INTEGER,
1117: WHERE parent_id=var_parent_id
1118: AND deleted_flag='0' AND
1119: USER_STR03 NOT IN
1120: (SELECT USER_STR03
1121: FROM CZ_IMP_PS_NODES WHERE run_id=p_run_id) AND FROM_POPULATOR_ID=p_populator_id
1122: RETURNING devl_project_id,ps_node_id,intl_text_id
1123: BULK COLLECT INTO t_devl_project,t_ps_node_id,t_intl_text_id;
1124:
1125: --
1141: WHERE intl_text_id=t_intl_text_id(i);
1142: END IF;
1143:
1144:
1145: CZ_IMP_PS_NODE.KRS_PS_NODE(p_run_id,
1146: 100,
1147: 1000,
1148: var_inserts,
1149: var_updates,
1150: var_failed,
1151: var_dups,
1152: var_nochange,
1153: mXFR_PROJECT_GROUP);
1154: CZ_IMP_PS_NODE.XFR_PS_NODE(p_run_id,
1155: 100,
1156: 1000,
1157: var_inserts,
1158: var_updates,
1180: NOT IN
1181: (SELECT NVL(PROPERTY_BACKPTR,NULL_VALUE),
1182: NVL(ITEM_TYPE_BACKPTR,NULL_VALUE),NVL(ITEM_ID,NULL_VALUE),
1183: NVL(PS_NODE_TYPE,NULL_VALUE)
1184: FROM CZ_IMP_PS_NODES WHERE run_id=p_run_id) AND FROM_POPULATOR_ID=p_populator_id
1185: RETURNING devl_project_id,ps_node_id,intl_text_id
1186: BULK COLLECT INTO t_devl_project,t_ps_node_id,t_intl_text_id;
1187:
1188: --
1213:
1214: --
1215: -- general loop : --
1216: -- update PS Tree Node if there is a correlated node in CZ_PS_NODES --
1217: -- otherwise just insert from CZ_IMP_PS_NODES into CZ_PS_NODES --
1218: -- the following CZ_PS_NODES columns are used for checking : --
1219: -- FROM_POPULATOR_ID --
1220: -- PROPERTY_BACKPTR --
1221: -- ITEM_TYPE_BACKPTR --
1223: -- PS_NODE_TYPE --
1224: --
1225: FOR i IN(SELECT INTL_TEXT_ID,DEVL_PROJECT_ID,FROM_POPULATOR_ID,PROPERTY_BACKPTR,
1226: ITEM_TYPE_BACKPTR,ITEM_ID,PS_NODE_TYPE,FEATURE_TYPE,QUOTEABLE_FLAG,NAME
1227: FROM CZ_IMP_PS_NODES WHERE run_id=p_run_id)
1228: LOOP
1229:
1230: var_name := i.name;
1231:
1325: var_new_ps_id,
1326: INSTANTIABLE_FLAG,
1327: var_component_id,
1328: COUNTED_OPTIONS_FLAG
1329: FROM CZ_IMP_PS_NODES
1330: WHERE run_id=p_run_id AND
1331: NVL(FROM_POPULATOR_ID,NULL_VALUE)=NVL(i.FROM_POPULATOR_ID,NULL_VALUE) AND
1332: NVL(PROPERTY_BACKPTR,NULL_VALUE)=NVL(i.PROPERTY_BACKPTR,NULL_VALUE) AND
1333: NVL(ITEM_TYPE_BACKPTR,NULL_VALUE)=NVL(i.ITEM_TYPE_BACKPTR,NULL_VALUE) AND