[Home] [Help]
200: IS
201: l_Header_Adj_rec OE_Order_PUB.Header_Adj_Rec_Type;
202: l_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
203: l_Header_Adj_val_rec OE_Order_Pub.Header_Adj_Val_Rec_Type;
204: l_control_rec OE_GLOBALS.Control_Rec_Type;
205: l_return_status VARCHAR2(1);
206: l_action_request_tbl OE_Order_PUB.Request_Tbl_Type;
207: l_x_header_rec OE_Order_PUB.Header_Rec_Type;
208: l_x_Header_Adj_rec OE_Order_PUB.Header_Adj_Rec_Type;
236: BEGIN
237:
238:
239: -- Set the UI flag
240: OE_GLOBALS.G_UI_FLAG := TRUE;
241:
242: -- Set control flags.
243: l_control_rec.controlled_operation := TRUE;
244: l_control_rec.check_security := TRUE;
313: l_Header_Adj_rec.arithmetic_operator :=NULL;
314: */
315:
316: -- Set Operation to Create
317: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_CREATE;
318:
319: -- Populate Header_Adj table
320: l_x_Header_Adj_tbl(1) := l_x_Header_Adj_rec;
321: l_x_old_Header_Adj_tbl(1) := l_x_old_Header_Adj_rec;
473: );
474:
475:
476: -- Re-set the UI flag to FALSE
477: OE_GLOBALS.G_UI_FLAG := FALSE;
478:
479: -- Set return status.
480: x_return_status := FND_API.G_RET_STS_SUCCESS;
481:
490: EXCEPTION
491:
492: WHEN FND_API.G_EXC_ERROR THEN
493:
494: OE_GLOBALS.G_UI_FLAG := FALSE;
495:
496: x_return_status := FND_API.G_RET_STS_ERROR;
497:
498: -- Get message count and data
503: );
504:
505: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
506:
507: OE_GLOBALS.G_UI_FLAG := FALSE;
508:
509: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
510:
511: -- Get message count and data
516: );
517:
518: WHEN OTHERS THEN
519:
520: OE_GLOBALS.G_UI_FLAG := FALSE;
521:
522: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
523:
524: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
750: l_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
751: l_old_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
752: l_x_old_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
753: l_Header_Adj_val_rec OE_Order_PUB.Header_Adj_Val_Rec_Type;
754: l_control_rec OE_GLOBALS.Control_Rec_Type;
755: l_return_status VARCHAR2(1);
756: l_action_request_tbl OE_Order_PUB.Request_Tbl_Type;
757: l_x_header_rec OE_Order_PUB.Header_Rec_Type;
758: l_x_Header_Adj_rec OE_Order_PUB.Header_Adj_Rec_Type;
787: oe_debug_pub.add( 'ENTERING OE_OE_FORM_HEADER_ADJ.CHANGE_ATTRIBUTES' , 1 ) ;
788: END IF;
789:
790: -- Set the UI flag
791: OE_GLOBALS.G_UI_FLAG := TRUE;
792:
793: -- Set control flags.
794: l_control_rec.controlled_operation := TRUE;
795: l_control_rec.check_security := TRUE;
799:
800: l_control_rec.validate_entity := FALSE;
801: l_control_rec.write_to_DB := FALSE;
802: l_control_rec.process := FALSE;
803: l_control_rec.process_entity := OE_GLOBALS.G_ENTITY_HEADER_ADJ;
804:
805:
806: -- Instruct API to retain its caches
807: l_control_rec.clear_api_cache := FALSE;
1030: stmt:=10;
1031:
1032: -- Set Operation.
1033: IF FND_API.To_Boolean(l_x_Header_Adj_rec.db_flag) THEN
1034: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1035: ELSE
1036: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_CREATE;
1037: END IF;
1038:
1032: -- Set Operation.
1033: IF FND_API.To_Boolean(l_x_Header_Adj_rec.db_flag) THEN
1034: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1035: ELSE
1036: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_CREATE;
1037: END IF;
1038:
1039:
1040: -- Request execution of delayed request on if a discount is
1044: p_attr_id = OE_Header_Adj_Util.G_DISCOUNT
1045: THEN
1046:
1047: -- Assign requests that are to be executed
1048: l_request_rec.entity_code:= OE_GLOBALS.G_ENTITY_HEADER_ADJ;
1049: l_request_rec.entity_id := l_header_adj_rec.price_adjustment_id;
1050: l_request_rec.param1 := l_header_adj_rec.discount_id;
1051: l_request_rec.param2 := l_header_adj_rec.header_id;
1052: l_request_rec.request_type := OE_GLOBALS.G_CHECK_DUPLICATE;
1048: l_request_rec.entity_code:= OE_GLOBALS.G_ENTITY_HEADER_ADJ;
1049: l_request_rec.entity_id := l_header_adj_rec.price_adjustment_id;
1050: l_request_rec.param1 := l_header_adj_rec.discount_id;
1051: l_request_rec.param2 := l_header_adj_rec.header_id;
1052: l_request_rec.request_type := OE_GLOBALS.G_CHECK_DUPLICATE;
1053: l_request_tbl(1) := l_request_rec;
1054:
1055: END IF; */
1056:
1080: RAISE FND_API.G_EXC_ERROR;
1081: END IF;
1082: stmt:=25;
1083: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
1084: (p_request_type => OE_GLOBALS.G_CHECK_DUPLICATE
1085: ,p_delete => FND_API.G_TRUE
1086: ,x_return_status => l_return_status
1087: );
1088: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1091: RAISE FND_API.G_EXC_ERROR;
1092: END IF;
1093:
1094: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
1095: (p_request_type => OE_GLOBALS.G_CHECK_FIXED_PRICE
1096: ,p_delete => FND_API.G_TRUE
1097: ,x_return_status => l_return_status
1098: );
1099: IF p_enforce_fixed_price = 'YES' THEN
1201: );
1202: stmt:=45;
1203: -- New column changes :: new code
1204:
1205: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.list_header_id,
1206: l_Header_Adj_rec.list_header_id)
1207: THEN
1208: x_list_header_id := l_x_Header_Adj_rec.list_header_id;
1209: END IF;
1207: THEN
1208: x_list_header_id := l_x_Header_Adj_rec.list_header_id;
1209: END IF;
1210:
1211: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.list_line_id,
1212: l_Header_Adj_rec.list_line_id)
1213: THEN
1214: x_list_line_id := l_x_Header_Adj_rec.list_line_id;
1215: END IF;
1213: THEN
1214: x_list_line_id := l_x_Header_Adj_rec.list_line_id;
1215: END IF;
1216:
1217: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.list_line_type_code,
1218:
1219: l_Header_Adj_rec.list_line_type_code)
1220: THEN
1221: x_list_line_type_code := l_x_Header_Adj_rec.list_line_type_code;
1220: THEN
1221: x_list_line_type_code := l_x_Header_Adj_rec.list_line_type_code;
1222: END IF;
1223:
1224: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.modifier_mechanism_type_code,
1225:
1226: l_Header_Adj_rec.modifier_mechanism_type_code)
1227: THEN
1228: x_modifier_mechanism_type_code := l_x_Header_Adj_rec.modifier_mechanism_type_code;
1228: x_modifier_mechanism_type_code := l_x_Header_Adj_rec.modifier_mechanism_type_code;
1229: END IF;
1230:
1231: stmt:=50;
1232: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.update_allowed,
1233:
1234: l_Header_Adj_rec.update_allowed)
1235: THEN
1236: x_update_allowed := l_x_Header_Adj_rec.update_allowed;
1235: THEN
1236: x_update_allowed := l_x_Header_Adj_rec.update_allowed;
1237: END IF;
1238:
1239: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.updated_flag,
1240:
1241: l_Header_Adj_rec.updated_flag)
1242: THEN
1243: x_updated_flag := l_x_Header_Adj_rec.updated_flag;
1242: THEN
1243: x_updated_flag := l_x_Header_Adj_rec.updated_flag;
1244: END IF;
1245: stmt:=55;
1246: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.modified_from,
1247:
1248: l_Header_Adj_rec.modified_from)
1249: THEN
1250: x_modified_from := l_x_Header_Adj_rec.modified_from;
1249: THEN
1250: x_modified_from := l_x_Header_Adj_rec.modified_from;
1251: END IF;
1252:
1253: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.modified_to,
1254:
1255: l_Header_Adj_rec.modified_to)
1256: THEN
1257: x_modified_to := l_x_Header_Adj_rec.modified_to;
1256: THEN
1257: x_modified_to := l_x_Header_Adj_rec.modified_to;
1258: END IF;
1259: stmt:=60;
1260: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.applied_flag,
1261: l_Header_Adj_rec.applied_flag)
1262: THEN
1263: x_applied_flag := l_x_Header_Adj_rec.applied_flag;
1264: END IF;
1262: THEN
1263: x_applied_flag := l_x_Header_Adj_rec.applied_flag;
1264: END IF;
1265: stmt:=65;
1266: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.change_reason_code,
1267: l_Header_Adj_rec.change_reason_code)
1268: THEN
1269: x_change_reason_code := l_x_Header_Adj_rec.change_reason_code;
1270: END IF;
1268: THEN
1269: x_change_reason_code := l_x_Header_Adj_rec.change_reason_code;
1270: END IF;
1271:
1272: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.change_reason_text,
1273: l_Header_Adj_rec.change_reason_text)
1274: THEN
1275: x_change_reason_text := l_x_Header_Adj_rec.change_reason_text;
1276: END IF;
1274: THEN
1275: x_change_reason_text := l_x_Header_Adj_rec.change_reason_text;
1276: END IF;
1277: stmt:=70;
1278: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.operand,
1279: l_Header_Adj_rec.operand)
1280: THEN
1281: x_operand := l_x_Header_Adj_rec.operand;
1282: END IF;
1280: THEN
1281: x_operand := l_x_Header_Adj_rec.operand;
1282: END IF;
1283:
1284: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.arithmetic_operator,
1285: l_Header_Adj_rec.arithmetic_operator)
1286: THEN
1287: x_arithmetic_operator := l_x_Header_Adj_rec.arithmetic_operator;
1288: END IF;
1289:
1290:
1291: -- Return changed attributes.
1292:
1293: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute1,
1294: l_Header_Adj_rec.attribute1)
1295: THEN
1296: x_attribute1 := l_x_Header_Adj_rec.attribute1;
1297: END IF;
1295: THEN
1296: x_attribute1 := l_x_Header_Adj_rec.attribute1;
1297: END IF;
1298: stmt:=75;
1299: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute10,
1300: l_Header_Adj_rec.attribute10)
1301: THEN
1302: x_attribute10 := l_x_Header_Adj_rec.attribute10;
1303: END IF;
1301: THEN
1302: x_attribute10 := l_x_Header_Adj_rec.attribute10;
1303: END IF;
1304:
1305: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute11,
1306: l_Header_Adj_rec.attribute11)
1307: THEN
1308: x_attribute11 := l_x_Header_Adj_rec.attribute11;
1309: END IF;
1307: THEN
1308: x_attribute11 := l_x_Header_Adj_rec.attribute11;
1309: END IF;
1310:
1311: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute12,
1312: l_Header_Adj_rec.attribute12)
1313: THEN
1314: x_attribute12 := l_x_Header_Adj_rec.attribute12;
1315: END IF;
1313: THEN
1314: x_attribute12 := l_x_Header_Adj_rec.attribute12;
1315: END IF;
1316: stmt:=80;
1317: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute13,
1318: l_Header_Adj_rec.attribute13)
1319: THEN
1320: x_attribute13 := l_x_Header_Adj_rec.attribute13;
1321: END IF;
1319: THEN
1320: x_attribute13 := l_x_Header_Adj_rec.attribute13;
1321: END IF;
1322:
1323: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute14,
1324: l_Header_Adj_rec.attribute14)
1325: THEN
1326: x_attribute14 := l_x_Header_Adj_rec.attribute14;
1327: END IF;
1325: THEN
1326: x_attribute14 := l_x_Header_Adj_rec.attribute14;
1327: END IF;
1328: stmt:=85;
1329: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute15,
1330: l_Header_Adj_rec.attribute15)
1331: THEN
1332: x_attribute15 := l_x_Header_Adj_rec.attribute15;
1333: END IF;
1331: THEN
1332: x_attribute15 := l_x_Header_Adj_rec.attribute15;
1333: END IF;
1334:
1335: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute2,
1336: l_Header_Adj_rec.attribute2)
1337: THEN
1338: x_attribute2 := l_x_Header_Adj_rec.attribute2;
1339: END IF;
1337: THEN
1338: x_attribute2 := l_x_Header_Adj_rec.attribute2;
1339: END IF;
1340:
1341: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute3,
1342: l_Header_Adj_rec.attribute3)
1343: THEN
1344: x_attribute3 := l_x_Header_Adj_rec.attribute3;
1345: END IF;
1343: THEN
1344: x_attribute3 := l_x_Header_Adj_rec.attribute3;
1345: END IF;
1346:
1347: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute4,
1348: l_Header_Adj_rec.attribute4)
1349: THEN
1350: x_attribute4 := l_x_Header_Adj_rec.attribute4;
1351: END IF;
1349: THEN
1350: x_attribute4 := l_x_Header_Adj_rec.attribute4;
1351: END IF;
1352:
1353: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute5,
1354: l_Header_Adj_rec.attribute5)
1355: THEN
1356: x_attribute5 := l_x_Header_Adj_rec.attribute5;
1357: END IF;
1355: THEN
1356: x_attribute5 := l_x_Header_Adj_rec.attribute5;
1357: END IF;
1358:
1359: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute6,
1360: l_Header_Adj_rec.attribute6)
1361: THEN
1362: x_attribute6 := l_x_Header_Adj_rec.attribute6;
1363: END IF;
1361: THEN
1362: x_attribute6 := l_x_Header_Adj_rec.attribute6;
1363: END IF;
1364:
1365: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute7,
1366: l_Header_Adj_rec.attribute7)
1367: THEN
1368: x_attribute7 := l_x_Header_Adj_rec.attribute7;
1369: END IF;
1367: THEN
1368: x_attribute7 := l_x_Header_Adj_rec.attribute7;
1369: END IF;
1370:
1371: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute8,
1372: l_Header_Adj_rec.attribute8)
1373: THEN
1374: x_attribute8 := l_x_Header_Adj_rec.attribute8;
1375: END IF;
1373: THEN
1374: x_attribute8 := l_x_Header_Adj_rec.attribute8;
1375: END IF;
1376:
1377: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute9,
1378: l_Header_Adj_rec.attribute9)
1379: THEN
1380: x_attribute9 := l_x_Header_Adj_rec.attribute9;
1381: END IF;
1379: THEN
1380: x_attribute9 := l_x_Header_Adj_rec.attribute9;
1381: END IF;
1382:
1383: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.automatic_flag,
1384: l_Header_Adj_rec.automatic_flag)
1385: THEN
1386: x_automatic_flag := l_x_Header_Adj_rec.automatic_flag;
1387: END IF;
1385: THEN
1386: x_automatic_flag := l_x_Header_Adj_rec.automatic_flag;
1387: END IF;
1388:
1389: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.context,
1390: l_Header_Adj_rec.context)
1391: THEN
1392: x_context := l_x_Header_Adj_rec.context;
1393: END IF;
1391: THEN
1392: x_context := l_x_Header_Adj_rec.context;
1393: END IF;
1394: stmt:=95;
1395: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.discount_id,
1396: l_Header_Adj_rec.discount_id)
1397: THEN
1398: x_discount_id := l_x_Header_Adj_rec.discount_id;
1399: x_discount := l_Header_Adj_val_rec.discount;
1398: x_discount_id := l_x_Header_Adj_rec.discount_id;
1399: x_discount := l_Header_Adj_val_rec.discount;
1400: END IF;
1401:
1402: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.discount_line_id,
1403: l_Header_Adj_rec.discount_line_id)
1404: THEN
1405: x_discount_line_id := l_x_Header_Adj_rec.discount_line_id;
1406: END IF;
1404: THEN
1405: x_discount_line_id := l_x_Header_Adj_rec.discount_line_id;
1406: END IF;
1407:
1408: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.header_id,
1409: l_Header_Adj_rec.header_id)
1410: THEN
1411: x_header_id := l_x_Header_Adj_rec.header_id;
1412: END IF;
1410: THEN
1411: x_header_id := l_x_Header_Adj_rec.header_id;
1412: END IF;
1413: stmt:=100;
1414: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.line_id,
1415: l_Header_Adj_rec.line_id)
1416: THEN
1417: x_line_id := l_x_Header_Adj_rec.line_id;
1418: END IF;
1416: THEN
1417: x_line_id := l_x_Header_Adj_rec.line_id;
1418: END IF;
1419:
1420: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.percent,
1421: l_Header_Adj_rec.percent)
1422: THEN
1423: x_percent := l_x_Header_Adj_rec.percent;
1424: END IF;
1422: THEN
1423: x_percent := l_x_Header_Adj_rec.percent;
1424: END IF;
1425:
1426: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.price_adjustment_id,
1427: l_Header_Adj_rec.price_adjustment_id)
1428: THEN
1429: x_price_adjustment_id := l_x_Header_Adj_rec.price_adjustment_id;
1430: END IF;
1429: x_price_adjustment_id := l_x_Header_Adj_rec.price_adjustment_id;
1430: END IF;
1431:
1432:
1433: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.adjusted_amount,
1434: l_Header_Adj_rec.adjusted_amount)
1435: THEN
1436: x_adjusted_amount := l_x_Header_Adj_rec.adjusted_amount;
1437: END IF;
1435: THEN
1436: x_adjusted_amount := l_x_Header_Adj_rec.adjusted_amount;
1437: END IF;
1438:
1439: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.pricing_phase_id,
1440: l_Header_Adj_rec.pricing_phase_id)
1441: THEN
1442: x_pricing_phase_id := l_x_Header_Adj_rec.pricing_phase_id;
1443: END IF;
1441: THEN
1442: x_pricing_phase_id := l_x_Header_Adj_rec.pricing_phase_id;
1443: END IF;
1444:
1445: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.list_line_no, l_Header_Adj_rec.list_line_no)
1446: THEN
1447: x_list_line_no := l_x_Header_Adj_rec.list_line_no;
1448: END IF;
1449:
1446: THEN
1447: x_list_line_no := l_x_Header_Adj_rec.list_line_no;
1448: END IF;
1449:
1450: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.source_system_code, l_Header_Adj_rec.source_system_code)
1451: THEN
1452: x_source_system_code := l_x_Header_Adj_rec.source_system_code;
1453: END IF;
1454:
1451: THEN
1452: x_source_system_code := l_x_Header_Adj_rec.source_system_code;
1453: END IF;
1454:
1455: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.benefit_qty, l_Header_Adj_rec.benefit_qty)
1456: THEN
1457: x_benefit_qty := l_x_Header_Adj_rec.benefit_qty;
1458: END IF;
1459:
1456: THEN
1457: x_benefit_qty := l_x_Header_Adj_rec.benefit_qty;
1458: END IF;
1459:
1460: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.benefit_uom_code, l_Header_Adj_rec.benefit_uom_code)
1461: THEN
1462: x_benefit_uom_code := l_x_Header_Adj_rec.benefit_uom_code;
1463: END IF;
1464:
1461: THEN
1462: x_benefit_uom_code := l_x_Header_Adj_rec.benefit_uom_code;
1463: END IF;
1464:
1465: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.print_on_invoice_flag, l_Header_Adj_rec.print_on_invoice_flag)
1466: THEN
1467: x_print_on_invoice_flag := l_x_Header_Adj_rec.print_on_invoice_flag;
1468: END IF;
1469:
1466: THEN
1467: x_print_on_invoice_flag := l_x_Header_Adj_rec.print_on_invoice_flag;
1468: END IF;
1469:
1470: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.expiration_date, l_Header_Adj_rec.expiration_date)
1471: THEN
1472: x_expiration_date := l_x_Header_Adj_rec.expiration_date;
1473: END IF;
1474:
1471: THEN
1472: x_expiration_date := l_x_Header_Adj_rec.expiration_date;
1473: END IF;
1474:
1475: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.rebate_transaction_type_code, l_Header_Adj_rec.rebate_transaction_type_code)
1476: THEN
1477: x_rebate_transaction_type_code := l_x_Header_Adj_rec.rebate_transaction_type_code;
1478: END IF;
1479:
1476: THEN
1477: x_rebate_transaction_type_code := l_x_Header_Adj_rec.rebate_transaction_type_code;
1478: END IF;
1479:
1480: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.rebate_transaction_reference, l_Header_Adj_rec.rebate_transaction_reference)
1481: THEN
1482: x_rebate_transaction_reference := l_x_Header_Adj_rec.rebate_transaction_reference;
1483: END IF;
1484:
1481: THEN
1482: x_rebate_transaction_reference := l_x_Header_Adj_rec.rebate_transaction_reference;
1483: END IF;
1484:
1485: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.rebate_payment_system_code, l_Header_Adj_rec.rebate_payment_system_code)
1486: THEN
1487: x_rebate_payment_system_code := l_x_Header_Adj_rec.rebate_payment_system_code;
1488: END IF;
1489:
1486: THEN
1487: x_rebate_payment_system_code := l_x_Header_Adj_rec.rebate_payment_system_code;
1488: END IF;
1489:
1490: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.redeemed_date, l_Header_Adj_rec.redeemed_date)
1491: THEN
1492: x_redeemed_date := l_x_Header_Adj_rec.redeemed_date;
1493: END IF;
1494:
1491: THEN
1492: x_redeemed_date := l_x_Header_Adj_rec.redeemed_date;
1493: END IF;
1494:
1495: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.redeemed_flag, l_Header_Adj_rec.redeemed_flag)
1496: THEN
1497: x_redeemed_flag := l_x_Header_Adj_rec.redeemed_flag;
1498: END IF;
1499:
1496: THEN
1497: x_redeemed_flag := l_x_Header_Adj_rec.redeemed_flag;
1498: END IF;
1499:
1500: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.accrual_flag, l_Header_Adj_rec.accrual_flag)
1501: THEN
1502: x_accrual_flag := l_x_Header_Adj_rec.accrual_flag;
1503: END IF;
1504:
1501: THEN
1502: x_accrual_flag := l_x_Header_Adj_rec.accrual_flag;
1503: END IF;
1504:
1505: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.estimated_flag, l_Header_Adj_rec.estimated_flag)
1506: THEN
1507: x_estimated_flag := l_x_Header_Adj_rec.estimated_flag;
1508: END IF;
1509:
1506: THEN
1507: x_estimated_flag := l_x_Header_Adj_rec.estimated_flag;
1508: END IF;
1509:
1510: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.invoiced_flag, l_Header_Adj_rec.invoiced_flag)
1511: THEN
1512: x_invoiced_flag := l_x_Header_Adj_rec.invoiced_flag;
1513: END IF;
1514:
1511: THEN
1512: x_invoiced_flag := l_x_Header_Adj_rec.invoiced_flag;
1513: END IF;
1514:
1515: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.charge_type_code, l_Header_Adj_rec.charge_type_code)
1516: THEN
1517: x_charge_type_code := l_x_Header_Adj_rec.charge_type_code;
1518: END IF;
1519:
1516: THEN
1517: x_charge_type_code := l_x_Header_Adj_rec.charge_type_code;
1518: END IF;
1519:
1520: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.charge_subtype_code, l_Header_Adj_rec.charge_subtype_code)
1521: THEN
1522: x_charge_subtype_code := l_x_Header_Adj_rec.charge_subtype_code;
1523: END IF;
1524:
1521: THEN
1522: x_charge_subtype_code := l_x_Header_Adj_rec.charge_subtype_code;
1523: END IF;
1524:
1525: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.credit_or_charge_flag, l_Header_Adj_rec.credit_or_charge_flag)
1526: THEN
1527: x_credit_or_charge_flag := l_x_Header_Adj_rec.credit_or_charge_flag;
1528: END IF;
1529:
1526: THEN
1527: x_credit_or_charge_flag := l_x_Header_Adj_rec.credit_or_charge_flag;
1528: END IF;
1529:
1530: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.include_on_returns_flag, l_Header_Adj_rec.include_on_returns_flag)
1531: THEN
1532: x_include_on_returns_flag := l_x_Header_Adj_rec.include_on_returns_flag;
1533: END IF;
1534:
1531: THEN
1532: x_include_on_returns_flag := l_x_Header_Adj_rec.include_on_returns_flag;
1533: END IF;
1534:
1535: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute1,
1536: l_Header_Adj_rec.ac_attribute1)
1537: THEN
1538: x_ac_attribute1 := l_x_Header_Adj_rec.ac_attribute1;
1539: END IF;
1537: THEN
1538: x_ac_attribute1 := l_x_Header_Adj_rec.ac_attribute1;
1539: END IF;
1540:
1541: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute10,
1542: l_Header_Adj_rec.ac_attribute10)
1543: THEN
1544: x_ac_attribute10 := l_x_Header_Adj_rec.ac_attribute10;
1545: END IF;
1543: THEN
1544: x_ac_attribute10 := l_x_Header_Adj_rec.ac_attribute10;
1545: END IF;
1546:
1547: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute11,
1548: l_Header_Adj_rec.ac_attribute11)
1549: THEN
1550: x_ac_attribute11 := l_x_Header_Adj_rec.ac_attribute11;
1551: END IF;
1549: THEN
1550: x_ac_attribute11 := l_x_Header_Adj_rec.ac_attribute11;
1551: END IF;
1552:
1553: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute12,
1554: l_Header_Adj_rec.ac_attribute12)
1555: THEN
1556: x_ac_attribute12 := l_x_Header_Adj_rec.ac_attribute12;
1557: END IF;
1555: THEN
1556: x_ac_attribute12 := l_x_Header_Adj_rec.ac_attribute12;
1557: END IF;
1558:
1559: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute13,
1560: l_Header_Adj_rec.ac_attribute13)
1561: THEN
1562: x_ac_attribute13 := l_x_Header_Adj_rec.ac_attribute13;
1563: END IF;
1561: THEN
1562: x_ac_attribute13 := l_x_Header_Adj_rec.ac_attribute13;
1563: END IF;
1564:
1565: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute14,
1566: l_Header_Adj_rec.ac_attribute14)
1567: THEN
1568: x_ac_attribute14 := l_x_Header_Adj_rec.ac_attribute14;
1569: END IF;
1567: THEN
1568: x_ac_attribute14 := l_x_Header_Adj_rec.ac_attribute14;
1569: END IF;
1570:
1571: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute15,
1572: l_Header_Adj_rec.ac_attribute15)
1573: THEN
1574: x_ac_attribute15 := l_x_Header_Adj_rec.ac_attribute15;
1575: END IF;
1573: THEN
1574: x_ac_attribute15 := l_x_Header_Adj_rec.ac_attribute15;
1575: END IF;
1576:
1577: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute2,
1578: l_Header_Adj_rec.ac_attribute2)
1579: THEN
1580: x_ac_attribute2 := l_x_Header_Adj_rec.ac_attribute2;
1581: END IF;
1579: THEN
1580: x_ac_attribute2 := l_x_Header_Adj_rec.ac_attribute2;
1581: END IF;
1582:
1583: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute3,
1584: l_Header_Adj_rec.ac_attribute3)
1585: THEN
1586: x_ac_attribute3 := l_x_Header_Adj_rec.ac_attribute3;
1587: END IF;
1585: THEN
1586: x_ac_attribute3 := l_x_Header_Adj_rec.ac_attribute3;
1587: END IF;
1588:
1589: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute4,
1590: l_Header_Adj_rec.ac_attribute4)
1591: THEN
1592: x_ac_attribute4 := l_x_Header_Adj_rec.ac_attribute4;
1593: END IF;
1591: THEN
1592: x_ac_attribute4 := l_x_Header_Adj_rec.ac_attribute4;
1593: END IF;
1594:
1595: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute5,
1596: l_Header_Adj_rec.ac_attribute5)
1597: THEN
1598: x_ac_attribute5 := l_x_Header_Adj_rec.ac_attribute5;
1599: END IF;
1597: THEN
1598: x_ac_attribute5 := l_x_Header_Adj_rec.ac_attribute5;
1599: END IF;
1600:
1601: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute6,
1602: l_Header_Adj_rec.ac_attribute6)
1603: THEN
1604: x_ac_attribute6 := l_x_Header_Adj_rec.ac_attribute6;
1605: END IF;
1603: THEN
1604: x_ac_attribute6 := l_x_Header_Adj_rec.ac_attribute6;
1605: END IF;
1606:
1607: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute7,
1608: l_Header_Adj_rec.ac_attribute7)
1609: THEN
1610: x_ac_attribute7 := l_x_Header_Adj_rec.ac_attribute7;
1611: END IF;
1609: THEN
1610: x_ac_attribute7 := l_x_Header_Adj_rec.ac_attribute7;
1611: END IF;
1612:
1613: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute8,
1614: l_Header_Adj_rec.ac_attribute8)
1615: THEN
1616: x_ac_attribute8 := l_x_Header_Adj_rec.ac_attribute8;
1617: END IF;
1615: THEN
1616: x_ac_attribute8 := l_x_Header_Adj_rec.ac_attribute8;
1617: END IF;
1618:
1619: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute9,
1620: l_Header_Adj_rec.ac_attribute9)
1621: THEN
1622: x_ac_attribute9 := l_x_Header_Adj_rec.ac_attribute9;
1623: END IF;
1621: THEN
1622: x_ac_attribute9 := l_x_Header_Adj_rec.ac_attribute9;
1623: END IF;
1624:
1625: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_context,
1626: l_Header_Adj_rec.ac_context)
1627: THEN
1628: x_ac_context := l_x_Header_Adj_rec.ac_context;
1629: END IF;
1628: x_ac_context := l_x_Header_Adj_rec.ac_context;
1629: END IF;
1630: stmt:=120;
1631: --uom begin
1632: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.operand_per_pqty,
1633: l_Header_Adj_rec.operand_per_pqty)
1634: THEN
1635: x_operand_per_pqty := l_x_Header_Adj_rec.operand_per_pqty;
1636: END IF;
1634: THEN
1635: x_operand_per_pqty := l_x_Header_Adj_rec.operand_per_pqty;
1636: END IF;
1637:
1638: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.adjusted_amount_per_pqty,
1639: l_Header_Adj_rec.adjusted_amount_per_pqty)
1640: THEN
1641: x_adjusted_amount_per_pqty := l_x_Header_Adj_rec.adjusted_amount_per_pqty;
1642: END IF;
1651: );
1652:
1653: stmt:=140;
1654: -- Re-set the UI flag to FALSE
1655: OE_GLOBALS.G_UI_FLAG := FALSE;
1656:
1657: -- Set return status.
1658: x_return_status := FND_API.G_RET_STS_SUCCESS;
1659:
1671: EXCEPTION
1672:
1673: WHEN FND_API.G_EXC_ERROR THEN
1674:
1675: OE_GLOBALS.G_UI_FLAG := FALSE;
1676:
1677: x_return_status := FND_API.G_RET_STS_ERROR;
1678:
1679: -- Get message count and data
1702: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1703: IF l_debug_level > 0 THEN
1704: oe_debug_pub.add( 'STMT:'||STMT ) ;
1705: END IF;
1706: OE_GLOBALS.G_UI_FLAG := FALSE;
1707:
1708: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1709:
1710: -- Get message count and data
1723: ROLLBACK TO SAVEPOINT change_attributes;
1724:
1725: WHEN OTHERS THEN
1726:
1727: OE_GLOBALS.G_UI_FLAG := FALSE;
1728:
1729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1730:
1731: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1790: l_x_old_Header_Adj_rec OE_Order_PUB.Header_Adj_Rec_Type;
1791: l_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
1792: l_old_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
1793: l_x_old_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
1794: l_control_rec OE_GLOBALS.Control_Rec_Type;
1795: l_return_status VARCHAR2(1);
1796: l_action_request_tbl OE_Order_PUB.Request_Tbl_Type;
1797: l_x_header_rec OE_Order_PUB.Header_Rec_Type;
1798: l_x_Header_Adj_rec OE_Order_PUB.Header_Adj_Rec_Type;
1828: oe_debug_pub.add( 'ENTERING OE_OE_FORM_HEADER_ADJ.VALIDATE_AND_WRITE' , 1 ) ;
1829: END IF;
1830:
1831: -- Set the UI flag
1832: OE_GLOBALS.G_UI_FLAG := TRUE;
1833:
1834: -- Set control flags.
1835: l_control_rec.controlled_operation := TRUE;
1836: l_control_rec.validate_entity := TRUE;
1840: l_control_rec.clear_dependents := FALSE;
1841: l_control_rec.default_attributes := FALSE;
1842: l_control_rec.change_attributes := FALSE;
1843: l_control_rec.process := FALSE;
1844: l_control_rec.process_entity := OE_GLOBALS.G_ENTITY_HEADER_ADJ;
1845:
1846:
1847: -- Instruct API to retain its caches
1848: l_control_rec.clear_api_cache := FALSE;
1872: IF(l_x_Header_Adj_rec.db_flag= FND_API.G_MISS_CHAR) THEN
1873: return;
1874: ELSE
1875: IF FND_API.To_Boolean(l_x_Header_Adj_rec.db_flag) THEN
1876: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1877: ELSE
1878: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_CREATE;
1879: END IF;
1880: END IF;
1874: ELSE
1875: IF FND_API.To_Boolean(l_x_Header_Adj_rec.db_flag) THEN
1876: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1877: ELSE
1878: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_CREATE;
1879: END IF;
1880: END IF;
1881: --3340264}
1882:
1962:
1963: x_lock_control := l_x_Header_Adj_rec.lock_control;
1964:
1965: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
1966: (p_request_type => OE_GLOBALS.G_CHECK_PERCENTAGE
1967: ,p_delete => FND_API.G_TRUE
1968: ,x_return_status => l_return_status
1969: );
1970: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1974: END IF;
1975:
1976: -- fixed bug 3271297
1977: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
1978: (p_request_type => OE_GLOBALS.G_VERIFY_PAYMENT
1979: ,p_delete => FND_API.G_TRUE
1980: ,x_return_status => l_return_status
1981: );
1982: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1987:
1988: /*****
1989: IF p_ok_flag = 'Y' THEN
1990: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
1991: (p_request_type => OE_GLOBALS.G_PRICE_ADJ
1992: ,p_delete => FND_API.G_TRUE
1993: ,x_return_status => l_return_status
1994: );
1995: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2015: Clear_Header_Adj;
2016:
2017:
2018: -- Re-set the UI flag to FALSE
2019: OE_GLOBALS.G_UI_FLAG := FALSE;
2020:
2021: -- Set return status.
2022: x_return_status := FND_API.G_RET_STS_SUCCESS;
2023:
2035: EXCEPTION
2036:
2037: WHEN FND_API.G_EXC_ERROR THEN
2038:
2039: OE_GLOBALS.G_UI_FLAG := FALSE;
2040:
2041: x_return_status := FND_API.G_RET_STS_ERROR;
2042:
2043: -- Get message count and data
2050: ROLLBACK TO SAVEPOINT validate_and_write;
2051:
2052: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2053:
2054: OE_GLOBALS.G_UI_FLAG := FALSE;
2055:
2056: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2057:
2058: -- Get message count and data
2065: ROLLBACK TO SAVEPOINT validate_and_write;
2066:
2067: WHEN OTHERS THEN
2068:
2069: OE_GLOBALS.G_UI_FLAG := FALSE;
2070:
2071: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2072:
2073: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2106: )
2107: IS
2108: l_Header_Adj_rec OE_Order_PUB.Header_Adj_Rec_Type;
2109: l_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
2110: l_control_rec OE_GLOBALS.Control_Rec_Type;
2111: l_return_status VARCHAR2(1);
2112: l_action_request_tbl OE_Order_PUB.Request_Tbl_Type;
2113: l_x_header_rec OE_Order_PUB.Header_Rec_Type;
2114: l_x_Header_Adj_rec OE_Order_PUB.Header_Adj_Rec_Type;
2146: oe_debug_pub.add( 'ENTERING OE_OE_FORM_HEADER_ADJ.DELETE_ROW' , 1 ) ;
2147: END IF;
2148:
2149: -- Set the UI flag
2150: OE_GLOBALS.G_UI_FLAG := TRUE;
2151:
2152: -- Set control flags.
2153: l_control_rec.controlled_operation := TRUE;
2154: l_control_rec.check_security := TRUE;
2174: );
2175:
2176:
2177: -- Set Operation.
2178: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_DELETE;
2179:
2180:
2181: -- Populate Header_Adj table
2182: l_x_Header_Adj_tbl(1) := l_x_Header_Adj_rec;
2238: Clear_Header_Adj;
2239:
2240:
2241: -- Re-set the UI flag to FALSE
2242: OE_GLOBALS.G_UI_FLAG := FALSE;
2243:
2244: -- Set return status.
2245: x_return_status := FND_API.G_RET_STS_SUCCESS;
2246:
2258: EXCEPTION
2259:
2260: WHEN FND_API.G_EXC_ERROR THEN
2261:
2262: OE_GLOBALS.G_UI_FLAG := FALSE;
2263:
2264: x_return_status := FND_API.G_RET_STS_ERROR;
2265:
2266: -- Get message count and data
2270: );
2271:
2272: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2273:
2274: OE_GLOBALS.G_UI_FLAG := FALSE;
2275:
2276: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2277:
2278: -- Get message count and data
2282: );
2283:
2284: WHEN OTHERS THEN
2285:
2286: OE_GLOBALS.G_UI_FLAG := FALSE;
2287:
2288: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2289:
2290: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2317:
2318: , p_header_id IN NUMBER
2319: )
2320: IS
2321: l_control_rec OE_GLOBALS.Control_Rec_Type;
2322: l_return_status VARCHAR2(1);
2323: l_action_request_tbl OE_Order_PUB.Request_Tbl_Type;
2324: l_request_rec OE_Order_Pub.Request_Rec_Type;
2325: l_request_tbl OE_Order_Pub.Request_Tbl_Type;
2357: END IF;
2358:
2359: /*
2360: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
2361: (p_request_type => OE_GLOBALS.G_PRICE_ADJ
2362: ,p_delete => FND_API.G_TRUE
2363: ,x_return_status => l_return_status
2364: );
2365: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2369: END IF;
2370:
2371: -- process delayed requests for tax calculation.
2372: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
2373: (p_request_type => OE_GLOBALS.G_TAX_LINE
2374: ,p_delete => FND_API.G_TRUE
2375: ,x_return_status => l_return_status
2376: );
2377: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2381: END IF;
2382:
2383: oe_debug_pub.ADD('Processing delayed request for Verify Payment for price adjustments changes.', 3);
2384: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
2385: (p_request_type => OE_GLOBALS.G_VERIFY_PAYMENT
2386: ,p_delete => FND_API.G_TRUE
2387: ,x_return_status => l_return_status
2388: );
2389: */
2410:
2411: /*
2412:
2413: -- Set the UI flag
2414: OE_GLOBALS.G_UI_FLAG := TRUE;
2415:
2416: -- Set control flags.
2417:
2418: l_control_rec.controlled_operation := TRUE;
2416: -- Set control flags.
2417:
2418: l_control_rec.controlled_operation := TRUE;
2419: l_control_rec.process := TRUE;
2420: l_control_rec.process_entity := OE_GLOBALS.G_ENTITY_HEADER_ADJ;
2421:
2422: l_control_rec.check_security := FALSE;
2423: l_control_rec.clear_dependents := FALSE;
2424: l_control_rec.default_attributes := FALSE;
2432: l_control_rec.clear_api_requests := FALSE;
2433:
2434:
2435: -- Assign requests in the order that is to be executed
2436: l_request_rec.request_type := OE_GLOBALS.G_CHECK_PERCENTAGE;
2437:
2438: -- 1905650
2439: -- G_PRICE_ADJ request should be logged using entity ALL
2440: l_request_rec.entity_code := OE_GLOBALS.G_ENTITY_ALL;
2436: l_request_rec.request_type := OE_GLOBALS.G_CHECK_PERCENTAGE;
2437:
2438: -- 1905650
2439: -- G_PRICE_ADJ request should be logged using entity ALL
2440: l_request_rec.entity_code := OE_GLOBALS.G_ENTITY_ALL;
2441: l_request_rec.entity_id := p_header_id;
2442: l_request_tbl(1) := l_request_rec;
2443:
2444: l_request_rec.request_type := OE_GLOBALS.G_PRICE_ADJ;
2440: l_request_rec.entity_code := OE_GLOBALS.G_ENTITY_ALL;
2441: l_request_rec.entity_id := p_header_id;
2442: l_request_tbl(1) := l_request_rec;
2443:
2444: l_request_rec.request_type := OE_GLOBALS.G_PRICE_ADJ;
2445: l_request_rec.entity_code := OE_GLOBALS.G_ENTITY_HEADER_ADJ;
2446: l_request_rec.entity_id := p_header_id;
2447: l_request_tbl(2) := l_request_rec;
2448:
2441: l_request_rec.entity_id := p_header_id;
2442: l_request_tbl(1) := l_request_rec;
2443:
2444: l_request_rec.request_type := OE_GLOBALS.G_PRICE_ADJ;
2445: l_request_rec.entity_code := OE_GLOBALS.G_ENTITY_HEADER_ADJ;
2446: l_request_rec.entity_id := p_header_id;
2447: l_request_tbl(2) := l_request_rec;
2448:
2449:
2486: END IF;
2487:
2488:
2489: -- Re-set the UI flag to FALSE
2490: OE_GLOBALS.G_UI_FLAG := FALSE;
2491:
2492: -- Set return status.
2493:
2494: x_return_status := FND_API.G_RET_STS_SUCCESS;
2507: EXCEPTION
2508:
2509: WHEN FND_API.G_EXC_ERROR THEN
2510:
2511: OE_GLOBALS.G_UI_FLAG := FALSE;
2512:
2513: x_return_status := FND_API.G_RET_STS_ERROR;
2514:
2515: -- Get message count and data
2520: );
2521:
2522: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2523:
2524: OE_GLOBALS.G_UI_FLAG := FALSE;
2525:
2526: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2527:
2528: -- Get message count and data
2533: );
2534:
2535: WHEN OTHERS THEN
2536:
2537: OE_GLOBALS.G_UI_FLAG := FALSE;
2538:
2539: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2540:
2541: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2587: END IF;
2588:
2589: -- Load Header_Adj record
2590:
2591: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_LOCK;
2592:
2593: l_x_Header_Adj_rec.lock_control := p_lock_control;
2594: l_x_Header_Adj_rec.price_adjustment_id := p_price_adjustment_id;
2595: