684: END IF;
685: IF NVL(L_txn_header_id, -1) < 0
686: OR NVL(L_success_flag, -1) < 0 THEN
687: --
688: FND_MESSAGE.SET_NAME('INV', 'INV_ADJ_TXN_FAILED');
689: APP_EXCEPTION.RAISE_EXCEPTION;
690: IF (l_debug = 1) THEN
691: MDEBUG( 'Process-Tolerence : Adj Failed ');
692: END IF;
1985: IF p_serial_number IS NOT NULL
1986: AND MTL_CCEOI_VAR_PVT.G_SYSTEM_QUANTITY = 0 THEN
1987: --
1988: x_errorcode := 17;
1989: FND_MESSAGE.SET_NAME('INV', 'INV_CCEOI_ADJCALC_NO_SERIAL');
1990: FND_MSG_PUB.Add;
1991: RAISE FND_API.G_EXC_ERROR;
1992: --
1993: END IF;
2941: DECLARE
2942: L_interface_error_id NUMBER;
2943: BEGIN
2944: IF (l_debug = 1) THEN
2945: MDEBUG('Insert error: ' || FND_MESSAGE.GET_STRING('INV', p_message_name));
2946: END IF;
2947: --
2948: SELECT MTL_CC_INTERFACE_ERRORS_S.nextval
2949: INTO
2979: MTL_CCEOI_VAR_PVT.G_RequestID,
2980: MTL_CCEOI_VAR_PVT.G_ProgramAppID,
2981: MTL_CCEOI_VAR_PVT.G_ProgramID,
2982: sysdate,
2983: FND_MESSAGE.GET_STRING('INV', p_message_name),
2984: p_error_column_name,
2985: p_error_table_name,
2986: p_message_name);
2987: --
3264: IF SQL%ROWCOUNT <> 1 THEN
3265: IF (l_debug = 1) THEN
3266: MDEBUG( 'SetCCExport : Error Update');
3267: END IF;
3268: FND_MESSAGE.SET_NAME('INV', 'INV_CCEOI_COULD_NOT_LOCK');
3269: FND_MSG_PUB.Add;
3270: RAISE FND_API.G_EXC_ERROR;
3271: END IF;
3272: --
3432: cc_entry_interface_id = p_cc_entry_interface_id;
3433:
3434: --
3435: IF SQL%ROWCOUNT <> 1 THEN
3436: FND_MESSAGE.SET_NAME('INV', 'INV_CCEOI_COULD_NOT_LOCK');
3437: FND_MSG_PUB.Add;
3438: RAISE FND_API.G_EXC_ERROR;
3439: END IF;
3440: --
4497: ELSIF x_errorcode = 103 THEN
4498: L_message_name := 'INV_CCEOI_SERIAL_NOT_ALLOWED';
4499: END IF;
4500: --
4501: FND_MESSAGE.SET_NAME('INV',L_message_name);
4502: FND_MSG_PUB.Add;
4503: -- Write INTO interface error TABLE
4504: MTL_CCEOI_PROCESS_PVT.Insert_CCEOIError(
4505: p_cc_entry_interface_id => MTL_CCEOI_VAR_PVT.G_CC_ENTRY_INTERFACE_ID
4577: IF (l_debug = 1) THEN
4578: MDEBUG('Process: In Validate_ItemSKU Unsched not Allowed');
4579: END IF;
4580: x_errorcode := 48;
4581: FND_MESSAGE.SET_NAME('INV', 'INV_CCEOI_NO_CCENTRY');
4582: FND_MSG_PUB.Add;
4583: -- Write INTO interface error TABLE
4584: MTL_CCEOI_PROCESS_PVT.Insert_CCEOIError(
4585: p_cc_entry_interface_id => MTL_CCEOI_VAR_PVT.G_CC_ENTRY_INTERFACE_ID
4598:
4599: IF (l_debug = 1) THEN
4600: MDEBUG( 'Process: In Validate_ItemSKU call-4 ');
4601: END IF;
4602: FND_MESSAGE.SET_NAME('INV', 'INV_CCEOI_MULT_REQUESTS');
4603: FND_MSG_PUB.Add;
4604: -- Write INTO interface error TABLE
4605: MTL_CCEOI_PROCESS_PVT.Insert_CCEOIError(
4606: p_cc_entry_interface_id => MTL_CCEOI_VAR_PVT.G_CC_ENTRY_INTERFACE_ID
5753: --
5754: IF (l_debug = 1) THEN
5755: MDEBUG( 'Process Data: INV_SERIAL_UNAVAILABLE ');
5756: END IF;
5757: FND_MESSAGE.SET_NAME('INV', 'INV_SERIAL_UNAVAILABLE');
5758: FND_MESSAGE.SET_TOKEN('FIRST-SERIAL',
5759: p_interface_rec.serial_number);
5760: FND_MSG_PUB.Add;
5761: --x_errorcode := -1;
5754: IF (l_debug = 1) THEN
5755: MDEBUG( 'Process Data: INV_SERIAL_UNAVAILABLE ');
5756: END IF;
5757: FND_MESSAGE.SET_NAME('INV', 'INV_SERIAL_UNAVAILABLE');
5758: FND_MESSAGE.SET_TOKEN('FIRST-SERIAL',
5759: p_interface_rec.serial_number);
5760: FND_MSG_PUB.Add;
5761: --x_errorcode := -1;
5762: x_errorcode := 70;
6295: CURRENT_STATUS = 3;
6296: if(L_serial_count = 1 AND v_serial_discrepancy = 1 ) then
6297: MTL_CCEOI_VAR_PVT.G_CC_ENTRY_REC_TMP.APPROVAL_CONDITION := 1;
6298: MTL_CCEOI_VAR_PVT.G_CC_ENTRY_REC_TMP.ENTRY_STATUS_CODE := 2;
6299: fnd_message.set_name('INV', 'INV_CC_SERIAL_MULTI_TRANSACT2');
6300: fnd_message.set_token('SERIAL', v_serial_number);
6301: fnd_msg_pub.add;
6302:
6303: L_ret_value := TRUE;
6296: if(L_serial_count = 1 AND v_serial_discrepancy = 1 ) then
6297: MTL_CCEOI_VAR_PVT.G_CC_ENTRY_REC_TMP.APPROVAL_CONDITION := 1;
6298: MTL_CCEOI_VAR_PVT.G_CC_ENTRY_REC_TMP.ENTRY_STATUS_CODE := 2;
6299: fnd_message.set_name('INV', 'INV_CC_SERIAL_MULTI_TRANSACT2');
6300: fnd_message.set_token('SERIAL', v_serial_number);
6301: fnd_msg_pub.add;
6302:
6303: L_ret_value := TRUE;
6304: else
6304: else
6305: IF (l_debug = 1) THEN
6306: MDEBUG( 'Process- within check-serial-1-INV_CC_SERIAL_DISCREPANCY' );
6307: END IF;
6308: fnd_message.set_name('INV', 'INV_CC_SERIAL_DISCREPANCY');
6309: fnd_msg_pub.add;
6310:
6311: L_ret_value := FALSE;
6312: end if;
6313: elsif x_return_status <> 'S' then
6314: IF (l_debug = 1) THEN
6315: MDEBUG( 'Process- within check-serial-2-INV_CC_SERIAL_DISCREPANCY' );
6316: END IF;
6317: fnd_message.set_name('INV', 'INV_CC_SERIAL_DISCREPANCY');
6318: fnd_msg_pub.add;
6319: L_ret_value := FALSE;
6320: end if;
6321: end if;
6365: IF l_return_status <> 'S' then
6366: IF (l_debug = 1) THEN
6367: mdebug('error in delete all reservations');
6368: END IF;
6369: --FND_MESSAGE.ERROR;
6370: --RAISE FORM_TRIGGER_FAILURE;
6371: END IF;
6372: END DELETE_RESERVATION;
6373: