DBA Data[Home] [Help]

APPS.CSD_DC_DOMAINS_PVT dependencies on CSD_DC_DOMAINS

Line 1: PACKAGE BODY CSD_DC_DOMAINS_PVT as

1: PACKAGE BODY CSD_DC_DOMAINS_PVT as
2: /* $Header: csdvdcdb.pls 115.5 2004/02/16 03:20:48 gilam noship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'CSD_DC_DOMAINS_PVT';
5: G_FILE_NAME CONSTANT VARCHAR2(12) := 'csdvdcdb.pls';

Line 4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'CSD_DC_DOMAINS_PVT';

1: PACKAGE BODY CSD_DC_DOMAINS_PVT as
2: /* $Header: csdvdcdb.pls 115.5 2004/02/16 03:20:48 gilam noship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'CSD_DC_DOMAINS_PVT';
5: G_FILE_NAME CONSTANT VARCHAR2(12) := 'csdvdcdb.pls';
6:
7: /*--------------------------------------------------*/
8: /* procedure name: Create_DC_Domain */

Line 148: from csd_dc_domains

144:
145: /* gilam: bug 3445684 - changed query to include service code id in the each or condition
146: select 'X'
147: into l_dummy
148: from csd_dc_domains
149: where diagnostic_code_id = p_dc_domain_rec.diagnostic_code_id
150: and (domain_type_code = p_dc_domain_rec.domain_type_code
151: and inventory_item_id = p_dc_domain_rec.inventory_item_id)
152: or (domain_type_code = p_dc_domain_rec.domain_type_code

Line 158: from csd_dc_domains

154: and category_id = p_dc_domain_rec.category_id);
155: */
156: select 'X'
157: into l_dummy
158: from csd_dc_domains
159: where (diagnostic_code_id = p_dc_domain_rec.diagnostic_code_id
160: and domain_type_code = p_dc_domain_rec.domain_type_code
161: and inventory_item_id = p_dc_domain_rec.inventory_item_id)
162: or (diagnostic_code_id = p_dc_domain_rec.diagnostic_code_id

Line 379: CSD_DC_DOMAINS_PKG.Insert_Row

375: end if;
376:
377: BEGIN
378: -- Insert the new domain
379: CSD_DC_DOMAINS_PKG.Insert_Row
380: (px_dc_domain_id => x_dc_domain_id,
381: p_object_version_number => l_obj_ver_num,
382: p_diagnostic_code_id => p_dc_domain_rec.diagnostic_code_id,
383: p_inventory_item_id => l_inventory_item_id,

Line 413: FND_LOG.STRING(lc_excep_level,lc_mod_name,'Others exception in CSD_DC_DOMAINS_PKG.Insert_Row Call :'||SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));

409:
410: EXCEPTION
411: WHEN OTHERS THEN
412: IF ( lc_excep_level >= lc_debug_level) THEN
413: FND_LOG.STRING(lc_excep_level,lc_mod_name,'Others exception in CSD_DC_DOMAINS_PKG.Insert_Row Call :'||SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
414: END IF;
415: x_return_status := FND_API.G_RET_STS_ERROR;
416: END;
417:

Line 872: from csd_dc_domains

868: -- Validate the diagnostic code domain id
869: Begin
870: select 'X'
871: into l_dummy
872: from csd_dc_domains
873: where dc_domain_id = p_dc_domain_rec.dc_domain_id;
874:
875: Exception
876:

Line 902: from csd_dc_domains

898: -- Get object version number for diagnostic code domain
899: Begin
900: select object_version_number
901: into l_obj_ver_num
902: from csd_dc_domains
903: where dc_domain_id = p_dc_domain_rec.dc_domain_id;
904:
905: Exception
906:

Line 940: from csd_dc_domains

936:
937: /* gilam: bug 3445684 - changed query to include service code id in the each or condition
938: select 'X'
939: into l_dummy
940: from csd_dc_domains
941: where dc_domain_id <> p_dc_domain_rec.dc_domain_id
942: and diagnostic_code_id = p_dc_domain_rec.diagnostic_code_id
943: and domain_type_code = p_dc_domain_rec.domain_type_code
944: and inventory_item_id = p_dc_domain_rec.inventory_item_id

Line 950: from csd_dc_domains

946: and category_id = p_dc_domain_rec.category_id;
947: */
948: select 'X'
949: into l_dummy
950: from csd_dc_domains
951: where dc_domain_id <> p_dc_domain_rec.dc_domain_id
952: and (diagnostic_code_id = p_dc_domain_rec.diagnostic_code_id
953: and domain_type_code = p_dc_domain_rec.domain_type_code
954: and inventory_item_id = p_dc_domain_rec.inventory_item_id)

Line 1001: from csd_dc_domains_v

997:
998: Begin
999: select inventory_item_id
1000: into l_inventory_item_id
1001: from csd_dc_domains_v
1002: where dc_domain_id = p_dc_domain_rec.dc_domain_id
1003: and domain_type_code = p_dc_domain_rec.domain_type_code;
1004:
1005: Exception

Line 1078: from csd_dc_domains_v

1074:
1075: Begin
1076: select category_set_id
1077: into l_category_set_id
1078: from csd_dc_domains_v
1079: where dc_domain_id = p_dc_domain_rec.dc_domain_id
1080: and domain_type_code = p_dc_domain_rec.domain_type_code;
1081:
1082: Exception

Line 1174: from csd_dc_domains_v

1170:
1171: Begin
1172: select category_id
1173: into l_category_id
1174: from csd_dc_domains_v
1175: where dc_domain_id = p_dc_domain_rec.dc_domain_id
1176: and domain_type_code = p_dc_domain_rec.domain_type_code;
1177:
1178: Exception

Line 1289: CSD_DC_DOMAINS_PKG.Update_Row

1285: end if;
1286:
1287: BEGIN
1288: -- Update the diagnostic code domain
1289: CSD_DC_DOMAINS_PKG.Update_Row
1290: (p_dc_domain_id => p_dc_domain_rec.dc_domain_id,
1291: p_object_version_number => l_obj_ver_num + 1,
1292: p_diagnostic_code_id => p_dc_domain_rec.diagnostic_code_id,
1293: p_inventory_item_id => l_inventory_item_id,

Line 1325: FND_LOG.STRING(lc_excep_level,lc_mod_name,'Others exception in CSD_DC_DOMAINS_PKG.Insert_Row Call :'||SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));

1321:
1322: EXCEPTION
1323: WHEN OTHERS THEN
1324: IF ( lc_excep_level >= lc_debug_level) THEN
1325: FND_LOG.STRING(lc_excep_level,lc_mod_name,'Others exception in CSD_DC_DOMAINS_PKG.Insert_Row Call :'||SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
1326: END IF;
1327: x_return_status := FND_API.G_RET_STS_ERROR;
1328: END;
1329:

Line 1840: CSD_DC_DOMAINS_PKG.Delete_Row

1836:
1837: BEGIN
1838:
1839: -- Delete the diagnostic code domain
1840: CSD_DC_DOMAINS_PKG.Delete_Row
1841: ( p_dc_domain_id => p_dc_domain_id );
1842:
1843: EXCEPTION
1844: WHEN OTHERS THEN

Line 1846: FND_LOG.STRING(lc_excep_level,lc_mod_name,'Others exception in CSD_DC_DOMAINS_PKG.Delete_Row Call :'||SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));

1842:
1843: EXCEPTION
1844: WHEN OTHERS THEN
1845: IF ( lc_excep_level >= lc_debug_level) THEN
1846: FND_LOG.STRING(lc_excep_level,lc_mod_name,'Others exception in CSD_DC_DOMAINS_PKG.Delete_Row Call :'||SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
1847: END IF;
1848: x_return_status := FND_API.G_RET_STS_ERROR;
1849: END;
1850:

Line 2042: CSD_DC_DOMAINS_PKG.Lock_Row

2038:
2039: BEGIN
2040:
2041: -- Lock the dc domain
2042: CSD_DC_DOMAINS_PKG.Lock_Row
2043: (p_dc_domain_id => p_dc_domain_rec.dc_domain_id,
2044: p_object_version_number => p_dc_domain_rec.object_version_number
2045:
2046: --commented out the rest of the record

Line 2081: FND_LOG.STRING(lc_excep_level,lc_mod_name,'Others exception in CSD_DC_DOMAINS_PKG.Delete_Row Call :'||SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));

2077:
2078: EXCEPTION
2079: WHEN OTHERS THEN
2080: IF ( lc_excep_level >= lc_debug_level) THEN
2081: FND_LOG.STRING(lc_excep_level,lc_mod_name,'Others exception in CSD_DC_DOMAINS_PKG.Delete_Row Call :'||SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1,255));
2082: END IF;
2083: x_return_status := FND_API.G_RET_STS_ERROR;
2084: END;
2085:

Line 2188: End CSD_DC_DOMAINS_PVT;

2184:
2185:
2186: END Lock_DC_Domain;
2187:
2188: End CSD_DC_DOMAINS_PVT;
2189: