DBA Data[Home] [Help]

APPS.AHL_FMP_PVT dependencies on AHL_FMP_PVT

Line 1: PACKAGE BODY AHL_FMP_PVT AS

1: PACKAGE BODY AHL_FMP_PVT AS
2: /* $Header: AHLVFMPB.pls 120.19.12020000.4 2013/05/10 20:50:45 sracha ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30):= 'AHL_FMP_PVT';
5: G_APPLN_USAGE VARCHAR2(30):=FND_PROFILE.VALUE('AHL_APPLN_USAGE');

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

1: PACKAGE BODY AHL_FMP_PVT AS
2: /* $Header: AHLVFMPB.pls 120.19.12020000.4 2013/05/10 20:50:45 sracha ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30):= 'AHL_FMP_PVT';
5: G_APPLN_USAGE VARCHAR2(30):=FND_PROFILE.VALUE('AHL_APPLN_USAGE');
6: --Define Global Cursor: get item instance attributes from ahl_unit_installed_details_v.
7: --The last two attributes: manufacturer_id and counctry_code are not in the view definition.
8: CURSOR get_inst_attri(c_item_instance_id NUMBER) IS

Line 724: AND AHL_FMP_PVT.is_pc_assoc_valid(A.instance_id,c_pc_node_id) = FND_API.G_TRUE;

720: FROM csi_item_instances A
721: WHERE A.inventory_item_id = c_inventory_item_id
722: AND sysdate between trunc(nvl(A.active_start_date,sysdate))
723: and trunc(nvl(A.active_end_date,sysdate+1))
724: AND AHL_FMP_PVT.is_pc_assoc_valid(A.instance_id,c_pc_node_id) = FND_API.G_TRUE;
725:
726: CURSOR get_inst5(c_relationship_id NUMBER, c_pc_node_id NUMBER) IS
727: SELECT A.instance_id
728: FROM csi_item_instances A,ahl_applicable_instances api

Line 732: AND AHL_FMP_PVT.is_pc_assoc_valid(A.instance_id,c_pc_node_id) = FND_API.G_TRUE;

728: FROM csi_item_instances A,ahl_applicable_instances api
729: WHERE A.instance_id = api.csi_item_instance_id
730: AND sysdate between trunc(nvl(a.active_start_date,sysdate)) and trunc(nvl(a.active_end_date,sysdate+1))
731: AND api.position_id=c_relationship_id
732: AND AHL_FMP_PVT.is_pc_assoc_valid(A.instance_id,c_pc_node_id) = FND_API.G_TRUE;
733:
734: CURSOR get_inst6(c_inventory_item_id NUMBER, c_relationship_id NUMBER, c_pc_node_id NUMBER) IS
735: SELECT A.instance_id
736: FROM csi_item_instances A,ahl_applicable_instances api

Line 741: AND AHL_FMP_PVT.is_pc_assoc_valid(A.instance_id,c_pc_node_id) = FND_API.G_TRUE;

737: WHERE A.instance_id = api.csi_item_instance_id
738: AND sysdate between trunc(nvl(a.active_start_date,sysdate)) and trunc(nvl(a.active_end_date,sysdate+1))
739: AND api.position_id=c_relationship_id
740: AND A.inventory_item_id = c_inventory_item_id
741: AND AHL_FMP_PVT.is_pc_assoc_valid(A.instance_id,c_pc_node_id) = FND_API.G_TRUE;
742:
743: --added for SB effectivity changes
744: CURSOR get_terminating_mr_csr(c_mr_header_id IN NUMBER) IS
745: SELECT mr_header_id

Line 774: AHL_DEBUG_PUB.debug('Begin private API: AHL_FMP_PVT.GET_MR_AFFECTED_ITEMS');

770: BEGIN
771: SAVEPOINT GET_MR_AFFECTED_ITEMS_PVT;
772: IF l_debug = 'Y' THEN
773: AHL_DEBUG_PUB.enable_debug;
774: AHL_DEBUG_PUB.debug('Begin private API: AHL_FMP_PVT.GET_MR_AFFECTED_ITEMS');
775: END IF;
776: IF FND_API.to_boolean(p_init_msg_list) THEN
777: FND_MSG_PUB.initialize;
778: END IF;

Line 1182: AHL_DEBUG_PUB.debug('End private API: AHL_FMP_PVT.GET_MR_AFFECTED_ITEMS');

1178: --IF FND_API.TO_BOOLEAN(p_commit) THEN
1179: -- COMMIT;
1180: --END IF;
1181: IF l_debug = 'Y' THEN
1182: AHL_DEBUG_PUB.debug('End private API: AHL_FMP_PVT.GET_MR_AFFECTED_ITEMS');
1183: AHL_DEBUG_PUB.disable_debug;
1184: END IF;
1185: EXCEPTION WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1186: ROLLBACK TO GET_MR_AFFECTED_ITEMS_PVT;

Line 1194: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_MR_AFFECTED_ITEMS');

1190: p_data => x_msg_data);
1191: IF l_debug = 'Y' THEN
1192: AHL_DEBUG_PUB.log_app_messages(x_msg_count, x_msg_data,
1193: 'UNEXPECTED ERROR IN PRIVATE:' );
1194: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_MR_AFFECTED_ITEMS');
1195: AHL_DEBUG_PUB.disable_debug;
1196: END IF;
1197: WHEN FND_API.G_EXC_ERROR THEN
1198: ROLLBACK TO GET_MR_AFFECTED_ITEMS_PVT;

Line 1206: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_MR_AFFECTED_ITEMS');

1202: p_data => x_msg_data);
1203: IF l_debug = 'Y' THEN
1204: AHL_DEBUG_PUB.log_app_messages(x_msg_count, x_msg_data,
1205: 'ERROR IN PRIVATE:' );
1206: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_MR_AFFECTED_ITEMS');
1207: AHL_DEBUG_PUB.disable_debug;
1208: END IF;
1209: WHEN OTHERS THEN
1210: ROLLBACK TO GET_MR_AFFECTED_ITEMS_PVT;

Line 1213: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_FMP_PVT',

1209: WHEN OTHERS THEN
1210: ROLLBACK TO GET_MR_AFFECTED_ITEMS_PVT;
1211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1212: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1213: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_FMP_PVT',
1214: p_procedure_name => 'GET_MR_AFFECTED_ITEMS',
1215: p_error_text => SUBSTR(SQLERRM,1,240));
1216: END IF;
1217: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 1223: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_MR_AFFECTED_ITEMS');

1219: p_data => x_msg_data);
1220: IF l_debug = 'Y' THEN
1221: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data,
1222: 'OTHER ERROR IN PRIVATE:' );
1223: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_MR_AFFECTED_ITEMS');
1224: AHL_DEBUG_PUB.disable_debug;
1225: END IF;
1226: END GET_MR_AFFECTED_ITEMS;
1227:

Line 1259: l_debug_prefix VARCHAR2(30) := 'AHL_FMP_PVT.GET_APPLICABLE_MRS';

1255: l_msg_count NUMBER;
1256: l_return_status VARCHAR2(1);
1257: l_item_instance_id NUMBER;
1258: l_debug VARCHAR2(1) :=AHL_DEBUG_PUB.is_log_enabled;
1259: l_debug_prefix VARCHAR2(30) := 'AHL_FMP_PVT.GET_APPLICABLE_MRS';
1260:
1261: --Get inst_relation_rec for top node of UC
1262: CURSOR uc_top_inst(c_item_instance_id NUMBER) IS
1263: SELECT --NULL parent_item_instance_id,

Line 1493: AHL_FMP_PVT.Instance_Matches_Path_Pos(cii.instance_id,A.relationship_id) = 'T'))

1489: AND SYSDATE between trunc(MR.effective_from) and trunc(nvl(MR.effective_to,SYSDATE+1))
1490: AND MR.version_number in (SELECT max(MRM.version_number) from ahl_mr_headers_app_v MRM where SYSDATE between trunc(MR.effective_from) and trunc(nvl(MR.effective_to,SYSDATE+1)) and title=mr.title and mr_status_code='COMPLETE' group by MRM.title)
1491: AND (A.inventory_item_id = cii.inventory_item_id OR
1492: (A.inventory_item_id IS NULL AND A.relationship_id IS NOT NULL AND
1493: AHL_FMP_PVT.Instance_Matches_Path_Pos(cii.instance_id,A.relationship_id) = 'T'))
1494: ORDER BY cir.depth, cir.subject_id; -- depth, subject_id
1495: */
1496:
1497: /* 15-Sept 08: Modified logic to seperate processing based Inventory Items, MC positions

Line 1582: AND AHL_FMP_PVT.Instance_Matches_Path_Pos(cir.subject_id,A.relationship_id) = 'T'

1578: AND a.relationship_id = mcp.path_position_id
1579: AND (a.inventory_item_id IS NULL OR a.inventory_item_id = cir.inventory_item_id)
1580: -- AND TO_NUMBER(cir.POSITION_REFERENCE) = rel.RELATIONSHIP_ID
1581: -- AND REL.mc_header_id = HDR.mc_header_id
1582: AND AHL_FMP_PVT.Instance_Matches_Path_Pos(cir.subject_id,A.relationship_id) = 'T'
1583: -- AND AHL_FMP_PVT.Instance_Matches_Path_Pos(cir.subject_id,A.relationship_id,
1584: -- mcp.ENCODED_PATH_POSITION, hdr.mc_id,
1585: -- hdr.version_number, rel.position_key) = 'T'
1586:

Line 1583: -- AND AHL_FMP_PVT.Instance_Matches_Path_Pos(cir.subject_id,A.relationship_id,

1579: AND (a.inventory_item_id IS NULL OR a.inventory_item_id = cir.inventory_item_id)
1580: -- AND TO_NUMBER(cir.POSITION_REFERENCE) = rel.RELATIONSHIP_ID
1581: -- AND REL.mc_header_id = HDR.mc_header_id
1582: AND AHL_FMP_PVT.Instance_Matches_Path_Pos(cir.subject_id,A.relationship_id) = 'T'
1583: -- AND AHL_FMP_PVT.Instance_Matches_Path_Pos(cir.subject_id,A.relationship_id,
1584: -- mcp.ENCODED_PATH_POSITION, hdr.mc_id,
1585: -- hdr.version_number, rel.position_key) = 'T'
1586:
1587: ) appl_mr

Line 1852: AHL_FMP_PVT.Instance_Matches_Path_Pos(cii.instance_id,A.relationship_id) = 'T'))

1848: AND SYSDATE between trunc(MR.effective_from) and trunc(nvl(MR.effective_to,SYSDATE+1))
1849: AND MR.version_number in (SELECT max(MRM.version_number) from ahl_mr_headers_app_v MRM where SYSDATE between trunc(MR.effective_from) and trunc(nvl(MR.effective_to,SYSDATE+1)) and title=mr.title and mr_status_code='COMPLETE' group by MRM.title)
1850: AND (A.inventory_item_id = cii.inventory_item_id OR
1851: (A.inventory_item_id IS NULL AND A.relationship_id IS NOT NULL AND
1852: AHL_FMP_PVT.Instance_Matches_Path_Pos(cii.instance_id,A.relationship_id) = 'T'))
1853: ORDER BY cir.depth, cir.subject_id; -- depth, subject_id
1854: */
1855:
1856: /* 15-Sept 08: Modified logic to seperate processing based Inventory Items, MC positions

Line 1925: AND AHL_FMP_PVT.Instance_Matches_Path_Pos(cir.subject_id,A.relationship_id) = 'T'

1921: AND a.relationship_id = mcp.path_position_id
1922: AND (a.inventory_item_id IS NULL OR a.inventory_item_id = cir.inventory_item_id)
1923: -- AND TO_NUMBER(cir.POSITION_REFERENCE) = rel.RELATIONSHIP_ID
1924: -- AND REL.mc_header_id = HDR.mc_header_id
1925: AND AHL_FMP_PVT.Instance_Matches_Path_Pos(cir.subject_id,A.relationship_id) = 'T'
1926: -- AND AHL_FMP_PVT.Instance_Matches_Path_Pos(cir.subject_id,A.relationship_id,
1927: -- mcp.ENCODED_PATH_POSITION, hdr.mc_id,
1928: -- hdr.version_number, rel.position_key) = 'T'
1929:

Line 1926: -- AND AHL_FMP_PVT.Instance_Matches_Path_Pos(cir.subject_id,A.relationship_id,

1922: AND (a.inventory_item_id IS NULL OR a.inventory_item_id = cir.inventory_item_id)
1923: -- AND TO_NUMBER(cir.POSITION_REFERENCE) = rel.RELATIONSHIP_ID
1924: -- AND REL.mc_header_id = HDR.mc_header_id
1925: AND AHL_FMP_PVT.Instance_Matches_Path_Pos(cir.subject_id,A.relationship_id) = 'T'
1926: -- AND AHL_FMP_PVT.Instance_Matches_Path_Pos(cir.subject_id,A.relationship_id,
1927: -- mcp.ENCODED_PATH_POSITION, hdr.mc_id,
1928: -- hdr.version_number, rel.position_key) = 'T'
1929:
1930: ) appl_mr

Line 2278: AHL_DEBUG_PUB.debug('Begin private API: AHL_FMP_PVT.GET_APPLICABLE_MRS', l_debug_prefix);

2274: SAVEPOINT GET_APPLICABLE_MRS_PVT;
2275:
2276: IF l_debug = 'Y' THEN
2277: AHL_DEBUG_PUB.enable_debug;
2278: AHL_DEBUG_PUB.debug('Begin private API: AHL_FMP_PVT.GET_APPLICABLE_MRS', l_debug_prefix);
2279: AHL_DEBUG_PUB.debug('Input p_item_instance_id:' || p_item_instance_id, l_debug_prefix);
2280: AHL_DEBUG_PUB.debug('Input p_mr_header_id:' || p_mr_header_id, l_debug_prefix);
2281: AHL_DEBUG_PUB.debug('Input p_components_flag:' || p_components_flag, l_debug_prefix);
2282: AHL_DEBUG_PUB.debug('Input p_include_doNotImplmt:' || p_include_doNotImplmt, l_debug_prefix);

Line 3011: AHL_DEBUG_PUB.debug('End private API: AHL_FMP_PVT.GET_APPLICABLE_MRS', l_debug_prefix);

3007: DELETE FROM ahl_applicable_instances;
3008:
3009: --DBMS_OUTPUT.PUT_LINE('API2: Successfully executed API2!');
3010: IF l_debug = 'Y' THEN
3011: AHL_DEBUG_PUB.debug('End private API: AHL_FMP_PVT.GET_APPLICABLE_MRS', l_debug_prefix);
3012: AHL_DEBUG_PUB.disable_debug;
3013: END IF;
3014:
3015:

Line 3027: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_APPLICABLE_MRS', l_debug_prefix);

3023: p_data => x_msg_data);
3024: IF l_debug = 'Y' THEN
3025: AHL_DEBUG_PUB.log_app_messages(x_msg_count, x_msg_data,
3026: 'UNEXPECTED ERROR IN PRIVATE:' );
3027: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_APPLICABLE_MRS', l_debug_prefix);
3028: AHL_DEBUG_PUB.disable_debug;
3029: END IF;
3030:
3031: WHEN FND_API.G_EXC_ERROR THEN

Line 3040: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_APPLICABLE_MRS', l_debug_prefix);

3036: p_data => x_msg_data);
3037: IF l_debug = 'Y' THEN
3038: AHL_DEBUG_PUB.log_app_messages(x_msg_count, x_msg_data,
3039: 'ERROR IN PRIVATE:' );
3040: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_APPLICABLE_MRS', l_debug_prefix);
3041: AHL_DEBUG_PUB.disable_debug;
3042: END IF;
3043:
3044: WHEN OTHERS THEN

Line 3048: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_FMP_PVT',

3044: WHEN OTHERS THEN
3045: ROLLBACK TO GET_APPLICABLE_MRS_PVT;
3046: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3047: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3048: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_FMP_PVT',
3049: p_procedure_name => 'GET_APPLICABLE_MRS',
3050: p_error_text => SUBSTRB(SQLERRM,1,240));
3051: END IF;
3052: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 3058: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_APPLICABLE_MRS', l_debug_prefix);

3054: p_data => x_msg_data);
3055: IF l_debug = 'Y' THEN
3056: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data,
3057: 'OTHER ERROR IN PRIVATE:' );
3058: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_APPLICABLE_MRS', l_debug_prefix);
3059: AHL_DEBUG_PUB.disable_debug;
3060: END IF;
3061: END GET_APPLICABLE_MRS;
3062:

Line 3957: AHL_DEBUG_PUB.debug('Begin private API: AHL_FMP_PVT.GET_PM_APPLICABLE_MRS');

3953: BEGIN
3954: SAVEPOINT GET_PM_APPLICABLE_MRS_PVT;
3955: IF l_debug = 'Y' THEN
3956: AHL_DEBUG_PUB.enable_debug;
3957: AHL_DEBUG_PUB.debug('Begin private API: AHL_FMP_PVT.GET_PM_APPLICABLE_MRS');
3958: AHL_DEBUG_PUB.debug('');
3959: END IF;
3960: IF FND_API.to_boolean(p_init_msg_list) THEN
3961: FND_MSG_PUB.initialize;

Line 4168: AHL_DEBUG_PUB.debug('End private API: AHL_FMP_PVT.GET_PM_APPLICABLE_MRS');

4164: END LOOP;
4165: END IF;
4166: */
4167: IF l_debug = 'Y' THEN
4168: AHL_DEBUG_PUB.debug('End private API: AHL_FMP_PVT.GET_PM_APPLICABLE_MRS');
4169: AHL_DEBUG_PUB.disable_debug;
4170: END IF;
4171:
4172: EXCEPTION WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 4181: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_PM_APPLICABLE_MRS');

