134: APPLID_NOT_FOUND EXCEPTION;
135:
136: BEGIN
137:
138: x_return_status := FND_API.G_RET_STS_SUCCESS;
139:
140: IF (p_appl_param_rec.config_creation_date = FND_API.G_MISS_DATE) THEN
141: p_appl_param_rec.config_creation_date := NULL;
142: END IF;
136: BEGIN
137:
138: x_return_status := FND_API.G_RET_STS_SUCCESS;
139:
140: IF (p_appl_param_rec.config_creation_date = FND_API.G_MISS_DATE) THEN
141: p_appl_param_rec.config_creation_date := NULL;
142: END IF;
143:
144: IF (p_appl_param_rec.config_model_lookup_date = FND_API.G_MISS_DATE) THEN
140: IF (p_appl_param_rec.config_creation_date = FND_API.G_MISS_DATE) THEN
141: p_appl_param_rec.config_creation_date := NULL;
142: END IF;
143:
144: IF (p_appl_param_rec.config_model_lookup_date = FND_API.G_MISS_DATE) THEN
145: p_appl_param_rec.config_model_lookup_date := NULL;
146: END IF;
147:
148: IF (p_appl_param_rec.config_effective_date = FND_API.G_MISS_DATE) THEN
144: IF (p_appl_param_rec.config_model_lookup_date = FND_API.G_MISS_DATE) THEN
145: p_appl_param_rec.config_model_lookup_date := NULL;
146: END IF;
147:
148: IF (p_appl_param_rec.config_effective_date = FND_API.G_MISS_DATE) THEN
149: p_appl_param_rec.config_effective_date := NULL;
150: END IF;
151:
152: IF (p_appl_param_rec.usage_name = FND_API.G_MISS_CHAR) THEN
148: IF (p_appl_param_rec.config_effective_date = FND_API.G_MISS_DATE) THEN
149: p_appl_param_rec.config_effective_date := NULL;
150: END IF;
151:
152: IF (p_appl_param_rec.usage_name = FND_API.G_MISS_CHAR) THEN
153: p_appl_param_rec.usage_name := NULL;
154: END IF;
155:
156: IF (p_appl_param_rec.publication_mode = FND_API.G_MISS_CHAR) THEN
152: IF (p_appl_param_rec.usage_name = FND_API.G_MISS_CHAR) THEN
153: p_appl_param_rec.usage_name := NULL;
154: END IF;
155:
156: IF (p_appl_param_rec.publication_mode = FND_API.G_MISS_CHAR) THEN
157: p_appl_param_rec.publication_mode := NULL;
158: END IF;
159:
160: IF (p_appl_param_rec.language = FND_API.G_MISS_CHAR) THEN
156: IF (p_appl_param_rec.publication_mode = FND_API.G_MISS_CHAR) THEN
157: p_appl_param_rec.publication_mode := NULL;
158: END IF;
159:
160: IF (p_appl_param_rec.language = FND_API.G_MISS_CHAR) THEN
161: p_appl_param_rec.language := NULL;
162: END IF;
163:
164: IF ( (p_appl_param_rec.calling_application_id = FND_API.G_MISS_NUM) OR (p_appl_param_rec.calling_application_id IS NULL) ) THEN
160: IF (p_appl_param_rec.language = FND_API.G_MISS_CHAR) THEN
161: p_appl_param_rec.language := NULL;
162: END IF;
163:
164: IF ( (p_appl_param_rec.calling_application_id = FND_API.G_MISS_NUM) OR (p_appl_param_rec.calling_application_id IS NULL) ) THEN
165: RAISE APPLID_NOT_FOUND;
166: END IF;
167: EXCEPTION
168: WHEN APPLID_NOT_FOUND THEN
165: RAISE APPLID_NOT_FOUND;
166: END IF;
167: EXCEPTION
168: WHEN APPLID_NOT_FOUND THEN
169: x_return_status := FND_API.G_RET_STS_ERROR;
170: set_fnd_message('CZ_NET_APPL_ID_ISNULL',null,null,null,null);
171: WHEN OTHERS THEN
172: x_return_status := FND_API.G_RET_STS_ERROR;
173: END default_pb_parameters;
168: WHEN APPLID_NOT_FOUND THEN
169: x_return_status := FND_API.G_RET_STS_ERROR;
170: set_fnd_message('CZ_NET_APPL_ID_ISNULL',null,null,null,null);
171: WHEN OTHERS THEN
172: x_return_status := FND_API.G_RET_STS_ERROR;
173: END default_pb_parameters;
174: -----------------------------------------------------------------------
175: ----procedure that sets the the return status to error
176: ----and populates the error message stack
180: p_err_msg IN VARCHAR2)
181: IS
182:
183: BEGIN
184: p_err_code := FND_API.G_RET_STS_ERROR;
185: fnd_msg_pub.count_and_get(p_count => p_msg_count,p_data => p_msg_data);
186: populate_debug_message(p_err_msg,NULL,NULL);
187: CZ_DEBUG_PUB.insert_into_logs(v_msg_tbl);
188: END set_error_message;
508:
509: -- message related
510: l_xml_hdr VARCHAR2(32767):= '
511: l_dummy VARCHAR2(500) := NULL;
512: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
513:
514: BEGIN
515: ---- now set the values from model_rec and org_id
516: l_context_org_id := to_char(p_organization_id);
659: l_valid_config VARCHAR2(10);
660: l_complete_config VARCHAR2(10);
661: l_header_id NUMBER;
662: l_line_id NUMBER ;
663: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
664: l_return_status_del VARCHAR2(1);
665: l_msg VARCHAR2(2000);
666: l_msg_data VARCHAR2(2000);
667: l_msg_count NUMBER;
685:
686: -----no need to check if valid_config or complete_config
687: ----fix for bug# 2937753
688: IF ( (l_exit is NULL) OR (UPPER(l_exit) = 'ERROR') ) THEN
689: RAISE FND_API.G_EXC_ERROR;
690: ELSE
691: -- if everything ok, set return values
692: x_return_status := l_return_status;
693: x_config_header_id := l_config_header_id;
693: x_config_header_id := l_config_header_id;
694: x_config_rev_nbr := l_config_rev_nbr;
695: END IF;
696: EXCEPTION
697: WHEN FND_API.G_EXC_ERROR THEN
698: x_return_status := FND_API.G_RET_STS_ERROR;
699: WHEN OTHERS THEN
700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
701: END Parse_output_xml;
694: x_config_rev_nbr := l_config_rev_nbr;
695: END IF;
696: EXCEPTION
697: WHEN FND_API.G_EXC_ERROR THEN
698: x_return_status := FND_API.G_RET_STS_ERROR;
699: WHEN OTHERS THEN
700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
701: END Parse_output_xml;
702:
696: EXCEPTION
697: WHEN FND_API.G_EXC_ERROR THEN
698: x_return_status := FND_API.G_RET_STS_ERROR;
699: WHEN OTHERS THEN
700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
701: END Parse_output_xml;
702:
703: --------------------------------------------------------------------------
704: ----procedure that logs trace for network API
1000: l_orig_item_tbl := cz_api_pub.NUMBER_TBL_TYPE();
1001: l_new_item_tbl := cz_api_pub.NUMBER_TBL_TYPE();
1002:
1003: ----initialize return status to success
1004: x_return_status := FND_API.G_RET_STS_SUCCESS;
1005: fnd_msg_pub.initialize;
1006:
1007: ---check api version
1008: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1004: x_return_status := FND_API.G_RET_STS_SUCCESS;
1005: fnd_msg_pub.initialize;
1006:
1007: ---check api version
1008: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1009: RAISE G_INCOMPATIBLE_API;
1010: END IF;
1011:
1012: ----verify that input array contains records
1014: RAISE NO_INPUT_RECORDS;
1015: END IF;
1016:
1017: ---verify that the input parameters are not null
1018: IF ( (p_tree_copy_mode IS NULL) OR (p_tree_copy_mode = FND_API.G_MISS_CHAR)) THEN
1019: RAISE INPUT_TREE_MODE_NULL;
1020: ELSIF (p_tree_copy_mode = CZ_API_PUB.G_NEW_HEADER_COPY_MODE) THEN
1021: new_config_flag := '0';
1022: ELSIF (p_tree_copy_mode = CZ_API_PUB.G_NEW_REVISION_COPY_MODE) THEN
1098: l_copy_config_msg,
1099: NULL,
1100: NULL);
1101:
1102: IF (l_copy_config_status <> FND_API.G_RET_STS_SUCCESS) THEN
1103: RAISE COPY_CONFIG_FAILURE_EXCEP;
1104: ELSE
1105: reset_config_delta (v_config_hdr_id,v_config_hdr_id);
1106: v_ouput_config_count := x_config_model_tbl.COUNT + 1;
1184: v_output_cfg_rev_nbr,
1185: v_parse_status);
1186:
1187: ----if error in parsing xml raise an exception
1188: IF (v_parse_status <> FND_API.G_RET_STS_SUCCESS) THEN
1189: RAISE PARSE_XML_ERROR;
1190: END IF;
1191:
1192: ---add the config hdr and rev to OUT NOCOPY put tbl
1333: delete_configuration(x_config_model_tbl);
1334: x_config_model_tbl.DELETE;
1335: COMMIT;
1336: WHEN OTHERS THEN
1337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1338: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1339: FND_MSG_PUB.add_exc_msg(G_PKG_NAME,l_api_name);
1340: END IF;
1341: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1472: NO_VALIDATION_CONTEXT EXCEPTION;
1473:
1474: BEGIN
1475: ----initialize return status to success
1476: x_return_status := FND_API.G_RET_STS_SUCCESS;
1477: fnd_msg_pub.initialize;
1478:
1479: ---check api version
1480: IF NOT FND_API.Compatible_API_Call(l_api_version,p_api_version,l_api_name,G_PKG_NAME) THEN
1476: x_return_status := FND_API.G_RET_STS_SUCCESS;
1477: fnd_msg_pub.initialize;
1478:
1479: ---check api version
1480: IF NOT FND_API.Compatible_API_Call(l_api_version,p_api_version,l_api_name,G_PKG_NAME) THEN
1481: RAISE G_INCOMPATIBLE_API;
1482: END IF;
1483:
1484: ---check if instance records are passed
1486: RAISE NO_INPUT_RECORDS;
1487: END IF;
1488:
1489: ---verify that the input parameters are not null
1490: IF ( (p_tree_copy_mode IS NULL) OR (p_tree_copy_mode = FND_API.G_MISS_CHAR)) THEN
1491: RAISE INPUT_TREE_MODE_NULL;
1492: ELSIF (p_tree_copy_mode = CZ_API_PUB.G_NEW_HEADER_COPY_MODE) THEN
1493: new_config_flag := '0';
1494: ELSIF (p_tree_copy_mode = CZ_API_PUB.G_NEW_REVISION_COPY_MODE) THEN
1611: v_output_cfg_rev_nbr,
1612: v_parse_status);
1613:
1614: ----if error in parsing xml raise an exception
1615: IF (v_parse_status <> FND_API.G_RET_STS_SUCCESS) THEN
1616: RAISE PARSE_XML_ERROR;
1617: END IF;
1618:
1619: ---add the config hdr and rev to OUT NOCOPY put tbl
1638: x_msg_count,
1639: x_msg_data
1640: );
1641:
1642: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1643: RAISE GEN_CONFIG_TREE_ERR;
1644: END IF;
1645:
1646: IF (l_config_model_tbl.COUNT > 1) THEN
1733: set_fnd_message('CZ_NET_API_TREE_GEN_ERR', 'HDR',l_config_hdr_id,'REV',l_config_rev_nbr);
1734: set_error_message(x_return_status,x_msg_count,x_msg_data,l_errbuf);
1735: COMMIT;
1736: WHEN OTHERS THEN
1737: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1738: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1739: FND_MSG_PUB.add_exc_msg(G_PKG_NAME,l_api_name);
1740: END IF;
1741: FND_MSG_PUB.count_and_get(NULL,x_msg_count,x_msg_data);
1858: l_msg_data VARCHAR2(2000);
1859: l_appl_param_rec CZ_API_PUB.appl_param_rec_type;
1860:
1861: BEGIN
1862: x_return_status := FND_API.G_RET_STS_SUCCESS;
1863: fnd_msg_pub.initialize;
1864: x_model_tbl := cz_api_pub.NUMBER_TBL_TYPE();
1865: -- standard call to check for call compatibility
1866: IF (NOT FND_API.compatible_api_call(l_api_version
1862: x_return_status := FND_API.G_RET_STS_SUCCESS;
1863: fnd_msg_pub.initialize;
1864: x_model_tbl := cz_api_pub.NUMBER_TBL_TYPE();
1865: -- standard call to check for call compatibility
1866: IF (NOT FND_API.compatible_api_call(l_api_version
1867: ,p_api_version
1868: ,l_api_name
1869: ,G_PKG_NAME
1870: )) THEN
1867: ,p_api_version
1868: ,l_api_name
1869: ,G_PKG_NAME
1870: )) THEN
1871: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1872: END IF;
1873:
1874: ----default pb applicability parameters to NULL if no values are passed in
1875: l_appl_param_rec.config_creation_date := p_appl_param_rec.config_creation_date;
1880: l_appl_param_rec.publication_mode := p_appl_param_rec.publication_mode;
1881: l_appl_param_rec.language := p_appl_param_rec.language;
1882:
1883: default_pb_parameters(l_appl_param_rec,x_return_status);
1884: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1885: RAISE FND_API.G_EXC_ERROR;
1886: END IF;
1887:
1888: -- defaulting date values if not passed in
1881: l_appl_param_rec.language := p_appl_param_rec.language;
1882:
1883: default_pb_parameters(l_appl_param_rec,x_return_status);
1884: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1885: RAISE FND_API.G_EXC_ERROR;
1886: END IF;
1887:
1888: -- defaulting date values if not passed in
1889: cz_cf_api.default_new_cfg_dates(l_appl_param_rec.config_creation_date
1907: fnd_message.set_name('CZ', 'CZ_NO_PUB_MODEL');
1908: fnd_message.set_token('inventory_item_id', p_inventory_item_id);
1909: fnd_message.set_token('organization', p_organization_id);
1910: fnd_msg_pub.add;
1911: RAISE FND_API.G_EXC_ERROR;
1912: END IF;
1913:
1914: -- must be a network container model
1915: IF (NOT is_container_pvt(l_model_id)) THEN
1916: fnd_message.set_name('CZ', 'CZ_NOT_CONTAINER_MODEL');
1917: fnd_message.set_token('model', l_model_id);
1918: fnd_msg_pub.add;
1919:
1920: RAISE FND_API.G_EXC_ERROR;
1921: END IF;
1922:
1923: get_contained_models_pvt(l_model_id, l_inventory_item_id_tbl);
1924: x_model_tbl := l_inventory_item_id_tbl;
1926: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1927: p_data => x_msg_data);
1928:
1929: EXCEPTION
1930: WHEN FND_API.G_EXC_ERROR THEN
1931: x_return_status := FND_API.G_RET_STS_ERROR;
1932: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1933: p_data => x_msg_data);
1934:
1927: p_data => x_msg_data);
1928:
1929: EXCEPTION
1930: WHEN FND_API.G_EXC_ERROR THEN
1931: x_return_status := FND_API.G_RET_STS_ERROR;
1932: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1933: p_data => x_msg_data);
1934:
1935: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1931: x_return_status := FND_API.G_RET_STS_ERROR;
1932: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1933: p_data => x_msg_data);
1934:
1935: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1936: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1937: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1938: p_data => x_msg_data);
1939:
1932: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1933: p_data => x_msg_data);
1934:
1935: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1936: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1937: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1938: p_data => x_msg_data);
1939:
1940: WHEN OTHERS THEN
1937: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1938: p_data => x_msg_data);
1939:
1940: WHEN OTHERS THEN
1941: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1942: IF fnd_msg_pub.check_msg_Level(fnd_msg_pub.G_MSG_LVL_UNEXP_ERROR) THEN
1943: fnd_msg_pub.add_exc_msg(G_PKG_NAME, l_api_name);
1944: END IF;
1945: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1968: BEGIN
1969: fnd_msg_pub.initialize;
1970:
1971: -- standard call to check for call compatibility
1972: IF (NOT FND_API.compatible_api_call(l_api_version
1973: ,p_api_version
1974: ,l_api_name
1975: ,G_PKG_NAME
1976: )) THEN
1973: ,p_api_version
1974: ,l_api_name
1975: ,G_PKG_NAME
1976: )) THEN
1977: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1978: END IF;
1979:
1980: SELECT DECODE(config_model_type, NETWORK_CONTAINER_MODEL, FND_API.G_TRUE, FND_API.G_FALSE)
1981: INTO x_return_value
1976: )) THEN
1977: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1978: END IF;
1979:
1980: SELECT DECODE(config_model_type, NETWORK_CONTAINER_MODEL, FND_API.G_TRUE, FND_API.G_FALSE)
1981: INTO x_return_value
1982: FROM mtl_system_items_b
1983: WHERE inventory_item_id = p_inventory_item_id AND organization_id = p_organization_id;
1984:
1981: INTO x_return_value
1982: FROM mtl_system_items_b
1983: WHERE inventory_item_id = p_inventory_item_id AND organization_id = p_organization_id;
1984:
1985: x_return_status := FND_API.G_RET_STS_SUCCESS;
1986:
1987: EXCEPTION
1988: WHEN NO_DATA_FOUND THEN
1989: x_return_value := NULL;
1986:
1987: EXCEPTION
1988: WHEN NO_DATA_FOUND THEN
1989: x_return_value := NULL;
1990: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1991: x_msg_count := 1;
1992: x_msg_data := 'The input inventory item ' || p_inventory_item_id || ' with organization ' ||
1993: p_organization_id || ' does not exist';
1994:
1991: x_msg_count := 1;
1992: x_msg_data := 'The input inventory item ' || p_inventory_item_id || ' with organization ' ||
1993: p_organization_id || ' does not exist';
1994:
1995: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1996: x_return_value := NULL;
1997: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1998: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1999: p_data => x_msg_data);
1993: p_organization_id || ' does not exist';
1994:
1995: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1996: x_return_value := NULL;
1997: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1998: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1999: p_data => x_msg_data);
2000: END is_container;
2001:
2019:
2020: l_component_instance_type cz_config_items.component_instance_type%TYPE;
2021:
2022: BEGIN
2023: IF (NOT FND_API.compatible_api_call(l_api_version
2024: ,p_api_version
2025: ,l_api_name
2026: ,G_PKG_NAME
2027: )) THEN
2024: ,p_api_version
2025: ,l_api_name
2026: ,G_PKG_NAME
2027: )) THEN
2028: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2029: END IF;
2030:
2031: BEGIN
2032: SELECT component_instance_type INTO l_component_instance_type
2042: fnd_message.set_token('hdr_id','p_config_hdr_id');
2043: fnd_message.set_token('revision','p_config_hdr_id');
2044: fnd_message.set_token('item', p_config_item_id);
2045: fnd_msg_pub.add;
2046: RAISE FND_API.G_EXC_ERROR;
2047: END;
2048:
2049: IF (l_component_instance_type = INSTANCE_ROOT) THEN
2050: x_return_value := FND_API.G_TRUE;
2046: RAISE FND_API.G_EXC_ERROR;
2047: END;
2048:
2049: IF (l_component_instance_type = INSTANCE_ROOT) THEN
2050: x_return_value := FND_API.G_TRUE;
2051: ELSE
2052: x_return_value := FND_API.G_FALSE;
2053: END IF;
2054:
2048:
2049: IF (l_component_instance_type = INSTANCE_ROOT) THEN
2050: x_return_value := FND_API.G_TRUE;
2051: ELSE
2052: x_return_value := FND_API.G_FALSE;
2053: END IF;
2054:
2055: x_return_status := FND_API.G_RET_STS_SUCCESS;
2056: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2051: ELSE
2052: x_return_value := FND_API.G_FALSE;
2053: END IF;
2054:
2055: x_return_status := FND_API.G_RET_STS_SUCCESS;
2056: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2057: p_data => x_msg_data);
2058:
2059: EXCEPTION
2056: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2057: p_data => x_msg_data);
2058:
2059: EXCEPTION
2060: WHEN FND_API.G_EXC_ERROR THEN
2061: x_return_status := FND_API.G_RET_STS_ERROR;
2062: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2063: p_data => x_msg_data);
2064:
2057: p_data => x_msg_data);
2058:
2059: EXCEPTION
2060: WHEN FND_API.G_EXC_ERROR THEN
2061: x_return_status := FND_API.G_RET_STS_ERROR;
2062: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2063: p_data => x_msg_data);
2064:
2065: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2061: x_return_status := FND_API.G_RET_STS_ERROR;
2062: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2063: p_data => x_msg_data);
2064:
2065: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2066: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2067: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2068: p_data => x_msg_data);
2069:
2062: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2063: p_data => x_msg_data);
2064:
2065: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2066: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2067: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2068: p_data => x_msg_data);
2069:
2070: WHEN OTHERS THEN
2067: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2068: p_data => x_msg_data);
2069:
2070: WHEN OTHERS THEN
2071: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2072: IF fnd_msg_pub.check_msg_Level(fnd_msg_pub.G_MSG_LVL_UNEXP_ERROR) THEN
2073: fnd_msg_pub.add_exc_msg(G_PKG_NAME, l_api_name);
2074: END IF;
2075:
2099: l_model_instantiation_type cz_config_hdrs.model_instantiation_type%TYPE;
2100: l_component_instance_type cz_config_hdrs.component_instance_type%TYPE;
2101:
2102: BEGIN
2103: IF (NOT FND_API.compatible_api_call(l_api_version
2104: ,p_api_version
2105: ,l_api_name
2106: ,G_PKG_NAME
2107: )) THEN
2104: ,p_api_version
2105: ,l_api_name
2106: ,G_PKG_NAME
2107: )) THEN
2108: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2109: END IF;
2110:
2111: get_header_types(p_config_hdr_id
2112: ,p_config_rev_nbr
2117: fnd_message.set_name('CZ','CZ_NO_CFG');
2118: fnd_message.set_token('hdr_id','p_config_hdr_id');
2119: fnd_message.set_token('revision','p_config_hdr_id');
2120: fnd_msg_pub.add;
2121: RAISE FND_API.G_EXC_ERROR;
2122: END IF;
2123:
2124: IF (l_model_instantiation_type <> NETWORK) THEN
2125: x_return_value := FND_API.G_TRUE;
2121: RAISE FND_API.G_EXC_ERROR;
2122: END IF;
2123:
2124: IF (l_model_instantiation_type <> NETWORK) THEN
2125: x_return_value := FND_API.G_TRUE;
2126: ELSE
2127: x_return_value := FND_API.G_FALSE;
2128: END IF;
2129:
2123:
2124: IF (l_model_instantiation_type <> NETWORK) THEN
2125: x_return_value := FND_API.G_TRUE;
2126: ELSE
2127: x_return_value := FND_API.G_FALSE;
2128: END IF;
2129:
2130: x_return_status := FND_API.G_RET_STS_SUCCESS;
2131: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2126: ELSE
2127: x_return_value := FND_API.G_FALSE;
2128: END IF;
2129:
2130: x_return_status := FND_API.G_RET_STS_SUCCESS;
2131: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2132: p_data => x_msg_data);
2133:
2134: EXCEPTION
2131: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2132: p_data => x_msg_data);
2133:
2134: EXCEPTION
2135: WHEN FND_API.G_EXC_ERROR THEN
2136: x_return_status := FND_API.G_RET_STS_ERROR;
2137: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2138: p_data => x_msg_data);
2139:
2132: p_data => x_msg_data);
2133:
2134: EXCEPTION
2135: WHEN FND_API.G_EXC_ERROR THEN
2136: x_return_status := FND_API.G_RET_STS_ERROR;
2137: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2138: p_data => x_msg_data);
2139:
2140: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2136: x_return_status := FND_API.G_RET_STS_ERROR;
2137: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2138: p_data => x_msg_data);
2139:
2140: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2141: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2142: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2143: p_data => x_msg_data);
2144:
2137: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2138: p_data => x_msg_data);
2139:
2140: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2141: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2142: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2143: p_data => x_msg_data);
2144:
2145: WHEN OTHERS THEN
2142: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2143: p_data => x_msg_data);
2144:
2145: WHEN OTHERS THEN
2146: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2147: IF fnd_msg_pub.check_msg_Level(fnd_msg_pub.G_MSG_LVL_UNEXP_ERROR) THEN
2148: fnd_msg_pub.add_exc_msg(G_PKG_NAME, l_api_name);
2149: END IF;
2150:
2262: REMOVE_IB_ERR EXCEPTION;
2263:
2264: BEGIN
2265: fnd_msg_pub.initialize;
2266: IF (NOT FND_API.compatible_api_call(l_api_version
2267: ,p_api_version
2268: ,l_api_name
2269: ,G_PKG_NAME
2270: )) THEN
2267: ,p_api_version
2268: ,l_api_name
2269: ,G_PKG_NAME
2270: )) THEN
2271: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2272: END IF;
2273:
2274: -----get root instance for the config_item_id
2275: get_root_instance(p_config_hdr_id,
2318: AND config_rev_nbr = p_config_rev_nbr
2319: AND deleted_flag = NO_FLAG);
2320:
2321: IF (SQL%ROWCOUNT > 0) THEN
2322: x_return_status := FND_API.G_RET_STS_SUCCESS;
2323: ELSE
2324: x_return_status := FND_API.G_RET_STS_ERROR;
2325: set_fnd_message('CZ_IB_API_NO_DEACTIVATE','ConfigHdrId',p_config_hdr_id, 'ConfigRevNbr', p_config_rev_nbr);
2326: END IF;
2320:
2321: IF (SQL%ROWCOUNT > 0) THEN
2322: x_return_status := FND_API.G_RET_STS_SUCCESS;
2323: ELSE
2324: x_return_status := FND_API.G_RET_STS_ERROR;
2325: set_fnd_message('CZ_IB_API_NO_DEACTIVATE','ConfigHdrId',p_config_hdr_id, 'ConfigRevNbr', p_config_rev_nbr);
2326: END IF;
2327: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
2328:
2327: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
2328:
2329: EXCEPTION
2330: WHEN REMOVE_IB_ERR THEN
2331: x_return_status := FND_API.G_RET_STS_ERROR;
2332: set_fnd_message('CZ_IB_DEACT_REMOVE_IB_ERR',
2333: 'ConfigHdrId', p_config_hdr_id,
2334: 'ConfigRevNbr', p_config_rev_nbr,
2335: 'ConfigItemId', l_config_item_id,
2334: 'ConfigRevNbr', p_config_rev_nbr,
2335: 'ConfigItemId', l_config_item_id,
2336: 'RunId', l_run_id);
2337: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
2338: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2339: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2340: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2341: p_data => x_msg_data);
2342: WHEN OTHERS THEN
2335: 'ConfigItemId', l_config_item_id,
2336: 'RunId', l_run_id);
2337: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
2338: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2339: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2340: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2341: p_data => x_msg_data);
2342: WHEN OTHERS THEN
2343: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2339: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2340: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2341: p_data => x_msg_data);
2342: WHEN OTHERS THEN
2343: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2344: IF fnd_msg_pub.check_msg_Level(fnd_msg_pub.G_MSG_LVL_UNEXP_ERROR) THEN
2345: fnd_msg_pub.add_exc_msg(G_PKG_NAME, l_api_name);
2346: END IF;
2347: