[Home] [Help]
63: nORG_ID VARCHAR2(255);
64: BEGIN
65: SELECT SUBSTR(nSURR_KEY,((INSTR(nSURR_KEY,':')+1)))
66: INTO nORG_ID
67: FROM DUAL;
68: SELECT RTRIM(nSURR_KEY,nORG_ID)
69: INTO nITEM_ID
70: FROM DUAL;
71: SELECT RTRIM(nITEM_ID,':')
66: INTO nORG_ID
67: FROM DUAL;
68: SELECT RTRIM(nSURR_KEY,nORG_ID)
69: INTO nITEM_ID
70: FROM DUAL;
71: SELECT RTRIM(nITEM_ID,':')
72: INTO nITEM_ID
73: FROM DUAL;
74: xORG_ID:=nORG_ID;
69: INTO nITEM_ID
70: FROM DUAL;
71: SELECT RTRIM(nITEM_ID,':')
72: INTO nITEM_ID
73: FROM DUAL;
74: xORG_ID:=nORG_ID;
75: xITEM_ID:=nITEM_ID;
76: END;
77: END ITEM_EXTERNAL_PK;
337: parameter=>'dsORG_ID',
338: description=>'dummy value',
339: value_set=>'CZ_ORG_DUMMY',
340: default_type=>'SQL Statement',
341: default_value=>'select :$FLEX$.CZ_ORG_ID from dual',
342: display=>'N',
343: display_size=>10,
344: description_size=>10,
345: concatenated_description_size=>50,
1373:
1374: FUNCTION doesLinkExist(p_link_name IN VARCHAR2) RETURN PLS_INTEGER IS
1375: v_null PLS_INTEGER;
1376: BEGIN
1377: EXECUTE IMMEDIATE 'SELECT NULL FROM DUAL@' || p_link_name;
1378: SELECT NULL INTO v_null FROM user_db_links WHERE UPPER(db_link) = UPPER(p_link_name)
1379: OR UPPER(db_link) LIKE UPPER(p_link_name) || '.%';
1380: RETURN 1;
1381: EXCEPTION
1401: --
1402: -- to check DB link --
1403: -- use probe select statement --
1404: --
1405: EXECUTE IMMEDIATE 'SELECT sysdate FROM dual'||v_db_link
1406: INTO v_temp;
1407: RETURN LINK_WORKS;
1408: EXCEPTION
1409: WHEN OTHERS THEN
1519:
1520: --Even if the db setting exists it makes no sense to use it if the import source server
1521: --is local.
1522:
1523: IF(settingVal = 1 AND v_fndnam_link_name IS NOT NULL)THEN localTable := ', DUAL'; END IF;
1524:
1525: v_bom_string := 'CREATE OR REPLACE VIEW CZ_EXV_BILL_OF_MATERIALS AS ' ||
1526: ' SELECT ORGANIZATION_ID,ASSEMBLY_ITEM_ID,ASSEMBLY_TYPE,ALTERNATE_BOM_DESIGNATOR,COMMON_BILL_SEQUENCE_ID,BILL_SEQUENCE_ID ' ||
1527: ' FROM BOM_BILL_OF_MATERIALS' || v_fndnam_link_name ||' WHERE ALTERNATE_BOM_DESIGNATOR IS NULL'||v_rownum;
1924: ' ,''*'' AS ATTRIBUTE_CODE ' ||
1925: ' ,''*'' AS VIEW_IN_HIERARCHY_CODE ' ||
1926: ' ,''*'' AS EDIT_IN_HIERARCHY_CODE ' ||
1927: ' ,''*'' AS CUSTOMIZATION_LEVEL ' ||
1928: ' FROM dual';
1929: EXECUTE IMMEDIATE v_apc_props_string;
1930:
1931: v_apc_prop_values_string :=
1932: 'CREATE OR REPLACE VIEW CZ_EXV_ITEM_APC_PROP_VALUES AS ' ||
1938: ',-1 AS ITEM_CATALOG_GROUP_ID ' ||
1939: ',-1 AS ATTR_GROUP_ID ' ||
1940: ',''*'' AS SOURCE_LANG ' ||
1941: ',''*'' AS LANGUAGE ' ||
1942: 'FROM dual';
1943: EXECUTE IMMEDIATE v_apc_prop_values_string;
1944:
1945: END;
1946:
2204: BEGIN
2205:
2206: SELECT decode(import_enabled,'Y','1','N','0','0')
2207: INTO v_import_enabled
2208: FROM dual;
2209:
2210: IF (v_import_enabled = '1') THEN
2211: SELECT count(*) INTO v_import_count FROM cz_servers
2212: WHERE import_enabled = '1';
2244:
2245: BEGIN
2246: SELECT cz_servers_s.NEXTVAL
2247: INTO v_server_id
2248: FROM dual;
2249: FND_FILE.PUT_LINE(FND_FILE.LOG,'Inserting ' || v_server_id);
2250: INSERT INTO CZ_SERVERS (SERVER_LOCAL_ID,LOCAL_NAME, HOSTNAME, DB_LISTENER_PORT,
2251: INSTANCE_NAME, FNDNAM, GLOBAL_IDENTITY, NOTES,
2252: FNDNAM_LINK_NAME, IMPORT_ENABLED)
2348: BEGIN
2349: BEGIN
2350: SELECT decode(import_enabled,'Y','1','N','0','0')
2351: INTO v_import_enabled
2352: FROM dual;
2353:
2354: SELECT local_name into matching_local_name
2355: FROM cz_servers
2356: WHERE hostname = v_hostname
3099: FROM cz_devl_projects
3100: WHERE devl_project_id = iModel_Id
3101: AND deleted_flag = '0';
3102:
3103: select decode(copy_child_models,'Y',0,'N',1,0) into lCopy_Child_Models from dual;
3104:
3105: EXCEPTION
3106: WHEN NO_DATA_FOUND THEN
3107: RAISE CZ_ADMIN.IMP_MODEL_NOT_FOUND;