[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;
1926: ' ,''*'' AS ATTRIBUTE_CODE ' ||
1927: ' ,''*'' AS VIEW_IN_HIERARCHY_CODE ' ||
1928: ' ,''*'' AS EDIT_IN_HIERARCHY_CODE ' ||
1929: ' ,''*'' AS CUSTOMIZATION_LEVEL ' ||
1930: ' FROM dual';
1931: EXECUTE IMMEDIATE v_apc_props_string;
1932:
1933: v_apc_prop_values_string :=
1934: 'CREATE OR REPLACE VIEW CZ_EXV_ITEM_APC_PROP_VALUES AS ' ||
1940: ',-1 AS ITEM_CATALOG_GROUP_ID ' ||
1941: ',-1 AS ATTR_GROUP_ID ' ||
1942: ',''*'' AS SOURCE_LANG ' ||
1943: ',''*'' AS LANGUAGE ' ||
1944: 'FROM dual';
1945: EXECUTE IMMEDIATE v_apc_prop_values_string;
1946:
1947: END;
1948:
2206: BEGIN
2207:
2208: SELECT decode(import_enabled,'Y','1','N','0','0')
2209: INTO v_import_enabled
2210: FROM dual;
2211:
2212: IF (v_import_enabled = '1') THEN
2213: SELECT count(*) INTO v_import_count FROM cz_servers
2214: WHERE import_enabled = '1';
2246:
2247: BEGIN
2248: SELECT cz_servers_s.NEXTVAL
2249: INTO v_server_id
2250: FROM dual;
2251: FND_FILE.PUT_LINE(FND_FILE.LOG,'Inserting ' || v_server_id);
2252: INSERT INTO CZ_SERVERS (SERVER_LOCAL_ID,LOCAL_NAME, HOSTNAME, DB_LISTENER_PORT,
2253: INSTANCE_NAME, FNDNAM, GLOBAL_IDENTITY, NOTES,
2254: FNDNAM_LINK_NAME, IMPORT_ENABLED)
2350: BEGIN
2351: BEGIN
2352: SELECT decode(import_enabled,'Y','1','N','0','0')
2353: INTO v_import_enabled
2354: FROM dual;
2355:
2356: SELECT local_name into matching_local_name
2357: FROM cz_servers
2358: WHERE hostname = v_hostname
3101: FROM cz_devl_projects
3102: WHERE devl_project_id = iModel_Id
3103: AND deleted_flag = '0';
3104:
3105: select decode(copy_child_models,'Y',0,'N',1,0) into lCopy_Child_Models from dual;
3106:
3107: EXCEPTION
3108: WHEN NO_DATA_FOUND THEN
3109: RAISE CZ_ADMIN.IMP_MODEL_NOT_FOUND;