4177: p_data => x_msg_data);
4178: IF l_debug = 'Y' THEN
4179: AHL_DEBUG_PUB.log_app_messages(x_msg_count, x_msg_data,
4180: 'UNEXPECTED ERROR IN PRIVATE:' );
4181: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_PM_APPLICABLE_MRS');
4182: AHL_DEBUG_PUB.disable_debug;
4183: END IF;
4184: WHEN FND_API.G_EXC_ERROR THEN
4185: ROLLBACK TO GET_PM_APPLICABLE_MRS_PVT;

Line 4193: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_PM_APPLICABLE_MRS');

4189: p_data => x_msg_data);
4190: IF l_debug = 'Y' THEN
4191: AHL_DEBUG_PUB.log_app_messages(x_msg_count, x_msg_data,
4192: 'ERROR IN PRIVATE:' );
4193: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_PM_APPLICABLE_MRS');
4194: AHL_DEBUG_PUB.disable_debug;
4195: END IF;
4196: WHEN OTHERS THEN
4197: ROLLBACK TO GET_PM_APPLICABLE_MRS_PVT;

Line 4200: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_FMP_PVT',

4196: WHEN OTHERS THEN
4197: ROLLBACK TO GET_PM_APPLICABLE_MRS_PVT;
4198: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4199: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4200: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_FMP_PVT',
4201: p_procedure_name => 'GET_PM_APPLICABLE_MRS',
4202: p_error_text => SUBSTRB(SQLERRM,1,240));
4203: END IF;
4204: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 4211: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_PM_APPLICABLE_MRS');

4207: IF l_debug = 'Y' THEN
4208:
4209: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data,
4210: 'OTHER ERROR IN PRIVATE:' );
4211: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_PM_APPLICABLE_MRS');
4212: AHL_DEBUG_PUB.disable_debug;
4213: END IF;
4214:
4215: END GET_PM_APPLICABLE_MRS;

Line 4231: l_appl_mrs_tbl AHL_FMP_PVT.applicable_mr_tbl_type;

4227: p_visit_type_code IN VARCHAR2
4228: )
4229: AS
4230: l_api_version CONSTANT NUMBER := 1.0;
4231: l_appl_mrs_tbl AHL_FMP_PVT.applicable_mr_tbl_type;
4232:
4233: BEGIN
4234: -- Initialize temporary table.
4235: SAVEPOINT GET_VISIT_APPLICABLE_MRS_PVT;

Line 4239: AHL_FMP_PVT.get_applicable_mrs(

4235: SAVEPOINT GET_VISIT_APPLICABLE_MRS_PVT;
4236: DELETE FROM AHL_APPLICABLE_MRS;
4237:
4238: -- call api to fetch all applicable mrs for ASO installation.
4239: AHL_FMP_PVT.get_applicable_mrs(
4240: p_api_version => l_api_version,
4241: p_init_msg_list => FND_API.G_FALSE,
4242: p_commit => FND_API.G_FALSE,
4243: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

Line 4334: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_FMP_PVT',

4330: WHEN OTHERS THEN
4331: ROLLBACK TO GET_VISIT_APPLICABLE_MRS_PVT;
4332: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4333: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4334: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_FMP_PVT',
4335: p_procedure_name => 'GET_PM_APPLICABLE_MRS',
4336: p_error_text => SUBSTRB(SQLERRM,1,240));
4337: END IF;
4338: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 4538: l_debug_prefix VARCHAR2(40) := 'AHL_FMP_PVT.GET_MR_APPLICABILITY';

4534: l_msg_count NUMBER;
4535: l_return_status VARCHAR2(1);
4536: l_item_instance_id NUMBER;
4537: l_debug VARCHAR2(1) :=AHL_DEBUG_PUB.is_log_enabled;
4538: l_debug_prefix VARCHAR2(40) := 'AHL_FMP_PVT.GET_MR_APPLICABILITY';
4539:
4540:
4541: -- Get valid pc nodes for an instance
4542: -- Query to get valid pc nodes for an instance was split into 2 SQLs (item and unit)

Line 4790: AHL_DEBUG_PUB.debug('Begin private API: AHL_FMP_PVT.GET_MR_APPLICABILITY', l_debug_prefix);

4786: BEGIN
4787:
4788: IF l_debug = 'Y' THEN
4789: AHL_DEBUG_PUB.enable_debug;
4790: AHL_DEBUG_PUB.debug('Begin private API: AHL_FMP_PVT.GET_MR_APPLICABILITY', l_debug_prefix);
4791: AHL_DEBUG_PUB.debug('Input p_item_instance_id:' || p_item_instance_id, l_debug_prefix);
4792: AHL_DEBUG_PUB.debug('Input p_mr_header_id:' || p_mr_header_id, l_debug_prefix);
4793: AHL_DEBUG_PUB.debug('Input p_components_flag:' || p_components_flag, l_debug_prefix);
4794: AHL_DEBUG_PUB.debug('Input p_include_doNotImplmt:' || p_include_doNotImplmt, l_debug_prefix);

Line 5172: AHL_DEBUG_PUB.debug('End private API: AHL_FMP_PVT.GET_MR_APPLICABILITY', l_debug_prefix);

5168:
5169: DELETE FROM ahl_applicable_instances;
5170:
5171: IF l_debug = 'Y' THEN
5172: AHL_DEBUG_PUB.debug('End private API: AHL_FMP_PVT.GET_MR_APPLICABILITY', l_debug_prefix);
5173: AHL_DEBUG_PUB.disable_debug;
5174: END IF;
5175:
5176:

Line 5187: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_MR_APPLICABILITY', l_debug_prefix);

5183: p_data => x_msg_data);
5184: IF l_debug = 'Y' THEN
5185: AHL_DEBUG_PUB.log_app_messages(x_msg_count, x_msg_data,
5186: 'UNEXPECTED ERROR IN PRIVATE:' );
5187: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_MR_APPLICABILITY', l_debug_prefix);
5188: AHL_DEBUG_PUB.disable_debug;
5189: END IF;
5190:
5191: WHEN FND_API.G_EXC_ERROR THEN

Line 5199: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_MR_APPLICABILITY', l_debug_prefix);

5195: p_data => x_msg_data);
5196: IF l_debug = 'Y' THEN
5197: AHL_DEBUG_PUB.log_app_messages(x_msg_count, x_msg_data,
5198: 'ERROR IN PRIVATE:' );
5199: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_MR_APPLICABILITY', l_debug_prefix);
5200: AHL_DEBUG_PUB.disable_debug;
5201: END IF;
5202:
5203: WHEN OTHERS THEN

Line 5206: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_FMP_PVT',

5202:
5203: WHEN OTHERS THEN
5204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5205: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5206: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_FMP_PVT',
5207: p_procedure_name => 'GET_MR_APPLICABILITY',
5208: p_error_text => SUBSTRB(SQLERRM,1,240));
5209: END IF;
5210: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 5216: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_MR_APPLICABILITY', l_debug_prefix);

5212: p_data => x_msg_data);
5213: IF l_debug = 'Y' THEN
5214: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data,
5215: 'OTHER ERROR IN PRIVATE:' );
5216: AHL_DEBUG_PUB.debug('AHL_FMP_PVT.GET_MR_APPLICABILITY', l_debug_prefix);
5217: AHL_DEBUG_PUB.disable_debug;
5218: END IF;
5219: END GET_MR_APPLICABILITY;
5220:

Line 5222: END AHL_FMP_PVT; -- Package Body

5218: END IF;
5219: END GET_MR_APPLICABILITY;
5220:
5221:
5222: END AHL_FMP_PVT; -- Package Body