DBA Data[Home] [Help]

APPS.AHL_PRD_SERN_CHANGE_PVT dependencies on AHL_PRD_SERN_CHANGE_PVT

Line 1: PACKAGE BODY AHL_PRD_SERN_CHANGE_PVT AS

1: PACKAGE BODY AHL_PRD_SERN_CHANGE_PVT AS
2: /* $Header: AHLVSNCB.pls 120.5.12020000.3 2012/12/07 14:42:40 sareepar ship $ */
3: --
4: -----------------------
5: -- Declare Constants --

Line 7: G_PKG_NAME VARCHAR2(30) := 'AHL_PRD_SERN_CHANGE_PVT';

3: --
4: -----------------------
5: -- Declare Constants --
6: -----------------------
7: G_PKG_NAME VARCHAR2(30) := 'AHL_PRD_SERN_CHANGE_PVT';
8: G_DEBUG VARCHAR2(1) := AHL_DEBUG_PUB.is_log_enabled;
9:
10: -------------------------------------------------
11: -- Declare Local Procedures --

Line 492: AHL_PRD_SERN_CHANGE_PVT.GET_SERIALTAG_CODE (CSI.INSTANCE_ID) OLD_SER_TAG_CODE,

488: CURSOR C_VALUES_MODIFIED(C_INSTANCE_ID NUMBER)
489: IS
490: SELECT CSI.SERIAL_NUMBER OLD_SER_NUM,
491: MTL.CONCATENATED_SEGMENTS OLD_ITEM_NUM,
492: AHL_PRD_SERN_CHANGE_PVT.GET_SERIALTAG_CODE (CSI.INSTANCE_ID) OLD_SER_TAG_CODE,
493: CSI.INVENTORY_REVISION OLD_INV_REV,
494: CSI.LOT_NUMBER OLD_LOT_NUM
495: FROM CSI_ITEM_INSTANCES CSI,
496: MTL_SYSTEM_ITEMS_KFV MTL

Line 579: AHL_DEBUG_PUB.debug( 'enter ahl_prd_sern_change_pvt. Process Serialnum Change','+PRDSRN+');

575: --------------
576: -- Debug info.
577: --------------
578: IF G_DEBUG='Y' THEN
579: AHL_DEBUG_PUB.debug( 'enter ahl_prd_sern_change_pvt. Process Serialnum Change','+PRDSRN+');
580: END IF;
581:
582: ------------------------------------------------
583: -- Standard call to check for call compatibility.

Line 1211: AHL_DEBUG_PUB.debug( 'ahl_prd_sern_change_pvt. Process Serialnum Change','+PRDSRN+');

1207: p_data => x_msg_data);
1208: IF G_DEBUG='Y' THEN
1209: AHL_DEBUG_PUB.log_app_messages (
1210: x_msg_count, x_msg_data, 'ERROR' );
1211: AHL_DEBUG_PUB.debug( 'ahl_prd_sern_change_pvt. Process Serialnum Change','+PRDSRN+');
1212: -- Check if API is called in debug mode. If yes, disable debug.
1213: AHL_DEBUG_PUB.disable_debug;
1214: END IF;
1215:

Line 1226: AHL_DEBUG_PUB.debug( 'ahl_prd_sern_change_pvt. Process Serialnum Change','+PRDSRN+');

1222: IF G_DEBUG='Y' THEN
1223: -- Debug info.
1224: AHL_DEBUG_PUB.log_app_messages (
1225: x_msg_count, x_msg_data, 'UNEXPECTED ERROR' );
1226: AHL_DEBUG_PUB.debug( 'ahl_prd_sern_change_pvt. Process Serialnum Change','+PRDSRN+');
1227: -- Check if API is called in debug mode. If yes, disable debug.
1228: AHL_DEBUG_PUB.disable_debug;
1229: END IF;
1230: WHEN OTHERS THEN

Line 1235: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PRD_SERN_CHANGE_PVT',

1231: ROLLBACK TO Process_Serialnum_Change;
1232: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1233: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1234: THEN
1235: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PRD_SERN_CHANGE_PVT',
1236: p_procedure_name => 'PROCESS_SERIALNUM_CHANGE',
1237: p_error_text => SUBSTR(SQLERRM,1,240));
1238: END IF;
1239: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 1246: AHL_DEBUG_PUB.debug( 'ahl_prd_sern_change_pvt. Process Serialnum Change','+PRDSRN+');

1242: IF G_DEBUG='Y' THEN
1243: -- Debug info.
1244: AHL_DEBUG_PUB.log_app_messages (
1245: x_msg_count, x_msg_data, 'SQL ERROR' );
1246: AHL_DEBUG_PUB.debug( 'ahl_prd_sern_change_pvt. Process Serialnum Change','+PRDSRN+');
1247: -- Check if API is called in debug mode. If yes, disable debug.
1248: AHL_DEBUG_PUB.disable_debug;
1249: END IF;
1250:

Line 1253: END AHL_PRD_SERN_CHANGE_PVT;

1249: END IF;
1250:
1251: END Process_Serialnum_Change;
1252:
1253: END AHL_PRD_SERN_CHANGE_PVT;