[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:
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:
1061: ROLLBACK TO SAVEPOINT Header_Validate_And_Write;
1062:
1063: x_return_status := FND_API.G_RET_STS_ERROR;
1070: );
1071:
1072: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1073:
1074: OE_GLOBALS.G_UI_FLAG := FALSE;
1075:
1076: ROLLBACK TO SAVEPOINT Header_Validate_And_Write;
1077:
1078: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1085: );
1086:
1087: WHEN OTHERS THEN
1088:
1089: OE_GLOBALS.G_UI_FLAG := FALSE;
1090:
1091: ROLLBACK TO SAVEPOINT Header_Validate_And_Write;
1092:
1093: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1119: , p_header_id IN NUMBER
1120: )
1121: IS
1122: l_x_old_header_rec OE_Order_PUB.Header_Rec_Type;
1123: l_control_rec OE_GLOBALS.Control_Rec_Type;
1124: l_return_status VARCHAR2(1);
1125: l_x_header_rec OE_Order_PUB.Header_Rec_Type;
1126: BEGIN
1127: SAVEPOINT Header_Delete;
1127: SAVEPOINT Header_Delete;
1128: oe_debug_pub.add('Entering OE_OE_FORM_HEADER.DELETE_ROW', 1);
1129:
1130: -- Set the UI flag
1131: OE_GLOBALS.G_UI_FLAG := TRUE;
1132:
1133: -- Set control flags.
1134:
1135: l_control_rec.controlled_operation := TRUE;
1156: );
1157:
1158: -- Set Operation.
1159:
1160: l_x_header_rec.operation := OE_GLOBALS.G_OPR_DELETE;
1161:
1162: -- Call Oe_Order_Pvt.Header
1163:
1164: Oe_Order_Pvt.Header
1181:
1182: Clear_header;
1183:
1184: -- Re-set the UI flag to FALSE
1185: OE_GLOBALS.G_UI_FLAG := FALSE;
1186:
1187: -- Set return status.
1188:
1189: x_return_status := FND_API.G_RET_STS_SUCCESS;
1200: EXCEPTION
1201:
1202: WHEN FND_API.G_EXC_ERROR THEN
1203: ROLLBACK TO SAVEPOINT Header_Delete ;
1204: OE_GLOBALS.G_UI_FLAG := FALSE;
1205:
1206: x_return_status := FND_API.G_RET_STS_ERROR;
1207:
1208: -- Get message count and data
1214:
1215: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1216: ROLLBACK TO SAVEPOINT Header_Delete ;
1217:
1218: OE_GLOBALS.G_UI_FLAG := FALSE;
1219:
1220: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1221:
1222: -- Get message count and data
1228:
1229: WHEN OTHERS THEN
1230: ROLLBACK TO SAVEPOINT Header_Delete ;
1231:
1232: OE_GLOBALS.G_UI_FLAG := FALSE;
1233:
1234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1235:
1236: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1264:
1265: oe_debug_pub.add('Entering OE_OE_FORM_HEADER.PROCESS_ENTITY', 1);
1266:
1267: -- Set the UI flag
1268: OE_GLOBALS.G_UI_FLAG := TRUE;
1269:
1270: -- Set control flags.
1271:
1272:
1284: RAISE FND_API.G_EXC_ERROR;
1285: END IF;
1286:
1287: -- Re-set the UI flag to FALSE
1288: OE_GLOBALS.G_UI_FLAG := FALSE;
1289:
1290: -- Set return status.
1291:
1292: x_return_status := FND_API.G_RET_STS_SUCCESS;
1303: EXCEPTION
1304:
1305: WHEN FND_API.G_EXC_ERROR THEN
1306:
1307: OE_GLOBALS.G_UI_FLAG := FALSE;
1308:
1309: x_return_status := FND_API.G_RET_STS_ERROR;
1310:
1311: -- Get message count and data
1316: );
1317:
1318: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1319:
1320: OE_GLOBALS.G_UI_FLAG := FALSE;
1321:
1322: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1323:
1324: -- Get message count and data
1329: );
1330:
1331: WHEN OTHERS THEN
1332:
1333: OE_GLOBALS.G_UI_FLAG := FALSE;
1334:
1335: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1336:
1337: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1361: , x_cascade_flag OUT NOCOPY BOOLEAN
1362: )
1363: IS
1364: l_return_status VARCHAR2(1);
1365: l_control_rec OE_GLOBALS.Control_Rec_Type;
1366: l_line_tbl oe_order_pub.line_tbl_type;
1367: BEGIN
1368: oe_debug_pub.add('Entering OE_OE_FORM_HEADER.PROCESS_OBJECT', 1);
1369:
1369:
1370: OE_MSG_PUB.initialize;
1371:
1372: IF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >='110510' THEN
1373: If OE_GLOBALS.G_FTE_REINVOKE = 'Y' Then
1374: fnd_message.set_name('ONT','ONT_LINE_ATTRIB_CHANGED');
1375: OE_MSG_PUB.Add;
1376: OE_GLOBALS.G_FTE_REINVOKE := 'N';
1377: End If;
1372: IF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >='110510' THEN
1373: If OE_GLOBALS.G_FTE_REINVOKE = 'Y' Then
1374: fnd_message.set_name('ONT','ONT_LINE_ATTRIB_CHANGED');
1375: OE_MSG_PUB.Add;
1376: OE_GLOBALS.G_FTE_REINVOKE := 'N';
1377: End If;
1378: End If;
1379:
1380: -- we are using this flag to selectively requery the block,
1386: -- that will be incorrect.
1387: -- this flag helps to requery the block if any thing changed
1388: -- after validate and write.
1389:
1390: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := TRUE;
1391:
1392: l_control_rec.controlled_operation := TRUE;
1393: l_control_rec.process := TRUE;
1394: l_control_rec.process_entity := OE_GLOBALS.G_ENTITY_ALL;
1390: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := TRUE;
1391:
1392: l_control_rec.controlled_operation := TRUE;
1393: l_control_rec.process := TRUE;
1394: l_control_rec.process_entity := OE_GLOBALS.G_ENTITY_ALL;
1395:
1396: l_control_rec.check_security := FALSE;
1397: l_control_rec.clear_dependents := FALSE;
1398: l_control_rec.default_attributes := FALSE;
1405: l_control_rec.clear_api_cache := FALSE;
1406: l_control_rec.clear_api_requests := TRUE;
1407:
1408: -- Set the UI flag
1409: OE_GLOBALS.G_UI_FLAG := TRUE;
1410:
1411: oe_line_util.Post_Line_Process
1412: ( p_control_rec => l_control_rec
1413: , p_x_line_tbl => l_line_tbl );
1425: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1426: RAISE FND_API.G_EXC_ERROR;
1427: END IF;
1428:
1429: x_cascade_flag := OE_GLOBALS.G_CASCADING_REQUEST_LOGGED;
1430: -- Re-set the UI flag to FALSE
1431: OE_GLOBALS.G_UI_FLAG := FALSE;
1432:
1433: -- Set return status.
1427: END IF;
1428:
1429: x_cascade_flag := OE_GLOBALS.G_CASCADING_REQUEST_LOGGED;
1430: -- Re-set the UI flag to FALSE
1431: OE_GLOBALS.G_UI_FLAG := FALSE;
1432:
1433: -- Set return status.
1434:
1435: x_return_status := FND_API.G_RET_STS_SUCCESS;
1440: ( p_count => x_msg_count
1441: , p_data => x_msg_data
1442: );
1443:
1444: OE_GLOBALS.G_UI_FLAG := FALSE;
1445: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := FALSE;
1446:
1447: oe_debug_pub.add('Exiting OE_OE_FORM_HEADER.PROCESS_OBJECT', 1);
1448:
1441: , p_data => x_msg_data
1442: );
1443:
1444: OE_GLOBALS.G_UI_FLAG := FALSE;
1445: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := FALSE;
1446:
1447: oe_debug_pub.add('Exiting OE_OE_FORM_HEADER.PROCESS_OBJECT', 1);
1448:
1449: EXCEPTION
1448:
1449: EXCEPTION
1450:
1451: WHEN FND_API.G_EXC_ERROR THEN
1452: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := FALSE;
1453: OE_GLOBALS.G_UI_FLAG := FALSE;
1454:
1455: x_return_status := FND_API.G_RET_STS_ERROR;
1456:
1449: EXCEPTION
1450:
1451: WHEN FND_API.G_EXC_ERROR THEN
1452: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := FALSE;
1453: OE_GLOBALS.G_UI_FLAG := FALSE;
1454:
1455: x_return_status := FND_API.G_RET_STS_ERROR;
1456:
1457: -- Get message count and data
1461: , p_data => x_msg_data
1462: );
1463:
1464: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1465: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := FALSE;
1466: OE_GLOBALS.G_UI_FLAG := FALSE;
1467:
1468: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1469:
1462: );
1463:
1464: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1465: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := FALSE;
1466: OE_GLOBALS.G_UI_FLAG := FALSE;
1467:
1468: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1469:
1470: -- Get message count and data
1474: , p_data => x_msg_data
1475: );
1476:
1477: WHEN OTHERS THEN
1478: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := FALSE;
1479: OE_GLOBALS.G_UI_FLAG := FALSE;
1480:
1481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1482:
1475: );
1476:
1477: WHEN OTHERS THEN
1478: OE_GLOBALS.G_PROCESS_OBJECTS_FLAG := FALSE;
1479: OE_GLOBALS.G_UI_FLAG := FALSE;
1480:
1481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1482:
1483: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1518: -- Load header record
1519:
1520: l_x_header_rec.lock_control := p_lock_control;
1521: l_x_header_rec.header_id := p_header_id;
1522: l_x_header_rec.operation := OE_GLOBALS.G_OPR_LOCK; -- not req.
1523:
1524: -- Call OE_Header_Util.Lock_Row instead of Oe_Order_Pvt.Lock_order
1525:
1526: oe_debug_pub.add('header_id'|| l_x_header_rec.header_id, 1);
1564:
1565: EXCEPTION
1566: WHEN FND_API.G_EXC_ERROR THEN
1567:
1568: OE_GLOBALS.G_UI_FLAG := FALSE;
1569:
1570: x_return_status := FND_API.G_RET_STS_ERROR;
1571:
1572: -- Get message count and data
1577: );
1578:
1579: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1580:
1581: OE_GLOBALS.G_UI_FLAG := FALSE;
1582:
1583: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1584:
1585: -- Get message count and data
1706:
1707:
1708: OE_ORDER_CACHE.g_header_rec:=null;
1709: OE_DELAYED_REQUESTS_PVT.Delete_Reqs_for_Deleted_Entity(
1710: p_entity_code => OE_GLOBALS.G_ENTITY_HEADER
1711: ,p_entity_id => p_header_id
1712: ,x_return_status => l_return_status);
1713:
1714: OE_MSG_PUB.Count_And_Get
1715: ( p_count => x_msg_count
1716: , p_data => x_msg_data
1717: );
1718:
1719: IF OE_GLOBALS.G_ROLL_VERSION <> 'N' THEN
1720:
1721: oe_debug_pub.add('Request does not exist, reset versioning globals'); IF (NOT OE_Versioning_Util.Reset_Globals) THEN
1722: l_return_status := FND_API.G_RET_STS_ERROR;
1723: RETURN;
1726:
1727: -- Clear the controller cache
1728: Clear_Header;
1729: --added for bug3716206
1730: OE_GLOBALS.G_HEADER_CREATED := FALSE;
1731: OE_ORDER_UTIL.Clear_Global_Picture(l_return_status);
1732: EXCEPTION
1733: WHEN OTHERS THEN
1734: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1817: RAISE FND_API.G_EXC_ERROR;
1818: end if;
1819: -- add delayed request to default headers sales credits for the salesrep
1820: OE_Delayed_Requests_Pvt.Log_Request
1821: (p_entity_code=>OE_GLOBALS.G_ENTITY_Header
1822: ,p_entity_id=>p_header_id
1823: ,p_requesting_entity_code => OE_GLOBALS.G_ENTITY_Header
1824: ,p_requesting_entity_id => p_header_id
1825: ,p_request_type=>OE_GLOBALS.G_DFLT_HSCREDIT_FOR_SREP
1819: -- add delayed request to default headers sales credits for the salesrep
1820: OE_Delayed_Requests_Pvt.Log_Request
1821: (p_entity_code=>OE_GLOBALS.G_ENTITY_Header
1822: ,p_entity_id=>p_header_id
1823: ,p_requesting_entity_code => OE_GLOBALS.G_ENTITY_Header
1824: ,p_requesting_entity_id => p_header_id
1825: ,p_request_type=>OE_GLOBALS.G_DFLT_HSCREDIT_FOR_SREP
1826: ,p_param1 => to_char(p_header_id)
1827: ,p_param2 => to_char(p_salesrep_id)
1821: (p_entity_code=>OE_GLOBALS.G_ENTITY_Header
1822: ,p_entity_id=>p_header_id
1823: ,p_requesting_entity_code => OE_GLOBALS.G_ENTITY_Header
1824: ,p_requesting_entity_id => p_header_id
1825: ,p_request_type=>OE_GLOBALS.G_DFLT_HSCREDIT_FOR_SREP
1826: ,p_param1 => to_char(p_header_id)
1827: ,p_param2 => to_char(p_salesrep_id)
1828: ,x_return_status =>l_return_status);
1829:
2700:
2701: FUNCTION Get_Cascade_Flag return Boolean
2702: IS
2703: BEGIN
2704: return(OE_GLOBALS.G_CASCADING_REQUEST_LOGGED);
2705: END Get_Cascade_Flag;
2706:
2707: PROCEDURE Set_Cascade_Flag_False
2708: IS
2706:
2707: PROCEDURE Set_Cascade_Flag_False
2708: IS
2709: BEGIN
2710: OE_GLOBALS.G_CASCADING_REQUEST_LOGGED := FALSE;
2711: END Set_Cascade_Flag_False;
2712:
2713: FUNCTION Load_Set_Of_Books
2714: RETURN Set_Of_Books_Rec_Type
2881: l_x_Header_Adj_Assoc_tbl OE_Order_PUB.Header_Adj_Assoc_Tbl_Type;
2882: l_x_Line_price_Att_tbl OE_Order_PUB.Line_Price_Att_Tbl_Type;
2883: l_x_Line_Adj_Att_tbl OE_Order_PUB.Line_Adj_Att_Tbl_Type;
2884: l_x_Line_Adj_Assoc_tbl OE_Order_PUB.Line_Adj_Assoc_Tbl_Type;
2885: l_control_rec OE_GLOBALS.Control_Rec_Type;
2886: l_count NUMBER;
2887: l_return_status VARCHAR2(1);
2888: --serla begin
2889: l_x_Header_Payment_tbl OE_Order_PUB.Header_Payment_Tbl_Type;
2892: --serla end
2893: BEGIN
2894: SAVEPOINT Header_Cascade_Attributes;
2895: oe_debug_pub.add('Entering OE_OE_FOR_HEADER.Cascade Attribute');
2896: IF NOT OE_Globals.Equal(
2897: p_header_rec.cust_po_number,
2898: p_old_db_header_rec.cust_po_number) OR
2899: NOT OE_Globals.Equal(
2900: p_header_rec.payment_term_id,
2895: oe_debug_pub.add('Entering OE_OE_FOR_HEADER.Cascade Attribute');
2896: IF NOT OE_Globals.Equal(
2897: p_header_rec.cust_po_number,
2898: p_old_db_header_rec.cust_po_number) OR
2899: NOT OE_Globals.Equal(
2900: p_header_rec.payment_term_id,
2901: p_old_db_header_rec.payment_term_id) OR
2902: NOT OE_Globals.Equal(
2903: p_header_rec.shipment_priority_code,
2898: p_old_db_header_rec.cust_po_number) OR
2899: NOT OE_Globals.Equal(
2900: p_header_rec.payment_term_id,
2901: p_old_db_header_rec.payment_term_id) OR
2902: NOT OE_Globals.Equal(
2903: p_header_rec.shipment_priority_code,
2904: p_old_db_header_rec.shipment_priority_code) OR
2905: NOT OE_Globals.Equal(
2906: p_header_rec.shipping_method_code,
2901: p_old_db_header_rec.payment_term_id) OR
2902: NOT OE_Globals.Equal(
2903: p_header_rec.shipment_priority_code,
2904: p_old_db_header_rec.shipment_priority_code) OR
2905: NOT OE_Globals.Equal(
2906: p_header_rec.shipping_method_code,
2907: p_old_db_header_rec.shipping_method_code) OR
2908: NOT OE_Globals.Equal(
2909: p_header_rec.ship_to_org_id,
2904: p_old_db_header_rec.shipment_priority_code) OR
2905: NOT OE_Globals.Equal(
2906: p_header_rec.shipping_method_code,
2907: p_old_db_header_rec.shipping_method_code) OR
2908: NOT OE_Globals.Equal(
2909: p_header_rec.ship_to_org_id,
2910: p_old_db_header_rec.ship_to_org_id) OR
2911: NOT OE_Globals.Equal(
2912: p_header_rec.agreement_id,
2907: p_old_db_header_rec.shipping_method_code) OR
2908: NOT OE_Globals.Equal(
2909: p_header_rec.ship_to_org_id,
2910: p_old_db_header_rec.ship_to_org_id) OR
2911: NOT OE_Globals.Equal(
2912: p_header_rec.agreement_id,
2913: p_old_db_header_rec.agreement_id) OR
2914: NOT OE_Globals.Equal(
2915: p_header_rec.order_firmed_date,
2910: p_old_db_header_rec.ship_to_org_id) OR
2911: NOT OE_Globals.Equal(
2912: p_header_rec.agreement_id,
2913: p_old_db_header_rec.agreement_id) OR
2914: NOT OE_Globals.Equal(
2915: p_header_rec.order_firmed_date,
2916: p_old_db_header_rec.order_firmed_date) OR --Key Transaction dates
2917: -- Start of Enhanced Cascading
2918: NOT OE_Globals.Equal(
2914: NOT OE_Globals.Equal(
2915: p_header_rec.order_firmed_date,
2916: p_old_db_header_rec.order_firmed_date) OR --Key Transaction dates
2917: -- Start of Enhanced Cascading
2918: NOT OE_Globals.Equal(
2919: p_header_rec.Accounting_Rule_Id,
2920: p_old_db_header_rec.Accounting_rule_Id) OR
2921: NOT OE_Globals.Equal(
2922: p_header_rec.Blanket_Number,
2917: -- Start of Enhanced Cascading
2918: NOT OE_Globals.Equal(
2919: p_header_rec.Accounting_Rule_Id,
2920: p_old_db_header_rec.Accounting_rule_Id) OR
2921: NOT OE_Globals.Equal(
2922: p_header_rec.Blanket_Number,
2923: p_old_db_header_rec.Blanket_Number) OR
2924: NOT OE_Globals.Equal(
2925: p_header_rec.Deliver_to_Contact_Id,
2920: p_old_db_header_rec.Accounting_rule_Id) OR
2921: NOT OE_Globals.Equal(
2922: p_header_rec.Blanket_Number,
2923: p_old_db_header_rec.Blanket_Number) OR
2924: NOT OE_Globals.Equal(
2925: p_header_rec.Deliver_to_Contact_Id,
2926: p_old_db_header_rec.Deliver_To_Contact_Id) OR
2927: NOT OE_Globals.Equal(
2928: p_header_rec.Deliver_to_Org_Id,
2923: p_old_db_header_rec.Blanket_Number) OR
2924: NOT OE_Globals.Equal(
2925: p_header_rec.Deliver_to_Contact_Id,
2926: p_old_db_header_rec.Deliver_To_Contact_Id) OR
2927: NOT OE_Globals.Equal(
2928: p_header_rec.Deliver_to_Org_Id,
2929: p_old_db_header_rec.Deliver_To_Org_Id) OR
2930: NOT OE_Globals.Equal(
2931: p_header_rec.Demand_Class_Code,
2926: p_old_db_header_rec.Deliver_To_Contact_Id) OR
2927: NOT OE_Globals.Equal(
2928: p_header_rec.Deliver_to_Org_Id,
2929: p_old_db_header_rec.Deliver_To_Org_Id) OR
2930: NOT OE_Globals.Equal(
2931: p_header_rec.Demand_Class_Code,
2932: p_old_db_header_rec.Demand_Class_Code) OR
2933: NOT OE_Globals.Equal(
2934: p_header_rec.Fob_point_Code,
2929: p_old_db_header_rec.Deliver_To_Org_Id) OR
2930: NOT OE_Globals.Equal(
2931: p_header_rec.Demand_Class_Code,
2932: p_old_db_header_rec.Demand_Class_Code) OR
2933: NOT OE_Globals.Equal(
2934: p_header_rec.Fob_point_Code,
2935: p_old_db_header_rec.Fob_point_Code) OR
2936: NOT OE_Globals.Equal(
2937: p_header_rec.Freight_Terms_Code,
2932: p_old_db_header_rec.Demand_Class_Code) OR
2933: NOT OE_Globals.Equal(
2934: p_header_rec.Fob_point_Code,
2935: p_old_db_header_rec.Fob_point_Code) OR
2936: NOT OE_Globals.Equal(
2937: p_header_rec.Freight_Terms_Code,
2938: p_old_db_header_rec.Freight_terms_Code) OR
2939: NOT OE_Globals.Equal(
2940: p_header_rec.Invoice_To_Contact_Id,
2935: p_old_db_header_rec.Fob_point_Code) OR
2936: NOT OE_Globals.Equal(
2937: p_header_rec.Freight_Terms_Code,
2938: p_old_db_header_rec.Freight_terms_Code) OR
2939: NOT OE_Globals.Equal(
2940: p_header_rec.Invoice_To_Contact_Id,
2941: p_old_db_header_rec.Invoice_To_Contact_Id) OR
2942: NOT OE_Globals.Equal(
2943: p_header_rec.Invoice_To_Org_Id,
2938: p_old_db_header_rec.Freight_terms_Code) OR
2939: NOT OE_Globals.Equal(
2940: p_header_rec.Invoice_To_Contact_Id,
2941: p_old_db_header_rec.Invoice_To_Contact_Id) OR
2942: NOT OE_Globals.Equal(
2943: p_header_rec.Invoice_To_Org_Id,
2944: p_old_db_header_rec.Invoice_To_Org_Id) OR
2945: NOT OE_Globals.Equal(
2946: p_header_rec.Invoicing_Rule_Id,
2941: p_old_db_header_rec.Invoice_To_Contact_Id) OR
2942: NOT OE_Globals.Equal(
2943: p_header_rec.Invoice_To_Org_Id,
2944: p_old_db_header_rec.Invoice_To_Org_Id) OR
2945: NOT OE_Globals.Equal(
2946: p_header_rec.Invoicing_Rule_Id,
2947: p_old_db_header_rec.Invoicing_Rule_Id) OR
2948: NOT OE_Globals.Equal(
2949: p_header_rec.Price_List_Id,
2944: p_old_db_header_rec.Invoice_To_Org_Id) OR
2945: NOT OE_Globals.Equal(
2946: p_header_rec.Invoicing_Rule_Id,
2947: p_old_db_header_rec.Invoicing_Rule_Id) OR
2948: NOT OE_Globals.Equal(
2949: p_header_rec.Price_List_Id,
2950: p_old_db_header_rec.Price_List_Id) OR
2951: NOT OE_Globals.Equal(
2952: p_header_rec.Request_date,
2947: p_old_db_header_rec.Invoicing_Rule_Id) OR
2948: NOT OE_Globals.Equal(
2949: p_header_rec.Price_List_Id,
2950: p_old_db_header_rec.Price_List_Id) OR
2951: NOT OE_Globals.Equal(
2952: p_header_rec.Request_date,
2953: p_old_db_header_rec.Request_date) OR
2954: NOT OE_Globals.Equal(
2955: p_header_rec.Return_reason_Code,
2950: p_old_db_header_rec.Price_List_Id) OR
2951: NOT OE_Globals.Equal(
2952: p_header_rec.Request_date,
2953: p_old_db_header_rec.Request_date) OR
2954: NOT OE_Globals.Equal(
2955: p_header_rec.Return_reason_Code,
2956: p_old_db_header_rec.Return_reason_Code) OR
2957: NOT OE_Globals.Equal(
2958: p_header_rec.Salesrep_Id,
2953: p_old_db_header_rec.Request_date) OR
2954: NOT OE_Globals.Equal(
2955: p_header_rec.Return_reason_Code,
2956: p_old_db_header_rec.Return_reason_Code) OR
2957: NOT OE_Globals.Equal(
2958: p_header_rec.Salesrep_Id,
2959: p_old_db_header_rec.Salesrep_id) OR
2960: NOT OE_Globals.Equal(
2961: p_header_rec.Ship_From_Org_Id,
2956: p_old_db_header_rec.Return_reason_Code) OR
2957: NOT OE_Globals.Equal(
2958: p_header_rec.Salesrep_Id,
2959: p_old_db_header_rec.Salesrep_id) OR
2960: NOT OE_Globals.Equal(
2961: p_header_rec.Ship_From_Org_Id,
2962: p_old_db_header_rec.Ship_from_Org_id) OR
2963: NOT OE_Globals.Equal(
2964: p_header_rec.Ship_To_Contact_Id,
2959: p_old_db_header_rec.Salesrep_id) OR
2960: NOT OE_Globals.Equal(
2961: p_header_rec.Ship_From_Org_Id,
2962: p_old_db_header_rec.Ship_from_Org_id) OR
2963: NOT OE_Globals.Equal(
2964: p_header_rec.Ship_To_Contact_Id,
2965: p_old_db_header_rec.Ship_To_Contact_id) OR
2966: NOT OE_Globals.Equal(
2967: p_header_rec.Sold_To_Org_Id,
2962: p_old_db_header_rec.Ship_from_Org_id) OR
2963: NOT OE_Globals.Equal(
2964: p_header_rec.Ship_To_Contact_Id,
2965: p_old_db_header_rec.Ship_To_Contact_id) OR
2966: NOT OE_Globals.Equal(
2967: p_header_rec.Sold_To_Org_Id,
2968: p_old_db_header_rec.Sold_To_Org_id) OR
2969: NOT OE_Globals.Equal(
2970: p_header_rec.Tax_Exempt_Flag,
2965: p_old_db_header_rec.Ship_To_Contact_id) OR
2966: NOT OE_Globals.Equal(
2967: p_header_rec.Sold_To_Org_Id,
2968: p_old_db_header_rec.Sold_To_Org_id) OR
2969: NOT OE_Globals.Equal(
2970: p_header_rec.Tax_Exempt_Flag,
2971: p_old_db_header_rec.Tax_Exempt_Flag)
2972: -- End Of Enhanced Cascading
2973:
2999: /* Fix Bug # 4131746/ base bug# 4056303 : Server Connect */
3000: l_x_line_tbl(i).change_reason := 'SYSTEM';
3001: l_x_old_line_tbl(i):=l_x_line_tbl(i);
3002:
3003: IF NOT OE_Globals.Equal(
3004: p_header_rec.cust_po_number,
3005: p_old_db_header_rec.cust_po_number) AND
3006:
3007: OE_OE_FORM_HEADER.g_cascade_test_record.p_customer_po='Y'
3009: THEN
3010: l_x_line_tbl(i).cust_po_number:=p_header_rec.cust_po_number;
3011: END IF;
3012:
3013: IF NOT OE_Globals.Equal(
3014: p_header_rec.payment_term_id,
3015: p_old_db_header_rec.payment_term_id) AND
3016:
3017: OE_OE_FORM_HEADER.g_cascade_test_record.p_payment_term='Y'
3019: THEN
3020: l_x_line_tbl(i).payment_term_id:=p_header_rec.payment_term_id;
3021: END IF;
3022:
3023: IF NOT OE_Globals.Equal(
3024: p_header_rec.shipment_priority_code,
3025: p_old_db_header_rec.shipment_priority_code) AND
3026:
3027: OE_OE_FORM_HEADER.g_cascade_test_record.p_shipment_priority='Y'
3029: THEN
3030: l_x_line_tbl(i).shipment_priority_code:=p_header_rec.shipment_priority_code;
3031: END IF;
3032:
3033: IF NOT OE_Globals.Equal(
3034: p_header_rec.shipping_method_code,
3035: p_old_db_header_rec.shipping_method_code) AND
3036:
3037: OE_OE_FORM_HEADER.g_cascade_test_record.p_shipping_method='Y'
3039: THEN
3040: l_x_line_tbl(i).shipping_method_code:=p_header_rec.shipping_method_code;
3041: END IF;
3042:
3043: IF NOT OE_Globals.Equal(
3044: p_header_rec.ship_to_org_id,
3045: p_old_db_header_rec.ship_to_org_id) AND
3046:
3047: OE_OE_FORM_HEADER.g_cascade_test_record.p_ship_to='Y'
3049: THEN
3050: l_x_line_tbl(i).ship_to_org_id:=p_header_rec.ship_to_org_id;
3051: END IF;
3052:
3053: IF NOT OE_Globals.Equal(
3054: p_header_rec.agreement_id,
3055: p_old_db_header_rec.agreement_id) AND
3056:
3057: OE_OE_FORM_HEADER.g_cascade_test_record.p_agreement='Y'
3060: l_x_line_tbl(i).agreement_id:=p_header_rec.agreement_id;
3061: END IF;
3062:
3063: --Key Transaction dates
3064: IF NOT OE_Globals.Equal(
3065: p_header_rec.order_firmed_date,
3066: p_old_db_header_rec.order_firmed_date) AND
3067:
3068: OE_OE_FORM_HEADER.g_cascade_test_record.p_order_firmed_date='Y'
3070: THEN
3071: l_x_line_tbl(i).order_firmed_date:=p_header_rec.order_firmed_date;
3072: END IF;
3073:
3074: IF NOT OE_Globals.Equal(
3075: p_header_rec.Accounting_Rule_Id,
3076: p_old_db_header_rec.Accounting_Rule_Id) AND
3077:
3078: OE_OE_FORM_HEADER.g_cascade_test_record.p_accounting_rule='Y'
3080: THEN
3081: l_x_line_tbl(i).Accounting_Rule_Id:=p_header_rec.Accounting_Rule_Id;
3082: END IF;
3083:
3084: IF NOT OE_Globals.Equal(
3085: p_header_rec.Blanket_Number,
3086: p_old_db_header_rec.Blanket_Number) AND
3087:
3088: OE_OE_FORM_HEADER.g_cascade_test_record.p_blanket_number='Y'
3090: THEN
3091: l_x_line_tbl(i).Blanket_Number:=p_header_rec.Blanket_Number;
3092: END IF;
3093:
3094: IF NOT OE_Globals.Equal(
3095: p_header_rec.Deliver_to_Contact_Id,
3096: p_old_db_header_rec.Deliver_To_Contact_Id) AND
3097:
3098: OE_OE_FORM_HEADER.g_cascade_test_record.p_deliver_to_contact='Y'
3100: THEN
3101: l_x_line_tbl(i).Deliver_To_Contact_id:=p_header_rec.Deliver_To_Contact_Id;
3102: END IF;
3103:
3104: IF NOT OE_Globals.Equal(
3105: p_header_rec.Deliver_to_Org_Id,
3106: p_old_db_header_rec.Deliver_To_Org_Id) AND
3107:
3108: OE_OE_FORM_HEADER.g_cascade_test_record.p_deliver_to='Y'
3110: THEN
3111: l_x_line_tbl(i).Deliver_To_Org_id:=p_header_rec.Deliver_to_Org_Id;
3112: END IF;
3113:
3114: IF NOT OE_Globals.Equal(
3115: p_header_rec.Demand_Class_Code,
3116: p_old_db_header_rec.Demand_Class_Code) AND
3117:
3118: OE_OE_FORM_HEADER.g_cascade_test_record.p_demand_class='Y'
3120: THEN
3121: l_x_line_tbl(i).Demand_Class_Code:=p_header_rec.Demand_Class_Code;
3122: END IF;
3123:
3124: IF NOT OE_Globals.Equal(
3125: p_header_rec.Fob_point_Code,
3126: p_old_db_header_rec.Fob_point_Code) AND
3127:
3128: OE_OE_FORM_HEADER.g_cascade_test_record.p_fob_point='Y'
3130: THEN
3131: l_x_line_tbl(i).Fob_Point_Code:=p_header_rec.Fob_Point_Code;
3132: END IF;
3133:
3134: IF NOT OE_Globals.Equal(
3135: p_header_rec.Freight_Terms_Code,
3136: p_old_db_header_rec.Freight_Terms_Code) AND
3137:
3138: OE_OE_FORM_HEADER.g_cascade_test_record.p_fob_point='Y'
3140: THEN
3141: l_x_line_tbl(i).Freight_Terms_Code:=p_header_rec.Freight_Terms_Code;
3142: END IF;
3143:
3144: IF NOT OE_Globals.Equal(
3145: p_header_rec.Invoice_To_Contact_Id,
3146: p_old_db_header_rec.Invoice_To_Contact_Id) AND
3147:
3148: OE_OE_FORM_HEADER.g_cascade_test_record.p_bill_to_contact='Y'
3150: THEN
3151: l_x_line_tbl(i).Invoice_To_Contact_Id:=p_header_rec.Invoice_To_Contact_Id;
3152: END IF;
3153:
3154: IF NOT OE_Globals.Equal(
3155: p_header_rec.Invoice_To_Org_Id,
3156: p_old_db_header_rec.Invoice_To_Org_Id) AND
3157:
3158: OE_OE_FORM_HEADER.g_cascade_test_record.p_bill_to='Y'
3160: THEN
3161: l_x_line_tbl(i).Invoice_To_Org_Id:=p_header_rec.Invoice_To_Org_Id;
3162: END IF;
3163:
3164: IF NOT OE_Globals.Equal(
3165: p_header_rec.Invoicing_Rule_Id,
3166: p_old_db_header_rec.Invoicing_Rule_Id) AND
3167:
3168: OE_OE_FORM_HEADER.g_cascade_test_record.p_invoicing_rule='Y'
3170: THEN
3171: l_x_line_tbl(i).Invoicing_Rule_Id:=p_header_rec.Invoicing_Rule_Id;
3172: END IF;
3173:
3174: IF NOT OE_Globals.Equal(
3175: p_header_rec.Price_List_Id,
3176: p_old_db_header_rec.Price_List_Id) AND
3177:
3178: OE_OE_FORM_HEADER.g_cascade_test_record.p_price_list='Y'
3181: l_x_line_tbl(i).Price_List_Id:=p_header_rec.Price_List_Id;
3182: END IF;
3183:
3184:
3185: IF NOT OE_Globals.Equal(
3186: p_header_rec.Request_date,
3187: p_old_db_header_rec.Request_date) AND
3188:
3189: OE_OE_FORM_HEADER.g_cascade_test_record.p_request_date='Y'
3191: THEN
3192: l_x_line_tbl(i).Request_Date:=p_header_rec.Request_Date;
3193: END IF;
3194:
3195: IF NOT OE_Globals.Equal(
3196: p_header_rec.Return_Reason_Code,
3197: p_old_db_header_rec.Return_Reason_Code) AND
3198:
3199: OE_OE_FORM_HEADER.g_cascade_test_record.p_return_reason='Y'
3201: THEN
3202: l_x_line_tbl(i).Return_Reason_Code:=p_header_rec.Return_reason_Code;
3203: END IF;
3204:
3205: IF NOT OE_Globals.Equal(
3206: p_header_rec.Salesrep_Id,
3207: p_old_db_header_rec.Salesrep_id) AND
3208:
3209: OE_OE_FORM_HEADER.g_cascade_test_record.p_salesperson='Y'
3211: THEN
3212: l_x_line_tbl(i).Salesrep_Id:=p_header_rec.Salesrep_Id;
3213: END IF;
3214:
3215: IF NOT OE_Globals.Equal(
3216: p_header_rec.Ship_From_Org_Id,
3217: p_old_db_header_rec.Ship_From_Org_id) AND
3218:
3219: OE_OE_FORM_HEADER.g_cascade_test_record.p_warehouse='Y'
3221: THEN
3222: l_x_line_tbl(i).Ship_From_Org_Id:=p_header_rec.Ship_From_Org_Id;
3223: END IF;
3224:
3225: IF NOT OE_Globals.Equal(
3226: p_header_rec.Ship_To_Contact_Id,
3227: p_old_db_header_rec.Ship_To_Contact_Id) AND
3228:
3229: OE_OE_FORM_HEADER.g_cascade_test_record.p_ship_to_contact='Y'
3231: THEN
3232: l_x_line_tbl(i).Ship_To_Contact_Id:=p_header_rec.Ship_To_Contact_Id;
3233: END IF;
3234:
3235: IF NOT OE_Globals.Equal(
3236: p_header_rec.Sold_To_Org_Id,
3237: p_old_db_header_rec.Sold_To_Org_id) AND
3238:
3239: OE_OE_FORM_HEADER.g_cascade_test_record.p_customer='Y'
3241: THEN
3242: l_x_line_tbl(i).Sold_To_Org_Id:=p_header_rec.Sold_To_Org_Id;
3243: END IF;
3244:
3245: IF NOT OE_Globals.Equal(
3246: p_header_rec.Tax_Exempt_Flag,
3247: p_old_db_header_rec.Tax_Exempt_Flag) AND
3248:
3249: OE_OE_FORM_HEADER.g_cascade_test_record.p_tax_exempt='Y'
3251: THEN
3252: l_x_line_tbl(i).Tax_Exempt_Flag:=p_header_rec.Tax_Exempt_Flag;
3253: END IF;
3254:
3255: l_x_line_tbl(i).operation:= OE_GLOBALS.G_OPR_UPDATE;
3256: l_x_line_tbl(i).change_reason:='SYSTEM';
3257:
3258: END IF; -- Cascade Only if Line is Open
3259: END LOOP;
3265: IF OE_MASS_CHANGE_PVT.IS_MASS_CHANGE = 'T' THEN
3266: l_init_msg_list := FND_API.G_FALSE;
3267: END IF;
3268:
3269: OE_GLOBALS.G_UI_FLAG := TRUE;
3270: Oe_Order_Pvt.Process_order
3271: ( p_api_version_number => 1.0
3272: , p_init_msg_list => l_init_msg_list
3273: , x_return_status => l_return_status
3308: END IF;
3309:
3310:
3311: -- Re-set the UI flag to FALSE
3312: OE_GLOBALS.G_UI_FLAG := FALSE;
3313:
3314: -- Set return status.
3315:
3316: x_return_status := FND_API.G_RET_STS_SUCCESS;
3327: EXCEPTION
3328:
3329: WHEN FND_API.G_EXC_ERROR THEN
3330: ROLLBACK TO SAVEPOINT Header_Cascade_Attributes;
3331: OE_GLOBALS.G_UI_FLAG := FALSE;
3332:
3333: x_return_status := FND_API.G_RET_STS_ERROR;
3334:
3335: -- Get message count and data
3341:
3342: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3343: ROLLBACK TO SAVEPOINT Header_Cascade_Attributes;
3344:
3345: OE_GLOBALS.G_UI_FLAG := FALSE;
3346:
3347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3348:
3349: -- Get message count and data
3355:
3356: WHEN OTHERS THEN
3357: ROLLBACK TO SAVEPOINT Header_Cascade_Attributes;
3358:
3359: OE_GLOBALS.G_UI_FLAG := FALSE;
3360:
3361: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3362:
3363: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3595:
3596: -- moved down for bug 3686007
3597:
3598: OE_ORDER_CACHE.g_header_rec.header_id:=null;
3599: OE_GLOBALS.G_HEADER_CREATED := FALSE;
3600: g_db_header_rec := OE_Order_PUB.G_MISS_HEADER_REC;
3601:
3602:
3603: END Clear_Global_PO_Cache;
4319:
4320: -- Initialize security global record
4321: OE_Header_SECURITY.g_record := l_rowtype_rec;
4322:
4323: IF l_header_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
4324: l_operation := OE_PC_GLOBALS.CREATE_OP;
4325: ELSIF l_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE then
4326: l_operation := OE_PC_GLOBALS.UPDATE_OP;
4327: END IF;
4321: OE_Header_SECURITY.g_record := l_rowtype_rec;
4322:
4323: IF l_header_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
4324: l_operation := OE_PC_GLOBALS.CREATE_OP;
4325: ELSIF l_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE then
4326: l_operation := OE_PC_GLOBALS.UPDATE_OP;
4327: END IF;
4328:
4329: l_result := OE_Header_Security.Is_OP_Constrained
4364: ----------------------------------------------------------
4365: RETURN varchar2
4366: IS
4367: BEGIN
4368: RETURN OE_GLOBALS.G_OPR_UPDATE;
4369: END;
4370: --ABH
4371:
4372: -- Start Of Enhanced Cascading