152: SAVEPOINT CLOSE_ORDER;
153:
154: x_return_status := FND_API.G_RET_STS_SUCCESS;
155:
156: OE_MSG_PUB.set_msg_context(
157: p_entity_code => 'HEADER'
158: ,p_entity_id => p_header_id
159: ,p_header_id => p_header_id);
160:
170: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
172: END IF;
173:
174: OE_MSG_PUB.update_msg_context(
175: p_entity_code => 'HEADER'
176: ,p_entity_id => l_old_header_rec.header_id
177: ,p_header_id => l_old_header_rec.header_id
178: ,p_line_id => null
205: IF ( x_return_status = FND_API.G_RET_STS_SUCCESS AND
206: l_check_hold_result = FND_API.G_TRUE )
207: THEN
208: FND_MESSAGE.SET_NAME('ONT','OE_CLOSE_ORDER_HOLD_EXISTS');
209: OE_MSG_PUB.ADD;
210: RAISE ON_HOLD_ERROR;
211: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
212: RAISE FND_API.G_EXC_ERROR;
213: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
366: -- when order header is updated.
367: OE_PC_Constraints_Admin_Pvt.Clear_Cached_Results
368: (p_validation_entity_id => OE_PC_GLOBALS.G_ENTITY_HEADER);
369:
370: OE_MSG_PUB.reset_msg_context('HEADER');
371:
372: EXCEPTION
373: WHEN ON_HOLD_ERROR THEN
374: x_return_status := 'H';
371:
372: EXCEPTION
373: WHEN ON_HOLD_ERROR THEN
374: x_return_status := 'H';
375: OE_MSG_PUB.reset_msg_context('HEADER');
376: ROLLBACK TO CLOSE_ORDER;
377: WHEN FND_API.G_EXC_ERROR THEN
378: x_return_status := FND_API.G_RET_STS_ERROR;
379: OE_MSG_PUB.reset_msg_context('HEADER');
375: OE_MSG_PUB.reset_msg_context('HEADER');
376: ROLLBACK TO CLOSE_ORDER;
377: WHEN FND_API.G_EXC_ERROR THEN
378: x_return_status := FND_API.G_RET_STS_ERROR;
379: OE_MSG_PUB.reset_msg_context('HEADER');
380: ROLLBACK TO CLOSE_ORDER;
381: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
382: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
383: OE_MSG_PUB.reset_msg_context('HEADER');
379: OE_MSG_PUB.reset_msg_context('HEADER');
380: ROLLBACK TO CLOSE_ORDER;
381: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
382: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
383: OE_MSG_PUB.reset_msg_context('HEADER');
384: ROLLBACK TO CLOSE_ORDER;
385: WHEN OTHERS THEN
386: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
387: IF FND_MSG_PUB.Check_Msg_Level
386: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
387: IF FND_MSG_PUB.Check_Msg_Level
388: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
389: THEN
390: OE_MSG_PUB.Add_Exc_Msg
391: ( G_PKG_NAME
392: , 'Close_Order'
393: );
394: END IF;
391: ( G_PKG_NAME
392: , 'Close_Order'
393: );
394: END IF;
395: OE_MSG_PUB.reset_msg_context('HEADER');
396: ROLLBACK TO CLOSE_ORDER;
397: END CLOSE_ORDER;
398:
399: PROCEDURE CLOSE_LINE
434: SAVEPOINT CLOSE_LINE;
435:
436: x_return_status := FND_API.G_RET_STS_SUCCESS;
437:
438: OE_MSG_PUB.set_msg_context(
439: p_entity_code => 'LINE'
440: ,p_entity_id => p_line_id
441: ,p_line_id => p_line_id);
442:
485: FROM oe_order_lines_all
486: WHERE line_id = p_line_id
487: FOR UPDATE NOWAIT;
488:
489: OE_MSG_PUB.update_msg_context
490: ( p_entity_code => 'LINE'
491: ,p_entity_id => l_old_line_tbl(1).line_id
492: ,p_header_id => l_old_line_tbl(1).header_id
493: ,p_line_id => l_old_line_tbl(1).line_id
513: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
515: END IF;
516:
517: OE_MSG_PUB.update_msg_context
518: ( p_entity_code => 'LINE'
519: ,p_entity_id => l_old_line_tbl(1).line_id
520: ,p_header_id => l_old_line_tbl(1).header_id
521: ,p_line_id => l_old_line_tbl(1).line_id
551: IF ( x_return_status = FND_API.G_RET_STS_SUCCESS AND
552: l_check_hold_result = FND_API.G_TRUE )
553: THEN
554: FND_MESSAGE.SET_NAME('ONT','OE_CLOSE_LINE_HOLD_EXISTS');
555: OE_MSG_PUB.ADD;
556: RAISE ON_HOLD_ERROR;
557: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
558: RAISE FND_API.G_EXC_ERROR;
559: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
835:
836: --Customer Acceptance
837: IF l_pending_acceptance = 'N' THEN
838: DELETE_ADJUSTMENTS(p_line_id => p_line_id);
839: OE_MSG_PUB.Reset_Msg_Context('LINE');
840: END IF;
841:
842: /********************GENESIS********************************
843: * Some statuses are not going through process order and *
891:
892: EXCEPTION
893: WHEN ON_HOLD_ERROR THEN
894: x_return_status := 'H';
895: OE_MSG_PUB.Reset_Msg_Context('LINE');
896: ROLLBACK TO CLOSE_LINE;
897: WHEN FND_API.G_EXC_ERROR THEN
898: x_return_status := FND_API.G_RET_STS_ERROR;
899: OE_MSG_PUB.Reset_Msg_Context('LINE');
895: OE_MSG_PUB.Reset_Msg_Context('LINE');
896: ROLLBACK TO CLOSE_LINE;
897: WHEN FND_API.G_EXC_ERROR THEN
898: x_return_status := FND_API.G_RET_STS_ERROR;
899: OE_MSG_PUB.Reset_Msg_Context('LINE');
900: ROLLBACK TO CLOSE_LINE;
901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
903: OE_MSG_PUB.Reset_Msg_Context('LINE');
899: OE_MSG_PUB.Reset_Msg_Context('LINE');
900: ROLLBACK TO CLOSE_LINE;
901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
903: OE_MSG_PUB.Reset_Msg_Context('LINE');
904: ROLLBACK TO CLOSE_LINE;
905: WHEN OTHERS THEN
906: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
907: IF FND_MSG_PUB.Check_Msg_Level
906: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
907: IF FND_MSG_PUB.Check_Msg_Level
908: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
909: THEN
910: OE_MSG_PUB.Add_Exc_Msg
911: ( G_PKG_NAME
912: , 'Close_Line'
913: );
914: END IF;
911: ( G_PKG_NAME
912: , 'Close_Line'
913: );
914: END IF;
915: OE_MSG_PUB.Reset_Msg_Context('LINE');
916: ROLLBACK TO CLOSE_LINE;
917: END CLOSE_LINE;
918:
919: END OE_ORDER_CLOSE_UTIL;