[Home] [Help]
60: , x_old_header_rec IN OUT NOCOPY OE_ORDER_PUB.Header_Rec_Type
61: , p_transaction_phase_code IN VARCHAR2
62: )
63: IS
64: l_control_rec OE_GLOBALS.Control_Rec_Type;
65: l_return_status VARCHAR2(1);
66: BEGIN
67: oe_debug_pub.add('Entering OE_OE_FORM_HEADER.DEFAULT_ATTRIBUTES', 1);
68:
68:
69:
70:
71: -- Set the UI flag
72: OE_GLOBALS.G_UI_FLAG := TRUE;
73:
74: -- Set control flags.
75:
76: l_control_rec.controlled_operation := TRUE;
161: x_header_rec.tp_attribute15 := NULL;
162:
163: -- Set Operation to Create
164:
165: x_header_rec.operation := OE_GLOBALS.G_OPR_CREATE;
166:
167: -- Call Oe_Order_Pvt.Header
168:
169: Oe_Order_Pvt.Header
198: ( p_header_rec => x_header_rec
199: );
200:
201: -- Re-set the UI flag to FALSE
202: OE_GLOBALS.G_UI_FLAG := FALSE;
203:
204: -- Set return status.
205:
206: x_return_status := FND_API.G_RET_STS_SUCCESS;
217: EXCEPTION
218:
219: WHEN FND_API.G_EXC_ERROR THEN
220:
221: OE_GLOBALS.G_UI_FLAG := FALSE;
222:
223: x_return_status := FND_API.G_RET_STS_ERROR;
224:
225: -- Get message count and data
230: );
231:
232: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
233:
234: OE_GLOBALS.G_UI_FLAG := FALSE;
235:
236: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
237:
238: -- Get message count and data
243: );
244:
245: WHEN OTHERS THEN
246:
247: OE_GLOBALS.G_UI_FLAG := FALSE;
248:
249: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
250:
251: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
285: , x_old_header_rec IN OUT NOCOPY OE_ORDER_PUB.Header_Rec_Type
286:
287: )
288: IS
289: l_control_rec OE_GLOBALS.Control_Rec_Type;
290: l_return_status VARCHAR2(1);
291: l_date_format_mask VARCHAR2(30) := p_date_format_mask;
292: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
293: template_id NUMBER := x_header_rec.contract_template_id;
295:
296: oe_debug_pub.add('Entering OE_OE_FORM_HEADER.CHANGE_ATTRIBUTES', 1);
297: oe_debug_pub.add('hash template id in change att start is '|| x_header_rec.contract_template_id);
298: -- Set the UI flag
299: OE_GLOBALS.G_UI_FLAG := TRUE;
300:
301: -- Set control flags.
302:
303: l_control_rec.controlled_operation := TRUE;
729:
730: -- Set Operation.
731:
732: IF FND_API.To_Boolean(x_header_rec.db_flag) THEN
733: x_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
734: ELSE
735: x_header_rec.operation := OE_GLOBALS.G_OPR_CREATE;
736: END IF;
737:
731:
732: IF FND_API.To_Boolean(x_header_rec.db_flag) THEN
733: x_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
734: ELSE
735: x_header_rec.operation := OE_GLOBALS.G_OPR_CREATE;
736: END IF;
737:
738: -- Call Oe_Order_Pvt.Header
739: oe_debug_pub.add('Exiting OE_OE_FORM_HEADER.CHANGE_ATTRIBUTES'||x_header_rec.sold_to_phone_id, 1);
800: ( p_header_rec => x_header_rec
801: );
802:
803: -- Re-set the UI flag to FALSE
804: OE_GLOBALS.G_UI_FLAG := FALSE;
805:
806: -- Set return status.
807:
808: x_return_status := FND_API.G_RET_STS_SUCCESS;
819: EXCEPTION
820:
821: WHEN FND_API.G_EXC_ERROR THEN
822:
823: OE_GLOBALS.G_UI_FLAG := FALSE;
824:
825: x_return_status := FND_API.G_RET_STS_ERROR;
826:
827: -- Get message count and data
832: );
833:
834: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
835:
836: OE_GLOBALS.G_UI_FLAG := FALSE;
837:
838: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
839:
840: -- Get message count and data
845: );
846:
847: WHEN OTHERS THEN
848:
849: OE_GLOBALS.G_UI_FLAG := FALSE;
850:
851: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
852:
853: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
896: , x_payment_term OUT NOCOPY VARCHAR2
897: )
898: IS
899: l_x_old_header_rec OE_Order_PUB.Header_Rec_Type;
900: l_control_rec OE_GLOBALS.Control_Rec_Type;
901: l_return_status VARCHAR2(1);
902: l_x_header_rec OE_Order_PUB.Header_Rec_Type;
903: BEGIN
904:
906: OE_HEADER_UTIL.g_rollback_done := 'N'; -- bug 12759791
907: oe_debug_pub.add('Entering OE_OE_FORM_HEADER.VALIDATE_AND_WRITE', 1);
908:
909: -- Set the UI flag
910: OE_GLOBALS.G_UI_FLAG := TRUE;
911:
912: -- Set control flags.
913:
914: l_control_rec.controlled_operation := TRUE;
947:
948: -- Set Operation.
949:
950: IF FND_API.To_Boolean(l_x_header_rec.db_flag) THEN
951: l_x_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
952: ELSE
953: l_x_header_rec.operation := OE_GLOBALS.G_OPR_CREATE;
954: END IF;
955:
949:
950: IF FND_API.To_Boolean(l_x_header_rec.db_flag) THEN
951: l_x_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
952: ELSE
953: l_x_header_rec.operation := OE_GLOBALS.G_OPR_CREATE;
954: END IF;
955:
956: -- Call Oe_Order_Pvt.Header
957:
993:
994: END IF; /* code release level check */
995:
996:
997: x_cascade_flag := OE_GLOBALS.G_CASCADING_REQUEST_LOGGED;
998: -- Load OUT NOCOPY parameters.
999:
1000:
1001: x_creation_date := l_x_header_rec.creation_date;
1036: /* Is the following assignment Needed- Venkatesh */
1037: -- l_x_old_header_rec.operation := l_x_header_rec.operation;
1038:
1039: -- Re-set the UI flag to FALSE
1040: OE_GLOBALS.G_UI_FLAG := FALSE;
1041:
1042: -- Set return status.
1043:
1044: x_return_status := FND_API.G_RET_STS_SUCCESS;
1055: EXCEPTION
1056:
1057: WHEN FND_API.G_EXC_ERROR THEN
1058:
1059: OE_GLOBALS.G_UI_FLAG := FALSE;
1060: IF Nvl(OE_HEADER_UTIL.g_rollback_done,'N') <> 'Y' THEN -- bug 12759791
1061: ROLLBACK TO SAVEPOINT Header_Validate_And_Write;
1062: END IF;
1063:
1071: );
1072:
1073: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1074:
1075: OE_GLOBALS.G_UI_FLAG := FALSE;
1076:
1077: ROLLBACK TO SAVEPOINT Header_Validate_And_Write;
1078:
1079: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1086: );
1087:
1088: WHEN OTHERS THEN
1089:
1090: OE_GLOBALS.G_UI_FLAG := FALSE;
1091:
1092: ROLLBACK TO SAVEPOINT Header_Validate_And_Write;
1093:
1094: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1120: , p_header_id IN NUMBER
1121: )
1122: IS
1123: l_x_old_header_rec OE_Order_PUB.Header_Rec_Type;
1124: l_control_rec OE_GLOBALS.Control_Rec_Type;
1125: l_return_status VARCHAR2(1);
1126: l_x_header_rec OE_Order_PUB.Header_Rec_Type;
1127: BEGIN
1128: SAVEPOINT Header_Delete;
1128: SAVEPOINT Header_Delete;
1129: oe_debug_pub.add('Entering OE_OE_FORM_HEADER.DELETE_ROW', 1);
1130:
1131: -- Set the UI flag
1132: OE_GLOBALS.G_UI_FLAG := TRUE;
1133:
1134: -- Set control flags.
1135:
1136: l_control_rec.controlled_operation := TRUE;
1157: );
1158:
1159: -- Set Operation.
1160:
1161: l_x_header_rec.operation := OE_GLOBALS.G_OPR_DELETE;
1162:
1163: -- Call Oe_Order_Pvt.Header
1164:
1165: Oe_Order_Pvt.Header
1182:
1183: Clear_header;
1184:
1185: -- Re-set the UI flag to FALSE
1186: OE_GLOBALS.G_UI_FLAG := FALSE;
1187:
1188: -- Set return status.
1189:
1190: x_return_status := FND_API.G_RET_STS_SUCCESS;
1201: EXCEPTION
1202:
1203: WHEN FND_API.G_EXC_ERROR THEN
1204: ROLLBACK TO SAVEPOINT Header_Delete ;
1205: OE_GLOBALS.G_UI_FLAG := FALSE;
1206:
1207: x_return_status := FND_API.G_RET_STS_ERROR;
1208:
1209: -- Get message count and data
1215:
1216: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1217: ROLLBACK TO SAVEPOINT Header_Delete ;
1218:
1219: OE_GLOBALS.G_UI_FLAG := FALSE;
1220:
1221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1222:
1223: -- Get message count and data
1229:
1230: WHEN OTHERS THEN
1231: ROLLBACK TO SAVEPOINT Header_Delete ;
1232:
1233: OE_GLOBALS.G_UI_FLAG := FALSE;
1234:
1235: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1236:
1237: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1265:
1266: oe_debug_pub.add('Entering OE_OE_FORM_HEADER.PROCESS_ENTITY', 1);
1267:
1268: -- Set the UI flag
1269: OE_GLOBALS.G_UI_FLAG := TRUE;
1270:
1271: -- Set control flags.
1272:
1273:
1285: RAISE FND_API.G_EXC_ERROR;
1286: END IF;
1287:
1288: -- Re-set the UI flag to FALSE
1289: OE_GLOBALS.G_UI_FLAG := FALSE;
1290:
1291: -- Set return status.
1292:
1293: x_return_status := FND_API.G_RET_STS_SUCCESS;
1304: EXCEPTION
1305:
1306: WHEN FND_API.G_EXC_ERROR THEN
1307:
1308: OE_GLOBALS.G_UI_FLAG := FALSE;
1309:
1310: x_return_status := FND_API.G_RET_STS_ERROR;
1311:
1312: -- Get message count and data
1317: );
1318:
1319: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1320:
1321: OE_GLOBALS.G_UI_FLAG := FALSE;
1322:
1323: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1324:
1325: -- Get message count and data
1330: );
1331:
1332: WHEN OTHERS THEN
1333:
1334: OE_GLOBALS.G_UI_FLAG := FALSE;
1335:
1336: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1337:
1338: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1362: , x_cascade_flag OUT NOCOPY BOOLEAN
1363: )
1364: IS
1365: l_return_status VARCHAR2(1);
1366: l_control_rec OE_GLOBALS.Control_Rec_Type;
1367: l_line_tbl oe_order_pub.line_tbl_type;
1368: BEGIN
1369: oe_debug_pub.add('Entering OE_OE_FORM_HEADER.PROCESS_OBJECT', 1);
1370:
1370:
1371: OE_MSG_PUB.initialize;
1372:
1373: IF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >='110510' THEN
1374: If OE_GLOBALS.G_FTE_REINVOKE = 'Y' Then
1375: fnd_message.set_name('ONT','ONT_LINE_ATTRIB_CHANGED');
1376: OE_MSG_PUB.Add;
1377: OE_GLOBALS.G_FTE_REINVOKE := 'N';
1378: End If;
1373: IF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >='110510' THEN
1374: If OE_GLOBALS.G_FTE_REINVOKE = 'Y' Then
1375: fnd_message.set_name('ONT','ONT_LINE_ATTRIB_CHANGED');
1376: OE_MSG_PUB.Add;
1377: OE_GLOBALS.G_FTE_REINVOKE := 'N';
1378: End If;
1379: End If;
1380:
1381: -- we are using this flag to selectively requery the block,
1387: -- that will be incorrect.
1388: -- this flag helps to requery the block if any thing changed
1389: -- after validate and write.
1390:
1391: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := TRUE;
1392:
1393: l_control_rec.controlled_operation := TRUE;
1394: l_control_rec.process := TRUE;
1395: l_control_rec.process_entity := OE_GLOBALS.G_ENTITY_ALL;
1391: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := TRUE;
1392:
1393: l_control_rec.controlled_operation := TRUE;
1394: l_control_rec.process := TRUE;
1395: l_control_rec.process_entity := OE_GLOBALS.G_ENTITY_ALL;
1396:
1397: l_control_rec.check_security := FALSE;
1398: l_control_rec.clear_dependents := FALSE;
1399: l_control_rec.default_attributes := FALSE;
1406: l_control_rec.clear_api_cache := FALSE;
1407: l_control_rec.clear_api_requests := TRUE;
1408:
1409: -- Set the UI flag
1410: OE_GLOBALS.G_UI_FLAG := TRUE;
1411:
1412: oe_line_util.Post_Line_Process
1413: ( p_control_rec => l_control_rec
1414: , p_x_line_tbl => l_line_tbl );
1426: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1427: RAISE FND_API.G_EXC_ERROR;
1428: END IF;
1429:
1430: x_cascade_flag := OE_GLOBALS.G_CASCADING_REQUEST_LOGGED;
1431: -- Re-set the UI flag to FALSE
1432: OE_GLOBALS.G_UI_FLAG := FALSE;
1433:
1434: -- Set return status.
1428: END IF;
1429:
1430: x_cascade_flag := OE_GLOBALS.G_CASCADING_REQUEST_LOGGED;
1431: -- Re-set the UI flag to FALSE
1432: OE_GLOBALS.G_UI_FLAG := FALSE;
1433:
1434: -- Set return status.
1435:
1436: x_return_status := FND_API.G_RET_STS_SUCCESS;
1441: ( p_count => x_msg_count
1442: , p_data => x_msg_data
1443: );
1444:
1445: OE_GLOBALS.G_UI_FLAG := FALSE;
1446: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := FALSE;
1447:
1448: oe_debug_pub.add('Exiting OE_OE_FORM_HEADER.PROCESS_OBJECT', 1);
1449:
1442: , p_data => x_msg_data
1443: );
1444:
1445: OE_GLOBALS.G_UI_FLAG := FALSE;
1446: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := FALSE;
1447:
1448: oe_debug_pub.add('Exiting OE_OE_FORM_HEADER.PROCESS_OBJECT', 1);
1449:
1450: EXCEPTION
1449:
1450: EXCEPTION
1451:
1452: WHEN FND_API.G_EXC_ERROR THEN
1453: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := FALSE;
1454: OE_GLOBALS.G_UI_FLAG := FALSE;
1455:
1456: x_return_status := FND_API.G_RET_STS_ERROR;
1457:
1450: EXCEPTION
1451:
1452: WHEN FND_API.G_EXC_ERROR THEN
1453: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := FALSE;
1454: OE_GLOBALS.G_UI_FLAG := FALSE;
1455:
1456: x_return_status := FND_API.G_RET_STS_ERROR;
1457:
1458: -- Get message count and data
1462: , p_data => x_msg_data
1463: );
1464:
1465: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1466: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := FALSE;
1467: OE_GLOBALS.G_UI_FLAG := FALSE;
1468:
1469: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1470:
1463: );
1464:
1465: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1466: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := FALSE;
1467: OE_GLOBALS.G_UI_FLAG := FALSE;
1468:
1469: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1470:
1471: -- Get message count and data
1475: , p_data => x_msg_data
1476: );
1477:
1478: WHEN OTHERS THEN
1479: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := FALSE;
1480: OE_GLOBALS.G_UI_FLAG := FALSE;
1481:
1482: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1483:
1476: );
1477:
1478: WHEN OTHERS THEN
1479: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := FALSE;
1480: OE_GLOBALS.G_UI_FLAG := FALSE;
1481:
1482: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1483:
1484: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1519: -- Load header record
1520:
1521: l_x_header_rec.lock_control := p_lock_control;
1522: l_x_header_rec.header_id := p_header_id;
1523: l_x_header_rec.operation := OE_GLOBALS.G_OPR_LOCK; -- not req.
1524:
1525: -- Call OE_Header_Util.Lock_Row instead of Oe_Order_Pvt.Lock_order
1526:
1527: oe_debug_pub.add('header_id'|| l_x_header_rec.header_id, 1);
1565:
1566: EXCEPTION
1567: WHEN FND_API.G_EXC_ERROR THEN
1568:
1569: OE_GLOBALS.G_UI_FLAG := FALSE;
1570:
1571: x_return_status := FND_API.G_RET_STS_ERROR;
1572:
1573: -- Get message count and data
1578: );
1579:
1580: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1581:
1582: OE_GLOBALS.G_UI_FLAG := FALSE;
1583:
1584: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1585:
1586: -- Get message count and data
1707:
1708:
1709: OE_ORDER_CACHE.g_header_rec:=null;
1710: OE_DELAYED_REQUESTS_PVT.Delete_Reqs_for_Deleted_Entity(
1711: p_entity_code => OE_GLOBALS.G_ENTITY_HEADER
1712: ,p_entity_id => p_header_id
1713: ,x_return_status => l_return_status);
1714:
1715: OE_MSG_PUB.Count_And_Get
1716: ( p_count => x_msg_count
1717: , p_data => x_msg_data
1718: );
1719:
1720: IF OE_GLOBALS.G_ROLL_VERSION <> 'N' THEN
1721:
1722: oe_debug_pub.add('Request does not exist, reset versioning globals'); IF (NOT OE_Versioning_Util.Reset_Globals) THEN
1723: l_return_status := FND_API.G_RET_STS_ERROR;
1724: RETURN;
1727:
1728: -- Clear the controller cache
1729: Clear_Header;
1730: --added for bug3716206
1731: OE_GLOBALS.G_HEADER_CREATED := FALSE;
1732: OE_ORDER_UTIL.Clear_Global_Picture(l_return_status);
1733: EXCEPTION
1734: WHEN OTHERS THEN
1735: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1818: RAISE FND_API.G_EXC_ERROR;
1819: end if;
1820: -- add delayed request to default headers sales credits for the salesrep
1821: OE_Delayed_Requests_Pvt.Log_Request
1822: (p_entity_code=>OE_GLOBALS.G_ENTITY_Header
1823: ,p_entity_id=>p_header_id
1824: ,p_requesting_entity_code => OE_GLOBALS.G_ENTITY_Header
1825: ,p_requesting_entity_id => p_header_id
1826: ,p_request_type=>OE_GLOBALS.G_DFLT_HSCREDIT_FOR_SREP
1820: -- add delayed request to default headers sales credits for the salesrep
1821: OE_Delayed_Requests_Pvt.Log_Request
1822: (p_entity_code=>OE_GLOBALS.G_ENTITY_Header
1823: ,p_entity_id=>p_header_id
1824: ,p_requesting_entity_code => OE_GLOBALS.G_ENTITY_Header
1825: ,p_requesting_entity_id => p_header_id
1826: ,p_request_type=>OE_GLOBALS.G_DFLT_HSCREDIT_FOR_SREP
1827: ,p_param1 => to_char(p_header_id)
1828: ,p_param2 => to_char(p_salesrep_id)
1822: (p_entity_code=>OE_GLOBALS.G_ENTITY_Header
1823: ,p_entity_id=>p_header_id
1824: ,p_requesting_entity_code => OE_GLOBALS.G_ENTITY_Header
1825: ,p_requesting_entity_id => p_header_id
1826: ,p_request_type=>OE_GLOBALS.G_DFLT_HSCREDIT_FOR_SREP
1827: ,p_param1 => to_char(p_header_id)
1828: ,p_param2 => to_char(p_salesrep_id)
1829: ,x_return_status =>l_return_status);
1830:
2701:
2702: FUNCTION Get_Cascade_Flag return Boolean
2703: IS
2704: BEGIN
2705: return(OE_GLOBALS.G_CASCADING_REQUEST_LOGGED);
2706: END Get_Cascade_Flag;
2707:
2708: PROCEDURE Set_Cascade_Flag_False
2709: IS
2707:
2708: PROCEDURE Set_Cascade_Flag_False
2709: IS
2710: BEGIN
2711: OE_GLOBALS.G_CASCADING_REQUEST_LOGGED := FALSE;
2712: END Set_Cascade_Flag_False;
2713:
2714: FUNCTION Load_Set_Of_Books
2715: RETURN Set_Of_Books_Rec_Type
2882: l_x_Header_Adj_Assoc_tbl OE_Order_PUB.Header_Adj_Assoc_Tbl_Type;
2883: l_x_Line_price_Att_tbl OE_Order_PUB.Line_Price_Att_Tbl_Type;
2884: l_x_Line_Adj_Att_tbl OE_Order_PUB.Line_Adj_Att_Tbl_Type;
2885: l_x_Line_Adj_Assoc_tbl OE_Order_PUB.Line_Adj_Assoc_Tbl_Type;
2886: l_control_rec OE_GLOBALS.Control_Rec_Type;
2887: l_count NUMBER;
2888: l_return_status VARCHAR2(1);
2889: --serla begin
2890: l_x_Header_Payment_tbl OE_Order_PUB.Header_Payment_Tbl_Type;
2893: --serla end
2894: BEGIN
2895: SAVEPOINT Header_Cascade_Attributes;
2896: oe_debug_pub.add('Entering OE_OE_FOR_HEADER.Cascade Attribute');
2897: IF NOT OE_Globals.Equal(
2898: p_header_rec.cust_po_number,
2899: p_old_db_header_rec.cust_po_number) OR
2900: NOT OE_Globals.Equal(
2901: p_header_rec.payment_term_id,
2896: oe_debug_pub.add('Entering OE_OE_FOR_HEADER.Cascade Attribute');
2897: IF NOT OE_Globals.Equal(
2898: p_header_rec.cust_po_number,
2899: p_old_db_header_rec.cust_po_number) OR
2900: NOT OE_Globals.Equal(
2901: p_header_rec.payment_term_id,
2902: p_old_db_header_rec.payment_term_id) OR
2903: NOT OE_Globals.Equal(
2904: p_header_rec.shipment_priority_code,
2899: p_old_db_header_rec.cust_po_number) OR
2900: NOT OE_Globals.Equal(
2901: p_header_rec.payment_term_id,
2902: p_old_db_header_rec.payment_term_id) OR
2903: NOT OE_Globals.Equal(
2904: p_header_rec.shipment_priority_code,
2905: p_old_db_header_rec.shipment_priority_code) OR
2906: NOT OE_Globals.Equal(
2907: p_header_rec.shipping_method_code,
2902: p_old_db_header_rec.payment_term_id) OR
2903: NOT OE_Globals.Equal(
2904: p_header_rec.shipment_priority_code,
2905: p_old_db_header_rec.shipment_priority_code) OR
2906: NOT OE_Globals.Equal(
2907: p_header_rec.shipping_method_code,
2908: p_old_db_header_rec.shipping_method_code) OR
2909: NOT OE_Globals.Equal(
2910: p_header_rec.ship_to_org_id,
2905: p_old_db_header_rec.shipment_priority_code) OR
2906: NOT OE_Globals.Equal(
2907: p_header_rec.shipping_method_code,
2908: p_old_db_header_rec.shipping_method_code) OR
2909: NOT OE_Globals.Equal(
2910: p_header_rec.ship_to_org_id,
2911: p_old_db_header_rec.ship_to_org_id) OR
2912: NOT OE_Globals.Equal(
2913: p_header_rec.agreement_id,
2908: p_old_db_header_rec.shipping_method_code) OR
2909: NOT OE_Globals.Equal(
2910: p_header_rec.ship_to_org_id,
2911: p_old_db_header_rec.ship_to_org_id) OR
2912: NOT OE_Globals.Equal(
2913: p_header_rec.agreement_id,
2914: p_old_db_header_rec.agreement_id) OR
2915: NOT OE_Globals.Equal(
2916: p_header_rec.order_firmed_date,
2911: p_old_db_header_rec.ship_to_org_id) OR
2912: NOT OE_Globals.Equal(
2913: p_header_rec.agreement_id,
2914: p_old_db_header_rec.agreement_id) OR
2915: NOT OE_Globals.Equal(
2916: p_header_rec.order_firmed_date,
2917: p_old_db_header_rec.order_firmed_date) OR --Key Transaction dates
2918: -- Start of Enhanced Cascading
2919: NOT OE_Globals.Equal(
2915: NOT OE_Globals.Equal(
2916: p_header_rec.order_firmed_date,
2917: p_old_db_header_rec.order_firmed_date) OR --Key Transaction dates
2918: -- Start of Enhanced Cascading
2919: NOT OE_Globals.Equal(
2920: p_header_rec.Accounting_Rule_Id,
2921: p_old_db_header_rec.Accounting_rule_Id) OR
2922: NOT OE_Globals.Equal(
2923: p_header_rec.Blanket_Number,
2918: -- Start of Enhanced Cascading
2919: NOT OE_Globals.Equal(
2920: p_header_rec.Accounting_Rule_Id,
2921: p_old_db_header_rec.Accounting_rule_Id) OR
2922: NOT OE_Globals.Equal(
2923: p_header_rec.Blanket_Number,
2924: p_old_db_header_rec.Blanket_Number) OR
2925: NOT OE_Globals.Equal(
2926: p_header_rec.Deliver_to_Contact_Id,
2921: p_old_db_header_rec.Accounting_rule_Id) OR
2922: NOT OE_Globals.Equal(
2923: p_header_rec.Blanket_Number,
2924: p_old_db_header_rec.Blanket_Number) OR
2925: NOT OE_Globals.Equal(
2926: p_header_rec.Deliver_to_Contact_Id,
2927: p_old_db_header_rec.Deliver_To_Contact_Id) OR
2928: NOT OE_Globals.Equal(
2929: p_header_rec.Deliver_to_Org_Id,
2924: p_old_db_header_rec.Blanket_Number) OR
2925: NOT OE_Globals.Equal(
2926: p_header_rec.Deliver_to_Contact_Id,
2927: p_old_db_header_rec.Deliver_To_Contact_Id) OR
2928: NOT OE_Globals.Equal(
2929: p_header_rec.Deliver_to_Org_Id,
2930: p_old_db_header_rec.Deliver_To_Org_Id) OR
2931: NOT OE_Globals.Equal(
2932: p_header_rec.Demand_Class_Code,
2927: p_old_db_header_rec.Deliver_To_Contact_Id) OR
2928: NOT OE_Globals.Equal(
2929: p_header_rec.Deliver_to_Org_Id,
2930: p_old_db_header_rec.Deliver_To_Org_Id) OR
2931: NOT OE_Globals.Equal(
2932: p_header_rec.Demand_Class_Code,
2933: p_old_db_header_rec.Demand_Class_Code) OR
2934: NOT OE_Globals.Equal(
2935: p_header_rec.Fob_point_Code,
2930: p_old_db_header_rec.Deliver_To_Org_Id) OR
2931: NOT OE_Globals.Equal(
2932: p_header_rec.Demand_Class_Code,
2933: p_old_db_header_rec.Demand_Class_Code) OR
2934: NOT OE_Globals.Equal(
2935: p_header_rec.Fob_point_Code,
2936: p_old_db_header_rec.Fob_point_Code) OR
2937: NOT OE_Globals.Equal(
2938: p_header_rec.Freight_Terms_Code,
2933: p_old_db_header_rec.Demand_Class_Code) OR
2934: NOT OE_Globals.Equal(
2935: p_header_rec.Fob_point_Code,
2936: p_old_db_header_rec.Fob_point_Code) OR
2937: NOT OE_Globals.Equal(
2938: p_header_rec.Freight_Terms_Code,
2939: p_old_db_header_rec.Freight_terms_Code) OR
2940: NOT OE_Globals.Equal(
2941: p_header_rec.Invoice_To_Contact_Id,
2936: p_old_db_header_rec.Fob_point_Code) OR
2937: NOT OE_Globals.Equal(
2938: p_header_rec.Freight_Terms_Code,
2939: p_old_db_header_rec.Freight_terms_Code) OR
2940: NOT OE_Globals.Equal(
2941: p_header_rec.Invoice_To_Contact_Id,
2942: p_old_db_header_rec.Invoice_To_Contact_Id) OR
2943: NOT OE_Globals.Equal(
2944: p_header_rec.Invoice_To_Org_Id,
2939: p_old_db_header_rec.Freight_terms_Code) OR
2940: NOT OE_Globals.Equal(
2941: p_header_rec.Invoice_To_Contact_Id,
2942: p_old_db_header_rec.Invoice_To_Contact_Id) OR
2943: NOT OE_Globals.Equal(
2944: p_header_rec.Invoice_To_Org_Id,
2945: p_old_db_header_rec.Invoice_To_Org_Id) OR
2946: NOT OE_Globals.Equal(
2947: p_header_rec.Invoicing_Rule_Id,
2942: p_old_db_header_rec.Invoice_To_Contact_Id) OR
2943: NOT OE_Globals.Equal(
2944: p_header_rec.Invoice_To_Org_Id,
2945: p_old_db_header_rec.Invoice_To_Org_Id) OR
2946: NOT OE_Globals.Equal(
2947: p_header_rec.Invoicing_Rule_Id,
2948: p_old_db_header_rec.Invoicing_Rule_Id) OR
2949: NOT OE_Globals.Equal(
2950: p_header_rec.Price_List_Id,
2945: p_old_db_header_rec.Invoice_To_Org_Id) OR
2946: NOT OE_Globals.Equal(
2947: p_header_rec.Invoicing_Rule_Id,
2948: p_old_db_header_rec.Invoicing_Rule_Id) OR
2949: NOT OE_Globals.Equal(
2950: p_header_rec.Price_List_Id,
2951: p_old_db_header_rec.Price_List_Id) OR
2952: NOT OE_Globals.Equal(
2953: p_header_rec.Request_date,
2948: p_old_db_header_rec.Invoicing_Rule_Id) OR
2949: NOT OE_Globals.Equal(
2950: p_header_rec.Price_List_Id,
2951: p_old_db_header_rec.Price_List_Id) OR
2952: NOT OE_Globals.Equal(
2953: p_header_rec.Request_date,
2954: p_old_db_header_rec.Request_date) OR
2955: NOT OE_Globals.Equal(
2956: p_header_rec.Return_reason_Code,
2951: p_old_db_header_rec.Price_List_Id) OR
2952: NOT OE_Globals.Equal(
2953: p_header_rec.Request_date,
2954: p_old_db_header_rec.Request_date) OR
2955: NOT OE_Globals.Equal(
2956: p_header_rec.Return_reason_Code,
2957: p_old_db_header_rec.Return_reason_Code) OR
2958: NOT OE_Globals.Equal(
2959: p_header_rec.Salesrep_Id,
2954: p_old_db_header_rec.Request_date) OR
2955: NOT OE_Globals.Equal(
2956: p_header_rec.Return_reason_Code,
2957: p_old_db_header_rec.Return_reason_Code) OR
2958: NOT OE_Globals.Equal(
2959: p_header_rec.Salesrep_Id,
2960: p_old_db_header_rec.Salesrep_id) OR
2961: NOT OE_Globals.Equal(
2962: p_header_rec.Ship_From_Org_Id,
2957: p_old_db_header_rec.Return_reason_Code) OR
2958: NOT OE_Globals.Equal(
2959: p_header_rec.Salesrep_Id,
2960: p_old_db_header_rec.Salesrep_id) OR
2961: NOT OE_Globals.Equal(
2962: p_header_rec.Ship_From_Org_Id,
2963: p_old_db_header_rec.Ship_from_Org_id) OR
2964: NOT OE_Globals.Equal(
2965: p_header_rec.Ship_To_Contact_Id,
2960: p_old_db_header_rec.Salesrep_id) OR
2961: NOT OE_Globals.Equal(
2962: p_header_rec.Ship_From_Org_Id,
2963: p_old_db_header_rec.Ship_from_Org_id) OR
2964: NOT OE_Globals.Equal(
2965: p_header_rec.Ship_To_Contact_Id,
2966: p_old_db_header_rec.Ship_To_Contact_id) OR
2967: NOT OE_Globals.Equal(
2968: p_header_rec.Sold_To_Org_Id,
2963: p_old_db_header_rec.Ship_from_Org_id) OR
2964: NOT OE_Globals.Equal(
2965: p_header_rec.Ship_To_Contact_Id,
2966: p_old_db_header_rec.Ship_To_Contact_id) OR
2967: NOT OE_Globals.Equal(
2968: p_header_rec.Sold_To_Org_Id,
2969: p_old_db_header_rec.Sold_To_Org_id) OR
2970: NOT OE_Globals.Equal(
2971: p_header_rec.Tax_Exempt_Flag,
2966: p_old_db_header_rec.Ship_To_Contact_id) OR
2967: NOT OE_Globals.Equal(
2968: p_header_rec.Sold_To_Org_Id,
2969: p_old_db_header_rec.Sold_To_Org_id) OR
2970: NOT OE_Globals.Equal(
2971: p_header_rec.Tax_Exempt_Flag,
2972: p_old_db_header_rec.Tax_Exempt_Flag)
2973: -- End Of Enhanced Cascading
2974:
3000: /* Fix Bug # 4131746/ base bug# 4056303 : Server Connect */
3001: l_x_line_tbl(i).change_reason := 'SYSTEM';
3002: l_x_old_line_tbl(i):=l_x_line_tbl(i);
3003:
3004: IF NOT OE_Globals.Equal(
3005: p_header_rec.cust_po_number,
3006: p_old_db_header_rec.cust_po_number) AND
3007:
3008: OE_OE_FORM_HEADER.g_cascade_test_record.p_customer_po='Y'
3010: THEN
3011: l_x_line_tbl(i).cust_po_number:=p_header_rec.cust_po_number;
3012: END IF;
3013:
3014: IF NOT OE_Globals.Equal(
3015: p_header_rec.payment_term_id,
3016: p_old_db_header_rec.payment_term_id) AND
3017:
3018: OE_OE_FORM_HEADER.g_cascade_test_record.p_payment_term='Y'
3020: THEN
3021: l_x_line_tbl(i).payment_term_id:=p_header_rec.payment_term_id;
3022: END IF;
3023:
3024: IF NOT OE_Globals.Equal(
3025: p_header_rec.shipment_priority_code,
3026: p_old_db_header_rec.shipment_priority_code) AND
3027:
3028: OE_OE_FORM_HEADER.g_cascade_test_record.p_shipment_priority='Y'
3030: THEN
3031: l_x_line_tbl(i).shipment_priority_code:=p_header_rec.shipment_priority_code;
3032: END IF;
3033:
3034: IF NOT OE_Globals.Equal(
3035: p_header_rec.shipping_method_code,
3036: p_old_db_header_rec.shipping_method_code) AND
3037:
3038: OE_OE_FORM_HEADER.g_cascade_test_record.p_shipping_method='Y'
3040: THEN
3041: l_x_line_tbl(i).shipping_method_code:=p_header_rec.shipping_method_code;
3042: END IF;
3043:
3044: IF NOT OE_Globals.Equal(
3045: p_header_rec.ship_to_org_id,
3046: p_old_db_header_rec.ship_to_org_id) AND
3047:
3048: OE_OE_FORM_HEADER.g_cascade_test_record.p_ship_to='Y'
3050: THEN
3051: l_x_line_tbl(i).ship_to_org_id:=p_header_rec.ship_to_org_id;
3052: END IF;
3053:
3054: IF NOT OE_Globals.Equal(
3055: p_header_rec.agreement_id,
3056: p_old_db_header_rec.agreement_id) AND
3057:
3058: OE_OE_FORM_HEADER.g_cascade_test_record.p_agreement='Y'
3061: l_x_line_tbl(i).agreement_id:=p_header_rec.agreement_id;
3062: END IF;
3063:
3064: --Key Transaction dates
3065: IF NOT OE_Globals.Equal(
3066: p_header_rec.order_firmed_date,
3067: p_old_db_header_rec.order_firmed_date) AND
3068:
3069: OE_OE_FORM_HEADER.g_cascade_test_record.p_order_firmed_date='Y'
3071: THEN
3072: l_x_line_tbl(i).order_firmed_date:=p_header_rec.order_firmed_date;
3073: END IF;
3074:
3075: IF NOT OE_Globals.Equal(
3076: p_header_rec.Accounting_Rule_Id,
3077: p_old_db_header_rec.Accounting_Rule_Id) AND
3078:
3079: OE_OE_FORM_HEADER.g_cascade_test_record.p_accounting_rule='Y'
3081: THEN
3082: l_x_line_tbl(i).Accounting_Rule_Id:=p_header_rec.Accounting_Rule_Id;
3083: END IF;
3084:
3085: IF NOT OE_Globals.Equal(
3086: p_header_rec.Blanket_Number,
3087: p_old_db_header_rec.Blanket_Number) AND
3088:
3089: OE_OE_FORM_HEADER.g_cascade_test_record.p_blanket_number='Y'
3091: THEN
3092: l_x_line_tbl(i).Blanket_Number:=p_header_rec.Blanket_Number;
3093: END IF;
3094:
3095: IF NOT OE_Globals.Equal(
3096: p_header_rec.Deliver_to_Contact_Id,
3097: p_old_db_header_rec.Deliver_To_Contact_Id) AND
3098:
3099: OE_OE_FORM_HEADER.g_cascade_test_record.p_deliver_to_contact='Y'
3101: THEN
3102: l_x_line_tbl(i).Deliver_To_Contact_id:=p_header_rec.Deliver_To_Contact_Id;
3103: END IF;
3104:
3105: IF NOT OE_Globals.Equal(
3106: p_header_rec.Deliver_to_Org_Id,
3107: p_old_db_header_rec.Deliver_To_Org_Id) AND
3108:
3109: OE_OE_FORM_HEADER.g_cascade_test_record.p_deliver_to='Y'
3111: THEN
3112: l_x_line_tbl(i).Deliver_To_Org_id:=p_header_rec.Deliver_to_Org_Id;
3113: END IF;
3114:
3115: IF NOT OE_Globals.Equal(
3116: p_header_rec.Demand_Class_Code,
3117: p_old_db_header_rec.Demand_Class_Code) AND
3118:
3119: OE_OE_FORM_HEADER.g_cascade_test_record.p_demand_class='Y'
3121: THEN
3122: l_x_line_tbl(i).Demand_Class_Code:=p_header_rec.Demand_Class_Code;
3123: END IF;
3124:
3125: IF NOT OE_Globals.Equal(
3126: p_header_rec.Fob_point_Code,
3127: p_old_db_header_rec.Fob_point_Code) AND
3128:
3129: OE_OE_FORM_HEADER.g_cascade_test_record.p_fob_point='Y'
3131: THEN
3132: l_x_line_tbl(i).Fob_Point_Code:=p_header_rec.Fob_Point_Code;
3133: END IF;
3134:
3135: IF NOT OE_Globals.Equal(
3136: p_header_rec.Freight_Terms_Code,
3137: p_old_db_header_rec.Freight_Terms_Code) AND
3138:
3139: -- Bug 8330454 OE_OE_FORM_HEADER.g_cascade_test_record.p_fob_point='Y'
3143: THEN
3144: l_x_line_tbl(i).Freight_Terms_Code:=p_header_rec.Freight_Terms_Code;
3145: END IF;
3146:
3147: IF NOT OE_Globals.Equal(
3148: p_header_rec.Invoice_To_Contact_Id,
3149: p_old_db_header_rec.Invoice_To_Contact_Id) AND
3150:
3151: OE_OE_FORM_HEADER.g_cascade_test_record.p_bill_to_contact='Y'
3153: THEN
3154: l_x_line_tbl(i).Invoice_To_Contact_Id:=p_header_rec.Invoice_To_Contact_Id;
3155: END IF;
3156:
3157: IF NOT OE_Globals.Equal(
3158: p_header_rec.Invoice_To_Org_Id,
3159: p_old_db_header_rec.Invoice_To_Org_Id) AND
3160:
3161: OE_OE_FORM_HEADER.g_cascade_test_record.p_bill_to='Y'
3163: THEN
3164: l_x_line_tbl(i).Invoice_To_Org_Id:=p_header_rec.Invoice_To_Org_Id;
3165: END IF;
3166:
3167: IF NOT OE_Globals.Equal(
3168: p_header_rec.Invoicing_Rule_Id,
3169: p_old_db_header_rec.Invoicing_Rule_Id) AND
3170:
3171: OE_OE_FORM_HEADER.g_cascade_test_record.p_invoicing_rule='Y'
3173: THEN
3174: l_x_line_tbl(i).Invoicing_Rule_Id:=p_header_rec.Invoicing_Rule_Id;
3175: END IF;
3176:
3177: IF NOT OE_Globals.Equal(
3178: p_header_rec.Price_List_Id,
3179: p_old_db_header_rec.Price_List_Id) AND
3180:
3181: OE_OE_FORM_HEADER.g_cascade_test_record.p_price_list='Y'
3184: l_x_line_tbl(i).Price_List_Id:=p_header_rec.Price_List_Id;
3185: END IF;
3186:
3187:
3188: IF NOT OE_Globals.Equal(
3189: p_header_rec.Request_date,
3190: p_old_db_header_rec.Request_date) AND
3191:
3192: OE_OE_FORM_HEADER.g_cascade_test_record.p_request_date='Y'
3194: THEN
3195: l_x_line_tbl(i).Request_Date:=p_header_rec.Request_Date;
3196: END IF;
3197:
3198: IF NOT OE_Globals.Equal(
3199: p_header_rec.Return_Reason_Code,
3200: p_old_db_header_rec.Return_Reason_Code) AND
3201:
3202: OE_OE_FORM_HEADER.g_cascade_test_record.p_return_reason='Y'
3204: THEN
3205: l_x_line_tbl(i).Return_Reason_Code:=p_header_rec.Return_reason_Code;
3206: END IF;
3207:
3208: IF NOT OE_Globals.Equal(
3209: p_header_rec.Salesrep_Id,
3210: p_old_db_header_rec.Salesrep_id) AND
3211:
3212: OE_OE_FORM_HEADER.g_cascade_test_record.p_salesperson='Y'
3214: THEN
3215: l_x_line_tbl(i).Salesrep_Id:=p_header_rec.Salesrep_Id;
3216: END IF;
3217:
3218: IF NOT OE_Globals.Equal(
3219: p_header_rec.Ship_From_Org_Id,
3220: p_old_db_header_rec.Ship_From_Org_id) AND
3221:
3222: OE_OE_FORM_HEADER.g_cascade_test_record.p_warehouse='Y'
3224: THEN
3225: l_x_line_tbl(i).Ship_From_Org_Id:=p_header_rec.Ship_From_Org_Id;
3226: END IF;
3227:
3228: IF NOT OE_Globals.Equal(
3229: p_header_rec.Ship_To_Contact_Id,
3230: p_old_db_header_rec.Ship_To_Contact_Id) AND
3231:
3232: OE_OE_FORM_HEADER.g_cascade_test_record.p_ship_to_contact='Y'
3234: THEN
3235: l_x_line_tbl(i).Ship_To_Contact_Id:=p_header_rec.Ship_To_Contact_Id;
3236: END IF;
3237:
3238: IF NOT OE_Globals.Equal(
3239: p_header_rec.Sold_To_Org_Id,
3240: p_old_db_header_rec.Sold_To_Org_id) AND
3241:
3242: OE_OE_FORM_HEADER.g_cascade_test_record.p_customer='Y'
3244: THEN
3245: l_x_line_tbl(i).Sold_To_Org_Id:=p_header_rec.Sold_To_Org_Id;
3246: END IF;
3247:
3248: IF NOT OE_Globals.Equal(
3249: p_header_rec.Tax_Exempt_Flag,
3250: p_old_db_header_rec.Tax_Exempt_Flag) AND
3251:
3252: OE_OE_FORM_HEADER.g_cascade_test_record.p_tax_exempt='Y'
3254: THEN
3255: l_x_line_tbl(i).Tax_Exempt_Flag:=p_header_rec.Tax_Exempt_Flag;
3256: END IF;
3257:
3258: l_x_line_tbl(i).operation:= OE_GLOBALS.G_OPR_UPDATE;
3259: l_x_line_tbl(i).change_reason:='SYSTEM';
3260:
3261: END IF; -- Cascade Only if Line is Open
3262: END LOOP;
3268: IF OE_MASS_CHANGE_PVT.IS_MASS_CHANGE = 'T' THEN
3269: l_init_msg_list := FND_API.G_FALSE;
3270: END IF;
3271:
3272: OE_GLOBALS.G_UI_FLAG := TRUE;
3273: Oe_Order_Pvt.Process_order
3274: ( p_api_version_number => 1.0
3275: , p_init_msg_list => l_init_msg_list
3276: , x_return_status => l_return_status
3311: END IF;
3312:
3313:
3314: -- Re-set the UI flag to FALSE
3315: OE_GLOBALS.G_UI_FLAG := FALSE;
3316:
3317: -- Set return status.
3318:
3319: x_return_status := FND_API.G_RET_STS_SUCCESS;
3330: EXCEPTION
3331:
3332: WHEN FND_API.G_EXC_ERROR THEN
3333: ROLLBACK TO SAVEPOINT Header_Cascade_Attributes;
3334: OE_GLOBALS.G_UI_FLAG := FALSE;
3335:
3336: x_return_status := FND_API.G_RET_STS_ERROR;
3337:
3338: -- Get message count and data
3344:
3345: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3346: ROLLBACK TO SAVEPOINT Header_Cascade_Attributes;
3347:
3348: OE_GLOBALS.G_UI_FLAG := FALSE;
3349:
3350: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3351:
3352: -- Get message count and data
3358:
3359: WHEN OTHERS THEN
3360: ROLLBACK TO SAVEPOINT Header_Cascade_Attributes;
3361:
3362: OE_GLOBALS.G_UI_FLAG := FALSE;
3363:
3364: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3365:
3366: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3598:
3599: -- moved down for bug 3686007
3600:
3601: OE_ORDER_CACHE.g_header_rec.header_id:=null;
3602: OE_GLOBALS.G_HEADER_CREATED := FALSE;
3603: g_db_header_rec := OE_Order_PUB.G_MISS_HEADER_REC;
3604:
3605:
3606: END Clear_Global_PO_Cache;
4322:
4323: -- Initialize security global record
4324: OE_Header_SECURITY.g_record := l_rowtype_rec;
4325:
4326: IF l_header_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
4327: l_operation := OE_PC_GLOBALS.CREATE_OP;
4328: ELSIF l_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE then
4329: l_operation := OE_PC_GLOBALS.UPDATE_OP;
4330: END IF;
4324: OE_Header_SECURITY.g_record := l_rowtype_rec;
4325:
4326: IF l_header_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
4327: l_operation := OE_PC_GLOBALS.CREATE_OP;
4328: ELSIF l_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE then
4329: l_operation := OE_PC_GLOBALS.UPDATE_OP;
4330: END IF;
4331:
4332: l_result := OE_Header_Security.Is_OP_Constrained
4367: ----------------------------------------------------------
4368: RETURN varchar2
4369: IS
4370: BEGIN
4371: RETURN OE_GLOBALS.G_OPR_UPDATE;
4372: END;
4373: --ABH
4374:
4375: -- Start Of Enhanced Cascading