[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;
1032: stmt:=10;
1033:
1034: -- Set Operation.
1035: IF FND_API.To_Boolean(l_x_Header_Adj_rec.db_flag) THEN
1036: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1037: ELSE
1038: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_CREATE;
1039: END IF;
1040:
1034: -- Set Operation.
1035: IF FND_API.To_Boolean(l_x_Header_Adj_rec.db_flag) THEN
1036: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1037: ELSE
1038: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_CREATE;
1039: END IF;
1040:
1041:
1042: -- Request execution of delayed request on if a discount is
1046: p_attr_id = OE_Header_Adj_Util.G_DISCOUNT
1047: THEN
1048:
1049: -- Assign requests that are to be executed
1050: l_request_rec.entity_code:= OE_GLOBALS.G_ENTITY_HEADER_ADJ;
1051: l_request_rec.entity_id := l_header_adj_rec.price_adjustment_id;
1052: l_request_rec.param1 := l_header_adj_rec.discount_id;
1053: l_request_rec.param2 := l_header_adj_rec.header_id;
1054: l_request_rec.request_type := OE_GLOBALS.G_CHECK_DUPLICATE;
1050: l_request_rec.entity_code:= OE_GLOBALS.G_ENTITY_HEADER_ADJ;
1051: l_request_rec.entity_id := l_header_adj_rec.price_adjustment_id;
1052: l_request_rec.param1 := l_header_adj_rec.discount_id;
1053: l_request_rec.param2 := l_header_adj_rec.header_id;
1054: l_request_rec.request_type := OE_GLOBALS.G_CHECK_DUPLICATE;
1055: l_request_tbl(1) := l_request_rec;
1056:
1057: END IF; */
1058:
1082: RAISE FND_API.G_EXC_ERROR;
1083: END IF;
1084: stmt:=25;
1085: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
1086: (p_request_type => OE_GLOBALS.G_CHECK_DUPLICATE
1087: ,p_delete => FND_API.G_TRUE
1088: ,x_return_status => l_return_status
1089: );
1090: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1093: RAISE FND_API.G_EXC_ERROR;
1094: END IF;
1095:
1096: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
1097: (p_request_type => OE_GLOBALS.G_CHECK_FIXED_PRICE
1098: ,p_delete => FND_API.G_TRUE
1099: ,x_return_status => l_return_status
1100: );
1101: IF p_enforce_fixed_price = 'YES' THEN
1203: );
1204: stmt:=45;
1205: -- New column changes :: new code
1206:
1207: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.list_header_id,
1208: l_Header_Adj_rec.list_header_id)
1209: THEN
1210: x_list_header_id := l_x_Header_Adj_rec.list_header_id;
1211: END IF;
1209: THEN
1210: x_list_header_id := l_x_Header_Adj_rec.list_header_id;
1211: END IF;
1212:
1213: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.list_line_id,
1214: l_Header_Adj_rec.list_line_id)
1215: THEN
1216: x_list_line_id := l_x_Header_Adj_rec.list_line_id;
1217: END IF;
1215: THEN
1216: x_list_line_id := l_x_Header_Adj_rec.list_line_id;
1217: END IF;
1218:
1219: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.list_line_type_code,
1220:
1221: l_Header_Adj_rec.list_line_type_code)
1222: THEN
1223: x_list_line_type_code := l_x_Header_Adj_rec.list_line_type_code;
1222: THEN
1223: x_list_line_type_code := l_x_Header_Adj_rec.list_line_type_code;
1224: END IF;
1225:
1226: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.modifier_mechanism_type_code,
1227:
1228: l_Header_Adj_rec.modifier_mechanism_type_code)
1229: THEN
1230: x_modifier_mechanism_type_code := l_x_Header_Adj_rec.modifier_mechanism_type_code;
1230: x_modifier_mechanism_type_code := l_x_Header_Adj_rec.modifier_mechanism_type_code;
1231: END IF;
1232:
1233: stmt:=50;
1234: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.update_allowed,
1235:
1236: l_Header_Adj_rec.update_allowed)
1237: THEN
1238: x_update_allowed := l_x_Header_Adj_rec.update_allowed;
1237: THEN
1238: x_update_allowed := l_x_Header_Adj_rec.update_allowed;
1239: END IF;
1240:
1241: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.updated_flag,
1242:
1243: l_Header_Adj_rec.updated_flag)
1244: THEN
1245: x_updated_flag := l_x_Header_Adj_rec.updated_flag;
1244: THEN
1245: x_updated_flag := l_x_Header_Adj_rec.updated_flag;
1246: END IF;
1247: stmt:=55;
1248: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.modified_from,
1249:
1250: l_Header_Adj_rec.modified_from)
1251: THEN
1252: x_modified_from := l_x_Header_Adj_rec.modified_from;
1251: THEN
1252: x_modified_from := l_x_Header_Adj_rec.modified_from;
1253: END IF;
1254:
1255: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.modified_to,
1256:
1257: l_Header_Adj_rec.modified_to)
1258: THEN
1259: x_modified_to := l_x_Header_Adj_rec.modified_to;
1258: THEN
1259: x_modified_to := l_x_Header_Adj_rec.modified_to;
1260: END IF;
1261: stmt:=60;
1262: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.applied_flag,
1263: l_Header_Adj_rec.applied_flag)
1264: THEN
1265: x_applied_flag := l_x_Header_Adj_rec.applied_flag;
1266: END IF;
1264: THEN
1265: x_applied_flag := l_x_Header_Adj_rec.applied_flag;
1266: END IF;
1267: stmt:=65;
1268: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.change_reason_code,
1269: l_Header_Adj_rec.change_reason_code)
1270: THEN
1271: x_change_reason_code := l_x_Header_Adj_rec.change_reason_code;
1272: END IF;
1270: THEN
1271: x_change_reason_code := l_x_Header_Adj_rec.change_reason_code;
1272: END IF;
1273:
1274: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.change_reason_text,
1275: l_Header_Adj_rec.change_reason_text)
1276: THEN
1277: x_change_reason_text := l_x_Header_Adj_rec.change_reason_text;
1278: END IF;
1276: THEN
1277: x_change_reason_text := l_x_Header_Adj_rec.change_reason_text;
1278: END IF;
1279: stmt:=70;
1280: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.operand,
1281: l_Header_Adj_rec.operand)
1282: THEN
1283: x_operand := l_x_Header_Adj_rec.operand;
1284: END IF;
1282: THEN
1283: x_operand := l_x_Header_Adj_rec.operand;
1284: END IF;
1285:
1286: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.arithmetic_operator,
1287: l_Header_Adj_rec.arithmetic_operator)
1288: THEN
1289: x_arithmetic_operator := l_x_Header_Adj_rec.arithmetic_operator;
1290: END IF;
1291:
1292:
1293: -- Return changed attributes.
1294:
1295: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute1,
1296: l_Header_Adj_rec.attribute1)
1297: THEN
1298: x_attribute1 := l_x_Header_Adj_rec.attribute1;
1299: END IF;
1297: THEN
1298: x_attribute1 := l_x_Header_Adj_rec.attribute1;
1299: END IF;
1300: stmt:=75;
1301: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute10,
1302: l_Header_Adj_rec.attribute10)
1303: THEN
1304: x_attribute10 := l_x_Header_Adj_rec.attribute10;
1305: END IF;
1303: THEN
1304: x_attribute10 := l_x_Header_Adj_rec.attribute10;
1305: END IF;
1306:
1307: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute11,
1308: l_Header_Adj_rec.attribute11)
1309: THEN
1310: x_attribute11 := l_x_Header_Adj_rec.attribute11;
1311: END IF;
1309: THEN
1310: x_attribute11 := l_x_Header_Adj_rec.attribute11;
1311: END IF;
1312:
1313: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute12,
1314: l_Header_Adj_rec.attribute12)
1315: THEN
1316: x_attribute12 := l_x_Header_Adj_rec.attribute12;
1317: END IF;
1315: THEN
1316: x_attribute12 := l_x_Header_Adj_rec.attribute12;
1317: END IF;
1318: stmt:=80;
1319: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute13,
1320: l_Header_Adj_rec.attribute13)
1321: THEN
1322: x_attribute13 := l_x_Header_Adj_rec.attribute13;
1323: END IF;
1321: THEN
1322: x_attribute13 := l_x_Header_Adj_rec.attribute13;
1323: END IF;
1324:
1325: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute14,
1326: l_Header_Adj_rec.attribute14)
1327: THEN
1328: x_attribute14 := l_x_Header_Adj_rec.attribute14;
1329: END IF;
1327: THEN
1328: x_attribute14 := l_x_Header_Adj_rec.attribute14;
1329: END IF;
1330: stmt:=85;
1331: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute15,
1332: l_Header_Adj_rec.attribute15)
1333: THEN
1334: x_attribute15 := l_x_Header_Adj_rec.attribute15;
1335: END IF;
1333: THEN
1334: x_attribute15 := l_x_Header_Adj_rec.attribute15;
1335: END IF;
1336:
1337: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute2,
1338: l_Header_Adj_rec.attribute2)
1339: THEN
1340: x_attribute2 := l_x_Header_Adj_rec.attribute2;
1341: END IF;
1339: THEN
1340: x_attribute2 := l_x_Header_Adj_rec.attribute2;
1341: END IF;
1342:
1343: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute3,
1344: l_Header_Adj_rec.attribute3)
1345: THEN
1346: x_attribute3 := l_x_Header_Adj_rec.attribute3;
1347: END IF;
1345: THEN
1346: x_attribute3 := l_x_Header_Adj_rec.attribute3;
1347: END IF;
1348:
1349: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute4,
1350: l_Header_Adj_rec.attribute4)
1351: THEN
1352: x_attribute4 := l_x_Header_Adj_rec.attribute4;
1353: END IF;
1351: THEN
1352: x_attribute4 := l_x_Header_Adj_rec.attribute4;
1353: END IF;
1354:
1355: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute5,
1356: l_Header_Adj_rec.attribute5)
1357: THEN
1358: x_attribute5 := l_x_Header_Adj_rec.attribute5;
1359: END IF;
1357: THEN
1358: x_attribute5 := l_x_Header_Adj_rec.attribute5;
1359: END IF;
1360:
1361: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute6,
1362: l_Header_Adj_rec.attribute6)
1363: THEN
1364: x_attribute6 := l_x_Header_Adj_rec.attribute6;
1365: END IF;
1363: THEN
1364: x_attribute6 := l_x_Header_Adj_rec.attribute6;
1365: END IF;
1366:
1367: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute7,
1368: l_Header_Adj_rec.attribute7)
1369: THEN
1370: x_attribute7 := l_x_Header_Adj_rec.attribute7;
1371: END IF;
1369: THEN
1370: x_attribute7 := l_x_Header_Adj_rec.attribute7;
1371: END IF;
1372:
1373: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute8,
1374: l_Header_Adj_rec.attribute8)
1375: THEN
1376: x_attribute8 := l_x_Header_Adj_rec.attribute8;
1377: END IF;
1375: THEN
1376: x_attribute8 := l_x_Header_Adj_rec.attribute8;
1377: END IF;
1378:
1379: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.attribute9,
1380: l_Header_Adj_rec.attribute9)
1381: THEN
1382: x_attribute9 := l_x_Header_Adj_rec.attribute9;
1383: END IF;
1381: THEN
1382: x_attribute9 := l_x_Header_Adj_rec.attribute9;
1383: END IF;
1384:
1385: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.automatic_flag,
1386: l_Header_Adj_rec.automatic_flag)
1387: THEN
1388: x_automatic_flag := l_x_Header_Adj_rec.automatic_flag;
1389: END IF;
1387: THEN
1388: x_automatic_flag := l_x_Header_Adj_rec.automatic_flag;
1389: END IF;
1390:
1391: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.context,
1392: l_Header_Adj_rec.context)
1393: THEN
1394: x_context := l_x_Header_Adj_rec.context;
1395: END IF;
1393: THEN
1394: x_context := l_x_Header_Adj_rec.context;
1395: END IF;
1396: stmt:=95;
1397: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.discount_id,
1398: l_Header_Adj_rec.discount_id)
1399: THEN
1400: x_discount_id := l_x_Header_Adj_rec.discount_id;
1401: x_discount := l_Header_Adj_val_rec.discount;
1400: x_discount_id := l_x_Header_Adj_rec.discount_id;
1401: x_discount := l_Header_Adj_val_rec.discount;
1402: END IF;
1403:
1404: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.discount_line_id,
1405: l_Header_Adj_rec.discount_line_id)
1406: THEN
1407: x_discount_line_id := l_x_Header_Adj_rec.discount_line_id;
1408: END IF;
1406: THEN
1407: x_discount_line_id := l_x_Header_Adj_rec.discount_line_id;
1408: END IF;
1409:
1410: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.header_id,
1411: l_Header_Adj_rec.header_id)
1412: THEN
1413: x_header_id := l_x_Header_Adj_rec.header_id;
1414: END IF;
1412: THEN
1413: x_header_id := l_x_Header_Adj_rec.header_id;
1414: END IF;
1415: stmt:=100;
1416: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.line_id,
1417: l_Header_Adj_rec.line_id)
1418: THEN
1419: x_line_id := l_x_Header_Adj_rec.line_id;
1420: END IF;
1418: THEN
1419: x_line_id := l_x_Header_Adj_rec.line_id;
1420: END IF;
1421:
1422: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.percent,
1423: l_Header_Adj_rec.percent)
1424: THEN
1425: x_percent := l_x_Header_Adj_rec.percent;
1426: END IF;
1424: THEN
1425: x_percent := l_x_Header_Adj_rec.percent;
1426: END IF;
1427:
1428: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.price_adjustment_id,
1429: l_Header_Adj_rec.price_adjustment_id)
1430: THEN
1431: x_price_adjustment_id := l_x_Header_Adj_rec.price_adjustment_id;
1432: END IF;
1431: x_price_adjustment_id := l_x_Header_Adj_rec.price_adjustment_id;
1432: END IF;
1433:
1434:
1435: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.adjusted_amount,
1436: l_Header_Adj_rec.adjusted_amount)
1437: THEN
1438: x_adjusted_amount := l_x_Header_Adj_rec.adjusted_amount;
1439: END IF;
1437: THEN
1438: x_adjusted_amount := l_x_Header_Adj_rec.adjusted_amount;
1439: END IF;
1440:
1441: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.pricing_phase_id,
1442: l_Header_Adj_rec.pricing_phase_id)
1443: THEN
1444: x_pricing_phase_id := l_x_Header_Adj_rec.pricing_phase_id;
1445: END IF;
1443: THEN
1444: x_pricing_phase_id := l_x_Header_Adj_rec.pricing_phase_id;
1445: END IF;
1446:
1447: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.list_line_no, l_Header_Adj_rec.list_line_no)
1448: THEN
1449: x_list_line_no := l_x_Header_Adj_rec.list_line_no;
1450: END IF;
1451:
1448: THEN
1449: x_list_line_no := l_x_Header_Adj_rec.list_line_no;
1450: END IF;
1451:
1452: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.source_system_code, l_Header_Adj_rec.source_system_code)
1453: THEN
1454: x_source_system_code := l_x_Header_Adj_rec.source_system_code;
1455: END IF;
1456:
1453: THEN
1454: x_source_system_code := l_x_Header_Adj_rec.source_system_code;
1455: END IF;
1456:
1457: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.benefit_qty, l_Header_Adj_rec.benefit_qty)
1458: THEN
1459: x_benefit_qty := l_x_Header_Adj_rec.benefit_qty;
1460: END IF;
1461:
1458: THEN
1459: x_benefit_qty := l_x_Header_Adj_rec.benefit_qty;
1460: END IF;
1461:
1462: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.benefit_uom_code, l_Header_Adj_rec.benefit_uom_code)
1463: THEN
1464: x_benefit_uom_code := l_x_Header_Adj_rec.benefit_uom_code;
1465: END IF;
1466:
1463: THEN
1464: x_benefit_uom_code := l_x_Header_Adj_rec.benefit_uom_code;
1465: END IF;
1466:
1467: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.print_on_invoice_flag, l_Header_Adj_rec.print_on_invoice_flag)
1468: THEN
1469: x_print_on_invoice_flag := l_x_Header_Adj_rec.print_on_invoice_flag;
1470: END IF;
1471:
1468: THEN
1469: x_print_on_invoice_flag := l_x_Header_Adj_rec.print_on_invoice_flag;
1470: END IF;
1471:
1472: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.expiration_date, l_Header_Adj_rec.expiration_date)
1473: THEN
1474: x_expiration_date := l_x_Header_Adj_rec.expiration_date;
1475: END IF;
1476:
1473: THEN
1474: x_expiration_date := l_x_Header_Adj_rec.expiration_date;
1475: END IF;
1476:
1477: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.rebate_transaction_type_code, l_Header_Adj_rec.rebate_transaction_type_code)
1478: THEN
1479: x_rebate_transaction_type_code := l_x_Header_Adj_rec.rebate_transaction_type_code;
1480: END IF;
1481:
1478: THEN
1479: x_rebate_transaction_type_code := l_x_Header_Adj_rec.rebate_transaction_type_code;
1480: END IF;
1481:
1482: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.rebate_transaction_reference, l_Header_Adj_rec.rebate_transaction_reference)
1483: THEN
1484: x_rebate_transaction_reference := l_x_Header_Adj_rec.rebate_transaction_reference;
1485: END IF;
1486:
1483: THEN
1484: x_rebate_transaction_reference := l_x_Header_Adj_rec.rebate_transaction_reference;
1485: END IF;
1486:
1487: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.rebate_payment_system_code, l_Header_Adj_rec.rebate_payment_system_code)
1488: THEN
1489: x_rebate_payment_system_code := l_x_Header_Adj_rec.rebate_payment_system_code;
1490: END IF;
1491:
1488: THEN
1489: x_rebate_payment_system_code := l_x_Header_Adj_rec.rebate_payment_system_code;
1490: END IF;
1491:
1492: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.redeemed_date, l_Header_Adj_rec.redeemed_date)
1493: THEN
1494: x_redeemed_date := l_x_Header_Adj_rec.redeemed_date;
1495: END IF;
1496:
1493: THEN
1494: x_redeemed_date := l_x_Header_Adj_rec.redeemed_date;
1495: END IF;
1496:
1497: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.redeemed_flag, l_Header_Adj_rec.redeemed_flag)
1498: THEN
1499: x_redeemed_flag := l_x_Header_Adj_rec.redeemed_flag;
1500: END IF;
1501:
1498: THEN
1499: x_redeemed_flag := l_x_Header_Adj_rec.redeemed_flag;
1500: END IF;
1501:
1502: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.accrual_flag, l_Header_Adj_rec.accrual_flag)
1503: THEN
1504: x_accrual_flag := l_x_Header_Adj_rec.accrual_flag;
1505: END IF;
1506:
1503: THEN
1504: x_accrual_flag := l_x_Header_Adj_rec.accrual_flag;
1505: END IF;
1506:
1507: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.estimated_flag, l_Header_Adj_rec.estimated_flag)
1508: THEN
1509: x_estimated_flag := l_x_Header_Adj_rec.estimated_flag;
1510: END IF;
1511:
1508: THEN
1509: x_estimated_flag := l_x_Header_Adj_rec.estimated_flag;
1510: END IF;
1511:
1512: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.invoiced_flag, l_Header_Adj_rec.invoiced_flag)
1513: THEN
1514: x_invoiced_flag := l_x_Header_Adj_rec.invoiced_flag;
1515: END IF;
1516:
1513: THEN
1514: x_invoiced_flag := l_x_Header_Adj_rec.invoiced_flag;
1515: END IF;
1516:
1517: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.charge_type_code, l_Header_Adj_rec.charge_type_code)
1518: THEN
1519: x_charge_type_code := l_x_Header_Adj_rec.charge_type_code;
1520: END IF;
1521:
1518: THEN
1519: x_charge_type_code := l_x_Header_Adj_rec.charge_type_code;
1520: END IF;
1521:
1522: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.charge_subtype_code, l_Header_Adj_rec.charge_subtype_code)
1523: THEN
1524: x_charge_subtype_code := l_x_Header_Adj_rec.charge_subtype_code;
1525: END IF;
1526:
1523: THEN
1524: x_charge_subtype_code := l_x_Header_Adj_rec.charge_subtype_code;
1525: END IF;
1526:
1527: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.credit_or_charge_flag, l_Header_Adj_rec.credit_or_charge_flag)
1528: THEN
1529: x_credit_or_charge_flag := l_x_Header_Adj_rec.credit_or_charge_flag;
1530: END IF;
1531:
1528: THEN
1529: x_credit_or_charge_flag := l_x_Header_Adj_rec.credit_or_charge_flag;
1530: END IF;
1531:
1532: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.include_on_returns_flag, l_Header_Adj_rec.include_on_returns_flag)
1533: THEN
1534: x_include_on_returns_flag := l_x_Header_Adj_rec.include_on_returns_flag;
1535: END IF;
1536:
1533: THEN
1534: x_include_on_returns_flag := l_x_Header_Adj_rec.include_on_returns_flag;
1535: END IF;
1536:
1537: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute1,
1538: l_Header_Adj_rec.ac_attribute1)
1539: THEN
1540: x_ac_attribute1 := l_x_Header_Adj_rec.ac_attribute1;
1541: END IF;
1539: THEN
1540: x_ac_attribute1 := l_x_Header_Adj_rec.ac_attribute1;
1541: END IF;
1542:
1543: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute10,
1544: l_Header_Adj_rec.ac_attribute10)
1545: THEN
1546: x_ac_attribute10 := l_x_Header_Adj_rec.ac_attribute10;
1547: END IF;
1545: THEN
1546: x_ac_attribute10 := l_x_Header_Adj_rec.ac_attribute10;
1547: END IF;
1548:
1549: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute11,
1550: l_Header_Adj_rec.ac_attribute11)
1551: THEN
1552: x_ac_attribute11 := l_x_Header_Adj_rec.ac_attribute11;
1553: END IF;
1551: THEN
1552: x_ac_attribute11 := l_x_Header_Adj_rec.ac_attribute11;
1553: END IF;
1554:
1555: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute12,
1556: l_Header_Adj_rec.ac_attribute12)
1557: THEN
1558: x_ac_attribute12 := l_x_Header_Adj_rec.ac_attribute12;
1559: END IF;
1557: THEN
1558: x_ac_attribute12 := l_x_Header_Adj_rec.ac_attribute12;
1559: END IF;
1560:
1561: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute13,
1562: l_Header_Adj_rec.ac_attribute13)
1563: THEN
1564: x_ac_attribute13 := l_x_Header_Adj_rec.ac_attribute13;
1565: END IF;
1563: THEN
1564: x_ac_attribute13 := l_x_Header_Adj_rec.ac_attribute13;
1565: END IF;
1566:
1567: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute14,
1568: l_Header_Adj_rec.ac_attribute14)
1569: THEN
1570: x_ac_attribute14 := l_x_Header_Adj_rec.ac_attribute14;
1571: END IF;
1569: THEN
1570: x_ac_attribute14 := l_x_Header_Adj_rec.ac_attribute14;
1571: END IF;
1572:
1573: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute15,
1574: l_Header_Adj_rec.ac_attribute15)
1575: THEN
1576: x_ac_attribute15 := l_x_Header_Adj_rec.ac_attribute15;
1577: END IF;
1575: THEN
1576: x_ac_attribute15 := l_x_Header_Adj_rec.ac_attribute15;
1577: END IF;
1578:
1579: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute2,
1580: l_Header_Adj_rec.ac_attribute2)
1581: THEN
1582: x_ac_attribute2 := l_x_Header_Adj_rec.ac_attribute2;
1583: END IF;
1581: THEN
1582: x_ac_attribute2 := l_x_Header_Adj_rec.ac_attribute2;
1583: END IF;
1584:
1585: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute3,
1586: l_Header_Adj_rec.ac_attribute3)
1587: THEN
1588: x_ac_attribute3 := l_x_Header_Adj_rec.ac_attribute3;
1589: END IF;
1587: THEN
1588: x_ac_attribute3 := l_x_Header_Adj_rec.ac_attribute3;
1589: END IF;
1590:
1591: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute4,
1592: l_Header_Adj_rec.ac_attribute4)
1593: THEN
1594: x_ac_attribute4 := l_x_Header_Adj_rec.ac_attribute4;
1595: END IF;
1593: THEN
1594: x_ac_attribute4 := l_x_Header_Adj_rec.ac_attribute4;
1595: END IF;
1596:
1597: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute5,
1598: l_Header_Adj_rec.ac_attribute5)
1599: THEN
1600: x_ac_attribute5 := l_x_Header_Adj_rec.ac_attribute5;
1601: END IF;
1599: THEN
1600: x_ac_attribute5 := l_x_Header_Adj_rec.ac_attribute5;
1601: END IF;
1602:
1603: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute6,
1604: l_Header_Adj_rec.ac_attribute6)
1605: THEN
1606: x_ac_attribute6 := l_x_Header_Adj_rec.ac_attribute6;
1607: END IF;
1605: THEN
1606: x_ac_attribute6 := l_x_Header_Adj_rec.ac_attribute6;
1607: END IF;
1608:
1609: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute7,
1610: l_Header_Adj_rec.ac_attribute7)
1611: THEN
1612: x_ac_attribute7 := l_x_Header_Adj_rec.ac_attribute7;
1613: END IF;
1611: THEN
1612: x_ac_attribute7 := l_x_Header_Adj_rec.ac_attribute7;
1613: END IF;
1614:
1615: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute8,
1616: l_Header_Adj_rec.ac_attribute8)
1617: THEN
1618: x_ac_attribute8 := l_x_Header_Adj_rec.ac_attribute8;
1619: END IF;
1617: THEN
1618: x_ac_attribute8 := l_x_Header_Adj_rec.ac_attribute8;
1619: END IF;
1620:
1621: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_attribute9,
1622: l_Header_Adj_rec.ac_attribute9)
1623: THEN
1624: x_ac_attribute9 := l_x_Header_Adj_rec.ac_attribute9;
1625: END IF;
1623: THEN
1624: x_ac_attribute9 := l_x_Header_Adj_rec.ac_attribute9;
1625: END IF;
1626:
1627: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.ac_context,
1628: l_Header_Adj_rec.ac_context)
1629: THEN
1630: x_ac_context := l_x_Header_Adj_rec.ac_context;
1631: END IF;
1630: x_ac_context := l_x_Header_Adj_rec.ac_context;
1631: END IF;
1632: stmt:=120;
1633: --uom begin
1634: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.operand_per_pqty,
1635: l_Header_Adj_rec.operand_per_pqty)
1636: THEN
1637: x_operand_per_pqty := l_x_Header_Adj_rec.operand_per_pqty;
1638: END IF;
1636: THEN
1637: x_operand_per_pqty := l_x_Header_Adj_rec.operand_per_pqty;
1638: END IF;
1639:
1640: IF NOT OE_GLOBALS.Equal(l_x_Header_Adj_rec.adjusted_amount_per_pqty,
1641: l_Header_Adj_rec.adjusted_amount_per_pqty)
1642: THEN
1643: x_adjusted_amount_per_pqty := l_x_Header_Adj_rec.adjusted_amount_per_pqty;
1644: END IF;
1653: );
1654:
1655: stmt:=140;
1656: -- Re-set the UI flag to FALSE
1657: OE_GLOBALS.G_UI_FLAG := FALSE;
1658:
1659: -- Set return status.
1660: x_return_status := FND_API.G_RET_STS_SUCCESS;
1661:
1673: EXCEPTION
1674:
1675: WHEN FND_API.G_EXC_ERROR THEN
1676:
1677: OE_GLOBALS.G_UI_FLAG := FALSE;
1678:
1679: x_return_status := FND_API.G_RET_STS_ERROR;
1680:
1681: -- Get message count and data
1704: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1705: IF l_debug_level > 0 THEN
1706: oe_debug_pub.add( 'STMT:'||STMT ) ;
1707: END IF;
1708: OE_GLOBALS.G_UI_FLAG := FALSE;
1709:
1710: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1711:
1712: -- Get message count and data
1725: ROLLBACK TO SAVEPOINT change_attributes;
1726:
1727: WHEN OTHERS THEN
1728:
1729: OE_GLOBALS.G_UI_FLAG := FALSE;
1730:
1731: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1732:
1733: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1792: l_x_old_Header_Adj_rec OE_Order_PUB.Header_Adj_Rec_Type;
1793: l_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
1794: l_old_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
1795: l_x_old_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
1796: l_control_rec OE_GLOBALS.Control_Rec_Type;
1797: l_return_status VARCHAR2(1);
1798: l_action_request_tbl OE_Order_PUB.Request_Tbl_Type;
1799: l_x_header_rec OE_Order_PUB.Header_Rec_Type;
1800: l_x_Header_Adj_rec OE_Order_PUB.Header_Adj_Rec_Type;
1830: oe_debug_pub.add( 'ENTERING OE_OE_FORM_HEADER_ADJ.VALIDATE_AND_WRITE' , 1 ) ;
1831: END IF;
1832:
1833: -- Set the UI flag
1834: OE_GLOBALS.G_UI_FLAG := TRUE;
1835:
1836: -- Set control flags.
1837: l_control_rec.controlled_operation := TRUE;
1838: l_control_rec.validate_entity := TRUE;
1842: l_control_rec.clear_dependents := FALSE;
1843: l_control_rec.default_attributes := FALSE;
1844: l_control_rec.change_attributes := FALSE;
1845: l_control_rec.process := FALSE;
1846: l_control_rec.process_entity := OE_GLOBALS.G_ENTITY_HEADER_ADJ;
1847:
1848:
1849: -- Instruct API to retain its caches
1850: l_control_rec.clear_api_cache := FALSE;
1874: IF(l_x_Header_Adj_rec.db_flag= FND_API.G_MISS_CHAR) THEN
1875: return;
1876: ELSE
1877: IF FND_API.To_Boolean(l_x_Header_Adj_rec.db_flag) THEN
1878: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1879: ELSE
1880: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_CREATE;
1881: END IF;
1882: END IF;
1876: ELSE
1877: IF FND_API.To_Boolean(l_x_Header_Adj_rec.db_flag) THEN
1878: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1879: ELSE
1880: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_CREATE;
1881: END IF;
1882: END IF;
1883: --3340264}
1884:
1964:
1965: x_lock_control := l_x_Header_Adj_rec.lock_control;
1966:
1967: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
1968: (p_request_type => OE_GLOBALS.G_CHECK_PERCENTAGE
1969: ,p_delete => FND_API.G_TRUE
1970: ,x_return_status => l_return_status
1971: );
1972: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1977:
1978: --TaxER start
1979: IF nvl(FND_PROFILE.VALUE('ONT_DELAY_TAX_CALC'), 'N') = 'N' THEN
1980: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
1981: (p_request_type => OE_GLOBALS.G_TAX_LINE
1982: ,p_delete => FND_API.G_TRUE
1983: ,x_return_status => l_return_status
1984: );
1985: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1991: --TaxER end
1992:
1993: -- fixed bug 3271297
1994: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
1995: (p_request_type => OE_GLOBALS.G_VERIFY_PAYMENT
1996: ,p_delete => FND_API.G_TRUE
1997: ,x_return_status => l_return_status
1998: );
1999: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2004:
2005: /*****
2006: IF p_ok_flag = 'Y' THEN
2007: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
2008: (p_request_type => OE_GLOBALS.G_PRICE_ADJ
2009: ,p_delete => FND_API.G_TRUE
2010: ,x_return_status => l_return_status
2011: );
2012: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2032: Clear_Header_Adj;
2033:
2034:
2035: -- Re-set the UI flag to FALSE
2036: OE_GLOBALS.G_UI_FLAG := FALSE;
2037:
2038: -- Set return status.
2039: x_return_status := FND_API.G_RET_STS_SUCCESS;
2040:
2052: EXCEPTION
2053:
2054: WHEN FND_API.G_EXC_ERROR THEN
2055:
2056: OE_GLOBALS.G_UI_FLAG := FALSE;
2057:
2058: x_return_status := FND_API.G_RET_STS_ERROR;
2059:
2060: -- Get message count and data
2067: ROLLBACK TO SAVEPOINT validate_and_write;
2068:
2069: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2070:
2071: OE_GLOBALS.G_UI_FLAG := FALSE;
2072:
2073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2074:
2075: -- Get message count and data
2082: ROLLBACK TO SAVEPOINT validate_and_write;
2083:
2084: WHEN OTHERS THEN
2085:
2086: OE_GLOBALS.G_UI_FLAG := FALSE;
2087:
2088: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2089:
2090: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2123: )
2124: IS
2125: l_Header_Adj_rec OE_Order_PUB.Header_Adj_Rec_Type;
2126: l_Header_Adj_tbl OE_Order_PUB.Header_Adj_Tbl_Type;
2127: l_control_rec OE_GLOBALS.Control_Rec_Type;
2128: l_return_status VARCHAR2(1);
2129: l_action_request_tbl OE_Order_PUB.Request_Tbl_Type;
2130: l_x_header_rec OE_Order_PUB.Header_Rec_Type;
2131: l_x_Header_Adj_rec OE_Order_PUB.Header_Adj_Rec_Type;
2163: oe_debug_pub.add( 'ENTERING OE_OE_FORM_HEADER_ADJ.DELETE_ROW' , 1 ) ;
2164: END IF;
2165:
2166: -- Set the UI flag
2167: OE_GLOBALS.G_UI_FLAG := TRUE;
2168:
2169: -- Set control flags.
2170: l_control_rec.controlled_operation := TRUE;
2171: l_control_rec.check_security := TRUE;
2191: );
2192:
2193:
2194: -- Set Operation.
2195: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_DELETE;
2196:
2197:
2198: -- Populate Header_Adj table
2199: l_x_Header_Adj_tbl(1) := l_x_Header_Adj_rec;
2255: Clear_Header_Adj;
2256:
2257:
2258: -- Re-set the UI flag to FALSE
2259: OE_GLOBALS.G_UI_FLAG := FALSE;
2260:
2261: -- Set return status.
2262: x_return_status := FND_API.G_RET_STS_SUCCESS;
2263:
2275: EXCEPTION
2276:
2277: WHEN FND_API.G_EXC_ERROR THEN
2278:
2279: OE_GLOBALS.G_UI_FLAG := FALSE;
2280:
2281: x_return_status := FND_API.G_RET_STS_ERROR;
2282:
2283: -- Get message count and data
2287: );
2288:
2289: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2290:
2291: OE_GLOBALS.G_UI_FLAG := FALSE;
2292:
2293: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2294:
2295: -- Get message count and data
2299: );
2300:
2301: WHEN OTHERS THEN
2302:
2303: OE_GLOBALS.G_UI_FLAG := FALSE;
2304:
2305: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2306:
2307: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2334:
2335: , p_header_id IN NUMBER
2336: )
2337: IS
2338: l_control_rec OE_GLOBALS.Control_Rec_Type;
2339: l_return_status VARCHAR2(1);
2340: l_action_request_tbl OE_Order_PUB.Request_Tbl_Type;
2341: l_request_rec OE_Order_Pub.Request_Rec_Type;
2342: l_request_tbl OE_Order_Pub.Request_Tbl_Type;
2374: END IF;
2375:
2376: /*
2377: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
2378: (p_request_type => OE_GLOBALS.G_PRICE_ADJ
2379: ,p_delete => FND_API.G_TRUE
2380: ,x_return_status => l_return_status
2381: );
2382: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2386: END IF;
2387:
2388: -- process delayed requests for tax calculation.
2389: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
2390: (p_request_type => OE_GLOBALS.G_TAX_LINE
2391: ,p_delete => FND_API.G_TRUE
2392: ,x_return_status => l_return_status
2393: );
2394: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2398: END IF;
2399:
2400: oe_debug_pub.ADD('Processing delayed request for Verify Payment for price adjustments changes.', 3);
2401: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
2402: (p_request_type => OE_GLOBALS.G_VERIFY_PAYMENT
2403: ,p_delete => FND_API.G_TRUE
2404: ,x_return_status => l_return_status
2405: );
2406: */
2433:
2434: /*
2435:
2436: -- Set the UI flag
2437: OE_GLOBALS.G_UI_FLAG := TRUE;
2438:
2439: -- Set control flags.
2440:
2441: l_control_rec.controlled_operation := TRUE;
2439: -- Set control flags.
2440:
2441: l_control_rec.controlled_operation := TRUE;
2442: l_control_rec.process := TRUE;
2443: l_control_rec.process_entity := OE_GLOBALS.G_ENTITY_HEADER_ADJ;
2444:
2445: l_control_rec.check_security := FALSE;
2446: l_control_rec.clear_dependents := FALSE;
2447: l_control_rec.default_attributes := FALSE;
2455: l_control_rec.clear_api_requests := FALSE;
2456:
2457:
2458: -- Assign requests in the order that is to be executed
2459: l_request_rec.request_type := OE_GLOBALS.G_CHECK_PERCENTAGE;
2460:
2461: -- 1905650
2462: -- G_PRICE_ADJ request should be logged using entity ALL
2463: l_request_rec.entity_code := OE_GLOBALS.G_ENTITY_ALL;
2459: l_request_rec.request_type := OE_GLOBALS.G_CHECK_PERCENTAGE;
2460:
2461: -- 1905650
2462: -- G_PRICE_ADJ request should be logged using entity ALL
2463: l_request_rec.entity_code := OE_GLOBALS.G_ENTITY_ALL;
2464: l_request_rec.entity_id := p_header_id;
2465: l_request_tbl(1) := l_request_rec;
2466:
2467: l_request_rec.request_type := OE_GLOBALS.G_PRICE_ADJ;
2463: l_request_rec.entity_code := OE_GLOBALS.G_ENTITY_ALL;
2464: l_request_rec.entity_id := p_header_id;
2465: l_request_tbl(1) := l_request_rec;
2466:
2467: l_request_rec.request_type := OE_GLOBALS.G_PRICE_ADJ;
2468: l_request_rec.entity_code := OE_GLOBALS.G_ENTITY_HEADER_ADJ;
2469: l_request_rec.entity_id := p_header_id;
2470: l_request_tbl(2) := l_request_rec;
2471:
2464: l_request_rec.entity_id := p_header_id;
2465: l_request_tbl(1) := l_request_rec;
2466:
2467: l_request_rec.request_type := OE_GLOBALS.G_PRICE_ADJ;
2468: l_request_rec.entity_code := OE_GLOBALS.G_ENTITY_HEADER_ADJ;
2469: l_request_rec.entity_id := p_header_id;
2470: l_request_tbl(2) := l_request_rec;
2471:
2472:
2509: END IF;
2510:
2511:
2512: -- Re-set the UI flag to FALSE
2513: OE_GLOBALS.G_UI_FLAG := FALSE;
2514:
2515: -- Set return status.
2516:
2517: x_return_status := FND_API.G_RET_STS_SUCCESS;
2530: EXCEPTION
2531:
2532: WHEN FND_API.G_EXC_ERROR THEN
2533:
2534: OE_GLOBALS.G_UI_FLAG := FALSE;
2535:
2536: x_return_status := FND_API.G_RET_STS_ERROR;
2537:
2538: -- Get message count and data
2543: );
2544:
2545: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2546:
2547: OE_GLOBALS.G_UI_FLAG := FALSE;
2548:
2549: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2550:
2551: -- Get message count and data
2556: );
2557:
2558: WHEN OTHERS THEN
2559:
2560: OE_GLOBALS.G_UI_FLAG := FALSE;
2561:
2562: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2563:
2564: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2610: END IF;
2611:
2612: -- Load Header_Adj record
2613:
2614: l_x_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_LOCK;
2615:
2616: l_x_Header_Adj_rec.lock_control := p_lock_control;
2617: l_x_Header_Adj_rec.price_adjustment_id := p_price_adjustment_id;
2618: