DBA Data[Home] [Help]

APPS.OE_ADV_PRICE_PVT dependencies on OE_GLOBALS

Line 46: p_control_rec IN OUT NOCOPY OE_GLOBALS.Control_Rec_Type,

42: p_old_header_rec OE_Order_Pub.Header_Rec_Type,
43: px_header_rec IN OUT NOCOPY OE_Order_Pub.Header_Rec_Type,
44: px_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_Tbl_Type,
45: px_old_line_tbl IN OUT NOCOPY OE_Order_Pub.Line_Tbl_Type,
46: p_control_rec IN OUT NOCOPY OE_GLOBALS.Control_Rec_Type,
47: x_return_status OUT NOCOPY VARCHAR2)
48: IS
49: lx_old_header_rec OE_Order_Pub.Header_Rec_Type := p_old_header_rec;
50: l_line_index NUMBER;

Line 70: IF nvl(px_line_tbl(l_line_index).operation,OE_GLOBALS.G_OPR_NONE) = OE_GLOBALS.G_OPR_NONE THEN

66: END IF;
67: IF px_line_tbl.COUNT > 0 THEN
68: l_line_index := px_line_tbl.first;
69: while l_line_index is not null loop
70: IF nvl(px_line_tbl(l_line_index).operation,OE_GLOBALS.G_OPR_NONE) = OE_GLOBALS.G_OPR_NONE THEN
71: IF l_debug_level > 0 THEN
72: oe_debug_pub.add('Operation none or null:'||px_line_tbl(l_line_index).line_id||' from px_line_tbl' , 1 ) ;
73: END IF;
74: --Do nothing on this line. None operation

Line 103: p_control_rec.process_entity := OE_GLOBALS.G_ENTITY_HEADER;

99: p_control_rec.controlled_operation := TRUE;
100: p_control_rec.change_attributes := TRUE;
101: p_control_rec.validate_entity := TRUE;
102: p_control_rec.write_to_DB := TRUE;
103: p_control_rec.process_entity := OE_GLOBALS.G_ENTITY_HEADER;
104: p_control_rec.process := FALSE; --bug 2866986 added to set process flag to false
105:
106: OE_GLOBALS.G_PRICING_RECURSION := 'Y';
107:

Line 106: OE_GLOBALS.G_PRICING_RECURSION := 'Y';

102: p_control_rec.write_to_DB := TRUE;
103: p_control_rec.process_entity := OE_GLOBALS.G_ENTITY_HEADER;
104: p_control_rec.process := FALSE; --bug 2866986 added to set process flag to false
105:
106: OE_GLOBALS.G_PRICING_RECURSION := 'Y';
107:
108: IF l_debug_level > 0 THEN
109: oe_debug_pub.add( 'BEFORE CALLING OE_ORDER_PVT.HEADER' , 1 ) ;
110: oe_debug_pub.add( 'LX_OLD_HEADER_REC.HEADER_ID='||LX_OLD_HEADER_REC.HEADER_ID , 1 ) ;

Line 118: IF (px_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE) Then

114: oe_debug_pub.add( 'PX_HEADER_REC.PAYMENT_TERM_ID='||PX_HEADER_REC.PAYMENT_TERM_ID , 1 ) ;
115: oe_debug_pub.add( 'PX_HEADER_REC.OPERATION='||PX_HEADER_REC.OPERATION , 1 ) ;
116: END IF;
117:
118: IF (px_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE) Then
119: OE_Order_Pvt.Header
120: ( p_validation_level => FND_API.G_VALID_LEVEL_FULL
121: , p_control_rec => p_control_rec
122: , p_x_header_rec => px_header_rec

Line 132: p_control_rec.process_entity := OE_GLOBALS.G_ENTITY_LINE;

128: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
129: RAISE FND_API.G_EXC_ERROR;
130: END IF;
131: END IF;
132: p_control_rec.process_entity := OE_GLOBALS.G_ENTITY_LINE;
133: IF (l_new_line_tbl.count > 0) THEN --bug 2855986 change px_line_tbl to l_new_line_tbl.count
134: OE_Order_Pvt.Lines
135: ( p_validation_level => FND_API.G_VALID_LEVEL_FULL
136: , p_control_rec => p_control_rec

Line 147: OE_GLOBALS.G_PRICING_RECURSION := 'N';

143: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
144: RAISE FND_API.G_EXC_ERROR;
145: END IF;
146: END IF;
147: OE_GLOBALS.G_PRICING_RECURSION := 'N';
148: END IF; -- count > 0
149: End Call_Process_Order;
150:
151:

Line 221: l_Line_Adj_rec.operation := OE_GLOBALS.G_OPR_DELETE;

217: l_index NUMBER;
218: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
219:
220: begin
221: l_Line_Adj_rec.operation := OE_GLOBALS.G_OPR_DELETE;
222: l_Line_Adj_rec.price_adjustment_id := p_price_adjustment_id;
223: OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
224: p_line_adj_rec =>l_line_adj_rec,
225: p_line_adj_id => l_line_adj_rec.price_adjustment_id,

Line 318: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).operation := OE_GLOBALS.G_OPR_UPDATE;

314: --bug 2858712
315: IF (px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).line_set_id IS NULL OR
316: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).line_set_id = FND_API.G_MISS_NUM) THEN
317: set_item_for_iue(px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)),to_number(i.modified_from));
318: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).operation := OE_GLOBALS.G_OPR_UPDATE;
319: --bug 2795409
320: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).change_reason := 'SYSTEM';
321: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).change_comments := 'REPRICING';
322:

Line 339: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).operation := OE_GLOBALS.G_OPR_UPDATE;

335: IF (px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).line_set_id IS NULL OR
336: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).line_set_id = FND_API.G_MISS_NUM) THEN
337:
338: set_item_for_iue(px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)),i.Related_Item_ID);
339: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).operation := OE_GLOBALS.G_OPR_UPDATE;
340: --bug 2795409
341: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).change_reason := 'SYSTEM';
342: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).change_comments := 'REPRICING';
343:

Line 691: px_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;

687: --bug 4190357
688: elsIf i.Substitution_Attribute ='QUALIFIER_ATTRIBUTE10' Then
689: px_header_rec.freight_terms_code := i.Substitution_value_to;
690: End If;
691: px_header_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
692: -- LOOP through all lines, update terms on the line
693: j := px_line_tbl.FIRST;
694: WHILE j Is Not Null loop
695: IF l_debug_level > 0 THEN

Line 732: px_line_tbl(j).operation := OE_GLOBALS.G_OPR_UPDATE;

728: END IF;
729: elsIf i.Substitution_Attribute ='QUALIFIER_ATTRIBUTE10' Then
730: px_line_tbl(j).freight_terms_code := i.Substitution_value_to;
731: End If;
732: px_line_tbl(j).operation := OE_GLOBALS.G_OPR_UPDATE;
733: --bug 2795409
734: px_line_tbl(j).change_reason := 'SYSTEM';
735: px_line_tbl(j).change_comments := 'REPRICING';
736: END IF; -- bug 4271297

Line 756: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).operation := OE_GLOBALS.G_OPR_UPDATE;

752: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).shipping_method_code := i.Substitution_value_to;
753: elsIf i.Substitution_Attribute ='QUALIFIER_ATTRIBUTE10' Then
754: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).freight_terms_code := i.Substitution_value_to;
755: End If;
756: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).operation := OE_GLOBALS.G_OPR_UPDATE;
757: --bug 2795409
758: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).change_reason := 'SYSTEM';
759: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).change_comments := 'REPRICING';
760: End If;

Line 1049: IF (l_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE) THEN

1045: ( l_line_rec.unit_selling_price_per_pqty * l_line_rec.unit_list_percent)/
1046: p_percent_price ;
1047: end if;
1048: /*
1049: IF (l_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE) THEN
1050: begin
1051: select nvl(sum(ordered_quantity),0),nvl(sum(pricing_quantity),0)
1052: into l_tot_qty,l_tot_price_qty
1053: from oe_order_lines

Line 1155: l_line_rec.operation := OE_GLOBALS.G_OPR_NONE;

1151: l_org := l_org_id;
1152: END;
1153: FND_MESSAGE.SET_TOKEN('ORG', l_org);
1154: OE_MSG_PUB.ADD;
1155: l_line_rec.operation := OE_GLOBALS.G_OPR_NONE;
1156: QP_UTIL_PUB.Update_Lines('MAKE_STATUS_INVALID',l_line_rec.line_id,
1157: NULL,NULL);
1158: End;
1159:

Line 1166: IF l_line_rec.operation = OE_GLOBALS.G_OPR_CREATE

1162: so that charges can be applied to the new line. This will be
1163: handled in OEXULINB.pls
1164: */
1165:
1166: IF l_line_rec.operation = OE_GLOBALS.G_OPR_CREATE
1167: THEN
1168: l_line_rec.calculate_price_flag := 'R';
1169: ELSIF (l_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE) THEN
1170: if nvl(l_line_rec.booked_flag, 'N') = 'Y' then

Line 1169: ELSIF (l_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE) THEN

1165:
1166: IF l_line_rec.operation = OE_GLOBALS.G_OPR_CREATE
1167: THEN
1168: l_line_rec.calculate_price_flag := 'R';
1169: ELSIF (l_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE) THEN
1170: if nvl(l_line_rec.booked_flag, 'N') = 'Y' then
1171: l_pricing_event := 'BATCH,BOOK';
1172: else
1173: l_pricing_event := 'BATCH';

Line 1176: p_entity_code =>OE_GLOBALS.G_ENTITY_ALL,

1172: else
1173: l_pricing_event := 'BATCH';
1174: end if;
1175: OE_delayed_requests_Pvt.log_request(
1176: p_entity_code =>OE_GLOBALS.G_ENTITY_ALL,
1177: p_entity_id => l_line_rec.line_Id,
1178: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_ALL,
1179: p_requesting_entity_id => l_line_rec.line_Id,
1180: p_request_unique_key1 => l_pricing_event,

Line 1178: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_ALL,

1174: end if;
1175: OE_delayed_requests_Pvt.log_request(
1176: p_entity_code =>OE_GLOBALS.G_ENTITY_ALL,
1177: p_entity_id => l_line_rec.line_Id,
1178: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_ALL,
1179: p_requesting_entity_id => l_line_rec.line_Id,
1180: p_request_unique_key1 => l_pricing_event,
1181: p_param1 => l_line_rec.header_id,
1182: p_param2 => l_pricing_event,

Line 1183: p_request_type => OE_GLOBALS.G_PRICE_LINE,

1179: p_requesting_entity_id => l_line_rec.line_Id,
1180: p_request_unique_key1 => l_pricing_event,
1181: p_param1 => l_line_rec.header_id,
1182: p_param2 => l_pricing_event,
1183: p_request_type => OE_GLOBALS.G_PRICE_LINE,
1184: x_return_status => l_return_status);
1185: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1186: IF l_debug_level > 0 THEN
1187: oe_debug_pub.add( 'unexp error logging batch event for updated free goods line', 3) ;

Line 1223: l_line_rec.operation := OE_GLOBALS.G_OPR_DELETE;

1219: IF (nvl(l_line_rec.booked_flag, 'N') = 'N') Then
1220: IF l_debug_level > 0 THEN
1221: oe_debug_pub.add( 'DELETE UNBOOKED ORDER' ) ;
1222: END IF;
1223: l_line_rec.operation := OE_GLOBALS.G_OPR_DELETE;
1224: ELSE
1225: l_line_rec.change_reason := 'SYSTEM';
1226: l_line_rec.change_comments := 'REPRICING';
1227: IF (l_line_rec.shipped_quantity IS NULL) THEN

Line 1231: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;

1227: IF (l_line_rec.shipped_quantity IS NULL) THEN
1228: IF l_debug_level > 0 THEN
1229: oe_debug_pub.add( 'CANCEL BOOKED ORDER , LINE NOT SHIPPED' ) ;
1230: END IF;
1231: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1232: BEGIN
1233: IF OE_CODE_CONTROL.Get_Code_Release_Level < '110510' THEN
1234: UPDATE QP_PREQ_LINES_TMP
1235: SET PROCESS_STATUS='NOT_VALID'

Line 1251: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;

1247: ELSE
1248: IF l_debug_level > 0 THEN
1249: oe_debug_pub.add( 'REPRICE BOOKED ORDER , SHIPPED LINE' ) ;
1250: END IF;
1251: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1252: l_line_rec.calculate_price_flag := 'Y';
1253: IF l_debug_level > 0 THEN
1254: oe_debug_pub.add( 'LOGGING DELAYED REQUEST TO PRICE LINE' ) ;
1255: END IF;

Line 1259: p_entity_code =>OE_GLOBALS.G_ENTITY_ALL,

1255: END IF;
1256:
1257: l_pricing_event := 'BATCH,BOOK';
1258: OE_delayed_requests_Pvt.log_request(
1259: p_entity_code =>OE_GLOBALS.G_ENTITY_ALL,
1260: p_entity_id => l_line_rec.line_Id,
1261: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_ALL,
1262: p_requesting_entity_id => l_line_rec.line_Id,
1263: p_request_unique_key1 => l_pricing_event,

Line 1261: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_ALL,

1257: l_pricing_event := 'BATCH,BOOK';
1258: OE_delayed_requests_Pvt.log_request(
1259: p_entity_code =>OE_GLOBALS.G_ENTITY_ALL,
1260: p_entity_id => l_line_rec.line_Id,
1261: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_ALL,
1262: p_requesting_entity_id => l_line_rec.line_Id,
1263: p_request_unique_key1 => l_pricing_event,
1264: p_param1 => l_line_rec.header_id,
1265: p_param2 => l_pricing_event,

Line 1266: p_request_type => OE_GLOBALS.G_PRICE_LINE,

1262: p_requesting_entity_id => l_line_rec.line_Id,
1263: p_request_unique_key1 => l_pricing_event,
1264: p_param1 => l_line_rec.header_id,
1265: p_param2 => l_pricing_event,
1266: p_request_type => OE_GLOBALS.G_PRICE_LINE,
1267: x_return_status => l_return_status);
1268:
1269: end if;
1270: end if;

Line 1385: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;

1381: WHEN OTHERS THEN
1382: NULL;
1383: END;
1384: END IF;
1385: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1386: l_line_rec.change_reason := 'SYSTEM';
1387: l_line_rec.change_comments := 'REPRICING';
1388: Set_PRG(
1389: l_line_rec

Line 1406: IF (l_line_rec.operation <> OE_GLOBALS.G_OPR_NONE) THEN

1402: , i.priced_uom_code
1403: , i.price_request_code
1404: );
1405: End If; -- cancelled_quantity larger than ordered_quantity?
1406: IF (l_line_rec.operation <> OE_GLOBALS.G_OPR_NONE) THEN
1407: px_line_tbl(px_price_line_id_tbl(i.line_id)) := l_line_rec;
1408: END IF;
1409: Elsif (i.Process_Status = QP_PREQ_PUB.G_STATUS_NEW) THEN
1410: l_line_rec:=OE_ORDER_PUB.G_MISS_LINE_REC;

Line 1412: l_line_rec.operation := OE_GLOBALS.G_OPR_CREATE;

1408: END IF;
1409: Elsif (i.Process_Status = QP_PREQ_PUB.G_STATUS_NEW) THEN
1410: l_line_rec:=OE_ORDER_PUB.G_MISS_LINE_REC;
1411: l_line_rec.cancelled_quantity := 0;
1412: l_line_rec.operation := OE_GLOBALS.G_OPR_CREATE;
1413: l_line_rec.Header_id := oe_order_cache.g_header_rec.header_id;
1414: l_line_rec.line_id := OE_DEFAULT_LINE.get_line;
1415: --for Bug 3350425. To Prevent Blanket feilds being defaulting from Header.
1416: l_line_rec.blanket_number:=NULL;

Line 1486: IF (l_line_rec.operation <> OE_GLOBALS.G_OPR_NONE) THEN

1482: , i.percent_price
1483: , i.priced_uom_code
1484: , i.price_request_code
1485: );
1486: IF (l_line_rec.operation <> OE_GLOBALS.G_OPR_NONE) THEN
1487: -- Display the PRG Item
1488: FND_MESSAGE.SET_NAME('ONT','ONT_CREATED_NEW_LINE');
1489: FND_MESSAGE.SET_TOKEN('ITEM',nvl(l_line_rec.ordered_item,l_line_rec.inventory_item_id));
1490: --bug 2412868 begin

Line 1772: IF (OE_GLOBALS.G_UI_FLAG ) THEN

1768:
1769: FND_MESSAGE.SET_NAME('ONT','ONT_PROMO_LIMIT_EXCEEDED');
1770: FND_MESSAGE.SET_TOKEN('ERR_TEXT', i.LIMIT_TEXT);
1771: OE_MSG_PUB.Add;
1772: IF (OE_GLOBALS.G_UI_FLAG ) THEN
1773: IF (G_REQUEST_ID IS NULL) THEN
1774: select oe_msg_request_id_s.nextval into g_request_id from dual;
1775: END IF;
1776: OE_MSG_PUB.INSERT_MESSAGE(OE_MSG_PUB.COUNT_MSG, G_REQUEST_ID,'U');

Line 1944: l_Line_Adj_rec.operation := OE_GLOBALS.G_OPR_CREATE;

1940: l_Line_Adj_rec.line_index := l_insert.line_index;
1941: l_Line_Adj_rec.return_status := FND_API.G_RET_STS_SUCCESS;
1942: IF l_insert.process_code = QP_PREQ_GRP.G_STATUS_NEW Then
1943: l_Line_Adj_rec.db_flag := FND_API.G_FALSE;
1944: l_Line_Adj_rec.operation := OE_GLOBALS.G_OPR_CREATE;
1945: OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
1946: p_old_line_adj_rec => NULL,
1947: p_line_adj_rec =>l_line_adj_rec,
1948: p_line_adj_id => l_line_adj_rec.price_adjustment_id,

Line 1953: l_Line_Adj_rec.operation := OE_GLOBALS.G_OPR_UPDATE;

1949: x_index => l_index,
1950: x_return_status => l_return_status);
1951: ELSIF l_insert.process_code = QP_PREQ_GRP.G_STATUS_UPDATED Then
1952: l_Line_Adj_rec.db_flag := FND_API.G_TRUE;
1953: l_Line_Adj_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1954:
1955: OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
1956: p_line_adj_rec =>l_line_adj_rec,
1957: p_line_adj_id => l_line_adj_rec.price_adjustment_id,

