DBA Data[Home] [Help]

APPS.OE_INTERNAL_REQUISITION_PVT dependencies on OE_INTERNAL_REQUISITION_PVT

Line 1: PACKAGE BODY OE_INTERNAL_REQUISITION_PVT AS

1: PACKAGE BODY OE_INTERNAL_REQUISITION_PVT AS
2: /* $Header: OEXVIRQB.pls 120.0.12010000.3 2009/01/07 05:26:15 vbkapoor noship $ */
3:
4: -- Global constant holding the package name
5: G_PKG_Name CONSTANT VARCHAR2(30) := 'OE_INTERNAL_REQUISITION_PVT';

Line 5: G_PKG_Name CONSTANT VARCHAR2(30) := 'OE_INTERNAL_REQUISITION_PVT';

1: PACKAGE BODY OE_INTERNAL_REQUISITION_PVT AS
2: /* $Header: OEXVIRQB.pls 120.0.12010000.3 2009/01/07 05:26:15 vbkapoor noship $ */
3:
4: -- Global constant holding the package name
5: G_PKG_Name CONSTANT VARCHAR2(30) := 'OE_INTERNAL_REQUISITION_PVT';
6:
7: Procedure Get_Eligible_ISO_Shipment -- Body definition
8: ( P_internal_req_line_id IN PO_Requisition_Lines_All.Requisition_Line_id%TYPE
9: , P_internal_req_header_id IN PO_Requisition_Headers_All.Requisition_Header_id%TYPE

Line 22: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Get_Eligible_ISO_Shipment', 1 ) ;

18:
19: Begin
20:
21: IF l_debug_level > 0 THEN
22: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Get_Eligible_ISO_Shipment', 1 ) ;
23: oe_debug_pub.add( ' Requisition Line id :'||P_internal_req_line_id , 5 ) ;
24: oe_debug_pub.add( ' Requisition Header id :'||P_internal_req_header_id , 5) ;
25: END IF;
26:

Line 70: oe_debug_pub.add( ' EXITING OE_Internal_Requisition_Pvt.Get_Eligible_ISO_Shipment', 1 ) ;

66:
67: X_line_ids_rec := l_line_ids_rec;
68:
69: IF l_debug_level > 0 THEN
70: oe_debug_pub.add( ' EXITING OE_Internal_Requisition_Pvt.Get_Eligible_ISO_Shipment', 1 ) ;
71: END IF;
72:
73: Exception
74:

Line 124: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Update_Allowed', 1) ;

120: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
121: --
122: Begin
123: IF l_debug_level > 0 THEN
124: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Update_Allowed', 1) ;
125: END IF;
126:
127: OE_LINE_UTIL.QUERY_ROW( p_line_id => P_line_id
128: , x_line_rec => l_line_rec );

Line 233: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Update_Allowed', 1 ) ;

229: RETURN FALSE;
230: END IF;
231:
232: IF l_debug_level > 0 THEN
233: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Update_Allowed', 1 ) ;
234: END IF;
235: Exception
236: WHEN OTHERS THEN
237: oe_debug_pub.add( ' When Others of OE_Internal_Requisition_Pvt.Update_Allowed '||sqlerrm,1);

Line 237: oe_debug_pub.add( ' When Others of OE_Internal_Requisition_Pvt.Update_Allowed '||sqlerrm,1);

233: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Update_Allowed', 1 ) ;
234: END IF;
235: Exception
236: WHEN OTHERS THEN
237: oe_debug_pub.add( ' When Others of OE_Internal_Requisition_Pvt.Update_Allowed '||sqlerrm,1);
238: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
239: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Update_Allowed');
240: -- Pkg Body global variable = 'OE_internal_Requisition_Pv'
241: END IF;

Line 265: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Cancel_Allowed', 1) ;

261: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
262: --
263: Begin
264: IF l_debug_level > 0 THEN
265: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Cancel_Allowed', 1) ;
266: END IF;
267:
268: OE_LINE_UTIL.QUERY_ROW( p_line_id => P_line_id
269: , x_line_rec => l_line_rec );

Line 339: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Cancel_Allowed', 1 ) ;

335: END IF;
336: RETURN FALSE;
337: END IF;
338: IF l_debug_level > 0 THEN
339: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Cancel_Allowed', 1 ) ;
340: END IF;
341:
342: Exception
343: WHEN OTHERS THEN

Line 344: oe_debug_pub.add( ' When Others of OE_Internal_Requisition_Pvt.Cancel_Allowed '||sqlerrm,1);

340: END IF;
341:
342: Exception
343: WHEN OTHERS THEN
344: oe_debug_pub.add( ' When Others of OE_Internal_Requisition_Pvt.Cancel_Allowed '||sqlerrm,1);
345: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
346: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Cancel_Allowed');
347: -- Pkg Body global variable = 'OE_internal_Requisition_Pvt'
348: END IF;

Line 347: -- Pkg Body global variable = 'OE_internal_Requisition_Pvt'

343: WHEN OTHERS THEN
344: oe_debug_pub.add( ' When Others of OE_Internal_Requisition_Pvt.Cancel_Allowed '||sqlerrm,1);
345: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
346: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Cancel_Allowed');
347: -- Pkg Body global variable = 'OE_internal_Requisition_Pvt'
348: END IF;
349: RETURN FALSE;
350: End Cancel_Allowed;
351:

Line 367: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Cancel_Header_Allowed', 1 ) ;

363: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
364: --
365: Begin
366: IF l_debug_level > 0 THEN
367: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Cancel_Header_Allowed', 1 ) ;
368: END IF;
369:
370: OE_HEADER_UTIL.QUERY_ROW( p_header_id => P_header_id
371: , x_header_rec => l_header_rec );

Line 400: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Cancel_Header_Allowed', 1 ) ;

396: END IF;
397: RETURN FALSE;
398: END IF;
399: IF l_debug_level > 0 THEN
400: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Cancel_Header_Allowed', 1 ) ;
401: END IF;
402:
403: Exception
404: WHEN OTHERS THEN

Line 405: oe_debug_pub.add( ' When Others of OE_Internal_Requisition_Pvt.Cancel_Header_Allowed '||sqlerrm,1);

401: END IF;
402:
403: Exception
404: WHEN OTHERS THEN
405: oe_debug_pub.add( ' When Others of OE_Internal_Requisition_Pvt.Cancel_Header_Allowed '||sqlerrm,1);
406: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
407: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Cancel_Header_Allowed');
408: -- Pkg Body global variable = 'OE_internal_Requisition_Pvt'
409: END IF;

Line 408: -- Pkg Body global variable = 'OE_internal_Requisition_Pvt'

404: WHEN OTHERS THEN
405: oe_debug_pub.add( ' When Others of OE_Internal_Requisition_Pvt.Cancel_Header_Allowed '||sqlerrm,1);
406: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
407: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Cancel_Header_Allowed');
408: -- Pkg Body global variable = 'OE_internal_Requisition_Pvt'
409: END IF;
410: RETURN FALSE;
411: End Cancel_Header_Allowed;
412:

Line 435: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Process_Line_Entity', 1 ) ;

431: --
432: BEGIN
433:
434: IF l_debug_level > 0 THEN
435: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Process_Line_Entity', 1 ) ;
436: oe_debug_pub.add( ' Count of Lines :'||P_Line_Tbl.COUNT, 5 ) ;
437: oe_debug_pub.add( ' Mode :'||P_Mode, 5 ) ;
438: END IF;
439:

Line 499: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Process_Line_Entity', 1 ) ;

495:
496: x_return_status := l_return_status;
497:
498: IF l_debug_level > 0 THEN
499: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Process_Line_Entity', 1 ) ;
500: END IF;
501:
502: EXCEPTION
503: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 563: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Apply_Hold_for_IReq', 1 ) ;

559:
560: SavePoint Apply_Hold_For_IReq;
561:
562: IF l_debug_level > 0 THEN
563: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Apply_Hold_for_IReq', 1 ) ;
564: oe_debug_pub.add( ' Requisition Line id :'||P_internal_req_line_id , 5 ) ;
565: oe_debug_pub.add( ' Requisition Header id :'||P_internal_req_header_id , 5) ;
566: END IF;
567:

Line 654: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Apply_Hold_for_IReq', 1 ) ;

650: OE_MSG_PUB.Count_And_Get (P_Count => x_msg_Count,
651: P_Data => x_msg_Data);
652:
653: IF l_debug_level > 0 THEN
654: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Apply_Hold_for_IReq', 1 ) ;
655: END IF;
656:
657: Exception
658: WHEN FND_API.G_EXC_ERROR THEN

Line 673: oe_debug_pub.add( ' When Others of OE_Internal_Requisition_Pvt.Apply_Hold_for_IReq '||sqlerrm,1);

669: P_Data => x_msg_Data);
670: ROLLBACK TO Apply_Hold_For_IReq;
671:
672: WHEN OTHERS THEN
673: oe_debug_pub.add( ' When Others of OE_Internal_Requisition_Pvt.Apply_Hold_for_IReq '||sqlerrm,1);
674: -- OE_MSG_PUB.Reset_Msg_Context('LINE');
675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
676: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
677: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Apply_Hold_for_IReq');

Line 678: -- Pkg Body global variable = 'OE_internal_Requisition_Pvt'

674: -- OE_MSG_PUB.Reset_Msg_Context('LINE');
675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
676: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
677: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Apply_Hold_for_IReq');
678: -- Pkg Body global variable = 'OE_internal_Requisition_Pvt'
679: END IF;
680: OE_MSG_PUB.Count_And_Get (P_Count => x_msg_Count,
681: P_Data => x_msg_Data);
682: ROLLBACK TO Apply_Hold_For_IReq;

Line 724: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Release_Hold_for_IReq', 1 ) ;

720:
721: SavePoint Release_Hold_For_IReq;
722:
723: IF l_debug_level > 0 THEN
724: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Release_Hold_for_IReq', 1 ) ;
725: oe_debug_pub.add( ' Requisition Line id :'||P_internal_req_line_id , 5 ) ;
726: oe_debug_pub.add( ' Requisition Header id :'||P_internal_req_header_id , 5) ;
727: END IF;
728:

Line 824: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Release_Hold_for_Ireq with No Data Found Error');

820:
821: Exception
822: When No_Data_Found Then
823: IF l_debug_level > 0 THEN
824: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Release_Hold_for_Ireq with No Data Found Error');
825: END IF;
826: FND_Message.Set_Name('ONT', 'OE_IRCMS_NO_HOLD_RELEASED');
827: -- There is no sales order line shipment on hold.
828: OE_MSG_PUB.Add;

Line 833: oe_debug_pub.add('EXITING OE_Internal_Requisition_Pvt.Release_Hold_for_Ireq with Too Many rows error') ;

829: X_return_status := FND_API.G_RET_STS_ERROR;
830:
831: When Too_Many_Rows Then
832: IF l_debug_level > 0 THEN
833: oe_debug_pub.add('EXITING OE_Internal_Requisition_Pvt.Release_Hold_for_Ireq with Too Many rows error') ;
834: END IF;
835: FND_Message.Set_Name('ONT', 'OE_IRCMS_MANY_HOLD');
836: -- There are many sales order line shipments eligible for hold release. This is not allowed.
837: OE_MSG_PUB.Add;

Line 851: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Release_Hold_for_IReq', 1 ) ;

847: OE_MSG_PUB.Count_And_Get (P_Count => x_msg_Count,
848: P_Data => x_msg_Data);
849:
850: IF l_debug_level > 0 THEN
851: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Release_Hold_for_IReq', 1 ) ;
852: END IF;
853:
854: Exception
855: WHEN FND_API.G_EXC_ERROR THEN

Line 871: oe_debug_pub.add( ' When Others of OE_Internal_Requisition_Pvt.Release_Hold_for_IReq '||sqlerrm,1);

867: P_Data => x_msg_Data);
868: ROLLBACK TO Release_Hold_For_IReq;
869:
870: WHEN OTHERS THEN
871: oe_debug_pub.add( ' When Others of OE_Internal_Requisition_Pvt.Release_Hold_for_IReq '||sqlerrm,1);
872: -- OE_MSG_PUB.Reset_Msg_Context('LINE');
873: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
874: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
875: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Release_Hold_for_IReq');

Line 876: -- Pkg Body global variable = 'OE_internal_Requisition_Pvt'

872: -- OE_MSG_PUB.Reset_Msg_Context('LINE');
873: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
874: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
875: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Release_Hold_for_IReq');
876: -- Pkg Body global variable = 'OE_internal_Requisition_Pvt'
877: END IF;
878: OE_MSG_PUB.Count_And_Get (P_Count => x_msg_Count,
879: P_Data => x_msg_Data);
880: ROLLBACK TO Release_Hold_For_IReq;

Line 937: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Is_IReq_Changable', 1 ) ;

933: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
934: END IF;
935:
936: IF l_debug_level > 0 THEN
937: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Is_IReq_Changable', 1 ) ;
938: oe_debug_pub.add( ' Requisition Line id :'||P_internal_req_line_id , 5 ) ;
939: oe_debug_pub.add( ' Requisition Header id :'||P_internal_req_header_id , 5) ;
940: END IF;
941:

Line 1155: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Is_IReq_Changable', 1 ) ;

1151: OE_MSG_PUB.Count_And_Get (P_Count => x_msg_Count,
1152: P_Data => x_msg_Data);
1153:
1154: IF l_debug_level > 0 THEN
1155: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Is_IReq_Changable', 1 ) ;
1156: END IF;
1157:
1158: Exception
1159: WHEN FND_API.G_EXC_ERROR THEN

Line 1176: oe_debug_pub.add( ' When Others of OE_Internal_Requisition_Pvt.Is_IReq_Changable '||sqlerrm,1);

1172: OE_MSG_PUB.Count_And_Get (P_Count => x_msg_Count,
1173: P_Data => x_msg_Data);
1174:
1175: WHEN OTHERS THEN
1176: oe_debug_pub.add( ' When Others of OE_Internal_Requisition_Pvt.Is_IReq_Changable '||sqlerrm,1);
1177: -- OE_MSG_PUB.Reset_Msg_Context('LINE');
1178: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1179: X_Update_Allowed := FALSE;
1180: X_Cancel_Allowed := FALSE;

Line 1183: -- Pkg Body global variable = 'OE_internal_Requisition_Pvt'

1179: X_Update_Allowed := FALSE;
1180: X_Cancel_Allowed := FALSE;
1181: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1182: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Is_IReq_Changable');
1183: -- Pkg Body global variable = 'OE_internal_Requisition_Pvt'
1184: END IF;
1185: OE_MSG_PUB.Count_And_Get (P_Count => x_msg_Count,
1186: P_Data => x_msg_Data);
1187: End Is_IReq_Changable;

Line 1267: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Call_Process_Order_for_IReq', 1 ) ;

1263:
1264: SavePoint Call_Process_Order_for_IReq;
1265:
1266: IF l_debug_level > 0 THEN
1267: oe_debug_pub.add( 'ENTERING OE_Internal_Requisition_Pvt.Call_Process_Order_for_IReq', 1 ) ;
1268: oe_debug_pub.add( ' P_internal_req_line_id :'||P_internal_req_line_id , 5 ) ;
1269: oe_debug_pub.add( ' P_internal_req_header_id :'||P_internal_req_header_id , 5 ) ;
1270: oe_debug_pub.add( ' P_Mode :'||P_Mode , 5 ) ;
1271: oe_debug_pub.add( ' P_New_Request_Date :'||P_New_Request_Date , 5 ) ;

Line 1740: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Call_Process_Order_for_IReq', 1 ) ;

1736: OE_MSG_PUB.Count_And_Get (P_Count => x_msg_Count,
1737: P_Data => x_msg_Data);
1738:
1739: IF l_debug_level > 0 THEN
1740: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Call_Process_Order_for_IReq', 1 ) ;
1741: END IF;
1742:
1743: Exception
1744: WHEN FND_API.G_EXC_ERROR THEN

Line 1761: oe_debug_pub.add( ' When Others of OE_Internal_Requisition_Pvt.Call_Process_Order_for_IReq '||sqlerrm,1);

1757: G_Update_ISO_From_Req := FALSE; -- Confirming IR initiated change
1758: ROLLBACK TO Call_Process_Order_for_IReq;
1759:
1760: WHEN OTHERS THEN
1761: oe_debug_pub.add( ' When Others of OE_Internal_Requisition_Pvt.Call_Process_Order_for_IReq '||sqlerrm,1);
1762: -- OE_MSG_PUB.Reset_Msg_Context('LINE');
1763: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1764: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1765: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Call_Process_Order_for_IReq');

Line 1766: -- Pkg Body global variable = 'OE_internal_Requisition_Pvt'

1762: -- OE_MSG_PUB.Reset_Msg_Context('LINE');
1763: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1764: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1765: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Call_Process_Order_for_IReq');
1766: -- Pkg Body global variable = 'OE_internal_Requisition_Pvt'
1767: END IF;
1768: OE_MSG_PUB.Count_And_Get (P_Count => x_msg_Count,
1769: P_Data => x_msg_Data);
1770: G_Update_ISO_From_Req := FALSE; -- Confirming IR initiated change

Line 1775: END OE_INTERNAL_REQUISITION_PVT;

1771: ROLLBACK TO Call_Process_Order_for_IReq;
1772:
1773: End Call_Process_Order_for_IReq;
1774:
1775: END OE_INTERNAL_REQUISITION_PVT;