Line 2027: l_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_CREATE;

2023: --l_Header_Adj_rec.line_index := l_insert.line_index;
2024: l_Header_Adj_rec.return_status := FND_API.G_RET_STS_SUCCESS;
2025: IF l_insert.process_code = QP_PREQ_GRP.G_STATUS_NEW Then
2026: l_Header_Adj_rec.db_flag := FND_API.G_FALSE;
2027: l_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_CREATE;
2028: OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
2029: p_old_hdr_adj_rec => NULL,
2030: p_hdr_adj_rec =>l_header_adj_rec,
2031: p_hdr_adj_id => l_header_adj_rec.price_adjustment_id,

Line 2036: l_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_UPDATE;

2032: x_index => l_index,
2033: x_return_status => l_return_status);
2034: ELSIF l_insert.process_code = QP_PREQ_GRP.G_STATUS_UPDATED Then
2035: l_Header_Adj_rec.db_flag := FND_API.G_TRUE;
2036: l_Header_Adj_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
2037:
2038: OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
2039: p_hdr_adj_rec =>l_header_adj_rec,
2040: p_hdr_adj_id => l_header_adj_rec.price_adjustment_id,

Line 2109: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).operation := OE_GLOBALS.G_OPR_UPDATE;

2105: oe_debug_pub.add('Old Price List id : '||i.price_list_id);
2106: oe_debug_pub.add('New Price List id : '||i.price_list_header_id);
2107: END IF;
2108: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).price_list_id := i.price_list_header_id;
2109: px_line_tbl(G_PRICE_LINE_ID_TBL(i.line_id)).operation := OE_GLOBALS.G_OPR_UPDATE;
2110: end loop;
2111: END Register_price_list;
2112: --bug 3702538
2113:

Line 2128: l_control_rec OE_GLOBALS.Control_Rec_Type;

2124: p_header_rec IN oe_Order_Pub.header_rec_type,
2125: p_pricing_events IN varchar2
2126: ) IS
2127:
2128: l_control_rec OE_GLOBALS.Control_Rec_Type;
2129: lx_new_header_rec oe_Order_Pub.header_rec_type := p_header_rec;
2130: l_notify_flag BOOLEAN;
2131: l_booked_flag varchar2(1) := oe_order_cache.g_header_rec.booked_flag;
2132: