[Home] [Help]
93: l_secondary_catch_weight VARCHAR2(1) := NULL;
94: l_ref_line_rec OE_ORDER_PUB.LINE_REC_TYPE;
95: TYPE uom_class_tbl IS TABLE of MTL_UNITS_OF_MEASURE.UOM_CLASS%TYPE index by MTL_UNITS_OF_MEASURE.UOM_CODE%TYPE;
96: l_uom_class_tbl uom_class_tbl;
97: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
98:
99: BEGIN
100:
101: IF l_debug_level > 0 THEN
98:
99: BEGIN
100:
101: IF l_debug_level > 0 THEN
102: oe_debug_pub.ADD('Entering Is_Catch_Weight');
103: END IF;
104:
105: IF oe_line_util.dual_uom_control
106: (p_line_rec.inventory_item_id
111: l_ref_line_rec := OE_line_UTIL.Query_Row(p_line_rec.reference_line_id);
112: END IF;
113:
114: IF l_debug_level > 0 THEN
115: oe_debug_pub.ADD('Reference Line FB:'||l_ref_line_rec.fulfillment_base);
116: END IF;
117:
118:
119: IF p_line_rec.fulfillment_base IS NOT NULL OR l_ref_line_rec.fulfillment_base IS NOT NULL THEN
151:
152: END IF;
153:
154: IF l_debug_level > 0 THEN
155: oe_debug_pub.ADD('Hook Catch Weight Pricing UOM:'||l_hook_pricing_uom);
156: END IF;
157:
158:
159:
175: l_secondary_catch_weight :='Y';
176:
177:
178: IF l_debug_level > 0 THEN
179: oe_debug_pub.ADD('Secondary Catch Weight Pricing');
180: END IF;
181:
182: END IF;
183:
201:
202: END IF;
203:
204: IF l_debug_level > 0 THEN
205: oe_debug_pub.ADD('Primary Catch Weight Pricing');
206: END IF;
207:
208:
209: END IF;
225:
226: ELSE
227:
228: IF l_debug_level > 0 THEN
229: oe_debug_pub.ADD('No Catch Weight Pricing');
230: END IF;
231:
232: RETURN NULL;
233:
233:
234: END IF;
235:
236: IF l_debug_level > 0 THEN
237: oe_debug_pub.ADD('Exiting Is_Catch_Weight');
238: END IF;
239:
240: EXCEPTION
241: WHEN OTHERS THEN
240: EXCEPTION
241: WHEN OTHERS THEN
242:
243: IF l_debug_level > 0 THEN
244: oe_debug_pub.ADD('Exception Is_Catch_Weight:'||substr(SQLERRM,1,250));
245: END IF;
246:
247: RAISE FND_API.G_EXC_ERROR;
248:
273: l_return_status varchar2(30);
274: l_set_tbl_count number;
275: l_header_id number;
276:
277: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
278: l_delete_lines_tbl OE_ORDER_PUB.Request_Tbl_Type; -- For bug 3754586
279: BEGIN
280: if l_debug_level > 0 then
281: oe_debug_pub.add('Entering in Delete Dependents');
277: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
278: l_delete_lines_tbl OE_ORDER_PUB.Request_Tbl_Type; -- For bug 3754586
279: BEGIN
280: if l_debug_level > 0 then
281: oe_debug_pub.add('Entering in Delete Dependents');
282: end if;
283: /* set the set type in g_set_tbl to invalid if the line is being deleted */
284:
285:
285:
286: IF OE_SET_UTIL.g_set_tbl.count > 0 THEN
287:
288: if l_debug_level > 0 then
289: oe_debug_pub.add('Table Count : '||OE_SET_UTIL.g_set_tbl.count,3);
290: end if;
291:
292: l_set_tbl_count := OE_SET_UTIL.g_set_tbl.first;
293: WHILE l_set_tbl_count IS NOT NULL
297:
298: OE_SET_UTIL.g_set_tbl(l_set_tbl_count).set_type := 'INVALID_SET';
299:
300: if l_debug_level > 0 then
301: oe_debug_pub.add('Set the set type as invalid ',3);
302: end if;
303: END IF;
304:
305: l_set_tbl_count := OE_SET_UTIL.g_set_tbl.next(l_set_tbl_count);
396:
397: /* Log and Execute the delayed request logged for update shipping
398: as they will get deleted in the next step */
399: if l_debug_level > 0 then
400: oe_debug_pub.ADD('p_shipping_interfaced_flag '|| p_shipping_interfaced_flag,1);
401: end if;
402:
403: IF p_shipping_interfaced_flag = 'Y' THEN
404:
402:
403: IF p_shipping_interfaced_flag = 'Y' THEN
404:
405: if l_debug_level > 0 then
406: oe_debug_pub.ADD('Update Shipping,Delete '|| p_line_id,1);
407: end if;
408:
409: /*
410: The code for logging and processing the delayed request for update shipping
431: END IF;-- shipping interfaced = 'Y'
432: -- changes for bug 3754586 ends
433:
434: if l_debug_level > 0 then
435: oe_debug_pub.add('ret sts: '|| l_return_status, 4);
436: end if;
437:
438: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
439:
473: Procedure Calc_Catchweight_Return_qty2
474: ( p_x_line_rec IN OUT NOCOPY OE_Order_PUB.Line_Rec_Type
475: , p_old_line_rec IN OE_Order_PUB.Line_Rec_Type) IS
476: x_item_rec OE_ORDER_CACHE.item_rec_type;
477: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
478:
479: BEGIN
480: If l_debug_level > 0 Then
481: oe_debug_pub.add('Entering into Calc_Catchweight_Return_qty2',1);
477: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
478:
479: BEGIN
480: If l_debug_level > 0 Then
481: oe_debug_pub.add('Entering into Calc_Catchweight_Return_qty2',1);
482: oe_debug_pub.add('p_x_line_rec.line_category_code : '||p_x_line_rec.line_category_code||' p_x_line_rec.reference_line_id : '||p_x_line_rec.reference_line_id,3);
483: oe_debug_pub.add('p_x_line_rec.inventory_item_id : '||p_x_line_rec.inventory_item_id||' p_x_line_rec.ship_from_org_id : '||p_x_line_rec.ship_from_org_id,3);
484: End If;
485:
478:
479: BEGIN
480: If l_debug_level > 0 Then
481: oe_debug_pub.add('Entering into Calc_Catchweight_Return_qty2',1);
482: oe_debug_pub.add('p_x_line_rec.line_category_code : '||p_x_line_rec.line_category_code||' p_x_line_rec.reference_line_id : '||p_x_line_rec.reference_line_id,3);
483: oe_debug_pub.add('p_x_line_rec.inventory_item_id : '||p_x_line_rec.inventory_item_id||' p_x_line_rec.ship_from_org_id : '||p_x_line_rec.ship_from_org_id,3);
484: End If;
485:
486: IF p_x_line_rec.line_category_code = 'RETURN' AND
479: BEGIN
480: If l_debug_level > 0 Then
481: oe_debug_pub.add('Entering into Calc_Catchweight_Return_qty2',1);
482: oe_debug_pub.add('p_x_line_rec.line_category_code : '||p_x_line_rec.line_category_code||' p_x_line_rec.reference_line_id : '||p_x_line_rec.reference_line_id,3);
483: oe_debug_pub.add('p_x_line_rec.inventory_item_id : '||p_x_line_rec.inventory_item_id||' p_x_line_rec.ship_from_org_id : '||p_x_line_rec.ship_from_org_id,3);
484: End If;
485:
486: IF p_x_line_rec.line_category_code = 'RETURN' AND
487: p_x_line_rec.reference_line_id IS NOT NULL THEN -- referenced return
495: IF x_item_rec.ont_pricing_qty_source = 'S' AND -- INVCONV
496: x_item_rec.tracking_quantity_ind = 'P' THEN -- AND -- INVCONV -
497: --x_item_rec.wms_enabled_flag = 'Y' THEN -- INVCONV - TAKE OUT AS OPENED UP TO ANY ORG
498: IF l_debug_level > 0 THEN
499: oe_debug_pub.add( 'Discrete catchweight enabled. Prorating ordered_quantity2. p_old_line_rec.ordered_quantity2:'|| p_old_line_rec.ordered_quantity2||
500: ': p_old_line_rec.ordered_quantity:'|| p_old_line_rec.ordered_quantity||': p_x_line_rec.ordered_quantity:'|| p_x_line_rec.ordered_quantity);
501: oe_debug_pub.add('p_x_line_rec.ordered_quantity2 : '||p_x_line_rec.ordered_quantity2,3);
502: END IF;
503: If p_old_line_rec.ordered_quantity2 Is NOT NULL AND
497: --x_item_rec.wms_enabled_flag = 'Y' THEN -- INVCONV - TAKE OUT AS OPENED UP TO ANY ORG
498: IF l_debug_level > 0 THEN
499: oe_debug_pub.add( 'Discrete catchweight enabled. Prorating ordered_quantity2. p_old_line_rec.ordered_quantity2:'|| p_old_line_rec.ordered_quantity2||
500: ': p_old_line_rec.ordered_quantity:'|| p_old_line_rec.ordered_quantity||': p_x_line_rec.ordered_quantity:'|| p_x_line_rec.ordered_quantity);
501: oe_debug_pub.add('p_x_line_rec.ordered_quantity2 : '||p_x_line_rec.ordered_quantity2,3);
502: END IF;
503: If p_old_line_rec.ordered_quantity2 Is NOT NULL AND
504: p_old_line_rec.ordered_quantity2 <> FND_API.G_MISS_NUM AND
505: p_old_line_rec.ordered_quantity Is NOT NULL AND
515: p_x_line_rec.ordered_quantity_uom2 is not null and
516: p_x_line_rec.ordered_quantity_uom2 <> FND_API.G_MISS_CHAR Then
517: IF p_x_line_rec.pricing_quantity_uom = p_x_line_rec.ordered_quantity_uom2 THEN
518: IF l_debug_level > 0 THEN
519: oe_debug_pub.add('pricing uom is same as ordered quantity2 uom');
520: END IF;
521: p_x_line_rec.Pricing_quantity := p_x_line_rec.ordered_quantity2;
522: ELSE
523: p_x_line_rec.Pricing_quantity :=
526: p_x_line_rec.order_quantity_uom, p_x_line_rec.pricing_quantity_uom,
527: p_x_line_rec.ordered_quantity
528: );
529: IF l_debug_level > 0 THEN
530: oe_debug_pub.add('pricing uom is different than ordered quantity2 uom. p_x_line_rec.Pricing_quantity:'|| p_x_line_rec.Pricing_quantity);
531: END IF;
532: END IF; -- Pricing Quantity
533: END IF; -- Check for existence of qty2, uom2 and pricing uom
534: END IF; -- end check for discrete catchweight
648: l_delete_payment_count NUMBER;
649: --
650: -- bug 4378531
651: l_hold_result VARCHAR2(30);
652: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
653: --
654: --Bug#5026401
655: l_orig_line_calc_price_flag VARCHAR2(1);
656: l_ship_inv_count NUMBER :=0;
683:
684: BEGIN
685:
686: if l_debug_level > 0 then
687: oe_debug_pub.add('Entering OE_LINE_UTIL.APPLY_ATTRIBUTE_CHANGES', 1);
688: end if;
689:
690: -- Query Header Record
691: -- Performance Improvement Bug 1929163
819: AND p_x_line_rec.booked_flag ='Y'
820: THEN
821: -- Log Delayed Request for Verify Payment
822: if l_debug_level > 0 then
823: oe_debug_pub.ADD('log verify payment delayed request for change in Canceled Qty');
824: end if;
825: l_verify_payment_flag := 'Y';
826: END IF;
827: END IF;
851: p_x_line_rec.LINE_CATEGORY_CODE='ORDER')
852: THEN
853: l_ship_inv_count:= -1;
854: if l_debug_level > 0 THEN
855: oe_debug_pub.add('Need not query shipping tables hence setting the counter to -1');
856: oe_debug_pub.add('Line is already shipped,will not update shipping', 1);
857: end if;
858: FND_MESSAGE.SET_NAME('ONT', 'OE_PO_SHIPPED');
859: OE_MSG_PUB.ADD;
852: THEN
853: l_ship_inv_count:= -1;
854: if l_debug_level > 0 THEN
855: oe_debug_pub.add('Need not query shipping tables hence setting the counter to -1');
856: oe_debug_pub.add('Line is already shipped,will not update shipping', 1);
857: end if;
858: FND_MESSAGE.SET_NAME('ONT', 'OE_PO_SHIPPED');
859: OE_MSG_PUB.ADD;
860:
878: EXCEPTION
879: WHEN No_Data_Found THEN
880: l_ship_inv_count:=0;
881: if l_debug_level > 0 then
882: oe_debug_pub.add('the line is neither picked, shipped or interfaced. can call update shipping', 1);
883: end if;
884: END ;
885: END IF;
886:
888: IF l_ship_inv_count>0
889:
890: THEN
891: if l_debug_level > 0 then
892: oe_debug_pub.add('Line is already shipped,will not update shipping', 1);
893: end if;
894: FND_MESSAGE.SET_NAME('ONT', 'OE_PO_SHIPPED');
895: OE_MSG_PUB.ADD;
896:
974: End If; -- For price_flag='Y'
975:
976: -- bug 3585862
977: if l_debug_level > 0 then
978: oe_debug_pub.add('old calculate price flag'||p_old_line_rec.calculate_price_flag, 3);
979: oe_debug_pub.add('new calculate price flag'||p_x_line_rec.calculate_price_flag, 3);
980: end if;
981: IF Nvl(oe_globals.g_pricing_recursion,'N') = 'N'
982: AND p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE
975:
976: -- bug 3585862
977: if l_debug_level > 0 then
978: oe_debug_pub.add('old calculate price flag'||p_old_line_rec.calculate_price_flag, 3);
979: oe_debug_pub.add('new calculate price flag'||p_x_line_rec.calculate_price_flag, 3);
980: end if;
981: IF Nvl(oe_globals.g_pricing_recursion,'N') = 'N'
982: AND p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE
983: AND ((p_old_line_rec.calculate_price_flag in ('N','P') and p_x_line_rec.calculate_price_flag = 'Y')
983: AND ((p_old_line_rec.calculate_price_flag in ('N','P') and p_x_line_rec.calculate_price_flag = 'Y')
984: OR (p_old_line_rec.calculate_price_flag = 'N' and p_x_line_rec.calculate_price_flag = 'P'))
985: THEN
986: if l_debug_level > 0 then
987: oe_debug_pub.add('setting price flag because of calculate price flag change', 3);
988: end if;
989: IF nvl(OE_GLOBALS.G_PRICE_FLAG, 'N') <> 'Y' THEN
990: OE_GLOBALS.G_PRICE_FLAG := 'Y';
991: OE_LINE_ADJ_UTIL.Register_Changed_Lines
1029: -- log a delayed request to get included items for this item if any.
1030:
1031: l_freeze_method := G_FREEZE_METHOD; /* Bug # 5036404 */
1032: if l_debug_level > 0 then
1033: oe_debug_pub.ADD('Freeze method is :' || l_freeze_method,2);
1034: end if;
1035: --3286378 : Added check for operation= create
1036: IF (l_freeze_method = OE_GLOBALS.G_IIFM_ENTRY AND
1037: (p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE OR
1053: OR p_x_line_rec.item_type_code = OE_GLOBALS.G_ITEM_CLASS))
1054: THEN
1055: IF OE_GENESIS_UTIL.G_INCOMING_FROM_DOO THEN
1056: if l_debug_level > 0 then
1057: oe_debug_pub.ADD(' The update is from DOO Pre Exploded Kit ER',5);
1058: end if;
1059: END IF;
1060: /* End DOO Pre Exploded Kit ER 9339742 */
1061: if l_debug_level > 0 then
1058: end if;
1059: END IF;
1060: /* End DOO Pre Exploded Kit ER 9339742 */
1061: if l_debug_level > 0 then
1062: oe_debug_pub.ADD('LINE ID : '||p_x_line_rec.line_id,2);
1063: end if;
1064: p_x_line_rec.explosion_date := null;
1065: l_count := l_count + 1;
1066: OE_Config_Pvt.OE_FREEZE_INC_ITEMS_TBL(l_count):= p_x_line_rec.line_id;
1081: -- QUOTING change
1082: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
1083: THEN
1084: if l_debug_level > 0 then
1085: oe_debug_pub.ADD('item update: logging request for eval_hold_source');
1086: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
1087: ' Entity ID: '|| to_char(p_x_line_rec.inventory_item_id));
1088: end if;
1089:
1082: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
1083: THEN
1084: if l_debug_level > 0 then
1085: oe_debug_pub.ADD('item update: logging request for eval_hold_source');
1086: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
1087: ' Entity ID: '|| to_char(p_x_line_rec.inventory_item_id));
1088: end if;
1089:
1090: OE_delayed_requests_Pvt.log_request
1097: p_param1 => 'I',
1098: p_param2 => p_x_line_rec.inventory_item_id,
1099: x_return_status => l_return_status);
1100: if l_debug_level > 0 then
1101: oe_debug_pub.ADD('after call to log_request: l_return_status: '||
1102: l_return_status , 1);
1103: end if;
1104:
1105: -- 14078867 Start
1106: -- Get Item Category IDs
1107: l_old_itemcat := OE_ITORD_UTIL.get_item_category_id(p_old_line_rec.inventory_item_id);
1108: l_new_itemcat := OE_ITORD_UTIL.get_item_category_id(p_x_line_rec.inventory_item_id);
1109: if l_debug_level > 0 then
1110: oe_debug_pub.ADD(' Old ItemID: '||p_old_line_rec.inventory_item_id||
1111: ' -Old Category ID: '||l_old_itemcat||
1112: ' -New ItemID: '||p_x_line_rec.inventory_item_id||
1113: ' -New Category ID: '||l_new_itemcat);
1114: end if;
1114: end if;
1115: If (l_old_itemcat <> l_new_itemcat )
1116: THEN
1117: if l_debug_level > 0 then
1118: oe_debug_pub.ADD('item update, Item Category Different: logging request for eval_hold_source');
1119: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
1120: ' Entity ID: '|| l_new_itemcat);
1121: end if;
1122:
1115: If (l_old_itemcat <> l_new_itemcat )
1116: THEN
1117: if l_debug_level > 0 then
1118: oe_debug_pub.ADD('item update, Item Category Different: logging request for eval_hold_source');
1119: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
1120: ' Entity ID: '|| l_new_itemcat);
1121: end if;
1122:
1123: OE_delayed_requests_Pvt.log_request
1130: p_param1 => 'IC',
1131: p_param2 => l_new_itemcat,
1132: x_return_status => l_return_status);
1133: if l_debug_level > 0 then
1134: oe_debug_pub.ADD('after call to log_request: l_return_status: '||
1135: l_return_status , 1);
1136: end if;
1137: End IF;
1138: -- 14078867 End
1146: -- Redefault Globalization flexfield
1147: -- Performance Improvement Bug 1929163
1148: -- JG has provided a NOCOPY spec via bug 1950033
1149: if l_debug_level > 0 then
1150: oe_debug_pub.add('before calling jg');
1151: end if;
1152: ---Start bug 14317960 --Comparing so that User passed value are always honoured
1153: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute1,p_old_line_rec.global_attribute1) then
1154: if l_debug_level > 0 then
1151: end if;
1152: ---Start bug 14317960 --Comparing so that User passed value are always honoured
1153: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute1,p_old_line_rec.global_attribute1) then
1154: if l_debug_level > 0 then
1155: oe_debug_pub.add('p_x_line_rec.global_attribute1'|| p_x_line_rec.global_attribute1);
1156: end if;
1157: p_x_line_rec.global_attribute1 := NULL;
1158: End IF ;
1159:
1158: End IF ;
1159:
1160: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute2,p_old_line_rec.global_attribute2) then
1161: if l_debug_level > 0 then
1162: oe_debug_pub.add('p_x_line_rec.global_attribute2'|| p_x_line_rec.global_attribute2);
1163: end if;
1164: p_x_line_rec.global_attribute2 := NULL;
1165: End IF ;
1166:
1166:
1167:
1168: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute3,p_old_line_rec.global_attribute3) then
1169: if l_debug_level > 0 then
1170: oe_debug_pub.add('p_x_line_rec.global_attribute3'|| p_x_line_rec.global_attribute3);
1171: end if;
1172: p_x_line_rec.global_attribute3 := NULL;
1173: End IF ;
1174:
1173: End IF ;
1174:
1175: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute4,p_old_line_rec.global_attribute4) then
1176: if l_debug_level > 0 then
1177: oe_debug_pub.add('p_x_line_rec.global_attribute4'|| p_x_line_rec.global_attribute4);
1178: end if;
1179: p_x_line_rec.global_attribute4 := NULL;
1180: End IF ;
1181:
1180: End IF ;
1181:
1182: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute5,p_old_line_rec.global_attribute5) then
1183: if l_debug_level > 0 then
1184: oe_debug_pub.add('p_x_line_rec.global_attribute5'|| p_x_line_rec.global_attribute5);
1185: end if;
1186: p_x_line_rec.global_attribute5 := NULL;
1187: End IF ;
1188:
1187: End IF ;
1188:
1189: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute6,p_old_line_rec.global_attribute6) then
1190: if l_debug_level > 0 then
1191: oe_debug_pub.add('p_x_line_rec.global_attribute6'|| p_x_line_rec.global_attribute6);
1192: end if;
1193: p_x_line_rec.global_attribute6 := NULL;
1194: End IF ;
1195:
1194: End IF ;
1195:
1196: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute7,p_old_line_rec.global_attribute7) then
1197: if l_debug_level > 0 then
1198: oe_debug_pub.add('p_x_line_rec.global_attribute7'|| p_x_line_rec.global_attribute7);
1199: end if;
1200: p_x_line_rec.global_attribute7 := NULL;
1201: End IF ;
1202:
1201: End IF ;
1202:
1203: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute8,p_old_line_rec.global_attribute8) then
1204: if l_debug_level > 0 then
1205: oe_debug_pub.add('p_x_line_rec.global_attribute8'|| p_x_line_rec.global_attribute8);
1206: end if;
1207: p_x_line_rec.global_attribute8 := NULL;
1208: End IF ;
1209:
1208: End IF ;
1209:
1210: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute9,p_old_line_rec.global_attribute9) then
1211: if l_debug_level > 0 then
1212: oe_debug_pub.add('p_x_line_rec.global_attribute9'|| p_x_line_rec.global_attribute9);
1213: end if;
1214: p_x_line_rec.global_attribute9 := NULL;
1215: End IF ;
1216:
1215: End IF ;
1216:
1217: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute10,p_old_line_rec.global_attribute10) then
1218: if l_debug_level > 0 then
1219: oe_debug_pub.add('p_x_line_rec.global_attribute10'|| p_x_line_rec.global_attribute10);
1220: end if;
1221: p_x_line_rec.global_attribute10 := NULL;
1222: End IF ;
1223:
1222: End IF ;
1223:
1224: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute11,p_old_line_rec.global_attribute11) then
1225: if l_debug_level > 0 then
1226: oe_debug_pub.add('p_x_line_rec.global_attribute11'|| p_x_line_rec.global_attribute11);
1227: end if;
1228: p_x_line_rec.global_attribute11 := NULL;
1229: End IF ;
1230:
1229: End IF ;
1230:
1231: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute12,p_old_line_rec.global_attribute12) then
1232: if l_debug_level > 0 then
1233: oe_debug_pub.add('p_x_line_rec.global_attribute12'|| p_x_line_rec.global_attribute12);
1234: end if;
1235: p_x_line_rec.global_attribute12 := NULL;
1236: End IF ;
1237:
1236: End IF ;
1237:
1238: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute13,p_old_line_rec.global_attribute13) then
1239: if l_debug_level > 0 then
1240: oe_debug_pub.add('p_x_line_rec.global_attribute13'|| p_x_line_rec.global_attribute13);
1241: end if;
1242: p_x_line_rec.global_attribute13 := NULL;
1243: End IF ;
1244:
1243: End IF ;
1244:
1245: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute14,p_old_line_rec.global_attribute14) then
1246: if l_debug_level > 0 then
1247: oe_debug_pub.add('p_x_line_rec.global_attribute14'|| p_x_line_rec.global_attribute14);
1248: end if;
1249: p_x_line_rec.global_attribute14:= NULL;
1250: End IF ;
1251:
1250: End IF ;
1251:
1252: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute15,p_old_line_rec.global_attribute15) then
1253: if l_debug_level > 0 then
1254: oe_debug_pub.add('p_x_line_rec.global_attribute15'|| p_x_line_rec.global_attribute15);
1255: end if;
1256: p_x_line_rec.global_attribute15 := NULL;
1257: End IF ;
1258:
1257: End IF ;
1258:
1259: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute16,p_old_line_rec.global_attribute16) then
1260: if l_debug_level > 0 then
1261: oe_debug_pub.add('p_x_line_rec.global_attribute16'|| p_x_line_rec.global_attribute16);
1262: end if;
1263: p_x_line_rec.global_attribute16 := NULL;
1264: End IF ;
1265:
1264: End IF ;
1265:
1266: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute17,p_old_line_rec.global_attribute17) then
1267: if l_debug_level > 0 then
1268: oe_debug_pub.add('p_x_line_rec.global_attribute17'|| p_x_line_rec.global_attribute17);
1269: end if;
1270: p_x_line_rec.global_attribute17 := NULL;
1271: End IF ;
1272:
1271: End IF ;
1272:
1273: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute18,p_old_line_rec.global_attribute18) then
1274: if l_debug_level > 0 then
1275: oe_debug_pub.add('p_x_line_rec.global_attribute18'|| p_x_line_rec.global_attribute18);
1276: end if;
1277: p_x_line_rec.global_attribute18 := NULL;
1278: End IF ;
1279:
1278: End IF ;
1279:
1280: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute19,p_old_line_rec.global_attribute19) then
1281: if l_debug_level > 0 then
1282: oe_debug_pub.add('p_x_line_rec.global_attribute19'|| p_x_line_rec.global_attribute19);
1283: end if;
1284: p_x_line_rec.global_attribute19 := NULL;
1285: End IF ;
1286:
1285: End IF ;
1286:
1287: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute20,p_old_line_rec.global_attribute20) then
1288: if l_debug_level > 0 then
1289: oe_debug_pub.add('p_x_line_rec.global_attribute20'|| p_x_line_rec.global_attribute20);
1290: end if;
1291: p_x_line_rec.global_attribute20 := NULL;
1292: End IF ;
1293:
1292: End IF ;
1293:
1294: IF OE_GLOBALS.Equal(p_x_line_rec.global_attribute_category,p_old_line_rec.global_attribute_category) then
1295: if l_debug_level > 0 then
1296: oe_debug_pub.add('global_attribute_category'|| p_x_line_rec.global_attribute_category);
1297: end if;
1298: p_x_line_rec.global_attribute_category := NULL;
1299: End IF ;
1300:
1326: x_line_rec=>p_x_line_rec,
1327: x_return_code => l_return_code,
1328: x_error_buffer => l_error_buffer);
1329: if l_debug_level > 0 then
1330: oe_debug_pub.add('after calling jg');
1331: end if;
1332: --bug 2971066 Begin
1333: l_item_chg_prof := fnd_profile.value('ONT_HONOR_ITEM_CHANGE');
1334: if l_debug_level > 0 then
1331: end if;
1332: --bug 2971066 Begin
1333: l_item_chg_prof := fnd_profile.value('ONT_HONOR_ITEM_CHANGE');
1334: if l_debug_level > 0 then
1335: oe_debug_pub.add('value of ONT_HONOR_ITEM_CHANGE:'||l_item_chg_prof,5);
1336: oe_debug_pub.add('p_x_line_rec.inventory_item_id : '||p_x_line_rec.inventory_item_id);
1337: oe_debug_pub.add('p_old_line_rec.inventory_item_id : '||p_old_line_rec.inventory_item_id);
1338: end if;
1339: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
1332: --bug 2971066 Begin
1333: l_item_chg_prof := fnd_profile.value('ONT_HONOR_ITEM_CHANGE');
1334: if l_debug_level > 0 then
1335: oe_debug_pub.add('value of ONT_HONOR_ITEM_CHANGE:'||l_item_chg_prof,5);
1336: oe_debug_pub.add('p_x_line_rec.inventory_item_id : '||p_x_line_rec.inventory_item_id);
1337: oe_debug_pub.add('p_old_line_rec.inventory_item_id : '||p_old_line_rec.inventory_item_id);
1338: end if;
1339: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
1340: /*if nvl(p_x_line_rec.inventory_item_id,FND_API.G_MISS_NUM)
1333: l_item_chg_prof := fnd_profile.value('ONT_HONOR_ITEM_CHANGE');
1334: if l_debug_level > 0 then
1335: oe_debug_pub.add('value of ONT_HONOR_ITEM_CHANGE:'||l_item_chg_prof,5);
1336: oe_debug_pub.add('p_x_line_rec.inventory_item_id : '||p_x_line_rec.inventory_item_id);
1337: oe_debug_pub.add('p_old_line_rec.inventory_item_id : '||p_old_line_rec.inventory_item_id);
1338: end if;
1339: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
1340: /*if nvl(p_x_line_rec.inventory_item_id,FND_API.G_MISS_NUM)
1341: <> FND_API.G_MISS_NUM
1357: -- Bug# 3942402 end
1358: and p_x_line_rec.calculate_price_flag in ('N','P')
1359: and nvl(l_item_chg_prof,'N') = 'N' then
1360: if l_debug_level > 0 then
1361: oe_debug_pub.add('Changing calculate price flag to Y');
1362: end if;
1363: p_x_line_rec.calculate_price_flag := 'Y';
1364: end if;
1365: -- bug 2971066 end
1387: AND OE_Freight_Rating_Util.Get_List_Line_Type_Code
1388: (p_x_line_rec.header_id)
1389: = 'OM_CALLED_FREIGHT_RATES' THEN
1390: if l_debug_level > 0 then
1391: oe_debug_pub.add('Log Freight Rating request for item change. ',3);
1392: end if;
1393: l_get_FTE_freight_rate := 'Y';
1394: END IF;
1395:
1395:
1396:
1397: /*sdatti*/
1398: if l_debug_level > 0 then
1399: oe_debug_pub.ADD('OE_GLOBALS.G_PRICING_RECURSION:'||oe_globals.g_pricing_recursion,1);
1400: end if;
1401: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110509' THEN
1402: IF Nvl(oe_globals.g_pricing_recursion,'N') = 'N' THEN
1403: update_adjustment_flags(p_old_line_rec,p_x_line_rec);
1415: OE_GLOBALS.G_PRICE_FLAG := 'Y';
1416: -- 12876258 Start Enable Log delayed request for taxing
1417: OE_GLOBALS.G_TAX_FLAG := 'Y';
1418: if l_debug_level > 0 then
1419: oe_debug_pub.add('TaxFlag set for invoice to org change');
1420: end if; -- 12876258 End addition
1421: --Customer Acceptance
1422: l_def_contingency_attributes := FND_API.G_TRUE;
1423:
1430: -- QUOTING change
1431: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
1432: THEN
1433: if l_debug_level > 0 then
1434: oe_debug_pub.ADD('invoice site update: logging request for eval_hold_source');
1435: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
1436: ' Entity ID: '|| to_char(p_x_line_rec.invoice_to_org_id));
1437: end if;
1438: OE_delayed_requests_Pvt.log_request(
1431: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
1432: THEN
1433: if l_debug_level > 0 then
1434: oe_debug_pub.ADD('invoice site update: logging request for eval_hold_source');
1435: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
1436: ' Entity ID: '|| to_char(p_x_line_rec.invoice_to_org_id));
1437: end if;
1438: OE_delayed_requests_Pvt.log_request(
1439: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1475: IF (NVL(OE_Order_Cache.g_header_rec.payment_type_code,'NULL') <> 'CREDIT_CARD' OR l_cc_rev_reauth_code IS NOT NULL) --CC Reversal ER#16014135
1476: AND p_x_line_rec.booked_flag ='Y'
1477: THEN
1478: if l_debug_level > 0 then
1479: oe_debug_pub.ADD('log verify payment delayed request for change in invoice to site');
1480: end if;
1481: l_verify_payment_flag := 'Y';
1482: OE_CREDIT_ENGINE_GRP.TOLERANCE_CHECK_REQUIRED := FALSE; --ER 12363706
1483:
1525:
1526: -- bug 1819133, need to recalculate price if item is updated
1527: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
1528: if l_debug_level > 0 then
1529: oe_debug_pub.add('before checking profile ONT_HONOR_ITEM_CHANGE',5);
1530: end if;
1531: --change made for bug 1998333 Begin
1532: l_item_chg_prof := fnd_profile.value('ONT_HONOR_ITEM_CHANGE');
1533: if l_debug_level > 0 then
1530: end if;
1531: --change made for bug 1998333 Begin
1532: l_item_chg_prof := fnd_profile.value('ONT_HONOR_ITEM_CHANGE');
1533: if l_debug_level > 0 then
1534: oe_debug_pub.add('value of profile ONT_HONOR_ITEM_CHANGE:'||l_item_chg_prof,5);
1535: end if;
1536: if nvl(l_item_chg_prof,'N') = 'N' then
1537: --retaining the old behaviour
1538: p_x_line_rec.calculate_price_flag := 'Y';
1565: -- Call Pricing
1566: -- bug 1819133, need to recalculate price if item is updated
1567: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
1568: if l_debug_level > 0 then
1569: oe_debug_pub.add('before checking profile ONT_HONOR_ITEM_CHANGE',5);
1570: end if;
1571: --change made for bug 1998333 Begin
1572: l_item_chg_prof := fnd_profile.value('ONT_HONOR_ITEM_CHANGE');
1573: if l_debug_level > 0 then
1570: end if;
1571: --change made for bug 1998333 Begin
1572: l_item_chg_prof := fnd_profile.value('ONT_HONOR_ITEM_CHANGE');
1573: if l_debug_level > 0 then
1574: oe_debug_pub.add('value of profile ONT_HONOR_ITEM_CHANGE:'||l_item_chg_prof,5);
1575: end if;
1576: if nvl(l_item_chg_prof,'N') = 'N' then
1577: --retaining the old behaviour
1578: p_x_line_rec.calculate_price_flag := 'Y';
1612: -- log a delayed request to get included items for this item if any.
1613:
1614: l_freeze_method := G_FREEZE_METHOD; /* Bug # 5036404 */
1615: if l_debug_level > 0 then
1616: oe_debug_pub.ADD('Freeze method is :' || l_freeze_method,2);
1617: end if;
1618:
1619: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
1620: p_x_line_rec.booked_flag = 'Y' AND
1632: p_x_line_rec.item_type_code = OE_GLOBALS.G_ITEM_CLASS OR
1633: p_x_line_rec.item_type_code = OE_GLOBALS.G_ITEM_KIT )
1634: THEN
1635: if l_debug_level > 0 then
1636: oe_debug_pub.ADD('freeze inc items ' || l_freeze_method,2);
1637: end if;
1638: l_count := l_count + 1;
1639: OE_Config_Pvt.OE_FREEZE_INC_ITEMS_TBL(l_count)
1640: := p_x_line_rec.line_id;
1648: (p_x_line_rec.header_id) = 'OM_CALLED_FREIGHT_RATES'
1649: AND p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE
1650: AND p_x_line_rec.item_type_code = OE_GLOBALS.G_ITEM_CONFIG THEN
1651: if l_debug_level > 0 then
1652: oe_debug_pub.add('Log Freight Rating request for CONFIG item. ',3);
1653: end if;
1654: l_get_FTE_freight_rate := 'Y';
1655: END IF;
1656:
1702: IF NOT OE_GLOBALS.Equal(p_x_line_rec.order_quantity_uom,p_old_line_rec.order_quantity_uom)
1703: THEN
1704:
1705: -- Added below debug messages for bug 9014929
1706: oe_debug_pub.add(' ORDER_QUANTITY_UOM has changed : p_x_line_rec.operation = '||p_x_line_rec.operation);
1707: oe_debug_pub.add('p_x_line_rec.Pricing_quantity = '||p_x_line_rec.Pricing_quantity);
1708: oe_debug_pub.add('p_x_line_rec.ordered_quantity = '||p_x_line_rec.ordered_quantity);
1709:
1710: /* Added the following if condition to fix the bug 2967630 */
1703: THEN
1704:
1705: -- Added below debug messages for bug 9014929
1706: oe_debug_pub.add(' ORDER_QUANTITY_UOM has changed : p_x_line_rec.operation = '||p_x_line_rec.operation);
1707: oe_debug_pub.add('p_x_line_rec.Pricing_quantity = '||p_x_line_rec.Pricing_quantity);
1708: oe_debug_pub.add('p_x_line_rec.ordered_quantity = '||p_x_line_rec.ordered_quantity);
1709:
1710: /* Added the following if condition to fix the bug 2967630 */
1711: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
1704:
1705: -- Added below debug messages for bug 9014929
1706: oe_debug_pub.add(' ORDER_QUANTITY_UOM has changed : p_x_line_rec.operation = '||p_x_line_rec.operation);
1707: oe_debug_pub.add('p_x_line_rec.Pricing_quantity = '||p_x_line_rec.Pricing_quantity);
1708: oe_debug_pub.add('p_x_line_rec.ordered_quantity = '||p_x_line_rec.ordered_quantity);
1709:
1710: /* Added the following if condition to fix the bug 2967630 */
1711: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
1712:
1711: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
1712:
1713: -- Added below code for bug 9014929
1714: OE_LINE_ADJ_UTIL.Change_adj_for_uom_change(p_x_line_rec);
1715: Oe_Debug_Pub.add(' p_x_line_rec.Pricing_quantity = ' || p_x_line_rec.Pricing_quantity);
1716: -- End of code changes for bug 9014929
1717:
1718: if (nvl(p_old_line_rec.order_quantity_uom,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR)
1719: and (nvl(p_x_line_rec.order_quantity_uom,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR)
1719: and (nvl(p_x_line_rec.order_quantity_uom,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR)
1720: and p_x_line_rec.calculate_price_flag in ('P','N')
1721: then
1722: if l_debug_level > 0 then
1723: oe_debug_pub.add('operation is :'||p_x_line_rec.operation);
1724: end if;
1725: p_x_line_rec.calculate_price_flag := 'Y';
1726: end if;
1727:
1732: and nvl(p_old_line_rec.inventory_item_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM)
1733: and p_x_line_rec.calculate_price_flag in ('N','P')
1734: and nvl(l_item_chg_prof,'N') = 'N' then
1735: if l_debug_level > 0 then
1736: oe_debug_pub.add('Changing calculate price flag to Y');
1737: end if;
1738: p_x_line_rec.calculate_price_flag := 'Y';
1739: ELSE
1740: null;
1746: --Calcualte_price_flag will be set to 'Y' only for non LSP orders.
1747: --For LSP orders repricing will not happen during UOM change(LSP will always call
1748: -- process_order API with calcualte_price_flag ='N' )
1749: if l_debug_level > 0 then
1750: oe_debug_pub.add(' In ELSE: ');
1751: end if;
1752: IF (WSH_INTEGRATION.Validate_Oe_Attributes(p_x_line_rec.order_source_id) = 'Y' ) THEN
1753: p_x_line_rec.calculate_price_flag := 'Y';
1754: END IF;
1766: AND OE_Freight_Rating_Util.Get_List_Line_Type_Code
1767: (p_x_line_rec.header_id)
1768: = 'OM_CALLED_FREIGHT_RATES' THEN
1769: if l_debug_level > 0 then
1770: oe_debug_pub.add('Log Freight Rating request for uom change. ',3);
1771: end if;
1772: l_get_FTE_freight_rate := 'Y';
1773: END IF;
1774: END IF;
1777: IF NOT OE_GLOBALS.Equal(p_x_line_rec.ordered_quantity,p_old_line_rec.ordered_quantity)
1778: THEN
1779:
1780: if l_debug_level > 0 then
1781: oe_debug_pub.add('Ordered Qty has changed',1); -- PETER
1782: oe_debug_pub.add('New Ordered Qty : ' || p_x_line_rec.ordered_quantity, 1);
1783: oe_debug_pub.add('Old Ordered Qty : ' ||
1784: p_old_line_rec.ordered_quantity, 1);
1785: end if;
1778: THEN
1779:
1780: if l_debug_level > 0 then
1781: oe_debug_pub.add('Ordered Qty has changed',1); -- PETER
1782: oe_debug_pub.add('New Ordered Qty : ' || p_x_line_rec.ordered_quantity, 1);
1783: oe_debug_pub.add('Old Ordered Qty : ' ||
1784: p_old_line_rec.ordered_quantity, 1);
1785: end if;
1786: l_3a7_attribute_change := FND_API.G_TRUE;
1779:
1780: if l_debug_level > 0 then
1781: oe_debug_pub.add('Ordered Qty has changed',1); -- PETER
1782: oe_debug_pub.add('New Ordered Qty : ' || p_x_line_rec.ordered_quantity, 1);
1783: oe_debug_pub.add('Old Ordered Qty : ' ||
1784: p_old_line_rec.ordered_quantity, 1);
1785: end if;
1786: l_3a7_attribute_change := FND_API.G_TRUE;
1787:
1788: /* Added the following code to fix the bug 3739180 */
1789: If p_x_line_rec.calculate_price_flag in ('N','P') and p_x_line_rec.reference_line_id IS NOT NULL THEN
1790: IF (OE_GLOBALS.G_UI_FLAG) THEN
1791: if l_debug_level > 0 then
1792: oe_debug_pub.add('Log REVERSE_LIMITS delayed request for ENTITY LINE return',1);
1793: end if;
1794: OE_delayed_requests_Pvt.log_request(
1795: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1796: p_entity_id => p_x_line_rec.line_id,
1806: p_request_type => OE_GLOBALS.G_REVERSE_LIMITS,
1807: x_return_status => l_return_status);
1808: ELSIF NOT (OE_GLOBALS.G_UI_FLAG) THEN
1809: if l_debug_level > 0 then
1810: oe_debug_pub.add('Log REVERSE_LIMITS delayed request for ENTITY ALL line return',1);
1811: end if;
1812: OE_delayed_requests_Pvt.log_request(
1813: p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
1814: p_entity_id => p_x_line_rec.line_id,
1950:
1951: IF NOT OE_Internal_Requisition_Pvt.G_Update_ISO_From_Req THEN
1952: IF NOT OE_SALES_CAN_UTIL.G_IR_ISO_HDR_CANCEL THEN
1953: IF l_debug_level > 0 THEN
1954: oe_debug_pub.add(' Header Level Cancellation is FALSE',5);
1955: END IF;
1956:
1957: -- Log a delayed request to update the Internal Requisition. This delayed
1958: -- request will be logged only if the change is not initiated from Requesting
1979: END IF;
1980:
1981: /* ELSIF OE_SALES_CAN_UTIL.G_IR_ISO_HDR_CANCEL THEN -- Commented for IR ISO Tracking bug 7667702
1982: IF l_debug_level > 0 THEN
1983: oe_debug_pub.add(' Header Level Cancellation is TRUE',5);
1984: END IF;
1985:
1986: -- Log a delayed request to update the Internal Requisition. This delayed
1987: -- request will be logged only if the change is not initiated from Requesting
2023: -- log a delayed request to get included items for this item if any.
2024:
2025: l_freeze_method := G_FREEZE_METHOD; /* Bug # 5036404 */
2026: if l_debug_level > 0 then
2027: oe_debug_pub.ADD('Freeze method is :' || l_freeze_method,2);
2028: end if;
2029: IF ( l_freeze_method = OE_GLOBALS.G_IIFM_ENTRY AND
2030: p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
2031: p_x_line_rec.ato_line_id is NULL AND
2045: OR p_x_line_rec.item_type_code = OE_GLOBALS.G_ITEM_CLASS))
2046: THEN
2047: IF OE_GENESIS_UTIL.G_INCOMING_FROM_DOO THEN
2048: if l_debug_level > 0 then
2049: oe_debug_pub.ADD(' The update is from DOO Pre Exploded Kit ER',5);
2050: end if;
2051: END IF;
2052: /* End DOO Pre Exploded Kit ER 9339742 */
2053: p_x_line_rec.explosion_date := null;
2077: nvl(p_x_line_rec.split_by, 'USER') = 'SYSTEM') THEN
2078: -- don't call credit checking for system split when tax value changes.
2079: l_param1 := 'No_Credit_Checking';
2080: if l_debug_level > 0 then
2081: oe_debug_pub.add('System Split - l_param1 is: '||l_param1,1);
2082: oe_debug_pub.ADD('B2315926_1:',2);
2083: oe_debug_pub.add('In the split case, checking for catchweight item',3);
2084: end if;
2085: IF (p_x_line_rec.inventory_item_id IS NOT NULL AND
2078: -- don't call credit checking for system split when tax value changes.
2079: l_param1 := 'No_Credit_Checking';
2080: if l_debug_level > 0 then
2081: oe_debug_pub.add('System Split - l_param1 is: '||l_param1,1);
2082: oe_debug_pub.ADD('B2315926_1:',2);
2083: oe_debug_pub.add('In the split case, checking for catchweight item',3);
2084: end if;
2085: IF (p_x_line_rec.inventory_item_id IS NOT NULL AND
2086: p_x_line_rec.inventory_item_id <> FND_API.G_MISS_NUM) AND
2079: l_param1 := 'No_Credit_Checking';
2080: if l_debug_level > 0 then
2081: oe_debug_pub.add('System Split - l_param1 is: '||l_param1,1);
2082: oe_debug_pub.ADD('B2315926_1:',2);
2083: oe_debug_pub.add('In the split case, checking for catchweight item',3);
2084: end if;
2085: IF (p_x_line_rec.inventory_item_id IS NOT NULL AND
2086: p_x_line_rec.inventory_item_id <> FND_API.G_MISS_NUM) AND
2087: (p_x_line_rec.ship_from_org_id IS NOT NULL AND
2092: IF l_item_rec.ont_pricing_qty_source = 'S' AND -- INVCONV
2093: l_item_rec.tracking_quantity_ind = 'P' and
2094: l_item_rec.wms_enabled_flag = 'Y' THEN
2095: If l_debug_level > 0 Then
2096: oe_debug_pub.add('Catchweight enabled item',3);
2097: oe_debug_pub.add('Setting the price flag to Yes');
2098: End If;
2099: OE_GLOBALS.G_PRICE_FLAG := 'Y';
2100: END IF;
2093: l_item_rec.tracking_quantity_ind = 'P' and
2094: l_item_rec.wms_enabled_flag = 'Y' THEN
2095: If l_debug_level > 0 Then
2096: oe_debug_pub.add('Catchweight enabled item',3);
2097: oe_debug_pub.add('Setting the price flag to Yes');
2098: End If;
2099: OE_GLOBALS.G_PRICE_FLAG := 'Y';
2100: END IF;
2101: END IF;
2101: END IF;
2102: else
2103: OE_GLOBALS.G_PRICE_FLAG := 'Y';
2104: if l_debug_level > 0 then
2105: oe_debug_pub.ADD('B2315926_2:',2);
2106: end if;
2107: end if;
2108: --changes for bug 2315926 end
2109:
2112: IF (p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE and
2113: p_x_line_rec.split_by = 'SYSTEM' and
2114: NVL(p_x_line_rec.split_action_code,'X') = 'SPLIT') THEN
2115: IF l_debug_level > 0 THEN
2116: oe_debug_pub.add('Logging Reverse Limits delayed request for parent line');
2117: oe_debug_pub.add('Price request code for parent : ' || p_x_line_rec.price_request_code);
2118: oe_debug_pub.add('OLD Price request code for parent : ' || p_old_line_rec.price_request_code);
2119: END IF;
2120: OE_delayed_requests_Pvt.log_request(
2113: p_x_line_rec.split_by = 'SYSTEM' and
2114: NVL(p_x_line_rec.split_action_code,'X') = 'SPLIT') THEN
2115: IF l_debug_level > 0 THEN
2116: oe_debug_pub.add('Logging Reverse Limits delayed request for parent line');
2117: oe_debug_pub.add('Price request code for parent : ' || p_x_line_rec.price_request_code);
2118: oe_debug_pub.add('OLD Price request code for parent : ' || p_old_line_rec.price_request_code);
2119: END IF;
2120: OE_delayed_requests_Pvt.log_request(
2121: p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2114: NVL(p_x_line_rec.split_action_code,'X') = 'SPLIT') THEN
2115: IF l_debug_level > 0 THEN
2116: oe_debug_pub.add('Logging Reverse Limits delayed request for parent line');
2117: oe_debug_pub.add('Price request code for parent : ' || p_x_line_rec.price_request_code);
2118: oe_debug_pub.add('OLD Price request code for parent : ' || p_old_line_rec.price_request_code);
2119: END IF;
2120: OE_delayed_requests_Pvt.log_request(
2121: p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2122: p_entity_id => p_x_line_rec.line_id,
2137: IF (p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
2138: p_x_line_rec.split_from_line_id IS NOT NULL AND
2139: nvl(p_x_line_rec.split_by, 'USER') = 'SYSTEM') THEN
2140: IF l_debug_level > 0 THEN
2141: oe_debug_pub.add('Logging Reverse Limits delayed request for child line');
2142: END IF;
2143: OE_delayed_requests_Pvt.log_request(
2144: p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2145: p_entity_id => p_x_line_rec.line_id,
2182: AND OE_Freight_Rating_Util.Get_List_Line_Type_Code
2183: (p_x_line_rec.header_id)
2184: = 'OM_CALLED_FREIGHT_RATES' THEN
2185: if l_debug_level > 0 then
2186: oe_debug_pub.add('Log Freight Rating request for qty change. ',3);
2187: end if;
2188: l_get_FTE_freight_rate := 'Y';
2189: END IF;
2190:
2206: Commented the above call and added the call to calculate_dual_quantity */
2207: IF (OE_CODE_CONTROL.CODE_RELEASE_LEVEL <= '110507') OR NOT(OE_GLOBALS.G_UI_FLAG) THEN
2208:
2209: if l_debug_level > 0 then
2210: oe_debug_pub.add('about to call calculate_dual_quantity 1' );
2211: end if;
2212: oe_line_util.calculate_dual_quantity(
2213: p_ordered_quantity => p_x_line_rec.ordered_quantity
2214: ,p_old_ordered_quantity => NULL
2252: /* OPM - NC 3/8/02 Bug#2046641
2253: Commented the above call and added the call to calculate_dual_quantity */
2254: IF (OE_CODE_CONTROL.CODE_RELEASE_LEVEL <= '110507') OR NOT(OE_GLOBALS.G_UI_FLAG) THEN
2255: if l_debug_level > 0 then
2256: oe_debug_pub.add('about to call calculate_dual_quantity 2' );
2257: end if;
2258:
2259: oe_line_util.calculate_dual_quantity(
2260: p_ordered_quantity => p_x_line_rec.ordered_quantity
2315: THEN
2316: -- Log request here if commitment id is null
2317: if p_x_line_rec.commitment_id is null then
2318: if l_debug_level > 0 then
2319: oe_debug_pub.ADD('Log Verify Payment delayed request in Ord Qty');
2320: end if;
2321: l_verify_payment_flag := 'Y';
2322: end if;
2323: END IF;
2325: -- quantity decreases, as refund may need to be issued.
2326: IF OE_PrePayment_UTIL.is_prepaid_order(p_x_line_rec.header_id)
2327: = 'Y' AND p_x_line_rec.booked_flag ='Y' THEN
2328: if l_debug_level > 0 then
2329: oe_debug_pub.ADD('Log Verify Payment delayed request in Ord Qty for prepayment', 3);
2330: end if;
2331: l_verify_payment_flag := 'Y';
2332: END IF;
2333: ELSE
2332: END IF;
2333: ELSE
2334: IF p_x_line_rec.booked_flag ='Y' THEN
2335: if l_debug_level > 0 then
2336: oe_debug_pub.ADD('Log Verify Payment delayed request for change in Order Qty');
2337:
2338: end if;
2339:
2340: -- Start fix for bug# 4378531
2338: end if;
2339:
2340: -- Start fix for bug# 4378531
2341: IF l_debug_level > 0 THEN
2342: oe_debug_pub.add('CHECKING CREDIT CHECK HOLD FOR HEADER/LINE ID : ' || TO_CHAR ( p_x_line_rec.header_id ) || '/' || TO_CHAR ( p_x_line_rec.line_id ) ) ;
2343: END IF;
2344:
2345: OE_HOLDS_PUB.Check_Holds
2346: ( p_api_version => 1.0
2355: , x_return_status => l_return_status
2356: );
2357:
2358: IF l_debug_level > 0 THEN
2359: oe_debug_pub.add('CHECKING FOR CANCEL FLAG : ' || p_x_line_rec.cancelled_flag ) ;
2360: END IF;
2361:
2362: IF NOT( l_hold_result = FND_API.G_FALSE AND p_x_line_rec.cancelled_flag='Y') THEN
2363: l_verify_payment_flag := 'Y';
2372: IF p_x_line_rec.cancelled_flag='Y' AND l_cc_rev_reauth_code IS NULL THEN
2373: --CC Reversal ER#16014135 end
2374: --ER 12363706 start
2375: IF OE_Credit_Engine_GRP.Is_Tolerance_Enabled(p_x_line_rec.header_id,l_credit_check_rule_rec) THEN
2376: oe_debug_pub.add('OEXULINB: Tolerance is enabled!') ;
2377: ELSE
2378: --ER 12363706 end
2379: OE_CREDIT_ENGINE_GRP.TOLERANCE_CHECK_REQUIRED := FALSE;
2380: IF ('Y' =OE_SYS_PARAMETERS.VALUE('OE_CC_CANCEL_PARAM')) THEN
2387: -- End of the fix 8471719
2388:
2389:
2390: IF l_debug_level > 0 THEN
2391: oe_debug_pub.add('CHECKING FOR VERIFY PAYMENT FLAG : ' || l_verify_payment_flag ) ;
2392: END IF;
2393: -- End fix for bug# 4378531
2394:
2395: END IF;
2414: );
2415:
2416: IF l_temp_pricing_quantity >= 0 THEN
2417: p_x_line_rec.Pricing_quantity:=l_temp_pricing_quantity;
2418: oe_debug_pub.add('temp pricing quantity:'||l_temp_pricing_quantity);
2419: END IF;
2420:
2421: End If; -- Pricing Quantity
2422: -- Pack J catchweight
2446: --------------------------------------------------------
2447: IF NOT OE_GLOBALS.Equal(p_x_line_rec.ordered_quantity2,p_old_line_rec.ordered_quantity2) -- peter
2448: THEN
2449: if l_debug_level > 0 then
2450: oe_debug_pub.add('Ordered Qty2 has changed',1); -- INVCONV
2451: oe_debug_pub.add('New Ordered Qty2 : ' || p_x_line_rec.ordered_quantity2, 1);
2452: oe_debug_pub.add('Old Ordered Qty2 : ' ||
2453: p_old_line_rec.ordered_quantity2, 1);
2454: end if;
2447: IF NOT OE_GLOBALS.Equal(p_x_line_rec.ordered_quantity2,p_old_line_rec.ordered_quantity2) -- peter
2448: THEN
2449: if l_debug_level > 0 then
2450: oe_debug_pub.add('Ordered Qty2 has changed',1); -- INVCONV
2451: oe_debug_pub.add('New Ordered Qty2 : ' || p_x_line_rec.ordered_quantity2, 1);
2452: oe_debug_pub.add('Old Ordered Qty2 : ' ||
2453: p_old_line_rec.ordered_quantity2, 1);
2454: end if;
2455:
2448: THEN
2449: if l_debug_level > 0 then
2450: oe_debug_pub.add('Ordered Qty2 has changed',1); -- INVCONV
2451: oe_debug_pub.add('New Ordered Qty2 : ' || p_x_line_rec.ordered_quantity2, 1);
2452: oe_debug_pub.add('Old Ordered Qty2 : ' ||
2453: p_old_line_rec.ordered_quantity2, 1);
2454: end if;
2455:
2456: l_update_shipping := FND_API.G_TRUE;
2463: -- IF l_item_rec.ont_pricing_qty_source = 1 THEN INVCONV
2464: IF l_item_rec.ont_pricing_qty_source = 'S' THEN -- INVCONV
2465: -- need to call pricing
2466: if l_debug_level > 0 then
2467: oe_debug_pub.add('dual uom - ont_pricing_qty_source = ' || l_item_rec.ont_pricing_qty_source );
2468: end if;
2469: OE_GLOBALS.G_PRICE_FLAG := 'Y';
2470: OE_GLOBALS.G_TAX_FLAG := 'Y';
2471:
2491: AND (NVL(p_x_line_rec.split_action_code,'X') = 'SPLIT')) THEN
2492: IF NOT OE_Internal_Requisition_Pvt.G_Update_ISO_From_Req THEN --change not initiated by PO
2493: IF NOT OE_SALES_CAN_UTIL.G_IR_ISO_HDR_CANCEL THEN --not a full order cancellation
2494: IF l_debug_level > 0 THEN
2495: oe_debug_pub.add(' Header Level Cancellation is FALSE',5);
2496: oe_debug_pub.add(' Secondary qty change: Logging delayed request for G_UPDATE_REQUISITION',5);
2497: END IF;
2498:
2499: -- Log a delayed request to update the Internal Requisition. This delayed
2492: IF NOT OE_Internal_Requisition_Pvt.G_Update_ISO_From_Req THEN --change not initiated by PO
2493: IF NOT OE_SALES_CAN_UTIL.G_IR_ISO_HDR_CANCEL THEN --not a full order cancellation
2494: IF l_debug_level > 0 THEN
2495: oe_debug_pub.add(' Header Level Cancellation is FALSE',5);
2496: oe_debug_pub.add(' Secondary qty change: Logging delayed request for G_UPDATE_REQUISITION',5);
2497: END IF;
2498:
2499: -- Log a delayed request to update the Internal Requisition. This delayed
2500: -- request will be logged only if the change is not initiated from Requesting
2561:
2562: IF OE_PrePayment_UTIL.IS_MULTIPLE_PAYMENTS_ENABLED = TRUE THEN
2563:
2564: if l_debug_level > 0 then
2565: oe_debug_pub.ADD('multpayments: logging delayed request for verify payment as payment term is changed');
2566: end if;
2567: l_verify_payment_flag := 'Y';
2568:
2569: --ELSIF NVL(OE_Order_Cache.g_header_rec.payment_type_code, 'NULL') <> 'CREDIT_CARD' --CC Reversal ER#16014135 Commented
2570: ELSIF (NVL(OE_Order_Cache.g_header_rec.payment_type_code, 'NULL') <> 'CREDIT_CARD' OR l_cc_rev_reauth_code IS NOT NULL) --CC Reversal ER#16014135
2571: THEN
2572:
2573: if l_debug_level > 0 then
2574: oe_debug_pub.ADD('logging delayed request for verify payment as payment term is changed');
2575: end if;
2576: l_verify_payment_flag := 'Y';
2577:
2578: END IF; -- if multiple_payments is enabled
2633: IF NOT OE_GLOBALS.Equal(p_x_line_rec.reference_line_id,p_old_line_rec.reference_line_id)
2634: THEN
2635: IF OE_GLOBALS.G_RETURN_CHILDREN_MODE = 'N' THEN
2636: if l_debug_level > 0 then
2637: oe_debug_pub.ADD('RMA: logging delayed request ');
2638: end if;
2639: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE OR
2640: p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
2641:
2657: /* BUG 2013611 and 2109230 */
2658: If p_x_line_rec.calculate_price_flag in ('N','P') THEN
2659: IF (OE_GLOBALS.G_UI_FLAG) THEN
2660: if l_debug_level > 0 then
2661: oe_debug_pub.add('Log REVERSE_LIMITS delayed request for ENTITY LINE return',1);
2662: end if;
2663: OE_delayed_requests_Pvt.log_request(
2664: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
2665: p_entity_id => p_x_line_rec.line_id,
2675: p_request_type => OE_GLOBALS.G_REVERSE_LIMITS,
2676: x_return_status => l_return_status);
2677: ELSIF NOT (OE_GLOBALS.G_UI_FLAG) THEN
2678: if l_debug_level > 0 then
2679: oe_debug_pub.add('Log REVERSE_LIMITS delayed request for ENTITY ALL line return',1);
2680: end if;
2681: OE_delayed_requests_Pvt.log_request(
2682: p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
2683: p_entity_id => p_x_line_rec.line_id,
2728: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
2729: p_x_line_rec.booked_flag ='Y'
2730: THEN
2731: if l_debug_level > 0 then
2732: oe_debug_pub.ADD('logging delayed request for Verify Payment
2733: forchange in Request date');
2734: end if;
2735: l_verify_payment_flag := 'Y';
2736: END IF;
2771: AND OE_Freight_Rating_Util.Get_List_Line_Type_Code
2772: (p_x_line_rec.header_id)
2773: = 'OM_CALLED_FREIGHT_RATES' THEN
2774: if l_debug_level > 0 then
2775: oe_debug_pub.add('Log Freight Rating request for schedule ship date. ',3);
2776: end if;
2777: l_get_FTE_freight_rate := 'Y';
2778: END IF;
2779:
2793: (to_date(p_x_line_rec.schedule_ship_date, 'DD/MM/YYYY') <>
2794: to_date(p_x_line_rec.request_date, 'DD/MM/YYYY'))
2795: THEN
2796: if l_debug_level > 0 then
2797: oe_debug_pub.ADD('logging delayed request for Verify Payment
2798: for change in Scheduled Ship date');
2799: end if;
2800: l_verify_payment_flag := 'Y';
2801: END IF;
2804: END IF;
2805: ***/
2806:
2807: if l_debug_level > 0 then
2808: oe_debug_pub.add('opr = '||p_x_line_rec.operation);
2809: end if;
2810:
2811: /* 7576948: IR ISO Change Management project Start */
2812: --
2917:
2918: l_po_NeedByDate_Update := NVL(FND_PROFILE.VALUE('POR_SYNC_NEEDBYDATE_OM'),'NO');
2919:
2920: IF l_debug_level > 0 THEN
2921: oe_debug_pub.add(' Need By Date update is allowed ? '||l_po_NeedByDate_Update);
2922: END IF;
2923:
2924: IF NOT OE_Internal_Requisition_Pvt.G_Update_ISO_From_Req
2925: AND NOT OE_SALES_CAN_UTIL.G_IR_ISO_HDR_CANCEL AND
2970: AND OE_Freight_Rating_Util.Get_List_Line_Type_Code
2971: (p_x_line_rec.header_id)
2972: = 'OM_CALLED_FREIGHT_RATES' THEN
2973: if l_debug_level > 0 then
2974: oe_debug_pub.add('Log Freight Rating request for schedule arrivale date. ',3);
2975: end if;
2976: l_get_FTE_freight_rate := 'Y';
2977: END IF;
2978:
2995:
2996: l_po_NeedByDate_Update := NVL(FND_PROFILE.VALUE('POR_SYNC_NEEDBYDATE_OM'),'NO');
2997:
2998: IF l_debug_level > 0 THEN
2999: oe_debug_pub.add(' Need By Date update is allowed ? '||l_po_NeedByDate_Update);
3000: END IF;
3001:
3002: IF NOT OE_Internal_Requisition_Pvt.G_Update_ISO_From_Req
3003: AND NOT OE_SALES_CAN_UTIL.G_IR_ISO_HDR_CANCEL AND
3037: END IF;
3038:
3039: ELSE -- Added for IR ISO Tracking bug 7667702
3040: IF l_debug_level > 0 THEN
3041: oe_debug_pub.add(' Need By Date is not allowed to update. Updating MTL_Supply only',5);
3042: END IF;
3043:
3044: OE_SCHEDULE_UTIL.Update_PO(p_x_line_rec.schedule_arrival_date,
3045: p_x_line_rec.source_document_id,
3091: (p_x_line_rec.header_id)
3092: = 'OM_CALLED_FREIGHT_RATES'
3093: AND oe_globals.g_freight_recursion = 'N' THEN
3094: if l_debug_level > 0 then
3095: oe_debug_pub.add('Log Freight Rating request for shipping method. ',3);
3096: end if;
3097: l_get_FTE_freight_rate := 'Y';
3098: END IF;
3099:
3109: p_x_line_rec.flow_status_code := 'BOOKED';
3110: -- For bug 1304916. Booking wil call price_line directly
3111: --OE_GLOBALS.G_PRICE_FLAG := 'Y';
3112: if l_debug_level > 0 then
3113: oe_debug_pub.add('sam: flow_status_code is ' || p_x_line_rec.flow_status_code);
3114: end if;
3115: END IF;
3116: END IF;
3117:
3128: -- Call API to convert the shipping quantity to shipped quantity from
3129: -- shipping quantity UOM to ordered quantity UOM and assign the returned
3130: -- quantity to shipped quantity of p_x_line_rec.
3131: if l_debug_level > 0 then
3132: oe_debug_pub.ADD('Order Quantity UOM : '|| p_x_line_rec.order_quantity_uom,2);
3133: oe_debug_pub.ADD('Shipping Quantity UOM : '|| p_x_line_rec.shipping_quantity_uom,2);
3134: end if;
3135: IF p_x_line_rec.shipping_quantity_uom <> p_x_line_rec.order_quantity_uom THEN
3136:
3129: -- shipping quantity UOM to ordered quantity UOM and assign the returned
3130: -- quantity to shipped quantity of p_x_line_rec.
3131: if l_debug_level > 0 then
3132: oe_debug_pub.ADD('Order Quantity UOM : '|| p_x_line_rec.order_quantity_uom,2);
3133: oe_debug_pub.ADD('Shipping Quantity UOM : '|| p_x_line_rec.shipping_quantity_uom,2);
3134: end if;
3135: IF p_x_line_rec.shipping_quantity_uom <> p_x_line_rec.order_quantity_uom THEN
3136:
3137: /* --OPM 06/SEP/00 invoke process Uom Conversion for process line INVCONV
3141: ,p_x_line_rec.ship_from_org_id
3142: ,l_item_rec) THEN
3143:
3144: if l_debug_level > 0 then
3145: oe_debug_pub.ADD('OPM Process shipping update ',1);
3146: end if;
3147: GMI_Reservation_Util.Get_OPMUOM_from_AppsUOM
3148: (p_Apps_UOM => p_x_line_rec.order_quantity_uom
3149: ,x_OPM_UOM => l_OPM_order_quantity_uom
3201: -- Enforce precision of 19,9
3202: --===========================-
3203: l_temp_shipped_quantity := l_OPM_shipped_quantity;
3204: if l_debug_level > 0 then
3205: oe_debug_pub.ADD('OPM Process shipping update conversion gives shipped quantity of ' || l_temp_shipped_quantity,1);
3206: end if;
3207:
3208:
3209:
3216: p_x_line_rec.order_quantity_uom,
3217: p_x_line_rec.shipping_quantity
3218: );
3219: if l_debug_level > 0 then
3220: oe_debug_pub.ADD('Converted Shipped Quantity : '|| to_char(l_temp_shipped_quantity),1);
3221: end if;
3222: -- END IF; -- INVCONV
3223: --OPM 06/SEP/00 END
3224:
3223: --OPM 06/SEP/00 END
3224:
3225:
3226: if l_debug_level > 0 then
3227: oe_debug_pub.ADD('Converted Shipped Quantity : '|| to_char(l_temp_shipped_quantity),1);
3228: end if;
3229:
3230: IF l_temp_shipped_quantity <> trunc(l_temp_shipped_quantity) THEN
3231:
3240: x_return_status => l_qty_return_status
3241: );
3242:
3243: if l_debug_level > 0 then
3244: oe_debug_pub.add('Return status from INV API : '||l_qty_return_status,1);
3245: end if;
3246: IF l_qty_return_status = 'W' THEN
3247:
3248: p_x_line_rec.shipped_quantity := l_validated_quantity;
3265:
3266: END IF;
3267:
3268: if l_debug_level > 0 then
3269: oe_debug_pub.ADD('Shipped Quantity : '|| to_char(p_x_line_rec.shipped_quantity),1);
3270: end if;
3271: -- The following line needs to assign the value of shipped quantity
3272: -- after the conversion of shipping quantity to ordered quantity UOM.
3273:
3299: END IF;
3300:
3301: -- Log a delayed request for Ship Confirmation
3302: if l_debug_level > 0 then
3303: oe_debug_pub.ADD('Ship Confirmation : logging delayed request for '|| l_shipping_unique_key1 || l_shipping_param1,1);
3304: end if;
3305:
3306: OE_Delayed_Requests_Pvt.Log_Request(
3307: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
3323: THEN
3324: IF p_x_line_rec.invoice_interface_status_code = 'YES' THEN
3325: p_x_line_rec.flow_status_code := 'INVOICED';
3326: if l_debug_level > 0 then
3327: oe_debug_pub.add('sam: flow_status_code is ' || p_x_line_rec.flow_status_code);
3328: end if;
3329: ELSIF p_x_line_rec.invoice_interface_status_code = 'RFR-PENDING' THEN
3330: p_x_line_rec.flow_status_code := 'INVOICED_PARTIAL';
3331: if l_debug_level > 0 then
3328: end if;
3329: ELSIF p_x_line_rec.invoice_interface_status_code = 'RFR-PENDING' THEN
3330: p_x_line_rec.flow_status_code := 'INVOICED_PARTIAL';
3331: if l_debug_level > 0 then
3332: oe_debug_pub.add('sam: flow_status_code is ' || p_x_line_rec.flow_status_code);
3333: end if;
3334: END IF;
3335:
3336: END IF;
3343: IF p_x_line_rec.cancelled_flag = 'Y' THEN
3344: p_x_line_rec.flow_status_code := 'CANCELLED';
3345: END IF;
3346: if l_debug_level > 0 then
3347: oe_debug_pub.add('sam: flow_status_code is ' || p_x_line_rec.flow_status_code);
3348: end if;
3349: p_x_line_rec.calculate_price_flag := 'N';
3350: END IF;
3351:
3355: THEN
3356: IF p_x_line_rec.cancelled_flag = 'Y' THEN
3357: p_x_line_rec.flow_status_code := 'CANCELLED';
3358: if l_debug_level > 0 then
3359: oe_debug_pub.add('sam: flow_status_code is ' || p_x_line_rec.flow_status_code);
3360: end if;
3361: p_x_line_rec.calculate_price_flag := 'N';
3362: END IF;
3363:
3423: -- QUOTING change
3424: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
3425: THEN
3426: if l_debug_level > 0 then
3427: oe_debug_pub.ADD('ship from update: logging request for eval_hold_source', 1);
3428: oe_debug_pub.add('line ID: '|| to_char(p_x_line_rec.line_id) ||
3429: ' Entity ID :'|| to_char(p_x_line_rec.ship_from_org_id), 1);
3430: end if;
3431:
3424: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
3425: THEN
3426: if l_debug_level > 0 then
3427: oe_debug_pub.ADD('ship from update: logging request for eval_hold_source', 1);
3428: oe_debug_pub.add('line ID: '|| to_char(p_x_line_rec.line_id) ||
3429: ' Entity ID :'|| to_char(p_x_line_rec.ship_from_org_id), 1);
3430: end if;
3431:
3432: OE_delayed_requests_Pvt.log_request(
3440: p_param2 => p_x_line_rec.ship_from_org_id,
3441: x_return_status => l_return_status);
3442:
3443: if l_debug_level > 0 then
3444: oe_debug_pub.add('return status after logging delayed request '||
3445: l_return_status, 1);
3446: end if;
3447: END IF;
3448:
3451: AND OE_Freight_Rating_Util.Get_List_Line_Type_Code
3452: (p_x_line_rec.header_id)
3453: = 'OM_CALLED_FREIGHT_RATES' THEN
3454: if l_debug_level > 0 then
3455: oe_debug_pub.add('Log Freight Rating request for ship from org. ',3);
3456: end if;
3457: l_get_FTE_freight_rate := 'Y';
3458: END IF;
3459:
3458: END IF;
3459:
3460: -- Pack J catchweight
3461: IF l_debug_level > 0 THEN
3462: oe_debug_pub.add('old ship_from_org_id:'|| p_old_line_rec.ship_from_org_id );
3463: oe_debug_pub.add('New ship_from_org_id :'|| p_x_line_rec.ship_from_org_id );
3464: END IF;
3465:
3466: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
3459:
3460: -- Pack J catchweight
3461: IF l_debug_level > 0 THEN
3462: oe_debug_pub.add('old ship_from_org_id:'|| p_old_line_rec.ship_from_org_id );
3463: oe_debug_pub.add('New ship_from_org_id :'|| p_x_line_rec.ship_from_org_id );
3464: END IF;
3465:
3466: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510' THEN
3467: IF p_x_line_rec.ship_from_org_id IS NOT NULL AND
3478: FROM mtl_parameters
3479: WHERE organization_id= p_old_line_rec.ship_from_org_id;
3480: END IF;
3481: IF l_debug_level > 0 THEN
3482: oe_debug_pub.add('l_wms_org_flag_new:'|| l_wms_org_flag_new);
3483: oe_debug_pub.add('l_wms_org_flag_old:'|| l_wms_org_flag_old);
3484: END IF;
3485: IF l_wms_org_flag_new <> l_wms_org_flag_old
3486: AND (l_wms_org_flag_new = 'Y' OR l_wms_org_flag_old = 'Y') THEN -- added for bug 8449058
3479: WHERE organization_id= p_old_line_rec.ship_from_org_id;
3480: END IF;
3481: IF l_debug_level > 0 THEN
3482: oe_debug_pub.add('l_wms_org_flag_new:'|| l_wms_org_flag_new);
3483: oe_debug_pub.add('l_wms_org_flag_old:'|| l_wms_org_flag_old);
3484: END IF;
3485: IF l_wms_org_flag_new <> l_wms_org_flag_old
3486: AND (l_wms_org_flag_new = 'Y' OR l_wms_org_flag_old = 'Y') THEN -- added for bug 8449058
3487: OE_GLOBALS.G_PRICE_FLAG := 'Y';
3497: -- change of subinventory should not require tax or pricing calculation.
3498: -- or even hold evaluation
3499: l_update_shipping := FND_API.G_TRUE;
3500: if l_debug_level > 0 then
3501: oe_debug_pub.add('subinventory update', 1);
3502: end if;
3503: END IF;
3504:
3505:
3572: AND OE_Freight_Rating_Util.Get_List_Line_Type_Code
3573: (p_x_line_rec.header_id)
3574: = 'OM_CALLED_FREIGHT_RATES' THEN
3575: if l_debug_level > 0 then
3576: oe_debug_pub.add('Log Freight Rating request for ship to org. ',3);
3577: end if;
3578: l_get_FTE_freight_rate := 'Y';
3579: END IF;
3580:
3583: -- QUOTING change
3584: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
3585: THEN
3586: if l_debug_level > 0 then
3587: oe_debug_pub.ADD('ship to update: logging request for eval_hold_source', 1);
3588: oe_debug_pub.add('line ID: '|| to_char(p_x_line_rec.line_id) ||
3589: ' Entity ID :'|| to_char(p_x_line_rec.ship_to_org_id), 1);
3590: end if;
3591: OE_delayed_requests_Pvt.log_request(
3584: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
3585: THEN
3586: if l_debug_level > 0 then
3587: oe_debug_pub.ADD('ship to update: logging request for eval_hold_source', 1);
3588: oe_debug_pub.add('line ID: '|| to_char(p_x_line_rec.line_id) ||
3589: ' Entity ID :'|| to_char(p_x_line_rec.ship_to_org_id), 1);
3590: end if;
3591: OE_delayed_requests_Pvt.log_request(
3592: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
3599: p_param2 => p_x_line_rec.ship_to_org_id,
3600: x_return_status => l_return_status);
3601:
3602: if l_debug_level > 0 then
3603: oe_debug_pub.add('return status after logging delayed request '||
3604: p_x_line_rec.return_status, 1);
3605: end if;
3606: END IF;
3607:
3617: --Customer Acceptance
3618: l_def_contingency_attributes := FND_API.G_TRUE;
3619:
3620: if l_debug_level > 0 then
3621: oe_debug_pub.add('In Apply Atrributes:Sold To', 1);
3622: oe_debug_pub.add('Return Status before is : '||p_x_line_rec.return_status, 1);
3623: end if;
3624:
3625: -- Call Pricing
3618: l_def_contingency_attributes := FND_API.G_TRUE;
3619:
3620: if l_debug_level > 0 then
3621: oe_debug_pub.add('In Apply Atrributes:Sold To', 1);
3622: oe_debug_pub.add('Return Status before is : '||p_x_line_rec.return_status, 1);
3623: end if;
3624:
3625: -- Call Pricing
3626: OE_GLOBALS.G_PRICE_FLAG := 'Y';
3636: IF p_x_line_rec.item_identifier_type = 'CUST' THEN
3637: IF (p_x_line_rec.ordered_item_id IS NOT NULL AND
3638: p_x_line_rec.ordered_item_id <> FND_API.G_MISS_NUM) THEN
3639: if l_debug_level > 0 then
3640: oe_debug_pub.add('old sold_to is' || to_char(p_old_line_rec.sold_to_org_id), 1);
3641: oe_debug_pub.add('new sold_to is' || to_char(p_x_line_rec.sold_to_org_id), 1);
3642: end if;
3643: fnd_message.set_name('ONT','OE_CUSTOMER_ITEM_EXIST');
3644: OE_MSG_PUB.Add;
3637: IF (p_x_line_rec.ordered_item_id IS NOT NULL AND
3638: p_x_line_rec.ordered_item_id <> FND_API.G_MISS_NUM) THEN
3639: if l_debug_level > 0 then
3640: oe_debug_pub.add('old sold_to is' || to_char(p_old_line_rec.sold_to_org_id), 1);
3641: oe_debug_pub.add('new sold_to is' || to_char(p_x_line_rec.sold_to_org_id), 1);
3642: end if;
3643: fnd_message.set_name('ONT','OE_CUSTOMER_ITEM_EXIST');
3644: OE_MSG_PUB.Add;
3645: p_x_line_rec.return_status := FND_API.G_RET_STS_ERROR;
3646: END IF;
3647: END IF;
3648: END IF;
3649: if l_debug_level > 0 then
3650: oe_debug_pub.add('Return Status after is : '||p_x_line_rec.return_status, 1);
3651: end if;
3652:
3653: if p_x_line_rec.commitment_id is not null then
3654: l_get_commitment_bal := 'Y';
3711: AND nvl(p_x_line_rec.order_source_id,-1) <> 10 --added for the FP bug 3709662
3712:
3713: THEN
3714: IF l_debug_level > 0 THEN
3715: oe_debug_pub.add('pviprana: the price_flag is changing to P here and order_source_id is '||p_x_line_rec.order_source_id);
3716: --oe_debug_pub.add('pviprana: order_source_id is ' ||p_x_line_rec.order_source_id);
3717: END IF;
3718: p_x_line_rec.calculate_price_flag := 'P';
3719: END IF;
3712:
3713: THEN
3714: IF l_debug_level > 0 THEN
3715: oe_debug_pub.add('pviprana: the price_flag is changing to P here and order_source_id is '||p_x_line_rec.order_source_id);
3716: --oe_debug_pub.add('pviprana: order_source_id is ' ||p_x_line_rec.order_source_id);
3717: END IF;
3718: p_x_line_rec.calculate_price_flag := 'P';
3719: END IF;
3720:
3734: EXCEPTION
3735: WHEN OTHERS THEN
3736: l_orig_line_calc_price_flag := NULL;
3737: END;
3738: oe_debug_pub.add('Bug#5026401 l_orig_line_calc_price_flag:'||l_orig_line_calc_price_flag);
3739: IF NVL(l_orig_line_calc_price_flag,'N') IN ('Y','P')
3740: THEN
3741: p_x_line_rec.calculate_price_flag := 'P';
3742: END IF;
3740: THEN
3741: p_x_line_rec.calculate_price_flag := 'P';
3742: END IF;
3743: END IF;
3744: oe_debug_pub.add('Bug#5026401 p_x_line_rec.calculate_price_flag:'|| p_x_line_rec.calculate_price_flag);
3745: /* Bug#5026401 - End */
3746:
3747: END IF;
3748: END IF;
3822: END IF;
3823: --CC Reversal ER#16014135 Start
3824: IF p_x_line_rec.tax_value <> p_old_line_rec.tax_value AND l_cc_rev_reauth_code IS NOT NULL THEN
3825: if l_debug_level > 0 then
3826: oe_debug_pub.ADD('Log Verify Payment delayed request in Tax Value change',5);
3827: end if;
3828: l_verify_payment_flag := 'Y';
3829: END IF;
3830: --CC Reversal ER#16014135 End
3835: --OE_Order_Cache.g_header_rec.payment_type_code = 'CREDIT_CARD' THEN --CC Reversal ER#16014135 Commented
3836: (OE_Order_Cache.g_header_rec.payment_type_code = 'CREDIT_CARD' AND l_cc_rev_reauth_code IS NULL) THEN --CC Reversal ER#16014135
3837: -- Set flag to log Verify Payment Delayed Request
3838: if l_debug_level > 0 then
3839: oe_debug_pub.ADD('Log Verify Payment delayed request in Tax Value');
3840: end if;
3841: l_verify_payment_flag := 'Y';
3842:
3843: ELSIF OE_PrePayment_UTIL.is_prepaid_order(p_x_line_rec.header_id)
3844: = 'Y' AND p_x_line_rec.booked_flag ='Y' THEN
3845: -- if this is a prepaid order, also log delayed request if ordered
3846: -- quantity decreases, as refund may need to be issued.
3847: if l_debug_level > 0 then
3848: oe_debug_pub.ADD('Log Verify Payment delayed request in Tax Value for prepayment', 3);
3849: end if;
3850: l_verify_payment_flag := 'Y';
3851: END IF;
3852: END IF;
3867: IF( p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE
3868: AND p_x_line_rec.booked_flag ='Y') THEN
3869: -- Log Delayed Request for Verify Payment
3870: if l_debug_level > 0 then
3871: oe_debug_pub.ADD('log verify payment delayed request for change in List price');
3872: end if;
3873: l_verify_payment_flag := 'Y';
3874: END IF;
3875: END IF;
3884: l_3a7_attribute_change := FND_API.G_TRUE;
3885: IF (p_x_line_rec.unit_selling_price is NULL And
3886: p_old_line_rec.unit_selling_price is NOT NULL) Then
3887: if l_debug_level > 0 then
3888: oe_debug_pub.add('User has cleared unit selling price');
3889: oe_debug_pub.add('Just Reprice');
3890: end if;
3891: --Oe_Line_Adj_Util.Delete_Row(p_line_id=>p_x_line_rec.line_id); 7363196
3892: OE_GLOBALS.G_PRICE_FLAG := 'Y';
3885: IF (p_x_line_rec.unit_selling_price is NULL And
3886: p_old_line_rec.unit_selling_price is NOT NULL) Then
3887: if l_debug_level > 0 then
3888: oe_debug_pub.add('User has cleared unit selling price');
3889: oe_debug_pub.add('Just Reprice');
3890: end if;
3891: --Oe_Line_Adj_Util.Delete_Row(p_line_id=>p_x_line_rec.line_id); 7363196
3892: OE_GLOBALS.G_PRICE_FLAG := 'Y';
3893: p_x_line_rec.unit_list_price := NULL;
3914: OR (OE_PrePayment_UTIL.is_prepaid_order(p_x_line_rec.header_id)
3915: = 'Y' AND p_x_line_rec.booked_flag ='Y'
3916: AND p_x_line_rec.shipped_quantity IS NULL) THEN
3917: if l_debug_level > 0 then
3918: oe_debug_pub.ADD('Log Verify Payment delayed request in Selling Price');
3919: end if;
3920: l_verify_payment_flag := 'Y';
3921: END IF;
3922: END IF;
3925: AND p_x_line_rec.shipped_quantity IS NULL THEN
3926: -- if this is a prepaid order, also log delayed request if selling
3927: -- price decreases, as refund may need to be issued.
3928: if l_debug_level > 0 then
3929: oe_debug_pub.ADD('Log Verify Payment delayed request for change in Selling Price for prepayment', 3);
3930: end if;
3931: l_verify_payment_flag := 'Y';
3932: END IF;
3933: ELSE
3932: END IF;
3933: ELSE
3934: IF p_x_line_rec.booked_flag ='Y' THEN
3935: if l_debug_level > 0 then
3936: oe_debug_pub.ADD('Log Verify Payment delayed request for change in Selling Price');
3937: end if;
3938: l_verify_payment_flag := 'Y';
3939: END IF;
3940: END IF;
3953:
3954: THEN
3955: -- Call Pricing
3956: if l_debug_level > 0 then
3957: oe_debug_pub.add('CSH- service start_date is changed');
3958: end if;
3959: OE_GLOBALS.G_PRICE_FLAG := 'Y';
3960: l_copy_service_fields := TRUE;
3961:
3964: END IF;
3965: --BUG#12542895
3966: IF (p_x_line_rec.item_type_code = 'SERVICE'
3967: OR p_x_line_rec.subscription_enable_flag='Y' ) THEN --sol_ord_er #16014165
3968: oe_debug_pub.add('Calling OE_SERVICE_UTIL.Get_Service_Duration for change in service start date');
3969: OE_SERVICE_UTIL.Get_Service_Duration
3970: (x_return_status => l_return_status
3971: , p_x_line_rec => p_x_line_rec);
3972:
3983: IF NOT OE_GLOBALS.Equal(p_x_line_rec.service_end_date,p_old_line_rec.service_end_date)
3984:
3985: THEN
3986: if l_debug_level > 0 then
3987: oe_debug_pub.add('CSH- service end_date is changed');
3988: end if;
3989: -- Call Pricing
3990: OE_GLOBALS.G_PRICE_FLAG := 'Y';
3991: l_copy_service_fields := TRUE;
3995: END IF;
3996: --BUG#12542895
3997: IF (p_x_line_rec.item_type_code = 'SERVICE'
3998: OR p_x_line_rec.subscription_enable_flag='Y' ) THEN --sol_ord_er #16014165
3999: oe_debug_pub.add('Calling OE_SERVICE_UTIL.Get_Service_Duration for change in service end date');
4000: OE_SERVICE_UTIL.Get_Service_Duration
4001: (x_return_status => l_return_status
4002: , p_x_line_rec => p_x_line_rec);
4003:
4018: -- Call Pricing
4019: OE_GLOBALS.G_PRICE_FLAG := 'Y';
4020: /* csheu -- bug #1533658 s*/
4021: if l_debug_level > 0 then
4022: oe_debug_pub.add('CSH- service duration is changed');
4023: end if;
4024: l_copy_service_fields := TRUE;
4025: /* csheu -- bug #1533658 e*/
4026:
4029: END IF;
4030: --BUG#12542895
4031: IF (p_x_line_rec.item_type_code = 'SERVICE'
4032: OR p_x_line_rec.subscription_enable_flag='Y' ) THEN --sol_ord_er #16014165
4033: oe_debug_pub.add('Calling OE_SERVICE_UTIL.Get_Service_Duration for change in service Duration');
4034: OE_SERVICE_UTIL.Get_Service_Duration
4035: (x_return_status => l_return_status
4036: , p_x_line_rec => p_x_line_rec);
4037:
4054: END IF;
4055:
4056: /* csheu -- bug #1533658 s*/
4057: if l_debug_level > 0 then
4058: oe_debug_pub.add('CSH- service period is changed');
4059: end if;
4060: l_copy_service_fields := TRUE;
4061: /* csheu -- bug #1533658 e*/
4062: --BUG#12542895
4061: /* csheu -- bug #1533658 e*/
4062: --BUG#12542895
4063: IF (p_x_line_rec.item_type_code = 'SERVICE'
4064: OR p_x_line_rec.subscription_enable_flag='Y' ) THEN --sol_ord_er #16014165
4065: oe_debug_pub.add('Calling OE_SERVICE_UTIL.Get_Service_Duration for change in service Period');
4066: OE_SERVICE_UTIL.Get_Service_Duration
4067: (x_return_status => l_return_status
4068: , p_x_line_rec => p_x_line_rec);
4069:
4079: IF NOT OE_GLOBALS.Equal(p_x_line_rec.service_reference_line_id,p_old_line_rec.service_reference_line_id)
4080:
4081: THEN
4082: if l_debug_level > 0 then
4083: oe_debug_pub.add('JPN: line id is: ' || to_char(p_x_line_rec.line_id));
4084: oe_debug_pub.add('JPN: Serviced line id is: ' || to_char(p_x_line_rec.service_reference_line_id));
4085: end if;
4086:
4087: -- The IF condition on source_type_document_type_id is being
4080:
4081: THEN
4082: if l_debug_level > 0 then
4083: oe_debug_pub.add('JPN: line id is: ' || to_char(p_x_line_rec.line_id));
4084: oe_debug_pub.add('JPN: Serviced line id is: ' || to_char(p_x_line_rec.service_reference_line_id));
4085: end if;
4086:
4087: -- The IF condition on source_type_document_type_id is being
4088: -- commented for bug 2372098
4102: , p_x_line_rec => p_x_line_rec
4103: );
4104:
4105: if l_debug_level > 0 then
4106: oe_debug_pub.add('AKS: Service num is: ' || to_char(p_x_line_rec.service_number));
4107: oe_debug_pub.add('UTIL call: Line num is: ' || to_char(p_x_line_rec.line_number));
4108: end if;
4109:
4110: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4103: );
4104:
4105: if l_debug_level > 0 then
4106: oe_debug_pub.add('AKS: Service num is: ' || to_char(p_x_line_rec.service_number));
4107: oe_debug_pub.add('UTIL call: Line num is: ' || to_char(p_x_line_rec.line_number));
4108: end if;
4109:
4110: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4156: -- INCLUDED items. This check is for copied service lines.
4157:
4158: IF (p_x_line_rec.source_document_type_id = 2 AND l_is_model = 'Y') THEN
4159: if l_debug_level > 0 then
4160: oe_debug_pub.add( 'This is a copied service line', 5 );
4161: end if;
4162: BEGIN
4163: Select 'Y'
4164: INTO l_is_model
4183: /* Log the service delayed request only if it is not a split. */
4184: /* Fix for Bug 1802612 */
4185:
4186: if l_debug_level > 0 then
4187: oe_debug_pub.ADD('SERVICE: Logging delayed request ');
4188: oe_debug_pub.ADD('JPN: What type of item: '|| l_is_model);
4189: oe_debug_pub.add('Split action code:' || p_x_line_rec.split_action_code);
4190: oe_debug_pub.add('Operation:' || p_x_line_rec.operation);
4191: oe_debug_pub.add('Split from line:' || p_x_line_rec.split_from_line_id);
4184: /* Fix for Bug 1802612 */
4185:
4186: if l_debug_level > 0 then
4187: oe_debug_pub.ADD('SERVICE: Logging delayed request ');
4188: oe_debug_pub.ADD('JPN: What type of item: '|| l_is_model);
4189: oe_debug_pub.add('Split action code:' || p_x_line_rec.split_action_code);
4190: oe_debug_pub.add('Operation:' || p_x_line_rec.operation);
4191: oe_debug_pub.add('Split from line:' || p_x_line_rec.split_from_line_id);
4192: end if;
4185:
4186: if l_debug_level > 0 then
4187: oe_debug_pub.ADD('SERVICE: Logging delayed request ');
4188: oe_debug_pub.ADD('JPN: What type of item: '|| l_is_model);
4189: oe_debug_pub.add('Split action code:' || p_x_line_rec.split_action_code);
4190: oe_debug_pub.add('Operation:' || p_x_line_rec.operation);
4191: oe_debug_pub.add('Split from line:' || p_x_line_rec.split_from_line_id);
4192: end if;
4193:
4186: if l_debug_level > 0 then
4187: oe_debug_pub.ADD('SERVICE: Logging delayed request ');
4188: oe_debug_pub.ADD('JPN: What type of item: '|| l_is_model);
4189: oe_debug_pub.add('Split action code:' || p_x_line_rec.split_action_code);
4190: oe_debug_pub.add('Operation:' || p_x_line_rec.operation);
4191: oe_debug_pub.add('Split from line:' || p_x_line_rec.split_from_line_id);
4192: end if;
4193:
4194: IF NOT (( NVL(p_x_line_rec.split_action_code,'X') = 'SPLIT' and
4187: oe_debug_pub.ADD('SERVICE: Logging delayed request ');
4188: oe_debug_pub.ADD('JPN: What type of item: '|| l_is_model);
4189: oe_debug_pub.add('Split action code:' || p_x_line_rec.split_action_code);
4190: oe_debug_pub.add('Operation:' || p_x_line_rec.operation);
4191: oe_debug_pub.add('Split from line:' || p_x_line_rec.split_from_line_id);
4192: end if;
4193:
4194: IF NOT (( NVL(p_x_line_rec.split_action_code,'X') = 'SPLIT' and
4195: p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE) or
4203: p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE) and
4204: l_is_model = 'Y' THEN
4205: --bug 16848168 changes
4206: BEGIN
4207: oe_debug_pub.ADD('p_x_line_rec.service_reference_line_id : '||p_x_line_rec.service_reference_line_id,1);
4208: oe_debug_pub.ADD('p_x_line_rec.line_id : '||p_x_line_rec.line_id,1);
4209: oe_debug_pub.ADD('p_x_line_rec.item_type_code : '||p_x_line_rec.item_type_code,1);
4210: oe_debug_pub.ADD('p_x_line_rec.SUBSCRIPTION_ENABLE_FLAG : '||p_x_line_rec.SUBSCRIPTION_ENABLE_FLAG,1);
4211:
4204: l_is_model = 'Y' THEN
4205: --bug 16848168 changes
4206: BEGIN
4207: oe_debug_pub.ADD('p_x_line_rec.service_reference_line_id : '||p_x_line_rec.service_reference_line_id,1);
4208: oe_debug_pub.ADD('p_x_line_rec.line_id : '||p_x_line_rec.line_id,1);
4209: oe_debug_pub.ADD('p_x_line_rec.item_type_code : '||p_x_line_rec.item_type_code,1);
4210: oe_debug_pub.ADD('p_x_line_rec.SUBSCRIPTION_ENABLE_FLAG : '||p_x_line_rec.SUBSCRIPTION_ENABLE_FLAG,1);
4211:
4212:
4205: --bug 16848168 changes
4206: BEGIN
4207: oe_debug_pub.ADD('p_x_line_rec.service_reference_line_id : '||p_x_line_rec.service_reference_line_id,1);
4208: oe_debug_pub.ADD('p_x_line_rec.line_id : '||p_x_line_rec.line_id,1);
4209: oe_debug_pub.ADD('p_x_line_rec.item_type_code : '||p_x_line_rec.item_type_code,1);
4210: oe_debug_pub.ADD('p_x_line_rec.SUBSCRIPTION_ENABLE_FLAG : '||p_x_line_rec.SUBSCRIPTION_ENABLE_FLAG,1);
4211:
4212:
4213: SELECT 'Y'
4206: BEGIN
4207: oe_debug_pub.ADD('p_x_line_rec.service_reference_line_id : '||p_x_line_rec.service_reference_line_id,1);
4208: oe_debug_pub.ADD('p_x_line_rec.line_id : '||p_x_line_rec.line_id,1);
4209: oe_debug_pub.ADD('p_x_line_rec.item_type_code : '||p_x_line_rec.item_type_code,1);
4210: oe_debug_pub.ADD('p_x_line_rec.SUBSCRIPTION_ENABLE_FLAG : '||p_x_line_rec.SUBSCRIPTION_ENABLE_FLAG,1);
4211:
4212:
4213: SELECT 'Y'
4214: INTO l_prg
4223: AND ROWNUM <2;
4224:
4225: EXCEPTION
4226: WHEN NO_DATA_FOUND THEN
4227: oe_debug_pub.ADD('prg does not exist',1);
4228: l_prg := 'N';
4229: END;
4230:
4231: oe_debug_pub.ADD('l_prg is '||l_prg);
4227: oe_debug_pub.ADD('prg does not exist',1);
4228: l_prg := 'N';
4229: END;
4230:
4231: oe_debug_pub.ADD('l_prg is '||l_prg);
4232: IF l_prg = 'N' THEN
4233:
4234: OE_Delayed_Requests_Pvt.log_request(
4235: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4240: x_return_status => l_return_status);
4241:
4242: ELSE
4243:
4244: oe_debug_pub.add('Do not cascade service:- service got added by PRG modifier', 2);
4245:
4246: END IF;
4247: --end bug 16848168 changes
4248: END IF; /* delayed request */
4267:
4268: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE
4269: THEN
4270: if l_debug_level > 0 then
4271: oe_debug_pub.ADD('operation : '|| p_x_line_rec.operation);
4272: oe_debug_pub.ADD('inventory_item_id : '|| p_x_line_rec.inventory_item_id);
4273: end if;
4274: BEGIN
4275: select distinct 'Y'
4268: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE
4269: THEN
4270: if l_debug_level > 0 then
4271: oe_debug_pub.ADD('operation : '|| p_x_line_rec.operation);
4272: oe_debug_pub.ADD('inventory_item_id : '|| p_x_line_rec.inventory_item_id);
4273: end if;
4274: BEGIN
4275: select distinct 'Y'
4276: into l_serviceable_item
4285: l_serviceable_item := 'N';
4286: END;
4287:
4288: if l_debug_level > 0 then
4289: oe_debug_pub.ADD('serviceable option : '|| l_serviceable_item);
4290:
4291: oe_debug_pub.ADD('service_reference_line_id: '|| p_x_line_rec.top_model_line_id);
4292: end if;
4293:
4287:
4288: if l_debug_level > 0 then
4289: oe_debug_pub.ADD('serviceable option : '|| l_serviceable_item);
4290:
4291: oe_debug_pub.ADD('service_reference_line_id: '|| p_x_line_rec.top_model_line_id);
4292: end if;
4293:
4294: IF l_serviceable_item = 'Y' THEN
4295: BEGIN
4305: l_serviced_model := 'N';
4306: END;
4307:
4308: if l_debug_level > 0 then
4309: oe_debug_pub.ADD('serviced model : '|| l_serviced_model);
4310: end if;
4311:
4312: IF l_serviced_model = 'Y' THEN
4313: if l_debug_level > 0 then
4310: end if;
4311:
4312: IF l_serviced_model = 'Y' THEN
4313: if l_debug_level > 0 then
4314: oe_debug_pub.add('Before log delayed request -- G_CASCADE_OPTIONS_SERVICE',1);
4315: end if;
4316: OE_Delayed_Requests_Pvt.log_request(
4317: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4318: p_entity_id => p_x_line_rec.line_id,
4326: END IF; /*operation = CREATE */
4327: END IF; /* check if not split */
4328: END IF; /* item_type_code='OPTION' or 'CLASS'*/
4329:
4330: -- oe_debug_pub.add(' out of cascade option condition',1);
4331:
4332: /*lchen -- bug #1761154 end*/
4333:
4334: /* End of service related columns */
4376: AND NVL(p_x_line_rec.split_action_code,'X') <> 'SPLIT'
4377: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4378: THEN
4379: IF l_debug_level > 0 then
4380: oe_debug_pub.ADD('created By update: logging request for eval_hold_source');
4381: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4382: ' Entity ID: '|| to_char(p_x_line_rec.created_by));
4383: END IF;
4384:
4377: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4378: THEN
4379: IF l_debug_level > 0 then
4380: oe_debug_pub.ADD('created By update: logging request for eval_hold_source');
4381: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4382: ' Entity ID: '|| to_char(p_x_line_rec.created_by));
4383: END IF;
4384:
4385: OE_delayed_requests_Pvt.log_request(
4399: AND NVL(p_x_line_rec.split_action_code,'X') <> 'SPLIT'
4400: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4401: THEN
4402: IF l_debug_level > 0 then
4403: oe_debug_pub.ADD('Creation date update: logging request for eval_hold_source');
4404: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4405: ' Entity ID: '|| to_char(p_x_line_rec.creation_date));
4406: END IF;
4407:
4400: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4401: THEN
4402: IF l_debug_level > 0 then
4403: oe_debug_pub.ADD('Creation date update: logging request for eval_hold_source');
4404: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4405: ' Entity ID: '|| to_char(p_x_line_rec.creation_date));
4406: END IF;
4407:
4408: OE_delayed_requests_Pvt.log_request(
4422: AND NVL(p_x_line_rec.split_action_code,'X') <> 'SPLIT'
4423: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4424: THEN
4425: IF l_debug_level > 0 then
4426: oe_debug_pub.ADD('Customer update: logging request for eval_hold_source');
4427: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4428: ' Entity ID: '|| to_char(p_x_line_rec.sold_to_org_id));
4429: END IF;
4430:
4423: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4424: THEN
4425: IF l_debug_level > 0 then
4426: oe_debug_pub.ADD('Customer update: logging request for eval_hold_source');
4427: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4428: ' Entity ID: '|| to_char(p_x_line_rec.sold_to_org_id));
4429: END IF;
4430:
4431: OE_delayed_requests_Pvt.log_request(
4445: AND NVL(p_x_line_rec.split_action_code,'X') <> 'SPLIT'
4446: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4447: THEN
4448: IF l_debug_level > 0 then
4449: oe_debug_pub.ADD('Delver to site update: logging request for eval_hold_source');
4450: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4451: ' Entity ID: '|| to_char(p_x_line_rec.deliver_to_org_id));
4452: END IF;
4453:
4446: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4447: THEN
4448: IF l_debug_level > 0 then
4449: oe_debug_pub.ADD('Delver to site update: logging request for eval_hold_source');
4450: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4451: ' Entity ID: '|| to_char(p_x_line_rec.deliver_to_org_id));
4452: END IF;
4453:
4454: OE_delayed_requests_Pvt.log_request(
4468: AND NVL(p_x_line_rec.split_action_code,'X') <> 'SPLIT'
4469: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4470: THEN
4471: IF l_debug_level > 0 then
4472: oe_debug_pub.ADD('Line Type update: logging request for eval_hold_source');
4473: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4474: ' Entity ID: '|| to_char(p_x_line_rec.line_type_id));
4475: END IF;
4476:
4469: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4470: THEN
4471: IF l_debug_level > 0 then
4472: oe_debug_pub.ADD('Line Type update: logging request for eval_hold_source');
4473: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4474: ' Entity ID: '|| to_char(p_x_line_rec.line_type_id));
4475: END IF;
4476:
4477: OE_delayed_requests_Pvt.log_request(
4491: AND NVL(p_x_line_rec.split_action_code,'X') <> 'SPLIT'
4492: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4493: THEN
4494: IF l_debug_level > 0 then
4495: oe_debug_pub.ADD('Payment Term update: logging request for eval_hold_source');
4496: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4497: ' Entity ID: '|| to_char(p_x_line_rec.payment_term_id));
4498: END IF;
4499:
4492: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4493: THEN
4494: IF l_debug_level > 0 then
4495: oe_debug_pub.ADD('Payment Term update: logging request for eval_hold_source');
4496: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4497: ' Entity ID: '|| to_char(p_x_line_rec.payment_term_id));
4498: END IF;
4499:
4500: OE_delayed_requests_Pvt.log_request(
4514: AND NVL(p_x_line_rec.split_action_code,'X') <> 'SPLIT'
4515: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4516: THEN
4517: IF l_debug_level > 0 then
4518: oe_debug_pub.ADD('Price List update: logging request for eval_hold_source');
4519: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4520: ' Entity ID: '|| to_char(p_x_line_rec.price_list_id));
4521: END IF;
4522:
4515: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4516: THEN
4517: IF l_debug_level > 0 then
4518: oe_debug_pub.ADD('Price List update: logging request for eval_hold_source');
4519: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4520: ' Entity ID: '|| to_char(p_x_line_rec.price_list_id));
4521: END IF;
4522:
4523: OE_delayed_requests_Pvt.log_request(
4537: AND NVL(p_x_line_rec.split_action_code,'X') <> 'SPLIT'
4538: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4539: THEN
4540: IF l_debug_level > 0 then
4541: oe_debug_pub.ADD('Project update: logging request for eval_hold_source');
4542: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4543: ' Entity ID: '|| to_char(p_x_line_rec.project_id));
4544: END IF;
4545:
4538: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4539: THEN
4540: IF l_debug_level > 0 then
4541: oe_debug_pub.ADD('Project update: logging request for eval_hold_source');
4542: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4543: ' Entity ID: '|| to_char(p_x_line_rec.project_id));
4544: END IF;
4545:
4546: OE_delayed_requests_Pvt.log_request(
4560: AND NVL(p_x_line_rec.split_action_code,'X') <> 'SPLIT'
4561: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4562: THEN
4563: IF l_debug_level > 0 then
4564: oe_debug_pub.ADD('Shipping Method update: logging request for eval_hold_source');
4565: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4566: ' Entity ID: '|| to_char(p_x_line_rec.shipping_method_code));
4567: END IF;
4568:
4561: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4562: THEN
4563: IF l_debug_level > 0 then
4564: oe_debug_pub.ADD('Shipping Method update: logging request for eval_hold_source');
4565: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4566: ' Entity ID: '|| to_char(p_x_line_rec.shipping_method_code));
4567: END IF;
4568:
4569: OE_delayed_requests_Pvt.log_request(
4583: AND NVL(p_x_line_rec.split_action_code,'X') <> 'SPLIT'
4584: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4585: THEN
4586: IF l_debug_level > 0 then
4587: oe_debug_pub.ADD('Source Type update: logging request for eval_hold_source');
4588: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4589: ' Entity ID: '|| to_char(p_x_line_rec.source_type_code));
4590: END IF;
4591:
4584: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4585: THEN
4586: IF l_debug_level > 0 then
4587: oe_debug_pub.ADD('Source Type update: logging request for eval_hold_source');
4588: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4589: ' Entity ID: '|| to_char(p_x_line_rec.source_type_code));
4590: END IF;
4591:
4592: OE_delayed_requests_Pvt.log_request(
4606: AND NVL(p_x_line_rec.split_action_code,'X') <> 'SPLIT'
4607: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4608: THEN
4609: IF l_debug_level > 0 then
4610: oe_debug_pub.ADD('task id update: logging request for eval_hold_source');
4611: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4612: ' Entity ID: '|| to_char(p_x_line_rec.task_id));
4613: END IF;
4614:
4607: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4608: THEN
4609: IF l_debug_level > 0 then
4610: oe_debug_pub.ADD('task id update: logging request for eval_hold_source');
4611: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4612: ' Entity ID: '|| to_char(p_x_line_rec.task_id));
4613: END IF;
4614:
4615: OE_delayed_requests_Pvt.log_request(
4629: AND NVL(p_x_line_rec.split_action_code,'X') <> 'SPLIT'
4630: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4631: THEN
4632: IF l_debug_level > 0 then
4633: oe_debug_pub.ADD('Top Model update: logging request for eval_hold_source');
4634: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4635: ' Entity ID: '|| to_char(p_x_line_rec.inventory_item_id));
4636: END IF;
4637:
4630: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F'
4631: THEN
4632: IF l_debug_level > 0 then
4633: oe_debug_pub.ADD('Top Model update: logging request for eval_hold_source');
4634: oe_debug_pub.ADD('line ID: '|| to_char(p_x_line_rec.line_id)||
4635: ' Entity ID: '|| to_char(p_x_line_rec.inventory_item_id));
4636: END IF;
4637:
4638: OE_delayed_requests_Pvt.log_request(
4656: AND NVL(p_x_line_rec.split_action_code,'X') <> 'SPLIT'
4657: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F' THEN
4658:
4659: IF l_debug_level > 0 THEN
4660: oe_debug_pub.ADD('End Customer update: logging request for eval_hold_source');
4661: oe_debug_pub.ADD('line ID: '|| TO_CHAR(p_x_line_rec.line_id)||
4662: ' Entity ID: '|| TO_CHAR(p_x_line_rec.end_customer_id));
4663: END IF;
4664:
4657: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F' THEN
4658:
4659: IF l_debug_level > 0 THEN
4660: oe_debug_pub.ADD('End Customer update: logging request for eval_hold_source');
4661: oe_debug_pub.ADD('line ID: '|| TO_CHAR(p_x_line_rec.line_id)||
4662: ' Entity ID: '|| TO_CHAR(p_x_line_rec.end_customer_id));
4663: END IF;
4664:
4665: OE_delayed_requests_Pvt.log_request(
4678: AND NVL(p_x_line_rec.split_action_code,'X') <> 'SPLIT'
4679: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F' THEN
4680:
4681: IF l_debug_level > 0 THEN
4682: oe_debug_pub.ADD('End Customer Location update: logging request for eval_hold_source');
4683: oe_debug_pub.ADD('line ID: '|| TO_CHAR(p_x_line_rec.line_id)||
4684: ' Entity ID: '|| TO_CHAR(p_x_line_rec.end_customer_site_use_id));
4685: END IF;
4686:
4679: AND NVL(p_x_line_rec.transaction_phase_code,'F') = 'F' THEN
4680:
4681: IF l_debug_level > 0 THEN
4682: oe_debug_pub.ADD('End Customer Location update: logging request for eval_hold_source');
4683: oe_debug_pub.ADD('line ID: '|| TO_CHAR(p_x_line_rec.line_id)||
4684: ' Entity ID: '|| TO_CHAR(p_x_line_rec.end_customer_site_use_id));
4685: END IF;
4686:
4687: OE_delayed_requests_Pvt.log_request(
4709: (p_in_site_id => p_x_line_rec.invoice_to_org_id,
4710: p_out_IDfound=> l_new_tbl_entry);
4711:
4712: IF l_debug_level > 0 THEN
4713: oe_debug_pub.ADD('Bill To Customer update: logging request for eval_hold_source');
4714: oe_debug_pub.ADD('line ID: '|| TO_CHAR(p_x_line_rec.line_id)||
4715: ' Entity ID: '|| TO_CHAR(l_bill_to_cust_id));
4716: END IF;
4717:
4710: p_out_IDfound=> l_new_tbl_entry);
4711:
4712: IF l_debug_level > 0 THEN
4713: oe_debug_pub.ADD('Bill To Customer update: logging request for eval_hold_source');
4714: oe_debug_pub.ADD('line ID: '|| TO_CHAR(p_x_line_rec.line_id)||
4715: ' Entity ID: '|| TO_CHAR(l_bill_to_cust_id));
4716: END IF;
4717:
4718: OE_delayed_requests_Pvt.log_request(
4736: OE_GLOBALS.G_TAX_FLAG := 'Y';
4737:
4738: -- log delayed request for Verify_Payment.
4739: if l_debug_level > 0 then
4740: oe_debug_pub.add('log verify payment delayed request for change in commitment_id', 3);
4741: end if;
4742: l_verify_payment_flag := 'Y';
4743: OE_CREDIT_ENGINE_GRP.TOLERANCE_CHECK_REQUIRED := FALSE; --ER 12363706
4744: END IF;
4748: AND oe_code_control.code_release_level >= '110510'
4749: AND p_x_line_rec.commitment_id IS NOT NULL
4750: THEN
4751: if l_debug_level > 0 then
4752: oe_debug_pub.add('Log verify payment delayed request for change in commitment_applied_amount.',3);
4753: end if;
4754: l_update_commitment_applied := 'Y';
4755: l_verify_payment_flag := 'Y'; --Added for CC Reversal ER Bug# 16654252
4756: END IF;
4767: -- NOTE: Evaluate Hold Source Requests will be directly executed
4768: -- in post_write, no need to log it here.
4769:
4770: if l_debug_level > 0 then
4771: oe_debug_pub.add('Log Complete Neg Requests for Line');
4772: end if;
4773:
4774: -- log a delayed request to get included items for this item if any.
4775:
4774: -- log a delayed request to get included items for this item if any.
4775:
4776: l_freeze_method := G_FREEZE_METHOD; /* Bug # 5036404 */
4777: if l_debug_level > 0 then
4778: oe_debug_pub.ADD('Freeze method is :' || l_freeze_method,2);
4779: end if;
4780:
4781: IF l_freeze_method = OE_GLOBALS.G_IIFM_ENTRY AND
4782: p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
4809: l_def_contingency_attributes := FND_API.G_TRUE;
4810: END IF;
4811:
4812: IF l_debug_level > 0 then
4813: oe_debug_pub.add('operation:'||p_x_line_rec.operation||' booked_flag:'||p_x_line_rec.booked_flag||' new contingency_id: '||p_x_line_rec.contingency_id ||' old contingency_id: '||p_old_line_rec.contingency_id);
4814: END IF;
4815: IF NVL(OE_SYS_PARAMETERS.VALUE('ENABLE_FULFILLMENT_ACCEPTANCE'), 'N') = 'Y'
4816: AND (NVL( p_x_line_rec.booked_flag, 'N') = 'N' OR
4817: p_x_line_rec.operation=OE_GLOBALS.G_OPR_CREATE)
4831: (p_x_line_rec.operation=OE_GLOBALS.G_OPR_CREATE AND p_x_line_rec.split_from_line_id IS NOT NULL) OR
4832: (p_x_line_rec.operation=OE_GLOBALS.G_OPR_UPDATE AND NOT OE_GLOBALS.Equal(p_x_line_rec.contingency_id,p_old_line_rec.contingency_id)) OR
4833: NVL(p_x_line_rec.transaction_phase_code, 'F') = 'N') THEN
4834: IF l_debug_level > 0 THEN
4835: oe_debug_pub.add('Item_type_code:'||p_x_line_rec.item_type_code||'-Do not default Contingency Attributes for this line' );
4836: END IF;
4837:
4838: OE_ACCEPTANCE_UTIL.Register_Changed_Lines(
4839: p_line_id => p_x_line_rec.line_id
4877: -- Customer Acceptance Changes End
4878:
4879: --sol_ord_er #16014165 start
4880: IF l_debug_level > 0 THEN
4881: oe_debug_pub.add('FIRST_PERIOD_AMOUNT:' ||p_x_line_rec.SERVICE_FIRST_PERIOD_AMOUNT
4882: ||' Bill Option: '||p_x_line_rec.service_bill_option_code);
4883: End If;
4884: IF (NVL(p_x_line_rec.service_bill_option_code,'FBOM') <> 'FPOM'
4885: and p_x_line_rec.SERVICE_FIRST_PERIOD_AMOUNT is not null) then
4883: End If;
4884: IF (NVL(p_x_line_rec.service_bill_option_code,'FBOM') <> 'FPOM'
4885: and p_x_line_rec.SERVICE_FIRST_PERIOD_AMOUNT is not null) then
4886: IF l_debug_level > 0 THEN
4887: oe_debug_pub.add(' ..First Period Amount made NULL');
4888: End If;
4889: p_x_line_rec.SERVICE_FIRST_PERIOD_AMOUNT := '';
4890: p_x_line_rec.service_first_period_enddate := '';
4891: End If;
4896: AND NVL(p_x_line_rec.inventory_item_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM)
4897: THEN
4898: If(NVL(p_x_line_rec.service_bill_option_code,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR) THEN
4899: IF l_debug_level > 0 THEN
4900: oe_debug_pub.add(p_x_line_rec.service_bill_option_code||
4901: ' ..service_bill_option_code is Inavlid for this line, will be reset to NULL');
4902: End If;
4903: p_x_line_rec.service_bill_option_code := '';
4904: End If;
4903: p_x_line_rec.service_bill_option_code := '';
4904: End If;
4905: If(NVL(p_x_line_rec.SERVICE_BILL_PROFILE_ID,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM) THEN
4906: IF l_debug_level > 0 THEN
4907: oe_debug_pub.add(p_x_line_rec.SERVICE_BILL_PROFILE_ID||
4908: ' ..SERVICE_BILL_PROFILE_ID is Inavlid for this line, will be reset to NULL');
4909: End If;
4910: p_x_line_rec.SERVICE_BILL_PROFILE_ID := '';
4911: End If;
4910: p_x_line_rec.SERVICE_BILL_PROFILE_ID := '';
4911: End If;
4912: If(NVL(p_x_line_rec.SERVICE_SUBS_TEMPLATE_ID,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM) THEN
4913: IF l_debug_level > 0 THEN
4914: oe_debug_pub.add(p_x_line_rec.SERVICE_SUBS_TEMPLATE_ID||
4915: ' ..SERVICE_SUBS_TEMPLATE_ID is Inavlid for this line, will be reset to NULL');
4916: End If;
4917: p_x_line_rec.SERVICE_SUBS_TEMPLATE_ID := '';
4918: End If;
4917: p_x_line_rec.SERVICE_SUBS_TEMPLATE_ID := '';
4918: End If;
4919: If(NVL(p_x_line_rec.SERVICE_COV_TEMPLATE_ID,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM) THEN
4920: IF l_debug_level > 0 THEN
4921: oe_debug_pub.add(p_x_line_rec.SERVICE_COV_TEMPLATE_ID||
4922: ' ..SERVICE_COV_TEMPLATE_ID is Inavlid for this line, will be reset to NULL');
4923: End If;
4924: p_x_line_rec.SERVICE_COV_TEMPLATE_ID := '';
4925: End If;
4927: /* Set Bill Profile to NULL if Bill Option is FBOM, To ensure for PO API Update */
4928: IF NVL(p_x_line_rec.service_bill_option_code,'FBOM') = 'FBOM' AND
4929: NVL(p_x_line_rec.SERVICE_BILL_PROFILE_ID,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
4930: IF l_debug_level > 0 THEN
4931: oe_debug_pub.add(p_x_line_rec.SERVICE_BILL_PROFILE_ID||
4932: ' ..(2)..SERVICE_BILL_PROFILE_ID is Inavlid for this line, will be reset to NULL');
4933: End If;
4934: p_x_line_rec.SERVICE_BILL_PROFILE_ID := '';
4935: End IF;
4936: -- Log Delayed Request to Get First Period Billing Amount for Service Item
4937: -- Billing Option has to be 'First Period Billing from OM, Subsequent from OKS
4938: -- There should be a change in any of the dependent fields.
4939: IF l_debug_level > 0 THEN
4940: oe_debug_pub.add('Bill Option: '||p_x_line_rec.service_bill_option_code
4941: ||' OLD Bill Option: '||p_old_line_rec.service_bill_option_code);
4942: oe_debug_pub.add('Service Start: '||p_x_line_rec.service_start_Date
4943: ||' OLD Service Start: '||p_old_line_rec.service_start_Date);
4944: oe_debug_pub.add('Service End: '||p_x_line_rec.service_end_Date
4938: -- There should be a change in any of the dependent fields.
4939: IF l_debug_level > 0 THEN
4940: oe_debug_pub.add('Bill Option: '||p_x_line_rec.service_bill_option_code
4941: ||' OLD Bill Option: '||p_old_line_rec.service_bill_option_code);
4942: oe_debug_pub.add('Service Start: '||p_x_line_rec.service_start_Date
4943: ||' OLD Service Start: '||p_old_line_rec.service_start_Date);
4944: oe_debug_pub.add('Service End: '||p_x_line_rec.service_end_Date
4945: ||' OLD Service End: '||p_old_line_rec.service_end_Date);
4946: oe_debug_pub.add('service_period: '||p_x_line_rec.service_period
4940: oe_debug_pub.add('Bill Option: '||p_x_line_rec.service_bill_option_code
4941: ||' OLD Bill Option: '||p_old_line_rec.service_bill_option_code);
4942: oe_debug_pub.add('Service Start: '||p_x_line_rec.service_start_Date
4943: ||' OLD Service Start: '||p_old_line_rec.service_start_Date);
4944: oe_debug_pub.add('Service End: '||p_x_line_rec.service_end_Date
4945: ||' OLD Service End: '||p_old_line_rec.service_end_Date);
4946: oe_debug_pub.add('service_period: '||p_x_line_rec.service_period
4947: ||' OLD service_period: '||p_old_line_rec.service_period);
4948: oe_debug_pub.add('service_duration: '||p_x_line_rec.service_duration
4942: oe_debug_pub.add('Service Start: '||p_x_line_rec.service_start_Date
4943: ||' OLD Service Start: '||p_old_line_rec.service_start_Date);
4944: oe_debug_pub.add('Service End: '||p_x_line_rec.service_end_Date
4945: ||' OLD Service End: '||p_old_line_rec.service_end_Date);
4946: oe_debug_pub.add('service_period: '||p_x_line_rec.service_period
4947: ||' OLD service_period: '||p_old_line_rec.service_period);
4948: oe_debug_pub.add('service_duration: '||p_x_line_rec.service_duration
4949: ||' OLD service_duration: '||p_old_line_rec.service_duration);
4950: oe_debug_pub.add('Bill Profile: '||p_x_line_rec.service_bill_profile_id
4944: oe_debug_pub.add('Service End: '||p_x_line_rec.service_end_Date
4945: ||' OLD Service End: '||p_old_line_rec.service_end_Date);
4946: oe_debug_pub.add('service_period: '||p_x_line_rec.service_period
4947: ||' OLD service_period: '||p_old_line_rec.service_period);
4948: oe_debug_pub.add('service_duration: '||p_x_line_rec.service_duration
4949: ||' OLD service_duration: '||p_old_line_rec.service_duration);
4950: oe_debug_pub.add('Bill Profile: '||p_x_line_rec.service_bill_profile_id
4951: ||' OLD Bill Profile: '||p_old_line_rec.service_bill_profile_id);
4952: oe_debug_pub.add('Ordered Quantity: '||p_x_line_rec.ordered_quantity
4946: oe_debug_pub.add('service_period: '||p_x_line_rec.service_period
4947: ||' OLD service_period: '||p_old_line_rec.service_period);
4948: oe_debug_pub.add('service_duration: '||p_x_line_rec.service_duration
4949: ||' OLD service_duration: '||p_old_line_rec.service_duration);
4950: oe_debug_pub.add('Bill Profile: '||p_x_line_rec.service_bill_profile_id
4951: ||' OLD Bill Profile: '||p_old_line_rec.service_bill_profile_id);
4952: oe_debug_pub.add('Ordered Quantity: '||p_x_line_rec.ordered_quantity
4953: ||' USP: '|| p_x_line_rec.unit_selling_price);
4954: oe_debug_pub.add('item_type_code:' ||p_x_line_rec.item_type_code
4948: oe_debug_pub.add('service_duration: '||p_x_line_rec.service_duration
4949: ||' OLD service_duration: '||p_old_line_rec.service_duration);
4950: oe_debug_pub.add('Bill Profile: '||p_x_line_rec.service_bill_profile_id
4951: ||' OLD Bill Profile: '||p_old_line_rec.service_bill_profile_id);
4952: oe_debug_pub.add('Ordered Quantity: '||p_x_line_rec.ordered_quantity
4953: ||' USP: '|| p_x_line_rec.unit_selling_price);
4954: oe_debug_pub.add('item_type_code:' ||p_x_line_rec.item_type_code
4955: ||' Subscription: '||p_x_line_rec.subscription_enable_flag);
4956: End If;
4950: oe_debug_pub.add('Bill Profile: '||p_x_line_rec.service_bill_profile_id
4951: ||' OLD Bill Profile: '||p_old_line_rec.service_bill_profile_id);
4952: oe_debug_pub.add('Ordered Quantity: '||p_x_line_rec.ordered_quantity
4953: ||' USP: '|| p_x_line_rec.unit_selling_price);
4954: oe_debug_pub.add('item_type_code:' ||p_x_line_rec.item_type_code
4955: ||' Subscription: '||p_x_line_rec.subscription_enable_flag);
4956: End If;
4957: IF (p_x_line_rec.service_bill_option_code = 'FPOM' AND NVL(p_x_line_rec.fulfilled_flag,'N') = 'N'
4958: AND (p_x_line_rec.item_type_code='SERVICE' OR NVL(p_x_line_rec.subscription_enable_flag,'N')='Y')
4985: If NVL(p_x_line_rec.subscription_enable_flag,'N')='Y' AND
4986: NOT OE_GLOBALS.Equal(p_x_line_rec.service_subs_template_id,p_old_line_rec.service_subs_template_id)
4987: THEN
4988: IF l_debug_level > 0 THEN
4989: oe_debug_pub.add(' Subscription Template changed, Logging Price Line for line_id = '||p_x_line_rec.line_id);
4990: End If;
4991: OE_delayed_requests_Pvt.log_request(
4992: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4993: p_entity_id => p_x_line_rec.line_id,
5024: (l_update_shipping = FND_API.G_TRUE OR l_explosion_date_changed = FND_API.G_TRUE) AND
5025: (p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND NVL(p_x_line_rec.split_action_code,'X') <> 'SPLIT')) THEN
5026:
5027: if l_debug_level > 0 then
5028: oe_debug_pub.ADD('Logging update shipping delayed request for line ID : '|| to_char(p_x_line_rec.line_id) ,1);
5029: end if;
5030:
5031: OE_Delayed_Requests_Pvt.Log_Request(
5032: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
5071: OR NOT OE_GLOBALS.Equal(p_x_line_rec.fulfillment_base , --added for bug#16547287
5072: p_old_line_rec.fulfillment_base)
5073: THEN
5074: IF l_debug_level > 0 THEN
5075: oe_debug_pub.add('Calling derive_fulfillment_base : ');
5076: END IF;
5077:
5078: l_fulfillment_base:= p_x_line_rec.fulfillment_base;
5079:
5079:
5080: p_x_line_rec.fulfillment_base := OE_DUAL_UOM_UTIL.derive_fulfillment_base (p_x_line_rec);
5081:
5082: IF l_debug_level > 0 THEN
5083: oe_debug_pub.add('After Calling derive_fulfillment_base :' || p_x_line_rec.fulfillment_base);
5084: END IF;
5085:
5086: IF Nvl( l_fulfillment_base ,'P') <> Nvl ( p_x_line_rec.fulfillment_base ,'P') THEN
5087:
5111:
5112: IF IS_CATCH_WEIGHT(p_x_line_rec) IS NOT NULL THEN
5113:
5114: IF l_debug_level > 0 THEN
5115: oe_debug_pub.ADD('Apply Attr Change Catch Weight Pricing');
5116: END IF;
5117:
5118: p_x_line_rec.calculate_price_flag := 'Y';
5119: OE_GLOBALS.G_PRICE_FLAG := 'Y';
5192: end if;
5193:
5194:
5195: --Bug#10052614 Start
5196: oe_debug_pub.ADD('OPERATION' ||p_x_line_rec.operation);
5197: oe_debug_pub.ADD('CALCULATE_PRICE_FLAG '||p_x_line_rec.CALCULATE_PRICE_FLAG);
5198: oe_debug_pub.ADD('LINE_CATEGORY_CODE '||p_x_line_rec.LINE_CATEGORY_CODE);
5199: oe_debug_pub.ADD('REFERENCE_LINE_ID '||p_x_line_rec.REFERENCE_LINE_ID);
5200: oe_debug_pub.ADD('RETURN_CONTEXT '||p_x_line_rec.RETURN_CONTEXT);
5193:
5194:
5195: --Bug#10052614 Start
5196: oe_debug_pub.ADD('OPERATION' ||p_x_line_rec.operation);
5197: oe_debug_pub.ADD('CALCULATE_PRICE_FLAG '||p_x_line_rec.CALCULATE_PRICE_FLAG);
5198: oe_debug_pub.ADD('LINE_CATEGORY_CODE '||p_x_line_rec.LINE_CATEGORY_CODE);
5199: oe_debug_pub.ADD('REFERENCE_LINE_ID '||p_x_line_rec.REFERENCE_LINE_ID);
5200: oe_debug_pub.ADD('RETURN_CONTEXT '||p_x_line_rec.RETURN_CONTEXT);
5201:
5194:
5195: --Bug#10052614 Start
5196: oe_debug_pub.ADD('OPERATION' ||p_x_line_rec.operation);
5197: oe_debug_pub.ADD('CALCULATE_PRICE_FLAG '||p_x_line_rec.CALCULATE_PRICE_FLAG);
5198: oe_debug_pub.ADD('LINE_CATEGORY_CODE '||p_x_line_rec.LINE_CATEGORY_CODE);
5199: oe_debug_pub.ADD('REFERENCE_LINE_ID '||p_x_line_rec.REFERENCE_LINE_ID);
5200: oe_debug_pub.ADD('RETURN_CONTEXT '||p_x_line_rec.RETURN_CONTEXT);
5201:
5202: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE AND (p_x_line_rec.CALCULATE_PRICE_FLAG = 'N' OR
5195: --Bug#10052614 Start
5196: oe_debug_pub.ADD('OPERATION' ||p_x_line_rec.operation);
5197: oe_debug_pub.ADD('CALCULATE_PRICE_FLAG '||p_x_line_rec.CALCULATE_PRICE_FLAG);
5198: oe_debug_pub.ADD('LINE_CATEGORY_CODE '||p_x_line_rec.LINE_CATEGORY_CODE);
5199: oe_debug_pub.ADD('REFERENCE_LINE_ID '||p_x_line_rec.REFERENCE_LINE_ID);
5200: oe_debug_pub.ADD('RETURN_CONTEXT '||p_x_line_rec.RETURN_CONTEXT);
5201:
5202: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE AND (p_x_line_rec.CALCULATE_PRICE_FLAG = 'N' OR
5203: (p_x_line_rec.CALCULATE_PRICE_FLAG = 'P' AND
5196: oe_debug_pub.ADD('OPERATION' ||p_x_line_rec.operation);
5197: oe_debug_pub.ADD('CALCULATE_PRICE_FLAG '||p_x_line_rec.CALCULATE_PRICE_FLAG);
5198: oe_debug_pub.ADD('LINE_CATEGORY_CODE '||p_x_line_rec.LINE_CATEGORY_CODE);
5199: oe_debug_pub.ADD('REFERENCE_LINE_ID '||p_x_line_rec.REFERENCE_LINE_ID);
5200: oe_debug_pub.ADD('RETURN_CONTEXT '||p_x_line_rec.RETURN_CONTEXT);
5201:
5202: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE AND (p_x_line_rec.CALCULATE_PRICE_FLAG = 'N' OR
5203: (p_x_line_rec.CALCULATE_PRICE_FLAG = 'P' AND
5204: p_x_line_rec.LINE_CATEGORY_CODE = 'RETURN' AND
5204: p_x_line_rec.LINE_CATEGORY_CODE = 'RETURN' AND
5205: p_x_line_rec.REFERENCE_LINE_ID IS NOT NULL AND
5206: p_x_line_rec.RETURN_CONTEXT IS NOT NULL))
5207: THEN
5208: oe_debug_pub.ADD('Logging DR_COPY_OTM_RECORDS relayed request fro Line '||p_x_line_rec.line_id||' From line '||l_from_line_id);
5209: OE_delayed_requests_Pvt.log_request(
5210: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
5211: p_entity_id => p_x_line_rec.line_id,
5212: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
5240: END;
5241:
5242: IF l_is_model = 'Y' THEN
5243: if l_debug_level > 0 then
5244: oe_debug_pub.add('CSH Before log request --G_UPDATE_SERVICE', 1);
5245: end if;
5246: OE_Delayed_Requests_Pvt.log_request(
5247: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
5248: p_entity_id => p_x_line_rec.line_id,
5253: END IF;
5254: END IF; /* IF l_copy_service_fields... = TRUE */
5255:
5256: if l_debug_level > 0 then
5257: oe_debug_pub.add('CSH --OUT of l_copy_service_field condition ', 1);
5258: end if;
5259: /* csheu -- bug #1533658 E */
5260: -- added by lkxu
5261: IF l_copy_pricing_attributes THEN
5307: --Elsif p_x_line_rec.item_type_code = 'CONFIG' THEN
5308: -- oe_globals.g_price_flag := 'Y';
5309: Else
5310: if l_debug_level > 0 then
5311: oe_debug_pub.add('2207809: no price for config item', 3);
5312: end if;
5313: oe_globals.g_price_flag := 'N';
5314: End If;
5315: End If;
5323: p_old_line_rec => p_old_line_rec,
5324: p_no_price_flag => l_no_price_flag);
5325:
5326: if l_debug_level > 0 then
5327: oe_debug_pub.add('unit_list_price:'||p_x_line_rec.unit_list_price);
5328: oe_debug_pub.add('old unit_list_price:'||p_old_line_rec.unit_list_price);
5329: oe_debug_pub.add('original_list_price:'||p_x_line_rec.original_list_price);
5330: end if;
5331: -- Override List Price
5324: p_no_price_flag => l_no_price_flag);
5325:
5326: if l_debug_level > 0 then
5327: oe_debug_pub.add('unit_list_price:'||p_x_line_rec.unit_list_price);
5328: oe_debug_pub.add('old unit_list_price:'||p_old_line_rec.unit_list_price);
5329: oe_debug_pub.add('original_list_price:'||p_x_line_rec.original_list_price);
5330: end if;
5331: -- Override List Price
5332: IF ((p_x_line_rec.unit_list_price IS NOT NULL AND
5325:
5326: if l_debug_level > 0 then
5327: oe_debug_pub.add('unit_list_price:'||p_x_line_rec.unit_list_price);
5328: oe_debug_pub.add('old unit_list_price:'||p_old_line_rec.unit_list_price);
5329: oe_debug_pub.add('original_list_price:'||p_x_line_rec.original_list_price);
5330: end if;
5331: -- Override List Price
5332: IF ((p_x_line_rec.unit_list_price IS NOT NULL AND
5333: p_x_line_rec.unit_list_price <> FND_API.G_MISS_NUM AND
5357:
5358: -- setting unit_list_price_per_pqty appropriately
5359: p_x_line_rec.unit_list_price_per_pqty := (p_x_line_rec.ordered_quantity*p_x_line_rec.unit_list_price)/p_x_line_rec.pricing_quantity;
5360: if l_debug_level > 0 then
5361: oe_debug_pub.add('setting unit_list_price_per_pqty to:'||p_x_line_rec.unit_list_price_per_pqty);
5362: end if;
5363: END IF;
5364:
5365: IF p_old_line_rec.unit_list_price IS NOT NULL AND
5367: p_x_line_rec.original_list_price IS NOT NULL THEN
5368:
5369: -- setting unit_list_price_per_pqt, original_list_price to null
5370: if l_debug_level > 0 then
5371: oe_debug_pub.add('setting original_list_price, unit_list_price_per_pqty to null');
5372: end if;
5373: p_x_line_rec.original_list_price := NULL;
5374: p_x_line_rec.unit_list_price_per_pqty := NULL;
5375:
5374: p_x_line_rec.unit_list_price_per_pqty := NULL;
5375:
5376: END IF;
5377: if l_debug_level > 0 then
5378: oe_debug_pub.add('setting call_pricing for list price override');
5379: end if;
5380: L_Call_pricing := 'Y';
5381: End If;
5382: -- Override List Price
5397: IF nvl(p_x_line_rec.ordered_quantity,0) = 0 THEN
5398: l_zero_line_qty := TRUE;
5399: /* BUG 2013611 BEGIN */
5400: if l_debug_level > 0 then
5401: oe_debug_pub.ADD('Logging REVERSE_LIMITS delayed request for LINE CANCEL ',1);
5402: end if;
5403: OE_delayed_requests_Pvt.log_request(
5404: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
5405: p_entity_id => p_x_line_rec.line_id,
5414: p_param6 => NULL,
5415: p_request_type => OE_GLOBALS.G_REVERSE_LIMITS,
5416: x_return_status => l_return_status);
5417: if l_debug_level > 0 then
5418: oe_debug_pub.ADD('REVERSE_LIMITS Delayed request has been logged',1);
5419: end if;
5420: /* BUG 2013611 END */
5421: ELSE
5422: l_zero_line_qty := FALSE;
5451: l_x_line_tbl(1) := p_x_line_rec;
5452: IF NOT l_zero_line_qty THEN
5453: --bsadri call the Price_line for non-cancelled lines
5454: if l_debug_level > 0 then
5455: oe_debug_pub.add('list price before call to price_line:'||p_x_line_rec.unit_list_price);
5456: oe_debug_pub.add('list price per pqty before call to price_line:'||p_x_line_rec.unit_list_price_per_pqty);
5457: end if;
5458: oe_order_adj_pvt.Price_line(
5459: X_Return_Status => l_Return_Status
5452: IF NOT l_zero_line_qty THEN
5453: --bsadri call the Price_line for non-cancelled lines
5454: if l_debug_level > 0 then
5455: oe_debug_pub.add('list price before call to price_line:'||p_x_line_rec.unit_list_price);
5456: oe_debug_pub.add('list price per pqty before call to price_line:'||p_x_line_rec.unit_list_price_per_pqty);
5457: end if;
5458: oe_order_adj_pvt.Price_line(
5459: X_Return_Status => l_Return_Status
5460: ,p_Line_id => p_x_line_rec.line_id
5475: i:= l_x_Line_Tbl.Next(i);
5476: End Loop;
5477: */
5478: if l_debug_level > 0 then
5479: oe_debug_pub.add('list price after call to price_line:'||p_x_line_rec.unit_list_price);
5480: oe_debug_pub.add('list price per pqty after call to price_line:'||p_x_line_rec.unit_list_price_per_pqty);
5481: end if;
5482: -- Bug 2757443.
5483: -- Need to log delayed request for tax and commitment
5476: End Loop;
5477: */
5478: if l_debug_level > 0 then
5479: oe_debug_pub.add('list price after call to price_line:'||p_x_line_rec.unit_list_price);
5480: oe_debug_pub.add('list price per pqty after call to price_line:'||p_x_line_rec.unit_list_price_per_pqty);
5481: end if;
5482: -- Bug 2757443.
5483: -- Need to log delayed request for tax and commitment
5484: -- when unit_selling_price changes from null to not null
5492: END IF;
5493: END IF;
5494:
5495: if l_debug_level > 0 then
5496: oe_debug_pub.add('outside margin code',1);
5497: end if;
5498: --MRG BGN
5499: If OE_FEATURES_PVT.Is_Margin_Avail Then
5500: if l_debug_level > 0 then
5497: end if;
5498: --MRG BGN
5499: If OE_FEATURES_PVT.Is_Margin_Avail Then
5500: if l_debug_level > 0 then
5501: oe_debug_pub.add('inside margin code',1);
5502: end if;
5503: p_x_line_rec.unit_cost:=OE_MARGIN_PVT.GET_COST(p_x_line_rec);
5504: End If;
5505: --MRG END
5507: END IF;
5508: End If;
5509: End If; --end if for UI Flag Check
5510: if l_debug_level > 0 then
5511: oe_debug_pub.ADD('Logging delayed request for pricing');
5512: end if;
5513: IF ((OE_GLOBALS.G_UI_FLAG)
5514: and OE_GLOBALS.G_DEFER_PRICING='N'
5515: and (nvl(Oe_Config_Pvt.oecfg_configuration_pricing,'N')='N'))
5516: OR (p_x_line_rec.item_type_code = 'INCLUDED' and OE_GLOBALS.G_DEFER_PRICING='N')
5517: --RT
5518: and nvl(p_x_line_rec.retrobill_request_id,FND_API.G_MISS_NUM)=FND_API.G_MISS_NUM THEN
5519: if l_debug_level > 0 then
5520: oe_debug_pub.add('ui mode or config, included item'||p_x_line_rec.line_id);
5521: end if;
5522: IF NOT l_zero_line_qty THEN
5523: --bsadri don't call this for a cancelled line
5524:
5524:
5525: IF nvl(p_x_line_rec.item_type_code,'x') <> 'INCLUDED' THEN
5526: --bug 2855794
5527: if l_debug_level > 0 then
5528: oe_debug_pub.ADD('Calc price flag:'||p_x_line_rec.calculate_price_flag);
5529: end if;
5530: if (p_x_line_rec.calculate_price_flag <> 'N' OR
5531: l_item_rec.ont_pricing_qty_source = 'S' ) THEN -- INVCONV
5532: if l_debug_level > 0 then
5529: end if;
5530: if (p_x_line_rec.calculate_price_flag <> 'N' OR
5531: l_item_rec.ont_pricing_qty_source = 'S' ) THEN -- INVCONV
5532: if l_debug_level > 0 then
5533: oe_debug_pub.ADD('logging price line request');
5534: end if;
5535:
5536: OE_delayed_requests_Pvt.log_request(
5537: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
5563:
5564: IF OE_LINE_ADJ_UTIL.Is_Pricing_Related_Change(p_x_line_rec,p_old_line_rec)
5565: OR NOT OE_GLOBALS.Equal(p_x_line_rec.shipping_method_code,p_old_line_rec.shipping_method_code) THEN
5566: if l_debug_level > 0 then
5567: oe_debug_pub.add('renga-logging delayed req freight_for_included',1);
5568: end if;
5569:
5570: OE_delayed_requests_Pvt.log_request(
5571: p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
5578: p_request_type => OE_GLOBALS.G_FREIGHT_FOR_INCLUDED,
5579: x_return_status => l_return_status);
5580:
5581: if l_debug_level > 0 then
5582: oe_debug_pub.add('renga-after logging delayed req freight_for_included',1);
5583: end if;
5584: END IF;
5585:
5586: END IF; -- if item type code is not included
5617: -- sol_ord_er #16014165 end
5618: END IF; -- item_type_code not included
5619: ELSE
5620: if l_debug_level > 0 then
5621: oe_debug_pub.add('batch mode or defer pricing');
5622: end if;
5623: --RT{
5624: IF nvl(p_x_line_rec.retrobill_request_id,FND_API.G_MISS_NUM)<>FND_API.G_MISS_NUM Then
5625: --call pricing for retrobilling lines in one shot (PRICE_ORDER)
5729:
5730: */
5731:
5732: if l_debug_level > 0 then
5733: oe_debug_pub.add('g_price_flag = ' || oe_globals.g_price_flag);
5734: --oe_debug_pub.add('l_no_price_flag = '|| l_no_price_flag);
5735: oe_debug_pub.add('g_pricing_recursion = ' || oe_globals.g_pricing_recursion);
5736: oe_debug_pub.add('Ordered quantity = '|| to_char(p_x_line_rec.ordered_quantity));
5737: oe_debug_pub.add('Ordered qty UOM = ' || p_x_line_rec.order_quantity_uom);
5730: */
5731:
5732: if l_debug_level > 0 then
5733: oe_debug_pub.add('g_price_flag = ' || oe_globals.g_price_flag);
5734: --oe_debug_pub.add('l_no_price_flag = '|| l_no_price_flag);
5735: oe_debug_pub.add('g_pricing_recursion = ' || oe_globals.g_pricing_recursion);
5736: oe_debug_pub.add('Ordered quantity = '|| to_char(p_x_line_rec.ordered_quantity));
5737: oe_debug_pub.add('Ordered qty UOM = ' || p_x_line_rec.order_quantity_uom);
5738: oe_debug_pub.add('Calculate_price_flag = '|| p_x_line_rec.calculate_price_flag);
5731:
5732: if l_debug_level > 0 then
5733: oe_debug_pub.add('g_price_flag = ' || oe_globals.g_price_flag);
5734: --oe_debug_pub.add('l_no_price_flag = '|| l_no_price_flag);
5735: oe_debug_pub.add('g_pricing_recursion = ' || oe_globals.g_pricing_recursion);
5736: oe_debug_pub.add('Ordered quantity = '|| to_char(p_x_line_rec.ordered_quantity));
5737: oe_debug_pub.add('Ordered qty UOM = ' || p_x_line_rec.order_quantity_uom);
5738: oe_debug_pub.add('Calculate_price_flag = '|| p_x_line_rec.calculate_price_flag);
5739: end if;
5732: if l_debug_level > 0 then
5733: oe_debug_pub.add('g_price_flag = ' || oe_globals.g_price_flag);
5734: --oe_debug_pub.add('l_no_price_flag = '|| l_no_price_flag);
5735: oe_debug_pub.add('g_pricing_recursion = ' || oe_globals.g_pricing_recursion);
5736: oe_debug_pub.add('Ordered quantity = '|| to_char(p_x_line_rec.ordered_quantity));
5737: oe_debug_pub.add('Ordered qty UOM = ' || p_x_line_rec.order_quantity_uom);
5738: oe_debug_pub.add('Calculate_price_flag = '|| p_x_line_rec.calculate_price_flag);
5739: end if;
5740:
5733: oe_debug_pub.add('g_price_flag = ' || oe_globals.g_price_flag);
5734: --oe_debug_pub.add('l_no_price_flag = '|| l_no_price_flag);
5735: oe_debug_pub.add('g_pricing_recursion = ' || oe_globals.g_pricing_recursion);
5736: oe_debug_pub.add('Ordered quantity = '|| to_char(p_x_line_rec.ordered_quantity));
5737: oe_debug_pub.add('Ordered qty UOM = ' || p_x_line_rec.order_quantity_uom);
5738: oe_debug_pub.add('Calculate_price_flag = '|| p_x_line_rec.calculate_price_flag);
5739: end if;
5740:
5741: if (oe_globals.g_price_flag = 'Y' and
5734: --oe_debug_pub.add('l_no_price_flag = '|| l_no_price_flag);
5735: oe_debug_pub.add('g_pricing_recursion = ' || oe_globals.g_pricing_recursion);
5736: oe_debug_pub.add('Ordered quantity = '|| to_char(p_x_line_rec.ordered_quantity));
5737: oe_debug_pub.add('Ordered qty UOM = ' || p_x_line_rec.order_quantity_uom);
5738: oe_debug_pub.add('Calculate_price_flag = '|| p_x_line_rec.calculate_price_flag);
5739: end if;
5740:
5741: if (oe_globals.g_price_flag = 'Y' and
5742: not l_no_price_flag and
5751: --RT}
5752: then
5753:
5754: if l_debug_level > 0 then
5755: oe_debug_pub.add('New line created by Promotional Modifier');
5756:
5757: oe_debug_pub.add('Resetting calc. price. flag to P');
5758: end if;
5759: p_x_line_rec.calculate_price_flag := 'P';
5753:
5754: if l_debug_level > 0 then
5755: oe_debug_pub.add('New line created by Promotional Modifier');
5756:
5757: oe_debug_pub.add('Resetting calc. price. flag to P');
5758: end if;
5759: p_x_line_rec.calculate_price_flag := 'P';
5760: if l_debug_level > 0 then
5761: oe_debug_pub.add('Logging a request to PRICE_LINE in batch mode');
5757: oe_debug_pub.add('Resetting calc. price. flag to P');
5758: end if;
5759: p_x_line_rec.calculate_price_flag := 'P';
5760: if l_debug_level > 0 then
5761: oe_debug_pub.add('Logging a request to PRICE_LINE in batch mode');
5762: end if;
5763: if (p_x_line_rec.booked_flag = 'Y') --2442012
5764: then
5765: if l_debug_level > 0 then
5762: end if;
5763: if (p_x_line_rec.booked_flag = 'Y') --2442012
5764: then
5765: if l_debug_level > 0 then
5766: oe_debug_pub.add('Booked order -- log a request to Price Line');
5767: end if;
5768: l_pricing_event := 'BATCH,BOOK';
5769: Else
5770: l_pricing_event := 'BATCH';
5793: -- sol_ord_er #16014165 end
5794:
5795: /* if (p_x_line_rec.booked_flag = 'Y')
5796: then
5797: oe_debug_pub.add('Booked order -- log a request to Price Line');
5798: OE_delayed_requests_Pvt.log_request(
5799: p_entity_code =>OE_GLOBALS.G_ENTITY_ALL,
5800: p_entity_id => p_x_line_rec.line_Id,
5801: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_ALL,
5915: when no_data_found then
5916: l_tax_calculation_event_code := 0;
5917: when others then
5918: if l_debug_level > 0 then
5919: oe_debug_pub.add('Ren: failed while trying to query up tax_calcualtion_event for order_type_id ');
5920: end if;
5921: RAISE;
5922:
5923: END;
5942:
5943: IF p_x_line_rec.item_type_code in ('INCLUDED', 'CONFIG') THEN
5944:
5945: if l_debug_level > 0 then
5946: oe_debug_pub.add('Ren: no tax delayed request for include and config',1);
5947: end if;
5948:
5949: oe_globals.g_tax_flag := 'N';
5950:
5965: cust_type.cust_trx_type_id = cust_trx.cust_trx_type_id
5966: and cust_trx.customer_trx_id = p_x_line_rec.commitment_id
5967: );
5968: if l_debug_level > 0 then
5969: oe_debug_pub.add('OEXULINB:l_commit tax flag: '||l_tax_commt_flag,1);
5970: end if;
5971:
5972: exception
5973: when others then
5971:
5972: exception
5973: when others then
5974: if l_debug_level > 0 then
5975: oe_debug_pub.add('OEXULINB: in exception commitment ',1);
5976: end if;
5977: l_tax_commt_flag := 'N';
5978: end;
5979: end if;*/
5989: -- OM will depend on Tax_event alone ( specfied transaction type level) to automatically trigger
5990: -- tax calcualtion .ra_cust_trx_types.tax_calculation_flag is no more considered while logging delayed requests for tax
5991: -- 12876258 Added Debug
5992: if l_debug_level > 0 then
5993: oe_debug_pub.add('Before Tax delayed Req, taxFlag= '||oe_globals.g_tax_flag||' l_current_event= '||l_current_event);
5994: end if; -- end 12876258
5995:
5996:
5997: IF ( oe_globals.g_tax_flag = 'Y' and
6004: ) and */
6005: nvl(p_x_line_rec.inventory_item_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num)
6006: THEN
6007: if l_debug_level > 0 then
6008: oe_debug_pub.ADD('Logging delayed request for taxing');
6009: end if;
6010: -- lkxu, make changes for bug 1581188
6011: l_tax_commt_flag := 'N'; --bug 2505961
6012: IF (OE_GLOBALS.G_UI_FLAG)
6021: -- 14151216, Added IF for System Parameter check
6022: IF (NVL(oe_sys_parameters.value('OE_INVOICE_FREIGHT_AS_LINE',p_x_line_rec.org_id), 'N') = 'Y') THEN
6023: -- Bug 13777599 start
6024: if l_debug_level > 0 then
6025: oe_debug_pub.add(' OEXULINB 1 Tax Header Delayed Req');
6026: End IF;
6027: OE_delayed_requests_Pvt.log_request(
6028: p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
6029: p_entity_id => p_x_line_rec.header_id,
6047: -- 14151216, Added IF for System Parameter check
6048: IF (NVL(oe_sys_parameters.value('OE_INVOICE_FREIGHT_AS_LINE',p_x_line_rec.org_id), 'N') = 'Y') THEN
6049: -- Bug 13777599 start
6050: if l_debug_level > 0 then
6051: oe_debug_pub.add(' OEXULINB 2 Tax Header Delayed Req');
6052: End IF;
6053: OE_delayed_requests_Pvt.log_request(
6054: p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
6055: p_entity_id => p_x_line_rec.header_id,
6066:
6067: /** commented out for bug 1581188
6068: IF (oe_globals.g_tax_flag = 'Y') THEN
6069: if l_debug_level > 0 then
6070: oe_debug_pub.ADD('Logging delayed request for taxing');
6071: end if;
6072: OE_delayed_requests_Pvt.log_request(p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
6073: p_entity_id => p_x_line_rec.line_id,
6074: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
6093: AND OE_PrePayment_UTIL.is_prepaid_order(p_x_line_rec.header_id) = 'N')
6094: OR OE_PrePayment_UTIL.is_prepaid_order(p_x_line_rec.header_id) = 'Y'
6095: THEN
6096: if l_debug_level > 0 then
6097: oe_debug_pub.ADD('New line added to a booked order,'
6098: || 'Logging delayed request for Verify Payment', 1);
6099: end if;
6100: l_verify_payment_flag := 'Y';
6101: END IF;
6107: (p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
6108: p_x_line_rec.split_from_line_id IS NOT NULL) THEN
6109: IF l_cc_rev_reauth_code IS NULL THEN --CC Reversal ER#16014135
6110: if l_debug_level > 0 then
6111: oe_debug_pub.ADD('Line is being Split, Suppress Verify Payment', 1);
6112: end if;
6113: l_verify_payment_flag := 'N';
6114: END IF; --CC Reversal ER#16014135
6115: END IF;
6120: --IF p_x_line_rec.line_category_code <> 'RETURN' THEN --16547815
6121: IF p_x_line_rec.line_category_code <> 'RETURN' AND p_x_line_rec.ordered_quantity IS NOT NULL THEN --16547815
6122: --
6123: if l_debug_level > 0 then
6124: oe_debug_pub.ADD('Logging delayed request for Verify Payment');
6125: end if;
6126: --
6127: OE_delayed_requests_Pvt.log_request
6128: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
6181: AND OE_Commitment_Pvt.Do_Commitment_Sequencing
6182: AND l_update_commitment_applied <> 'Y' THEN
6183:
6184: if l_debug_level > 0 then
6185: oe_debug_pub.add('Logging delayed request for Commitment.', 2);
6186: end if;
6187: OE_Delayed_Requests_Pvt.Log_Request(
6188: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
6189: p_entity_id => p_x_line_rec.line_id,
6207: IF (p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
6208: NVL(p_x_line_rec.split_action_code,'X') = 'SPLIT' ) THEN
6209:
6210: if l_debug_level > 0 then
6211: oe_debug_pub.add('Logging delayed request for updating commitment for line '||p_x_line_rec.line_id, 2);
6212: end if;
6213:
6214: -- should log as ENTITY_ALL, as SPLIT is a batch mode
6215: OE_Delayed_Requests_Pvt.Log_Request(
6225: IF l_update_commitment_applied = 'Y'
6226: AND nvl(p_x_line_rec.transaction_phase_code,'F') = 'F' THEN
6227:
6228: if l_debug_level > 0 then
6229: oe_debug_pub.add('Logging delayed request for Commitment Applied Amount '|| p_x_line_rec.commitment_applied_amount, 3);
6230: oe_debug_pub.add('param2 is: '|| p_x_line_rec.header_id, 3);
6231: oe_debug_pub.add('param3 is: '|| p_x_line_rec.commitment_id, 3);
6232: end if;
6233: OE_Delayed_Requests_Pvt.Log_Request(
6226: AND nvl(p_x_line_rec.transaction_phase_code,'F') = 'F' THEN
6227:
6228: if l_debug_level > 0 then
6229: oe_debug_pub.add('Logging delayed request for Commitment Applied Amount '|| p_x_line_rec.commitment_applied_amount, 3);
6230: oe_debug_pub.add('param2 is: '|| p_x_line_rec.header_id, 3);
6231: oe_debug_pub.add('param3 is: '|| p_x_line_rec.commitment_id, 3);
6232: end if;
6233: OE_Delayed_Requests_Pvt.Log_Request(
6234: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
6227:
6228: if l_debug_level > 0 then
6229: oe_debug_pub.add('Logging delayed request for Commitment Applied Amount '|| p_x_line_rec.commitment_applied_amount, 3);
6230: oe_debug_pub.add('param2 is: '|| p_x_line_rec.header_id, 3);
6231: oe_debug_pub.add('param3 is: '|| p_x_line_rec.commitment_id, 3);
6232: end if;
6233: OE_Delayed_Requests_Pvt.Log_Request(
6234: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
6235: p_entity_id => p_x_line_rec.line_id,
6246: -- bug 2668298, Freight Rating.
6247: IF l_get_FTE_freight_rate = 'Y' THEN
6248:
6249: if l_debug_level > 0 then
6250: oe_debug_pub.add('Logging delayed request for freight rate: '||p_x_line_rec.header_id, 2);
6251: end if;
6252:
6253: OE_delayed_requests_Pvt.log_request
6254: (p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
6301: OE_GLOBALS.g_recursion_mode = 'N' AND -- Bug 3379121
6302: OE_OE_FORM_CANCEL_LINE.g_ord_lvl_can THEN
6303:
6304: IF l_debug_level > 0 THEN
6305: oe_debug_pub.add('Line Ord Qty already 0, Calling Check_Constraints based on Order Cancel Global');
6306: END IF;
6307:
6308: OE_SALES_CAN_UTIL.Check_Constraints
6309: (p_x_line_rec => p_x_line_rec,
6353: from oe_price_adjustments where
6354: header_id = p_x_line_rec.header_id
6355: and LIST_LINE_TYPE_CODE = 'OM_CALLED_CHOOSE_SHIP_METHOD';
6356: if l_debug_level > 0 then
6357: oe_debug_pub.add( 'Value of fte count '||l_fte_count);
6358: end if;
6359: If l_fte_count > 0 Then
6360: --fnd_message.set_name('ONT','MY_MESSAGE');
6361: --OE_MSG_PUB.Add;
6377: AND p_x_line_rec.booked_flag = 'Y'
6378: AND p_x_line_rec.ordered_quantity <> 0 -- for bug 3421996
6379: THEN
6380: IF l_debug_level > 0 THEN
6381: oe_debug_pub.add( 'Calling OE_Acknowlegment_PUB.Apply_3A7_Hold', 2 ) ;
6382: END IF;
6383: OE_Acknowledgment_PUB.Apply_3A7_Hold
6384: ( p_header_id => p_x_line_rec.header_id
6385: , p_line_id => p_x_line_rec.line_id
6385: , p_line_id => p_x_line_rec.line_id
6386: , p_sold_to_org_id => p_x_line_rec.sold_to_org_id
6387: , x_return_status => l_return_status);
6388: IF l_debug_level > 0 THEN
6389: oe_debug_pub.add( 'Return status after call to apply_3a7_hold:' || l_return_status, 2 ) ;
6390: END IF;
6391: END IF; */
6392:
6393: /*Bug2848734 */
6406: */--ER14763609
6407: /*Bug2848734*/
6408:
6409: if l_debug_level > 0 then
6410: oe_debug_pub.add('return status before exiting '|| p_x_line_rec.return_status, 1);
6411: oe_debug_pub.add('Exiting OE_LINE_UTIL.APPLY_ATTRIBUTE_CHANGES', 1);
6412: end if;
6413:
6414: END Apply_Attribute_Changes;
6407: /*Bug2848734*/
6408:
6409: if l_debug_level > 0 then
6410: oe_debug_pub.add('return status before exiting '|| p_x_line_rec.return_status, 1);
6411: oe_debug_pub.add('Exiting OE_LINE_UTIL.APPLY_ATTRIBUTE_CHANGES', 1);
6412: end if;
6413:
6414: END Apply_Attribute_Changes;
6415:
6423: ( p_x_line_rec IN OUT NOCOPY OE_Order_PUB.Line_Rec_Type
6424: , p_old_line_rec IN OE_Order_PUB.Line_Rec_Type
6425: )
6426: IS
6427: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6428: BEGIN
6429:
6430: IF l_debug_level > 0 THEN
6431: oe_debug_pub.add('Entering OE_LINE_UTIL.COMPLETE_RECORD', 1);
6427: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6428: BEGIN
6429:
6430: IF l_debug_level > 0 THEN
6431: oe_debug_pub.add('Entering OE_LINE_UTIL.COMPLETE_RECORD', 1);
6432: END IF;
6433:
6434: IF p_x_line_rec.accounting_rule_id = FND_API.G_MISS_NUM THEN
6435: p_x_line_rec.accounting_rule_id := p_old_line_rec.accounting_rule_id;
7712: END IF;
7713:
7714: IF p_x_line_rec.order_source_id = FND_API.G_MISS_NUM THEN
7715: if l_debug_level > 0 then
7716: oe_debug_pub.add('OEXULINB -aksingh complete_record - order_source_id');
7717: end if;
7718: p_x_line_rec.order_source_id := p_old_line_rec.order_source_id;
7719: END IF;
7720:
7891: p_x_line_rec.fulfillment_base :=p_old_line_rec.fulfillment_base;--ER#14763609
7892: END IF;
7893:
7894: if l_debug_level > 0 then
7895: oe_debug_pub.add('Exiting OE_LINE_UTIL.COMPLETE_RECORD', 1);
7896: end if;
7897:
7898: END Complete_Record;
7899:
7906: PROCEDURE Convert_Miss_To_Null
7907: ( p_x_line_rec IN OUT NOCOPY OE_Order_PUB.Line_Rec_Type
7908: )
7909: IS
7910: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
7911: BEGIN
7912:
7913: if l_debug_level > 0 then
7914: oe_debug_pub.add('Entering OE_LINE_UTIL.CONVERT_MISS_TO_NULL', 1);
7910: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
7911: BEGIN
7912:
7913: if l_debug_level > 0 then
7914: oe_debug_pub.add('Entering OE_LINE_UTIL.CONVERT_MISS_TO_NULL', 1);
7915:
7916: oe_debug_pub.add('outside margin convert miss to null',1);
7917: end if;
7918: --MRG BGN
7912:
7913: if l_debug_level > 0 then
7914: oe_debug_pub.add('Entering OE_LINE_UTIL.CONVERT_MISS_TO_NULL', 1);
7915:
7916: oe_debug_pub.add('outside margin convert miss to null',1);
7917: end if;
7918: --MRG BGN
7919: IF OE_FEATURES_PVT.Is_Margin_Avail Then
7920: if l_debug_level > 0 then
7917: end if;
7918: --MRG BGN
7919: IF OE_FEATURES_PVT.Is_Margin_Avail Then
7920: if l_debug_level > 0 then
7921: oe_debug_pub.add('inside margin convert miss to null',1);
7922: end if;
7923: IF p_x_line_rec.unit_cost = FND_API.G_MISS_NUM THEN
7924: p_x_line_rec.unit_cost := NULL;
7925: END IF;
9172: /* End of Marketing source code related */
9173:
9174: IF p_x_line_rec.order_source_id = FND_API.G_MISS_NUM THEN
9175: if l_debug_level > 0 then
9176: oe_debug_pub.add('OEXULIN-aksingh convert_miss_to_null - order_source_id');
9177: end if;
9178: p_x_line_rec.order_source_id := NULL;
9179: END IF;
9180:
9355: p_x_line_rec.fulfillment_base := NULL ;--ER#14763609
9356: END IF;
9357:
9358: if l_debug_level > 0 then
9359: oe_debug_pub.add('Exiting OE_LINE_UTIL.CONVERT_MISS_TO_NULL', 1);
9360: end if;
9361: END Convert_Miss_To_Null;
9362:
9363:
9374: l_lock_control NUMBER;
9375: l_index NUMBER;
9376: l_return_status VARCHAR2(1);
9377:
9378: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
9379: BEGIN
9380:
9381: if l_debug_level > 0 then
9382: oe_debug_pub.add('Entering OE_LINE_UTIL.UPDATE_ROW', 1);
9378: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
9379: BEGIN
9380:
9381: if l_debug_level > 0 then
9382: oe_debug_pub.add('Entering OE_LINE_UTIL.UPDATE_ROW', 1);
9383: end if;
9384: --Commented for MOAC start
9385: /*if l_org_id IS NULL THEN
9386: OE_GLOBALS.Set_Context;
9403: p_line_id => p_line_rec.line_id,
9404: x_index => l_index,
9405: x_return_status => l_return_status);
9406: if l_debug_level > 0 then
9407: OE_DEBUG_PUB.ADD('Update_Global Return Status from OE_LINE_UTIL.update_row is: ' || l_return_status);
9408: OE_DEBUG_PUB.ADD('JFC: Line Booked Status in OE_LINE_UTIL.update_row is: ' || p_line_rec.booked_flag);
9409: OE_DEBUG_PUB.ADD('JFC: Line Flow Status in OE_LINE_UTIL.update_row is: ' || p_line_rec.flow_status_code);
9410: end if;
9411: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
9404: x_index => l_index,
9405: x_return_status => l_return_status);
9406: if l_debug_level > 0 then
9407: OE_DEBUG_PUB.ADD('Update_Global Return Status from OE_LINE_UTIL.update_row is: ' || l_return_status);
9408: OE_DEBUG_PUB.ADD('JFC: Line Booked Status in OE_LINE_UTIL.update_row is: ' || p_line_rec.booked_flag);
9409: OE_DEBUG_PUB.ADD('JFC: Line Flow Status in OE_LINE_UTIL.update_row is: ' || p_line_rec.flow_status_code);
9410: end if;
9411: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
9412: if l_debug_level > 0 then
9405: x_return_status => l_return_status);
9406: if l_debug_level > 0 then
9407: OE_DEBUG_PUB.ADD('Update_Global Return Status from OE_LINE_UTIL.update_row is: ' || l_return_status);
9408: OE_DEBUG_PUB.ADD('JFC: Line Booked Status in OE_LINE_UTIL.update_row is: ' || p_line_rec.booked_flag);
9409: OE_DEBUG_PUB.ADD('JFC: Line Flow Status in OE_LINE_UTIL.update_row is: ' || p_line_rec.flow_status_code);
9410: end if;
9411: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
9412: if l_debug_level > 0 then
9413: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
9409: OE_DEBUG_PUB.ADD('JFC: Line Flow Status in OE_LINE_UTIL.update_row is: ' || p_line_rec.flow_status_code);
9410: end if;
9411: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
9412: if l_debug_level > 0 then
9413: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
9414: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.Update_ROW', 1);
9415: end if;
9416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9417: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
9410: end if;
9411: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
9412: if l_debug_level > 0 then
9413: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
9414: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.Update_ROW', 1);
9415: end if;
9416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9417: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
9418: if l_debug_level > 0 then
9415: end if;
9416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9417: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
9418: if l_debug_level > 0 then
9419: OE_DEBUG_PUB.ADD('Update_Global_Picture Error in OE_LINE_UTIL.Update_row');
9420: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.Update_ROW', 1);
9421: end if;
9422: RAISE FND_API.G_EXC_ERROR;
9423: END IF;
9416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9417: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
9418: if l_debug_level > 0 then
9419: OE_DEBUG_PUB.ADD('Update_Global_Picture Error in OE_LINE_UTIL.Update_row');
9420: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.Update_ROW', 1);
9421: end if;
9422: RAISE FND_API.G_EXC_ERROR;
9423: END IF;
9424: END IF; /*code_release_level*/
9424: END IF; /*code_release_level*/
9425: -- notification framework end
9426:
9427: if l_debug_level > 0 then
9428: -- oe_debug_pub.add('Entering update'||to_char(l_org_id), 1);
9429: oe_debug_pub.add('arrivalset-'||to_char(p_line_rec.arrival_set_id), 1);
9430: oe_debug_pub.add('shipset-'||to_char(p_line_rec.ship_set_id), 1);
9431: end if;
9432: -- OPM 02/JUN/00 - Include process columns
9425: -- notification framework end
9426:
9427: if l_debug_level > 0 then
9428: -- oe_debug_pub.add('Entering update'||to_char(l_org_id), 1);
9429: oe_debug_pub.add('arrivalset-'||to_char(p_line_rec.arrival_set_id), 1);
9430: oe_debug_pub.add('shipset-'||to_char(p_line_rec.ship_set_id), 1);
9431: end if;
9432: -- OPM 02/JUN/00 - Include process columns
9433: -- (ordered_quantity2,ordered_quantity_uom2,preferred_grade)
9426:
9427: if l_debug_level > 0 then
9428: -- oe_debug_pub.add('Entering update'||to_char(l_org_id), 1);
9429: oe_debug_pub.add('arrivalset-'||to_char(p_line_rec.arrival_set_id), 1);
9430: oe_debug_pub.add('shipset-'||to_char(p_line_rec.ship_set_id), 1);
9431: end if;
9432: -- OPM 02/JUN/00 - Include process columns
9433: -- (ordered_quantity2,ordered_quantity_uom2,preferred_grade)
9434: UPDATE OE_ORDER_LINES
9811:
9812: p_line_rec.lock_control := l_lock_control;
9813:
9814: if l_debug_level > 0 then
9815: oe_debug_pub.add('Exiting OE_LINE_UTIL.UPDATE_ROW', 1);
9816: end if;
9817:
9818: EXCEPTION
9819:
9848: l_lock_control NUMBER:= 1;
9849: l_index NUMBER;
9850: l_return_status VARCHAR2(1);
9851:
9852: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
9853: --bug 4446805
9854: l_price_request_code VARCHAR2(240);
9855: BEGIN
9856:
9854: l_price_request_code VARCHAR2(240);
9855: BEGIN
9856:
9857: if l_debug_level > 0 then
9858: oe_debug_pub.add('Entering OE_LINE_UTIL.INSERT_ROW', 1);
9859: end if;
9860:
9861: --MOAC change
9862: OE_GLOBALS.Set_Context;
9863: l_org_id := OE_GLOBALS.G_ORG_ID;
9864: IF l_org_id IS NULL THEN
9865: -- org_id is null, don't do insert. raise an error.
9866: IF l_debug_level > 0 then
9867: oe_debug_pub.ADD('Org_Id is NULL',1);
9868: END IF;
9869: FND_MESSAGE.SET_NAME('FND','MO_ORG_REQUIRED');
9870: FND_MSG_PUB.ADD;
9871: RAISE FND_API.G_EXC_ERROR;
10676: p_line_id => p_line_rec.line_id,
10677: x_index => l_index,
10678: x_return_status => l_return_status);
10679: if l_debug_level > 0 then
10680: OE_DEBUG_PUB.ADD('Update_Global Return Status from OE_LINE_UTIL.inset_row is: ' || l_return_status);
10681: OE_DEBUG_PUB.ADD('returned index is: ' || l_index ,1);
10682: end if;
10683: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10684: if l_debug_level > 0 then
10677: x_index => l_index,
10678: x_return_status => l_return_status);
10679: if l_debug_level > 0 then
10680: OE_DEBUG_PUB.ADD('Update_Global Return Status from OE_LINE_UTIL.inset_row is: ' || l_return_status);
10681: OE_DEBUG_PUB.ADD('returned index is: ' || l_index ,1);
10682: end if;
10683: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10684: if l_debug_level > 0 then
10685: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
10681: OE_DEBUG_PUB.ADD('returned index is: ' || l_index ,1);
10682: end if;
10683: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10684: if l_debug_level > 0 then
10685: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
10686: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.insert_ROW', 1);
10687: end if;
10688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10689: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
10682: end if;
10683: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10684: if l_debug_level > 0 then
10685: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
10686: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.insert_ROW', 1);
10687: end if;
10688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10689: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
10690: if l_debug_level > 0 then
10687: end if;
10688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10689: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
10690: if l_debug_level > 0 then
10691: OE_DEBUG_PUB.ADD('Update_Global_Picture Error in OE_LINE_UTIL.insert_row');
10692: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.insert_ROW', 1);
10693: end if;
10694: RAISE FND_API.G_EXC_ERROR;
10695: END IF;
10688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10689: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
10690: if l_debug_level > 0 then
10691: OE_DEBUG_PUB.ADD('Update_Global_Picture Error in OE_LINE_UTIL.insert_row');
10692: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.insert_ROW', 1);
10693: end if;
10694: RAISE FND_API.G_EXC_ERROR;
10695: END IF;
10696: END IF; /*code_release_code*/
10696: END IF; /*code_release_code*/
10697: -- notification framework end
10698:
10699: if l_debug_level > 0 then
10700: oe_debug_pub.add('Exiting OE_LINE_UTIL.INSERT_ROW', 1);
10701: end if;
10702:
10703: EXCEPTION
10704:
10748: l_price_request_code varchar2(240); -- BUG 2670775 Reverse Limits
10749: l_transaction_phase_code varchar2(30);
10750: l_header_id NUMBER;
10751: l_data VARCHAR2(1);
10752: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
10753:
10754: -- BUG 2670775 - Add ordered_quantity,price_request_code to select list
10755: CURSOR order_line IS
10756: SELECT line_id, item_type_code,
10773: AND service_reference_type_code = 'ORDER'; --bug 3056313
10774:
10775: BEGIN
10776:
10777: oe_debug_pub.add('Entering OE_LINE_UTIL.DELETE_ROW', 1);
10778: --Commented for MOAC start
10779: /*l_org_id := OE_GLOBALS.G_ORG_ID;
10780:
10781: IF l_org_id IS NULL THEN
10782: OE_GLOBALS.Set_Context;
10783: l_org_id := OE_GLOBALS.G_ORG_ID;
10784: END IF;
10785:
10786: oe_debug_pub.add('Entering delete '||to_char(l_org_id), 1); */
10787: --Commented for MOAC end
10788: IF p_header_id <> FND_API.G_MISS_NUM THEN
10789: FOR l_line IN order_line
10790: LOOP
10791:
10792: --added for notification framework
10793: --check code release level first. Notification framework is at Pack H level
10794: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110508' THEN
10795: oe_debug_pub.add('JFC: in delete row, l_line_id'|| l_line.line_id , 1);
10796: /* Set the operation on the record so that globals are updated as well */
10797: l_new_line_rec.operation := OE_GLOBALS.G_OPR_DELETE;
10798: l_new_line_rec.line_id :=l_line.line_id;
10799: OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
10800: p_line_rec =>l_new_line_rec,
10801: p_line_id =>l_line.line_id,
10802: x_index => l_index,
10803: x_return_status => l_return_status);
10804: OE_DEBUG_PUB.ADD('Update_Global Return Status from OE_LINE_UTIL.delete_row is: ' || l_return_status);
10805: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10806: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
10807: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
10808: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10802: x_index => l_index,
10803: x_return_status => l_return_status);
10804: OE_DEBUG_PUB.ADD('Update_Global Return Status from OE_LINE_UTIL.delete_row is: ' || l_return_status);
10805: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10806: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
10807: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
10808: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10809: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
10810: OE_DEBUG_PUB.ADD('Update_Global_Picture Error in OE_LINE_UTIL.Delete_row');
10803: x_return_status => l_return_status);
10804: OE_DEBUG_PUB.ADD('Update_Global Return Status from OE_LINE_UTIL.delete_row is: ' || l_return_status);
10805: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
10806: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
10807: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
10808: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10809: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
10810: OE_DEBUG_PUB.ADD('Update_Global_Picture Error in OE_LINE_UTIL.Delete_row');
10811: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
10806: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
10807: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
10808: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10809: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
10810: OE_DEBUG_PUB.ADD('Update_Global_Picture Error in OE_LINE_UTIL.Delete_row');
10811: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
10812: RAISE FND_API.G_EXC_ERROR;
10813: END IF;
10814: END IF; /*code_release_level*/
10807: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
10808: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10809: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
10810: OE_DEBUG_PUB.ADD('Update_Global_Picture Error in OE_LINE_UTIL.Delete_row');
10811: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
10812: RAISE FND_API.G_EXC_ERROR;
10813: END IF;
10814: END IF; /*code_release_level*/
10815: -- notification framework end
10833: l_ordered_quantity := l_line.ordered_quantity; -- BUG 2670775 Reverse Limits
10834: l_price_request_code := l_line.price_request_code; -- BUG 2670775 Reverse Limits
10835: l_transaction_phase_code := l_line.transaction_phase_code;
10836:
10837: oe_debug_pub.add(' Header - Before delete dependent');
10838:
10839: Delete_Dependents
10840: ( p_line_id => l_line_id
10841: ,p_item_type_code => l_item_type_code
10860: WHERE HEADER_ID = p_header_id;
10861: /* AND NVL(ORG_ID,NVL(l_org_id,0))= NVL(l_org_id,0);*/
10862:
10863: ELSE -- header_id is missing.
10864: oe_debug_pub.add('hdr missing delete_row,line_id: '||p_line_id, 1);
10865:
10866: oe_line_util.query_row
10867: (p_line_id => p_line_id
10868: ,x_line_rec => l_line_rec );
10871:
10872: IF l_line_rec.ITEM_TYPE_CODE = 'MODEL' OR
10873: (l_line_rec.ITEM_TYPE_CODE = 'KIT' AND
10874: l_line_rec.top_model_line_id = l_line_rec.line_id) THEN
10875: oe_debug_pub.add('Entering - MODEL', 1);
10876:
10877: -- BUG 2670775 Reverse Limits - add ordered_quantity,price_request_code to select
10878: lsqlstmt := 'Select line_id, item_type_code, line_category_code,
10879: config_header_id, config_rev_nbr,
10890: p_line_id,
10891: l_in_line_id;
10892:
10893: lvariable1 := 'TOP_MODEL';
10894: oe_debug_pub.add('end of loop for OPEN MODEL', 1);
10895:
10896: END IF; -- if top level model.
10897:
10898:
10897:
10898:
10899: IF llinetbl%ISOPEN THEN
10900: LOOP
10901: oe_debug_pub.add('Entering model LOOP', 1);
10902:
10903: FETCH llinetbl INTO l_line_id,l_item_type_code,
10904: l_line_category_code,l_config_header_id,
10905: l_config_rev_nbr,l_schedule_status_code,
10907: l_ordered_quantity, l_price_request_code; -- BUG 2670775 Reverse Limits
10908:
10909: EXIT WHEN llinetbl%NOTFOUND;
10910:
10911: oe_debug_pub.add('After Fetch -IN LOOP', 1);
10912: -- Keep all your dependencies in Delete Dependents Procedure
10913:
10914: oe_debug_pub.add(' model - Before delete dependent' || l_line_id);
10915:
10910:
10911: oe_debug_pub.add('After Fetch -IN LOOP', 1);
10912: -- Keep all your dependencies in Delete Dependents Procedure
10913:
10914: oe_debug_pub.add(' model - Before delete dependent' || l_line_id);
10915:
10916: Delete_Dependents
10917: ( p_line_id => l_line_id
10918: ,p_item_type_code => l_item_type_code
10949: ,l_ordered_quantity, l_price_request_code; -- BUG 2670775 Reverse Limits
10950:
10951: EXIT WHEN llinetbl_svc%NOTFOUND;
10952:
10953: oe_debug_pub.add('Service - Before delete dependent' || l_line_id);
10954:
10955: Delete_Dependents
10956: ( p_line_id => l_line_id
10957: ,p_item_type_code => l_item_type_code
10991:
10992: /* Remove the Parent Line and sub entities Here */
10993: /* Keep all your dependencies in Delete Dependents Procedure */
10994:
10995: oe_debug_pub.add('calling delete dep for the line', 1);
10996: Delete_Dependents
10997: ( p_line_id => l_line_rec.line_id
10998: ,p_item_type_code => l_line_rec.item_type_code
10999: ,p_line_category_code => l_line_rec.line_category_code
11016: END IF;
11017: END IF;
11018:
11019: /* Delete all the dependents for service line */
11020: oe_debug_pub.add('Item Type for delete: ' || l_line_rec.item_type_code);
11021:
11022: /* When a standard line is being deleted, check if it has any service */
11023: /* lines attached to it. If so, get the line_id of the service line and */
11024: /* use this to delete the dependents */
11045: ,l_ordered_quantity ,l_price_request_code ; -- BUG 2670775 Reverse Limits
11046:
11047: EXIT WHEN llinetbl%NOTFOUND;
11048:
11049: oe_debug_pub.add('Service - Before delete dependent' || l_line_id);
11050:
11051: Delete_Dependents
11052: ( p_line_id => l_line_id
11053: ,p_item_type_code => l_item_type_code
11083:
11084:
11085: --added for notification framework to update global picture for standard line
11086: --check code release level first. Notification framework is at Pack H level
11087: oe_debug_pub.add('JPN: Delete all lines now');
11088: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110508' THEN
11089: /* Set the operation on the record so that globals are updated as well */
11090: l_new_line_rec.operation := OE_GLOBALS.G_OPR_DELETE;
11091: l_new_line_rec.line_id :=l_line_rec.line_id;
11095: p_line_rec =>l_new_line_rec,
11096: p_line_id =>l_line_rec.line_id,
11097: x_index => l_index,
11098: x_return_status => l_return_status);
11099: OE_DEBUG_PUB.ADD('Update_Global Return Status from OE_LINE_UTIL.delete_row for deleting standard line is: ' || l_return_status);
11100: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
11101: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
11102: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
11103: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11097: x_index => l_index,
11098: x_return_status => l_return_status);
11099: OE_DEBUG_PUB.ADD('Update_Global Return Status from OE_LINE_UTIL.delete_row for deleting standard line is: ' || l_return_status);
11100: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
11101: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
11102: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
11103: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11104: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
11105: OE_DEBUG_PUB.ADD('Update_Global_Picture Error in OE_LINE_UTIL.Delete_row');
11098: x_return_status => l_return_status);
11099: OE_DEBUG_PUB.ADD('Update_Global Return Status from OE_LINE_UTIL.delete_row for deleting standard line is: ' || l_return_status);
11100: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
11101: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
11102: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
11103: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11104: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
11105: OE_DEBUG_PUB.ADD('Update_Global_Picture Error in OE_LINE_UTIL.Delete_row');
11106: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
11101: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
11102: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
11103: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11104: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
11105: OE_DEBUG_PUB.ADD('Update_Global_Picture Error in OE_LINE_UTIL.Delete_row');
11106: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
11107: RAISE FND_API.G_EXC_ERROR;
11108: END IF;
11109: END IF; /*code_release_level*/
11102: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
11103: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11104: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
11105: OE_DEBUG_PUB.ADD('Update_Global_Picture Error in OE_LINE_UTIL.Delete_row');
11106: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
11107: RAISE FND_API.G_EXC_ERROR;
11108: END IF;
11109: END IF; /*code_release_level*/
11110: -- notification framework end
11119: --check code release level first. Notification framework is at Pack H level
11120: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110508' THEN
11121: FOR l_svc IN svc_line
11122: LOOP
11123: oe_debug_pub.add('JFC: in delete row, service line_id= '|| l_svc.line_id , 1);
11124: /* Set the operation on the record so that globals are updated as well */
11125: l_new_line_rec.operation := OE_GLOBALS.G_OPR_DELETE;
11126: l_new_line_rec.line_id :=l_svc.line_id;
11127: OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
11129: p_line_id =>l_svc.line_id,
11130: x_index => l_index,
11131: x_return_status => l_return_status);
11132:
11133: OE_DEBUG_PUB.ADD('Update_Global Return Status from OE_LINE_UTIL.delete_row for deleting service line is: ' || l_return_status);
11134: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
11135: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
11136: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
11137: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11131: x_return_status => l_return_status);
11132:
11133: OE_DEBUG_PUB.ADD('Update_Global Return Status from OE_LINE_UTIL.delete_row for deleting service line is: ' || l_return_status);
11134: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
11135: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
11136: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
11137: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11138: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
11139: OE_DEBUG_PUB.ADD('Update_Global_Picture Error in OE_LINE_UTIL.Delete_row');
11132:
11133: OE_DEBUG_PUB.ADD('Update_Global Return Status from OE_LINE_UTIL.delete_row for deleting service line is: ' || l_return_status);
11134: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
11135: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
11136: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
11137: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11138: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
11139: OE_DEBUG_PUB.ADD('Update_Global_Picture Error in OE_LINE_UTIL.Delete_row');
11140: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
11135: OE_DEBUG_PUB.ADD('EVENT NOTIFY - Unexpected Error');
11136: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
11137: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11138: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
11139: OE_DEBUG_PUB.ADD('Update_Global_Picture Error in OE_LINE_UTIL.Delete_row');
11140: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
11141: RAISE FND_API.G_EXC_ERROR;
11142: END IF;
11143: END LOOP;
11136: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
11137: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11138: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
11139: OE_DEBUG_PUB.ADD('Update_Global_Picture Error in OE_LINE_UTIL.Delete_row');
11140: OE_DEBUG_PUB.ADD('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
11141: RAISE FND_API.G_EXC_ERROR;
11142: END IF;
11143: END LOOP;
11144: END IF; /*code_release_level*/
11160: WSH_DCP_PVT.G_INIT_MSG_COUNT := fnd_msg_pub.count_msg;
11161:
11162: BEGIN
11163: IF l_debug_level > 0 THEN
11164: oe_debug_pub.add(p_header_id ||'-----' || l_line_rec.header_id, 1);
11165: END IF;
11166:
11167: WSH_DCP_PVT.g_dc_table.DELETE;
11168:
11173: l_header_id := p_header_id;
11174: END IF;
11175:
11176: IF l_debug_level > 0 THEN
11177: oe_debug_pub.add('CALLING WSH_DCP_PVT.Check_Scripts '
11178: ||'from delete row-'|| l_header_id, 1);
11179: END IF;
11180:
11181: WSH_DCP_PVT.Check_Scripts
11182: ( p_source_header_id => l_header_id
11183: ,x_data_inconsistent => l_data);
11184:
11185: IF l_debug_level > 0 THEN
11186: oe_debug_pub.add
11187: ('CALLING WSH_DCP_PVT.Post_Process '|| l_data, 1);
11188: END IF;
11189:
11190: WSH_DCP_PVT.Post_Process
11193:
11194: EXCEPTION
11195: WHEN WSH_DCP_PVT.dcp_caught THEN
11196: IF l_debug_level > 0 THEN
11197: oe_debug_pub.add('OM call to WSH DCP Caught in delete', 1);
11198: END IF;
11199:
11200: WHEN others THEN
11201: IF l_debug_level > 0 THEN
11200: WHEN others THEN
11201: IF l_debug_level > 0 THEN
11202: oe_msg_pub.add_text
11203: ('Update_Shipping_From_OE, DCP post process'|| sqlerrm);
11204: oe_debug_pub.add('OM call to WSH DCP,others '|| sqlerrm, 1);
11205: END IF;
11206: END;
11207: END IF; -- profile is yes
11208:
11205: END IF;
11206: END;
11207: END IF; -- profile is yes
11208:
11209: oe_debug_pub.add('Exiting OE_LINE_UTIL.DELETE_ROW', 1);
11210:
11211: EXCEPTION
11212: WHEN FND_API.G_EXC_ERROR THEN
11213: RAISE FND_API.G_EXC_ERROR ;
11621: , FULFILLMENT_BASE--ER#14763609
11622: FROM OE_ORDER_LINES_ALL -- Fix for FP bug 3391622
11623: WHERE LINE_ID = p_line_id;
11624:
11625: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
11626:
11627: BEGIN
11628:
11629: IF l_debug_level > 0 THEN
11626:
11627: BEGIN
11628:
11629: IF l_debug_level > 0 THEN
11630: oe_debug_pub.add('Entering OE_LINE_UTIL.QUERY_ROW, line_id:'||p_line_id, 1);
11631: END IF;
11632:
11633:
11634: OPEN l_line_csr;
12001: --Added for bug5068941 end
12002:
12003: If NOT OE_FEATURES_PVT.Is_Margin_Avail Then
12004: IF l_debug_level > 0 THEN
12005: oe_debug_pub.add('inside margin ',1);
12006: END IF;
12007: x_line_rec.unit_cost:= NULL;
12008: End If;
12009:
12025:
12026: CLOSE l_line_csr;
12027:
12028: IF l_debug_level > 0 THEN
12029: oe_debug_pub.add('Exiting OE_LINE_UTIL.QUERY_ROW', 1);
12030: END IF;
12031:
12032:
12033: EXCEPTION
12856: l_SVN NUMBER;
12857:
12858:
12859: --
12860: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
12861: --
12862: l_line_rec OE_ORDER_PUB.line_rec_type;
12863: BEGIN
12864:
12862: l_line_rec OE_ORDER_PUB.line_rec_type;
12863: BEGIN
12864:
12865: IF l_debug_level > 0 THEN
12866: oe_debug_pub.add('Entering OE_LINE_UTIL.QUERY_ROWS, line_id:'||p_line_id, 1);
12867: END IF;
12868:
12869: IF
12870: (p_line_id IS NOT NULL
12918: OE_GLOBALS.Set_Context;
12919: l_org_id := OE_GLOBALS.G_ORG_ID;
12920: end if;
12921: IF l_debug_level > 0 THEN
12922: oe_debug_pub.add('Entering '||to_char(l_org_id), 1);
12923: END IF;*/
12924: --Commented for MOAC end
12925:
12926: -- Loop over fetched records
13700:
13701:
13702: -- Return fetched table
13703: IF l_debug_level > 0 THEN
13704: oe_debug_pub.add('Exiting OE_LINE_UTIL.QUERY_ROWS', 1);
13705: END IF;
13706:
13707: EXCEPTION
13708:
13707: EXCEPTION
13708:
13709: WHEN NO_DATA_FOUND THEN
13710: IF l_debug_level > 0 THEN
13711: oe_debug_pub.add('Inside no data found ', 1);
13712: END IF;
13713:
13714: RAISE NO_DATA_FOUND;
13715:
13716: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
13717:
13718: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
13719: IF l_debug_level > 0 THEN
13720: oe_debug_pub.add('Inside Unexpected error ', 1);
13721: END IF;
13722:
13723: WHEN OTHERS THEN
13724:
13729: , 'Query_Rows'
13730: );
13731: END IF;
13732: IF l_debug_level > 0 THEN
13733: oe_debug_pub.add('Inside Others Exception ', 1);
13734: END IF;
13735:
13736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
13737:
13771: FROM oe_order_lines_all
13772: WHERE line_id IN (c_top_model_line_id, c_line_id)
13773: FOR UPDATE NOWAIT ;
13774: --
13775: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
13776: --
13777: BEGIN
13778:
13779: IF l_debug_level > 0 THEN
13776: --
13777: BEGIN
13778:
13779: IF l_debug_level > 0 THEN
13780: oe_debug_pub.add('Entering OE_LINE_UTIL.LOCK_ROW', 1);
13781: END IF;
13782:
13783: SAVEPOINT Lock_Row;
13784:
13795: ELSE
13796: l_line_id := p_x_line_rec.line_id;
13797: l_lock_control := p_x_line_rec.lock_control;
13798: IF l_debug_level > 0 THEN
13799: oe_debug_pub.add('in lock_control: '|| l_lock_control, 1);
13800: END IF;
13801: END IF;
13802:
13803: -- this code is for configurations. Whenever someone
13826: AND
13827: p_x_line_rec.top_model_line_id is not null THEN
13828: l_top_model_line_id := p_x_line_rec.top_model_line_id;
13829: IF l_debug_level > 0 THEN
13830: oe_debug_pub.add('get top_model_line_id from the record' );
13831: END IF ;
13832: ELSE
13833: SELECT top_model_line_id
13834: INTO l_top_model_line_id
13835: FROM OE_ORDER_LINES_ALL -- Fix for FP bug 3391622
13836: WHERE line_id = l_line_id;
13837:
13838: IF l_debug_level > 0 THEN
13839: oe_debug_pub.add('get top_model_line_id from the query' );
13840: END IF ;
13841: END IF;
13842: -- end bug 4344310
13843:
13841: END IF;
13842: -- end bug 4344310
13843:
13844: IF l_debug_level > 0 THEN
13845: oe_debug_pub.add('got top model line id', 1);
13846: END IF;
13847:
13848: BEGIN
13849:
13851: l_top_model_line_id <> FND_API.G_MISS_NUM AND
13852: l_top_model_line_id <> l_line_id THEN
13853:
13854: IF l_debug_level > 0 THEN
13855: oe_debug_pub.add('trying to lock model: '|| p_line_id, 1);
13856: END IF;
13857:
13858: -- changes for bug 4344310
13859: /* SELECT line_id
13877: FOR UPDATE NOWAIT;
13878: END IF;
13879: --end bug 4344310
13880: IF l_debug_level > 0 THEN
13881: oe_debug_pub.add('lock model successful ', 1);
13882: END IF;
13883:
13884: EXCEPTION
13885:
13885:
13886: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
13887: -- some one else is currently working on this model
13888: IF l_debug_level > 0 THEN
13889: oe_debug_pub.add('in lock model exception');
13890: END IF;
13891:
13892: FND_MESSAGE.Set_Name('ONT', 'OE_LINE_LOCKED');
13893: OE_MSG_PUB.Add;
13895: RAISE CAN_NOT_LOCK_MODEL;
13896:
13897: WHEN NO_DATA_FOUND THEN
13898: IF l_debug_level > 0 THEN
13899: oe_debug_pub.add('no_data_found, model lock exception');
13900: END IF;
13901: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
13902:
13903: WHEN OTHERS THEN
13901: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
13902:
13903: WHEN OTHERS THEN
13904: IF l_debug_level > 0 THEN
13905: oe_debug_pub.add('model lock exception, others');
13906: oe_debug_pub.add('options: '|| l_line_id , 1);
13907: oe_debug_pub.add('lock model successful: '|| l_top_model_line_id, 1);
13908: END IF;
13909: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
13902:
13903: WHEN OTHERS THEN
13904: IF l_debug_level > 0 THEN
13905: oe_debug_pub.add('model lock exception, others');
13906: oe_debug_pub.add('options: '|| l_line_id , 1);
13907: oe_debug_pub.add('lock model successful: '|| l_top_model_line_id, 1);
13908: END IF;
13909: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
13910: END;
13903: WHEN OTHERS THEN
13904: IF l_debug_level > 0 THEN
13905: oe_debug_pub.add('model lock exception, others');
13906: oe_debug_pub.add('options: '|| l_line_id , 1);
13907: oe_debug_pub.add('lock model successful: '|| l_top_model_line_id, 1);
13908: END IF;
13909: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
13910: END;
13911:
13910: END;
13911:
13912:
13913: IF l_debug_level > 0 THEN
13914: oe_debug_pub.add(' ', 1);
13915: END IF;
13916:
13917: --commented out for bug 4344310
13918: /*SELECT line_id,lock_control
13921: WHERE line_id = l_line_id
13922: FOR UPDATE NOWAIT; */
13923:
13924: IF l_debug_level > 0 THEN
13925: oe_debug_pub.add('selected for update', 1);
13926: oe_debug_pub.add('queried lock_control: '|| l_db_lock_control, 1);
13927: END IF;
13928:
13929: IF l_lock_control IS NULL
13922: FOR UPDATE NOWAIT; */
13923:
13924: IF l_debug_level > 0 THEN
13925: oe_debug_pub.add('selected for update', 1);
13926: oe_debug_pub.add('queried lock_control: '|| l_db_lock_control, 1);
13927: END IF;
13928:
13929: IF l_lock_control IS NULL
13930: OR (l_lock_control <> l_db_lock_control)
13937:
13938: END IF;
13939:
13940: IF l_debug_level > 0 THEN
13941: oe_debug_pub.add('queried lock_control: '|| p_x_line_rec.lock_control, 1);
13942: END IF;
13943:
13944: -- If lock_control is not passed(is null or missing), then return the locked record.
13945:
13960: -- Row locked. If the whole record is passed, then
13961: -- Compare IN attributes to DB attributes.
13962:
13963: IF l_debug_level > 0 THEN
13964: oe_debug_pub.add('compare ', 1);
13965: END IF;
13966:
13967: -- following constants are used to debug lock_order,
13968: -- please do not use them for any other purpose.
13978:
13979: -- Row has not changed. Set out parameter.
13980:
13981: IF l_debug_level > 0 THEN
13982: oe_debug_pub.add('locked row', 1);
13983: END IF;
13984:
13985: -- Set return status
13986:
13990: ELSE
13991:
13992: -- Row has changed by another user.
13993: IF l_debug_level > 0 THEN
13994: oe_debug_pub.add('row changed by other user', 1);
13995: END IF;
13996:
13997: x_return_status := FND_API.G_RET_STS_ERROR;
13998: p_x_line_rec.return_status := FND_API.G_RET_STS_ERROR;
14012:
14013: OE_GLOBALS.G_LOCK_TEST := 'N';
14014:
14015: IF l_debug_level > 0 THEN
14016: oe_debug_pub.add('Exiting OE_LINE_UTIL.LOCK_ROW', 1);
14017: oe_debug_pub.add(' ', 1);
14018: oe_debug_pub.add('lock const: '|| oe_globals.g_lock_const, 1);
14019: END IF;
14020:
14013: OE_GLOBALS.G_LOCK_TEST := 'N';
14014:
14015: IF l_debug_level > 0 THEN
14016: oe_debug_pub.add('Exiting OE_LINE_UTIL.LOCK_ROW', 1);
14017: oe_debug_pub.add(' ', 1);
14018: oe_debug_pub.add('lock const: '|| oe_globals.g_lock_const, 1);
14019: END IF;
14020:
14021: EXCEPTION
14014:
14015: IF l_debug_level > 0 THEN
14016: oe_debug_pub.add('Exiting OE_LINE_UTIL.LOCK_ROW', 1);
14017: oe_debug_pub.add(' ', 1);
14018: oe_debug_pub.add('lock const: '|| oe_globals.g_lock_const, 1);
14019: END IF;
14020:
14021: EXCEPTION
14022:
14022:
14023: WHEN CAN_NOT_LOCK_MODEL THEN
14024: OE_GLOBALS.G_LOCK_TEST := 'N';
14025: IF l_debug_level > 0 THEN
14026: oe_debug_pub.add('model locking exception', 1);
14027: END IF;
14028: x_return_status := FND_API.G_RET_STS_ERROR;
14029: p_x_line_rec.return_status := FND_API.G_RET_STS_ERROR;
14030:
14089: FOR UPDATE NOWAIT;
14090:
14091: l_line_id NUMBER;
14092:
14093: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
14094: BEGIN
14095:
14096: IF (p_line_id IS NOT NULL AND
14097: p_line_id <> FND_API.G_MISS_NUM) AND
14158: ,x_line_tbl => x_line_tbl
14159: );
14160:
14161: IF l_debug_level > 0 THEN
14162: oe_debug_pub.add('Entering OE_LINE_UTIL.QUERY_ROWS', 1);
14163: END IF;
14164:
14165: x_return_status := FND_API.G_RET_STS_SUCCESS;
14166:
14211: l_customer_number VARCHAR2(30);
14212: l_line_val_rec OE_Order_PUB.Line_Val_Rec_Type;
14213: l_organization_id NUMBER := OE_SYS_PARAMETERS.VALUE('MASTER_ORGANIZATION_ID');
14214:
14215: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
14216: BEGIN
14217:
14218: if l_debug_level > 0 then
14219: OE_DEBUG_PUB.add('Entering OE_LINE_UTIL.Get_Values');
14215: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
14216: BEGIN
14217:
14218: if l_debug_level > 0 then
14219: OE_DEBUG_PUB.add('Entering OE_LINE_UTIL.Get_Values');
14220: end if;
14221:
14222: IF (p_line_rec.calculate_price_flag IS NULL OR
14223: p_line_rec.calculate_price_flag <> FND_API.G_MISS_CHAR) AND
14227: l_line_val_rec.calculate_price_descr := OE_Id_To_Value.Calculate_price_Flag ( p_calculate_price_flag => p_line_rec.calculate_price_flag
14228: );
14229:
14230: if l_debug_level > 0 then
14231: oe_debug_pub.add('Geresh ' || l_line_val_rec.calculate_price_descr );
14232: end if;
14233: END IF;
14234:
14235:
14901: END IF;
14902: --
14903:
14904: if l_debug_level > 0 then
14905: oe_debug_pub.add('original item identifier type='||p_line_rec.original_item_identifier_type);
14906: oe_debug_pub.add('original ordered item ' ||p_line_rec.original_ordered_item);
14907: oe_debug_pub.add('original inventory item id ' ||p_line_rec.original_inventory_item_id);
14908: oe_debug_pub.add('original ordered_item id '||p_line_rec.original_ordered_item_id);
14909: oe_debug_pub.add('item relationship type '||p_line_rec.item_relationship_type);
14902: --
14903:
14904: if l_debug_level > 0 then
14905: oe_debug_pub.add('original item identifier type='||p_line_rec.original_item_identifier_type);
14906: oe_debug_pub.add('original ordered item ' ||p_line_rec.original_ordered_item);
14907: oe_debug_pub.add('original inventory item id ' ||p_line_rec.original_inventory_item_id);
14908: oe_debug_pub.add('original ordered_item id '||p_line_rec.original_ordered_item_id);
14909: oe_debug_pub.add('item relationship type '||p_line_rec.item_relationship_type);
14910: oe_debug_pub.add('original inventory item'||l_line_val_rec.original_inventory_item);
14903:
14904: if l_debug_level > 0 then
14905: oe_debug_pub.add('original item identifier type='||p_line_rec.original_item_identifier_type);
14906: oe_debug_pub.add('original ordered item ' ||p_line_rec.original_ordered_item);
14907: oe_debug_pub.add('original inventory item id ' ||p_line_rec.original_inventory_item_id);
14908: oe_debug_pub.add('original ordered_item id '||p_line_rec.original_ordered_item_id);
14909: oe_debug_pub.add('item relationship type '||p_line_rec.item_relationship_type);
14910: oe_debug_pub.add('original inventory item'||l_line_val_rec.original_inventory_item);
14911: oe_debug_pub.add('original ordered item'||l_line_val_rec.original_ordered_item);
14904: if l_debug_level > 0 then
14905: oe_debug_pub.add('original item identifier type='||p_line_rec.original_item_identifier_type);
14906: oe_debug_pub.add('original ordered item ' ||p_line_rec.original_ordered_item);
14907: oe_debug_pub.add('original inventory item id ' ||p_line_rec.original_inventory_item_id);
14908: oe_debug_pub.add('original ordered_item id '||p_line_rec.original_ordered_item_id);
14909: oe_debug_pub.add('item relationship type '||p_line_rec.item_relationship_type);
14910: oe_debug_pub.add('original inventory item'||l_line_val_rec.original_inventory_item);
14911: oe_debug_pub.add('original ordered item'||l_line_val_rec.original_ordered_item);
14912: oe_debug_pub.add('original original item ident type'||l_line_val_rec.original_item_identifier_type);
14905: oe_debug_pub.add('original item identifier type='||p_line_rec.original_item_identifier_type);
14906: oe_debug_pub.add('original ordered item ' ||p_line_rec.original_ordered_item);
14907: oe_debug_pub.add('original inventory item id ' ||p_line_rec.original_inventory_item_id);
14908: oe_debug_pub.add('original ordered_item id '||p_line_rec.original_ordered_item_id);
14909: oe_debug_pub.add('item relationship type '||p_line_rec.item_relationship_type);
14910: oe_debug_pub.add('original inventory item'||l_line_val_rec.original_inventory_item);
14911: oe_debug_pub.add('original ordered item'||l_line_val_rec.original_ordered_item);
14912: oe_debug_pub.add('original original item ident type'||l_line_val_rec.original_item_identifier_type);
14913: oe_debug_pub.add('item relationship type dsp='||l_line_val_rec.item_relationship_type_dsp);
14906: oe_debug_pub.add('original ordered item ' ||p_line_rec.original_ordered_item);
14907: oe_debug_pub.add('original inventory item id ' ||p_line_rec.original_inventory_item_id);
14908: oe_debug_pub.add('original ordered_item id '||p_line_rec.original_ordered_item_id);
14909: oe_debug_pub.add('item relationship type '||p_line_rec.item_relationship_type);
14910: oe_debug_pub.add('original inventory item'||l_line_val_rec.original_inventory_item);
14911: oe_debug_pub.add('original ordered item'||l_line_val_rec.original_ordered_item);
14912: oe_debug_pub.add('original original item ident type'||l_line_val_rec.original_item_identifier_type);
14913: oe_debug_pub.add('item relationship type dsp='||l_line_val_rec.item_relationship_type_dsp);
14914: oe_debug_pub.add('the service_reference_type_code: '||p_line_rec.service_reference_type_code);
14907: oe_debug_pub.add('original inventory item id ' ||p_line_rec.original_inventory_item_id);
14908: oe_debug_pub.add('original ordered_item id '||p_line_rec.original_ordered_item_id);
14909: oe_debug_pub.add('item relationship type '||p_line_rec.item_relationship_type);
14910: oe_debug_pub.add('original inventory item'||l_line_val_rec.original_inventory_item);
14911: oe_debug_pub.add('original ordered item'||l_line_val_rec.original_ordered_item);
14912: oe_debug_pub.add('original original item ident type'||l_line_val_rec.original_item_identifier_type);
14913: oe_debug_pub.add('item relationship type dsp='||l_line_val_rec.item_relationship_type_dsp);
14914: oe_debug_pub.add('the service_reference_type_code: '||p_line_rec.service_reference_type_code);
14915: oe_debug_pub.add('the service_reference_type: '||l_line_val_rec.service_reference_type);
14908: oe_debug_pub.add('original ordered_item id '||p_line_rec.original_ordered_item_id);
14909: oe_debug_pub.add('item relationship type '||p_line_rec.item_relationship_type);
14910: oe_debug_pub.add('original inventory item'||l_line_val_rec.original_inventory_item);
14911: oe_debug_pub.add('original ordered item'||l_line_val_rec.original_ordered_item);
14912: oe_debug_pub.add('original original item ident type'||l_line_val_rec.original_item_identifier_type);
14913: oe_debug_pub.add('item relationship type dsp='||l_line_val_rec.item_relationship_type_dsp);
14914: oe_debug_pub.add('the service_reference_type_code: '||p_line_rec.service_reference_type_code);
14915: oe_debug_pub.add('the service_reference_type: '||l_line_val_rec.service_reference_type);
14916: end if;
14909: oe_debug_pub.add('item relationship type '||p_line_rec.item_relationship_type);
14910: oe_debug_pub.add('original inventory item'||l_line_val_rec.original_inventory_item);
14911: oe_debug_pub.add('original ordered item'||l_line_val_rec.original_ordered_item);
14912: oe_debug_pub.add('original original item ident type'||l_line_val_rec.original_item_identifier_type);
14913: oe_debug_pub.add('item relationship type dsp='||l_line_val_rec.item_relationship_type_dsp);
14914: oe_debug_pub.add('the service_reference_type_code: '||p_line_rec.service_reference_type_code);
14915: oe_debug_pub.add('the service_reference_type: '||l_line_val_rec.service_reference_type);
14916: end if;
14917: RETURN l_line_val_rec;
14910: oe_debug_pub.add('original inventory item'||l_line_val_rec.original_inventory_item);
14911: oe_debug_pub.add('original ordered item'||l_line_val_rec.original_ordered_item);
14912: oe_debug_pub.add('original original item ident type'||l_line_val_rec.original_item_identifier_type);
14913: oe_debug_pub.add('item relationship type dsp='||l_line_val_rec.item_relationship_type_dsp);
14914: oe_debug_pub.add('the service_reference_type_code: '||p_line_rec.service_reference_type_code);
14915: oe_debug_pub.add('the service_reference_type: '||l_line_val_rec.service_reference_type);
14916: end if;
14917: RETURN l_line_val_rec;
14918:
14911: oe_debug_pub.add('original ordered item'||l_line_val_rec.original_ordered_item);
14912: oe_debug_pub.add('original original item ident type'||l_line_val_rec.original_item_identifier_type);
14913: oe_debug_pub.add('item relationship type dsp='||l_line_val_rec.item_relationship_type_dsp);
14914: oe_debug_pub.add('the service_reference_type_code: '||p_line_rec.service_reference_type_code);
14915: oe_debug_pub.add('the service_reference_type: '||l_line_val_rec.service_reference_type);
14916: end if;
14917: RETURN l_line_val_rec;
14918:
14919: END Get_Values;
15096: ( p_ship_method => p_line_val_rec.shipping_method
15097: );
15098:
15099: IF p_x_line_rec.shipping_method_code = FND_API.G_MISS_CHAR THEN
15100: oe_debug_pub.add('Ship Method Conversion Error');
15101: p_x_line_rec.return_status := FND_API.G_RET_STS_ERROR;
15102: END IF;
15103:
15104: END IF;
15729: ----------------------------------------------------------------------
15730: -- Retreiving ids for invoice_to_customer
15731: ----------------------------------------------------------------------
15732:
15733: oe_debug_pub.add('line Invoice_to_cust_id='||p_x_line_rec.invoice_to_customer_id);
15734: IF p_line_val_rec.invoice_to_customer_name_oi <> FND_API.G_MISS_CHAR
15735: OR p_line_val_rec.invoice_to_customer_number_oi <> FND_API.G_MISS_CHAR
15736: THEN
15737:
16216:
16217: END IF;
16218:
16219: ELSE
16220: oe_debug_pub.add('before calling aend customer contact value to id');
16221: p_x_line_rec.end_customer_contact_id := OE_Value_To_Id.end_customer_contact
16222: ( p_end_customer_contact => p_line_val_rec.end_customer_contact
16223: ,p_end_customer_id =>p_x_line_rec.end_customer_id
16224: );
16221: p_x_line_rec.end_customer_contact_id := OE_Value_To_Id.end_customer_contact
16222: ( p_end_customer_contact => p_line_val_rec.end_customer_contact
16223: ,p_end_customer_id =>p_x_line_rec.end_customer_id
16224: );
16225: oe_debug_pub.add('End customer contact id is '||p_x_line_rec.end_customer_contact_id);
16226:
16227: IF p_x_line_rec.end_customer_contact_id = FND_API.G_MISS_NUM THEN
16228: p_x_line_rec.return_status := FND_API.G_RET_STS_ERROR;
16229: END IF;
16256:
16257: END IF;
16258:
16259: ELSE
16260: oe_debug_pub.add('Before calling End custoemr site use value to id');
16261: p_x_line_rec.end_customer_site_use_id := OE_Value_To_Id.end_customer_site
16262: ( p_end_customer_site_address1 => p_line_val_rec.end_customer_site_address1
16263: , p_end_customer_site_address2 => p_line_val_rec.end_customer_site_address2
16264: , p_end_customer_site_address3 => p_line_val_rec.end_customer_site_address3
16273: , p_end_customer_site_use_code => NULL
16274: );
16275:
16276:
16277: oe_debug_pub.add('after hdr sold_to_site_use_id='||p_x_line_rec.end_customer_site_use_id);
16278:
16279: IF p_x_line_rec.end_customer_site_use_id = FND_API.G_MISS_NUM THEN
16280: p_x_line_rec.return_status := FND_API.G_RET_STS_ERROR;
16281: END IF;
16502: --- 2346233
16503: l_converted_qty NUMBER;
16504: l_inventory_item_id NUMBER;
16505: l_order_quantity_uom VARCHAR2(30);
16506: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
16507:
16508: BEGIN
16509: if l_debug_level > 0 then -- INVCONV
16510: oe_debug_pub.add('in get_reserved_quantities' );
16506: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
16507:
16508: BEGIN
16509: if l_debug_level > 0 then -- INVCONV
16510: oe_debug_pub.add('in get_reserved_quantities' );
16511: end if;
16512: l_rsv_rec.demand_source_header_id := p_header_id;
16513: l_rsv_rec.demand_source_line_id := p_line_id;
16514:
16575:
16576: END LOOP;
16577:
16578: if l_debug_level > 0 then -- INVCONV
16579: oe_debug_pub.add('leaving get_reserved_quantities qty = :' || l_reserved_quantity );
16580: oe_debug_pub.add('leaving get_reserved_quantities qty2 = :' || l_reserved_quantity2 );
16581: end if;
16582:
16583: x_reserved_quantity := ROUND(l_reserved_quantity,5); --Bug 16614440
16576: END LOOP;
16577:
16578: if l_debug_level > 0 then -- INVCONV
16579: oe_debug_pub.add('leaving get_reserved_quantities qty = :' || l_reserved_quantity );
16580: oe_debug_pub.add('leaving get_reserved_quantities qty2 = :' || l_reserved_quantity2 );
16581: end if;
16582:
16583: x_reserved_quantity := ROUND(l_reserved_quantity,5); --Bug 16614440
16584: x_reserved_quantity2 := ROUND(l_reserved_quantity2,5); --Bug 16614440
16620: --- 2346233
16621: l_converted_qty NUMBER;
16622: l_inventory_item_id NUMBER;
16623: l_order_quantity_uom VARCHAR2(30);
16624: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
16625:
16626: BEGIN
16627: if l_debug_level > 0 then -- INVCONV
16628: oe_debug_pub.add('in get_reserved_quantity ' );
16624: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
16625:
16626: BEGIN
16627: if l_debug_level > 0 then -- INVCONV
16628: oe_debug_pub.add('in get_reserved_quantity ' );
16629: end if;
16630: l_rsv_rec.demand_source_header_id := p_header_id;
16631: l_rsv_rec.demand_source_line_id := p_line_id;
16632:
16695: END LOOP;
16696:
16697:
16698: if l_debug_level > 0 then -- INVCONV
16699: oe_debug_pub.add('leaving get_reserved_quantity. qty = :' || l_reserved_quantity );
16700: end if;
16701: return (l_reserved_quantity);
16702:
16703: END Get_Reserved_Quantity;
16726: l_sort_by_req_date NUMBER;
16727: --- 2346233
16728: l_converted_qty NUMBER;
16729: l_inventory_item_id NUMBER;
16730: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
16731:
16732:
16733: BEGIN
16734: if l_debug_level > 0 then -- INVCONV
16731:
16732:
16733: BEGIN
16734: if l_debug_level > 0 then -- INVCONV
16735: oe_debug_pub.add('in get_reserved_quantity ' );
16736: end if;
16737: l_rsv_rec.demand_source_header_id := p_header_id;
16738: l_rsv_rec.demand_source_line_id := p_line_id;
16739:
16760: l_rsv_rec.secondary_reservation_quantity;
16761:
16762: END LOOP;
16763: if l_debug_level > 0 then -- INVCONV
16764: oe_debug_pub.add('leaving get_reserved_quantity2. qty2 = :' || l_reserved_quantity2 );
16765: end if;
16766:
16767: return (l_reserved_quantity2);
16768:
16851:
16852: IF nvl(l_order_quantity_uom,l_rsv_rec.reservation_uom_code)
16853: <> l_rsv_rec.reservation_uom_code THEN
16854:
16855: oe_debug_pub.add('reservation_uom_code :' ||
16856: l_rsv_rec.reservation_uom_code,3);
16857: oe_debug_pub.add('l_order_quantity_uom :' ||
16858: l_order_quantity_uom,3);
16859: oe_debug_pub.add('reservation_quantity :' ||
16853: <> l_rsv_rec.reservation_uom_code THEN
16854:
16855: oe_debug_pub.add('reservation_uom_code :' ||
16856: l_rsv_rec.reservation_uom_code,3);
16857: oe_debug_pub.add('l_order_quantity_uom :' ||
16858: l_order_quantity_uom,3);
16859: oe_debug_pub.add('reservation_quantity :' ||
16860: l_rsv_rec.reservation_quantity,3);
16861: l_converted_qty :=
16855: oe_debug_pub.add('reservation_uom_code :' ||
16856: l_rsv_rec.reservation_uom_code,3);
16857: oe_debug_pub.add('l_order_quantity_uom :' ||
16858: l_order_quantity_uom,3);
16859: oe_debug_pub.add('reservation_quantity :' ||
16860: l_rsv_rec.reservation_quantity,3);
16861: l_converted_qty :=
16862: Oe_Order_Misc_Util.convert_uom( l_inventory_item_id,
16863: l_rsv_rec.reservation_uom_code,
16863: l_rsv_rec.reservation_uom_code,
16864: l_order_quantity_uom,
16865: l_rsv_rec.reservation_quantity);
16866:
16867: oe_debug_pub.add('l_converted_qty :' || l_converted_qty,3);
16868: l_reserved_quantity := l_reserved_quantity +
16869: l_converted_qty;
16870: ELSE
16871:
16868: l_reserved_quantity := l_reserved_quantity +
16869: l_converted_qty;
16870: ELSE
16871:
16872: oe_debug_pub.add('2 reservation_quantity :' ||
16873: l_rsv_rec.reservation_quantity);
16874: l_reserved_quantity := l_reserved_quantity +
16875: l_rsv_rec.reservation_quantity;
16876: END IF;
16939: l_ref_line_id NUMBER;
16940:
16941: BEGIN
16942:
16943: oe_debug_pub.ADD('Entering Over Return',1);
16944:
16945: /*
16946: ** Fix Bug # 2971412
16947: ** Since this validation used to get performed even in older
16959:
16960: END IF;
16961: */
16962:
16963: oe_debug_pub.ADD('Return Context is: '||p_line_rec.return_context,1);
16964: oe_debug_pub.ADD('Line Id is: '||to_char(p_line_rec.line_id),1);
16965: oe_debug_pub.ADD('Reference Line Id is: '||to_char(p_line_rec.reference_line_id),1);
16966:
16967: -- Fix for Bug # 1613371
16960: END IF;
16961: */
16962:
16963: oe_debug_pub.ADD('Return Context is: '||p_line_rec.return_context,1);
16964: oe_debug_pub.ADD('Line Id is: '||to_char(p_line_rec.line_id),1);
16965: oe_debug_pub.ADD('Reference Line Id is: '||to_char(p_line_rec.reference_line_id),1);
16966:
16967: -- Fix for Bug # 1613371
16968: IF p_line_rec.return_context = 'SERIAL' THEN
16961: */
16962:
16963: oe_debug_pub.ADD('Return Context is: '||p_line_rec.return_context,1);
16964: oe_debug_pub.ADD('Line Id is: '||to_char(p_line_rec.line_id),1);
16965: oe_debug_pub.ADD('Reference Line Id is: '||to_char(p_line_rec.reference_line_id),1);
16966:
16967: -- Fix for Bug # 1613371
16968: IF p_line_rec.return_context = 'SERIAL' THEN
16969:
16998: END IF;
16999: END LOOP;
17000: END IF;
17001:
17002: oe_debug_pub.ADD('Before checking the total for the Outbound line',1);
17003: SELECT sum(nvl(ordered_quantity, 0))
17004: INTO l_total
17005: FROM oe_order_lines
17006: WHERE reference_line_id = p_line_rec.reference_line_id
17009: AND cancelled_flag <> 'Y'
17010: AND line_category_code = 'RETURN'
17011: AND line_id <> p_line_rec.line_id;
17012:
17013: oe_debug_pub.ADD('l_total : '||to_char(l_total),1);
17014:
17015:
17016: -- bug# 6617423 : Start -----------
17017: /*
17020: FROM oe_order_lines
17021: WHERE line_id = p_line_rec.reference_line_id;
17022: */
17023:
17024: oe_debug_pub.add( '
17026: l_overship_invoice_basis := oe_sys_parameters.value('OE_OVERSHIP_INVOICE_BASIS',NULL);
17027: ELSE
17028: l_overship_invoice_basis := oe_sys_parameters.value('OE_OVERSHIP_INVOICE_BASIS',p_line_rec.org_id);
17026: l_overship_invoice_basis := oe_sys_parameters.value('OE_OVERSHIP_INVOICE_BASIS',NULL);
17027: ELSE
17028: l_overship_invoice_basis := oe_sys_parameters.value('OE_OVERSHIP_INVOICE_BASIS',p_line_rec.org_id);
17029: END IF;
17030: oe_debug_pub.add( '
17032:
17033: IF l_overship_invoice_basis = 'SHIPPED' then
17034: SELECT nvl(shipped_quantity, ordered_quantity) --- get from ord_qty if original line not shipped/invoiced....
17027: ELSE
17028: l_overship_invoice_basis := oe_sys_parameters.value('OE_OVERSHIP_INVOICE_BASIS',p_line_rec.org_id);
17029: END IF;
17030: oe_debug_pub.add( '
17031: oe_debug_pub.add( '
17033: IF l_overship_invoice_basis = 'SHIPPED' then
17034: SELECT nvl(shipped_quantity, ordered_quantity) --- get from ord_qty if original line not shipped/invoiced....
17035: INTO l_orig_quantity
17043: end if;
17044: -- bug# 6617423: End -------
17045:
17046:
17047: oe_debug_pub.ADD('l_orig_quantity : '||to_char(l_orig_quantity),1);
17048:
17049: IF nvl(l_total,0) + p_line_rec.ordered_quantity > l_orig_quantity THEN
17050: RETURN TRUE;
17051: ELSE
17053: END IF;
17054:
17055: EXCEPTION
17056: WHEN NO_DATA_FOUND THEN
17057: oe_debug_pub.ADD('In NO DATA FOUND ',1);
17058: RETURN FALSE;
17059: END Is_Over_Return;
17060:
17061:
17096: post message OE_INVALIDATES_CUSTOMER_ITEM
17097: set return status to error.
17098: */
17099:
17100: oe_debug_pub.add('Entering Get_Inventory_Item', 1);
17101: IF (p_x_line_rec.ship_to_org_id IS NOT NULL AND
17102: p_x_line_rec.ship_to_org_id <> FND_API.G_MISS_NUM) THEN
17103: /* Replaced with the following SELECT and IF statements
17104: to fix bug 2163988
17117: HZ_CUST_ACCT_SITES s
17118: WHERE u.cust_acct_site_id = s.cust_acct_site_id
17119: AND u.site_use_id = p_x_line_rec.ship_to_org_id
17120: AND u.site_use_code = 'SHIP_TO';
17121: oe_debug_pub.add('ship to address:' || l_address_id||' - Customer:'||to_char(l_cust_id));
17122:
17123: IF l_cust_id <> p_x_line_rec.sold_to_org_id THEN
17124: oe_debug_pub.add('Sold-To Customer:'||to_char(p_x_line_rec.sold_to_org_id));
17125: l_address_id := NULL;
17120: AND u.site_use_code = 'SHIP_TO';
17121: oe_debug_pub.add('ship to address:' || l_address_id||' - Customer:'||to_char(l_cust_id));
17122:
17123: IF l_cust_id <> p_x_line_rec.sold_to_org_id THEN
17124: oe_debug_pub.add('Sold-To Customer:'||to_char(p_x_line_rec.sold_to_org_id));
17125: l_address_id := NULL;
17126: END IF;
17127:
17128: END IF;
17126: END IF;
17127:
17128: END IF;
17129:
17130: oe_debug_pub.add('INVENTORY_ITEM_ID Before calling CI_Attribute_Value '
17131: ||to_char(p_x_line_rec.inventory_item_id), 1);
17132:
17133: --Start of bug# 14352128
17134: oe_debug_pub.add('p_x_line_rec.line_category_code = '||p_x_line_rec.line_category_code);
17130: oe_debug_pub.add('INVENTORY_ITEM_ID Before calling CI_Attribute_Value '
17131: ||to_char(p_x_line_rec.inventory_item_id), 1);
17132:
17133: --Start of bug# 14352128
17134: oe_debug_pub.add('p_x_line_rec.line_category_code = '||p_x_line_rec.line_category_code);
17135: IF p_x_line_rec.line_category_code = 'RETURN' THEN
17136: oe_debug_pub.add('Its a Return Order Line ');
17137:
17138: INV_CUSTOMER_ITEM_GRP.CI_Attribute_Value(
17132:
17133: --Start of bug# 14352128
17134: oe_debug_pub.add('p_x_line_rec.line_category_code = '||p_x_line_rec.line_category_code);
17135: IF p_x_line_rec.line_category_code = 'RETURN' THEN
17136: oe_debug_pub.add('Its a Return Order Line ');
17137:
17138: INV_CUSTOMER_ITEM_GRP.CI_Attribute_Value(
17139: Z_Customer_Item_Id => p_x_line_rec.ordered_item_id
17140: , Z_Customer_Id => p_x_line_rec.sold_to_org_id
17149: , Attribute_Value => l_attribute_value
17150: , Z_Line_Category_Code => 'RETURN'
17151: );
17152: ELSE
17153: OE_DEBUG_PUB.ADD('Its a Normal Order Line');
17154:
17155: INV_CUSTOMER_ITEM_GRP.CI_Attribute_Value(
17156: Z_Customer_Item_Id => p_x_line_rec.ordered_item_id
17157: , Z_Customer_Id => p_x_line_rec.sold_to_org_id
17167: , Z_Line_Category_Code => 'ORDER'
17168: );
17169: END IF; --End of bug# 14352128
17170:
17171: oe_debug_pub.add('INVENTORY_ITEM_ID After call is '||l_attribute_value, 1);
17172: IF (l_attribute_value IS NOT NULL AND
17173: to_number(l_attribute_value) <> p_x_line_rec.inventory_item_id) THEN
17174: oe_debug_pub.add('Assigning new inventory_item_id', 1);
17175: l_update_inventory_item := FND_API.G_TRUE;
17170:
17171: oe_debug_pub.add('INVENTORY_ITEM_ID After call is '||l_attribute_value, 1);
17172: IF (l_attribute_value IS NOT NULL AND
17173: to_number(l_attribute_value) <> p_x_line_rec.inventory_item_id) THEN
17174: oe_debug_pub.add('Assigning new inventory_item_id', 1);
17175: l_update_inventory_item := FND_API.G_TRUE;
17176: l_inventory_item_id := TO_NUMBER(l_attribute_value);
17177: ELSIF to_number(l_attribute_value) = p_x_line_rec.inventory_item_id THEN
17178: NULL;
17176: l_inventory_item_id := TO_NUMBER(l_attribute_value);
17177: ELSIF to_number(l_attribute_value) = p_x_line_rec.inventory_item_id THEN
17178: NULL;
17179: ELSE
17180: oe_debug_pub.add('Issue error message', 1);
17181: oe_debug_pub.add('l_error_code: ' || l_error_code, 1);
17182: oe_debug_pub.add('l_error_flag: ' || l_error_flag, 1);
17183: oe_debug_pub.add('l_error_message: ' || l_error_message, 1);
17184: oe_debug_pub.add('p_x_line_rec.ordered_item_id:'||p_x_line_rec.ordered_item_id,1);
17177: ELSIF to_number(l_attribute_value) = p_x_line_rec.inventory_item_id THEN
17178: NULL;
17179: ELSE
17180: oe_debug_pub.add('Issue error message', 1);
17181: oe_debug_pub.add('l_error_code: ' || l_error_code, 1);
17182: oe_debug_pub.add('l_error_flag: ' || l_error_flag, 1);
17183: oe_debug_pub.add('l_error_message: ' || l_error_message, 1);
17184: oe_debug_pub.add('p_x_line_rec.ordered_item_id:'||p_x_line_rec.ordered_item_id,1);
17185: fnd_message.set_name('ONT','OE_INVALIDATES_CUSTOMER_ITEM');
17178: NULL;
17179: ELSE
17180: oe_debug_pub.add('Issue error message', 1);
17181: oe_debug_pub.add('l_error_code: ' || l_error_code, 1);
17182: oe_debug_pub.add('l_error_flag: ' || l_error_flag, 1);
17183: oe_debug_pub.add('l_error_message: ' || l_error_message, 1);
17184: oe_debug_pub.add('p_x_line_rec.ordered_item_id:'||p_x_line_rec.ordered_item_id,1);
17185: fnd_message.set_name('ONT','OE_INVALIDATES_CUSTOMER_ITEM');
17186: OE_MSG_PUB.Add;
17179: ELSE
17180: oe_debug_pub.add('Issue error message', 1);
17181: oe_debug_pub.add('l_error_code: ' || l_error_code, 1);
17182: oe_debug_pub.add('l_error_flag: ' || l_error_flag, 1);
17183: oe_debug_pub.add('l_error_message: ' || l_error_message, 1);
17184: oe_debug_pub.add('p_x_line_rec.ordered_item_id:'||p_x_line_rec.ordered_item_id,1);
17185: fnd_message.set_name('ONT','OE_INVALIDATES_CUSTOMER_ITEM');
17186: OE_MSG_PUB.Add;
17187: x_return_status := FND_API.G_RET_STS_ERROR;
17180: oe_debug_pub.add('Issue error message', 1);
17181: oe_debug_pub.add('l_error_code: ' || l_error_code, 1);
17182: oe_debug_pub.add('l_error_flag: ' || l_error_flag, 1);
17183: oe_debug_pub.add('l_error_message: ' || l_error_message, 1);
17184: oe_debug_pub.add('p_x_line_rec.ordered_item_id:'||p_x_line_rec.ordered_item_id,1);
17185: fnd_message.set_name('ONT','OE_INVALIDATES_CUSTOMER_ITEM');
17186: OE_MSG_PUB.Add;
17187: x_return_status := FND_API.G_RET_STS_ERROR;
17188: END IF;
17186: OE_MSG_PUB.Add;
17187: x_return_status := FND_API.G_RET_STS_ERROR;
17188: END IF;
17189:
17190: oe_debug_pub.add('Return Status after calling CI_Attribute_Value '||x_return_status, 1);
17191: IF l_update_inventory_item = FND_API.G_TRUE THEN
17192:
17193: -- Call Process Order
17194:
17191: IF l_update_inventory_item = FND_API.G_TRUE THEN
17192:
17193: -- Call Process Order
17194:
17195: oe_debug_pub.add('Calling Process order to update inventory item', 1);
17196: l_control_rec.controlled_operation := TRUE;
17197: l_control_rec.check_security := TRUE;
17198: l_control_rec.clear_dependents := TRUE;
17199: l_control_rec.default_attributes := TRUE;
17213: , p_x_old_line_tbl => l_old_line_tbl
17214: , x_return_status => x_return_status
17215: );
17216:
17217: oe_debug_pub.add('Return Status after calling Process order'||x_return_status, 1);
17218:
17219: p_x_line_rec := l_line_tbl(1);
17220:
17221: END IF;
17219: p_x_line_rec := l_line_tbl(1);
17220:
17221: END IF;
17222:
17223: oe_debug_pub.add('Exiting Get_Inventory_Item', 1);
17224:
17225: END Get_Inventory_Item;
17226:
17227:
17327: WHERE oare.rule_id=oar.rule_id
17328: AND oar.DATABASE_OBJECT_NAME='OE_AK_ORDER_LINES_V'
17329: GROUP BY oare.ATTRIBUTE_CODE;
17330:
17331: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
17332:
17333: BEGIN
17334: IF l_debug_level > 0 then
17335: oe_debug_pub.add('Entering Line Load_attachment_rules');
17331: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
17332:
17333: BEGIN
17334: IF l_debug_level > 0 then
17335: oe_debug_pub.add('Entering Line Load_attachment_rules');
17336: End IF;
17337:
17338: IF g_attachrule_count_line_tab.count = 0 THEN
17339: FOR line_attributes_rec IN line_attributes LOOP
17341: END LOOP;
17342: END IF;
17343:
17344: IF l_debug_level > 0 then
17345: oe_debug_pub.add('Exiting Line Load_attachment_rules');
17346: End IF;
17347:
17348: END Load_attachment_rules_Line;
17349: --7688372 end
17400: l_line_payment_type_code VARCHAR2(30);
17401:
17402:
17403: --
17404: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
17405: --
17406: l_attr_attach_change boolean := FALSE; --6896311
17407:
17408: -- Bug 8940667,8947394 begin
17414:
17415: BEGIN
17416:
17417: if l_debug_level > 0 then
17418: oe_debug_pub.Add('Entering pre_write_process for line ID : '||p_x_line_rec.line_id, 1);
17419: end if;
17420:
17421: -- bug fix 3350185:
17422: -- Audit Trail/Versioning moved to separate procedure below
17425: p_process_step => 1 );
17426:
17427:
17428: if l_debug_level > 0 then
17429: oe_debug_pub.Add('After Assign out rec', 1);
17430: end if;
17431:
17432: ------------------------------------------------------------------------
17433: -- Copy corresponding inventory item to the line if it is a CUST item
17437: p_old_line_rec.ship_from_org_id) OR
17438: NOT OE_GLOBALS.EQUAL(p_x_line_rec.ship_to_org_id ,
17439: p_old_line_rec.ship_to_org_id) THEN
17440: if l_debug_level > 0 then
17441: oe_debug_pub.Add('RR:I1', 1);
17442: end if;
17443: IF p_x_line_rec.item_identifier_type = 'CUST' THEN
17444: if l_debug_level > 0 then
17445: oe_debug_pub.Add('RR:I2', 1);
17441: oe_debug_pub.Add('RR:I1', 1);
17442: end if;
17443: IF p_x_line_rec.item_identifier_type = 'CUST' THEN
17444: if l_debug_level > 0 then
17445: oe_debug_pub.Add('RR:I2', 1);
17446: end if;
17447: IF (p_x_line_rec.ordered_item_id IS NOT NULL AND
17448: p_x_line_rec.ordered_item_id <> FND_API.G_MISS_NUM) THEN
17449: if l_debug_level > 0 then
17446: end if;
17447: IF (p_x_line_rec.ordered_item_id IS NOT NULL AND
17448: p_x_line_rec.ordered_item_id <> FND_API.G_MISS_NUM) THEN
17449: if l_debug_level > 0 then
17450: oe_debug_pub.add('return_status before calling Get_Inventory_Item '
17451: ||l_return_status, 1);
17452: end if;
17453: Get_Inventory_Item
17454: ( p_x_line_rec => p_x_line_rec
17454: ( p_x_line_rec => p_x_line_rec
17455: , x_return_status => l_return_status);
17456:
17457: if l_debug_level > 0 then
17458: oe_debug_pub.add('return_status after calling Get_Inventory_Item '||l_return_status, 1);
17459: end if;
17460: END IF;
17461: END IF;
17462: if l_debug_level > 0 then
17459: end if;
17460: END IF;
17461: END IF;
17462: if l_debug_level > 0 then
17463: oe_debug_pub.Add('RR:I2.5', 1);
17464: end if;
17465: END IF;
17466:
17467: if l_debug_level > 0 then
17464: end if;
17465: END IF;
17466:
17467: if l_debug_level > 0 then
17468: oe_debug_pub.Add('RR:I3', 1);
17469: end if;
17470:
17471: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
17472: RAISE FND_API.G_EXC_ERROR;
17488: (p_x_line_rec.ordered_item = FND_API.G_MISS_CHAR
17489: AND p_x_line_rec.item_identifier_type in ('INT', 'CUST')) THEN
17490:
17491: if l_debug_level > 0 then
17492: oe_debug_pub.Add('Before calling get_ordered_item', 1);
17493: oe_debug_pub.add('return_status before calling Get_ordered_Item '
17494: ||l_return_status, 1);
17495: end if;
17496: Oe_Oe_Form_Line.Get_Ordered_Item
17489: AND p_x_line_rec.item_identifier_type in ('INT', 'CUST')) THEN
17490:
17491: if l_debug_level > 0 then
17492: oe_debug_pub.Add('Before calling get_ordered_item', 1);
17493: oe_debug_pub.add('return_status before calling Get_ordered_Item '
17494: ||l_return_status, 1);
17495: end if;
17496: Oe_Oe_Form_Line.Get_Ordered_Item
17497: (x_return_status => l_return_status,
17503: p_sold_to_org_id => p_x_line_rec.sold_to_org_id,
17504: x_ordered_item => p_x_line_rec.ordered_item);
17505:
17506: if l_debug_level > 0 then
17507: oe_debug_pub.add('return_status after calling Get_Ordered_Item '||l_return_status, 1);
17508: end if;
17509:
17510: --Fix for bug 3728638.
17511: IF p_x_line_rec.item_identifier_type='INT'
17550: end if;
17551: */
17552:
17553: if l_debug_level > 0 then
17554: oe_debug_pub.add('Checking if it is a model line copied from another order');
17555: end if;
17556:
17557: begin
17558: select source_document_type_id
17575:
17576: */
17577:
17578: if l_debug_level > 0 then
17579: oe_debug_pub.add('parent source_document_type_id = ' || l_parent_document_type_id);
17580: end if;
17581:
17582: if ((nvl(l_parent_document_type_id,0) <> 2) OR
17583: (p_x_line_rec.source_document_line_id IS NULL) OR
17583: (p_x_line_rec.source_document_line_id IS NULL) OR
17584: (p_x_line_rec.source_document_line_id = FND_API.G_MISS_NUM)) then
17585:
17586: if l_debug_level > 0 then
17587: oe_debug_pub.add('This class/kit/option line has not been copied');
17588: oe_debug_pub.add('from another order: So, log a delayed request');
17589: oe_debug_pub.add('to copy the model pricing attributes');
17590: oe_debug_pub.add('logging request for line '||p_x_line_rec.line_id, 1);
17591: end if;
17584: (p_x_line_rec.source_document_line_id = FND_API.G_MISS_NUM)) then
17585:
17586: if l_debug_level > 0 then
17587: oe_debug_pub.add('This class/kit/option line has not been copied');
17588: oe_debug_pub.add('from another order: So, log a delayed request');
17589: oe_debug_pub.add('to copy the model pricing attributes');
17590: oe_debug_pub.add('logging request for line '||p_x_line_rec.line_id, 1);
17591: end if;
17592:
17585:
17586: if l_debug_level > 0 then
17587: oe_debug_pub.add('This class/kit/option line has not been copied');
17588: oe_debug_pub.add('from another order: So, log a delayed request');
17589: oe_debug_pub.add('to copy the model pricing attributes');
17590: oe_debug_pub.add('logging request for line '||p_x_line_rec.line_id, 1);
17591: end if;
17592:
17593: /* Fix for bug1857538
17586: if l_debug_level > 0 then
17587: oe_debug_pub.add('This class/kit/option line has not been copied');
17588: oe_debug_pub.add('from another order: So, log a delayed request');
17589: oe_debug_pub.add('to copy the model pricing attributes');
17590: oe_debug_pub.add('logging request for line '||p_x_line_rec.line_id, 1);
17591: end if;
17592:
17593: /* Fix for bug1857538
17594: - Log a delayed request to copy pricing attributes, using line_id
17657: null;
17658: END;
17659:
17660: IF l_line_payment_type_code IS NOT NULL THEN
17661: oe_debug_pub.add('Log delayed request to cascade payment information for line: '||p_x_line_rec.line_id, 1);
17662: OE_Delayed_Requests_Pvt.Log_Request(
17663: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
17664: p_entity_id => p_x_line_rec.line_id,
17665: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
17680: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
17681: p_x_line_rec.split_from_line_id is not null
17682: THEN
17683: if l_debug_level > 0 then
17684: oe_debug_pub.add('This is a new line after split', 1);
17685: end if;
17686: OE_Delayed_Requests_Pvt.Log_Request(
17687: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
17688: p_entity_id => p_x_line_rec.line_id,
17703: -- IF condition modified to log update_shipping delayed request when operations is UPDATE and ship set
17704: -- nulled out
17705: IF l_debug_level > 0
17706: THEN
17707: oe_debug_pub.add('New Ship set Id :' || p_x_line_rec.ship_set_id,2);
17708: oe_debug_pub.add('Old Ship set Id :' || p_old_line_rec.ship_set_id,2);
17709: oe_debug_pub.add('Split Action:'||p_x_line_rec.split_Action_code,2);
17710: END IF;
17711: --8979782 : Logged request for change in warehouse while spliting
17704: -- nulled out
17705: IF l_debug_level > 0
17706: THEN
17707: oe_debug_pub.add('New Ship set Id :' || p_x_line_rec.ship_set_id,2);
17708: oe_debug_pub.add('Old Ship set Id :' || p_old_line_rec.ship_set_id,2);
17709: oe_debug_pub.add('Split Action:'||p_x_line_rec.split_Action_code,2);
17710: END IF;
17711: --8979782 : Logged request for change in warehouse while spliting
17712: --9366512 : Request to be logged for change of request date and ship_to
17705: IF l_debug_level > 0
17706: THEN
17707: oe_debug_pub.add('New Ship set Id :' || p_x_line_rec.ship_set_id,2);
17708: oe_debug_pub.add('Old Ship set Id :' || p_old_line_rec.ship_set_id,2);
17709: oe_debug_pub.add('Split Action:'||p_x_line_rec.split_Action_code,2);
17710: END IF;
17711: --8979782 : Logged request for change in warehouse while spliting
17712: --9366512 : Request to be logged for change of request date and ship_to
17713: --13444770: Group the attributes correctly in case of split
17734: THEN
17735: -- code fix for 3554622
17736:
17737: if l_debug_level > 0 then
17738: oe_debug_pub.ADD('Update Shipping : '|| p_x_line_rec.line_id ,1);
17739: end if;
17740: OE_Delayed_Requests_Pvt.Log_Request(
17741: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
17742: p_entity_id => p_x_line_rec.line_id,
17760: IF (OE_GLOBALS.G_UI_FLAG) and
17761: OE_GLOBALS.G_DEFER_PRICING='N' and
17762: (nvl(Oe_Config_Pvt.oecfg_configuration_pricing,'N')='N') THEN
17763: if l_debug_level > 0 then
17764: oe_debug_pub.add('ui mode - delete');
17765: end if;
17766: IF p_x_line_rec.booked_flag='Y' THEN --2442012
17767: l_pricing_event := 'BATCH,ORDER,BOOK'; --7494393
17768: ELSE
17792: END IF;
17793: -- sol_ord_er #16014165 end
17794: ELSE
17795: if l_debug_level > 0 then
17796: oe_debug_pub.add('batch mode - delete');
17797: end if;
17798: IF p_x_line_rec.booked_flag='Y' THEN
17799: l_pricing_event := 'BATCH,BOOK';
17800: ELSE
17804: if p_x_line_rec.source_document_type_id = 5 and
17805: nvl(fnd_profile.value('ONT_GRP_PRICE_FOR_DSP'),'N') = 'N' then
17806: null;
17807: if l_debug_level > 0 then
17808: oe_debug_pub.add('not logging price order - delete operation ');
17809: end if;
17810: else
17811: if l_debug_level > 0 then
17812: oe_debug_pub.add('logging price order - delete operation');
17808: oe_debug_pub.add('not logging price order - delete operation ');
17809: end if;
17810: else
17811: if l_debug_level > 0 then
17812: oe_debug_pub.add('logging price order - delete operation');
17813: end if;
17814: OE_delayed_requests_Pvt.log_request(
17815: p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
17816: p_entity_id => p_x_line_rec.Header_Id,
17838: END IF;
17839: --
17840: /* IF p_x_line_rec.booked_flag='Y' THEN
17841: if l_debug_level > 0 then
17842: oe_debug_pub.add('bokked - delete');
17843: end if;
17844: OE_delayed_requests_Pvt.log_request(
17845: p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
17846: p_entity_id => p_x_line_rec.Header_Id,
17858:
17859: --Bug# 9434723 - Start -
17860: -- Logging delayed request on DELETE Operation to delete header-level charges if there is no more qty on SO
17861: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_DELETE THEN
17862: oe_debug_pub.add(' Logging delayed request to delete header-level charges ');
17863: oe_delayed_requests_pvt.log_request(
17864: p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
17865: p_entity_id => p_x_line_rec.header_id,
17866: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_ALL,
17866: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_ALL,
17867: p_requesting_entity_id => p_x_line_rec.header_id,
17868: p_request_type => OE_GLOBALS.G_DELETE_CHARGES,
17869: x_return_status => l_return_status);
17870: oe_debug_pub.add(' After logging G_DELETE_CHARGES delayed request - l_return_status= '||l_return_status);
17871: END IF;
17872: --- Bug# 9434723 -- End
17873:
17874:
17872: --- Bug# 9434723 -- End
17873:
17874:
17875: if l_debug_level > 0 then
17876: oe_debug_pub.ADD('Raj:Split-Inside Request' ,1);
17877: end if;
17878:
17879: IF (p_x_line_rec.operation = oe_globals.g_opr_update) and
17880: NOT (p_x_line_rec.split_action_code IS NOT NULL AND
17883: p_x_line_rec.line_set_id <> FND_API.G_MISS_NUM) THEN
17884:
17885: -- Addded project and task to fix bug #1229811
17886: if l_debug_level > 0 then
17887: oe_debug_pub.ADD('Raj:Split-Inside Request' ,1);
17888: end if;
17889: IF NOT OE_GLOBALS.EQUAL(p_x_line_rec.inventory_item_id ,
17890: p_old_line_rec.inventory_item_id) OR
17891: NOT OE_GLOBALS.EQUAL(p_x_line_rec.order_quantity_uom ,
17949: p_x_line_rec.booked_flag = 'Y' AND
17950: p_x_line_rec.cancelled_flag <> 'Y'
17951: THEN
17952: if l_debug_level > 0 then
17953: oe_debug_pub.ADD('Calling IS_OVER_RETURN ',1);
17954: end if;
17955: IF (OE_LINE_UTIL.Is_Over_Return(p_x_line_rec)) THEN
17956: FND_MESSAGE.Set_Name('ONT', 'OE_RETURN_INVALID_QUANTITY');
17957: OE_MSG_PUB.Add;
17994: END IF;
17995: -- Valid Shipping Method Code.
17996:
17997: if l_debug_level > 0 then
17998: oe_debug_pub.add('Split By:'||p_x_line_rec.split_by);
17999: oe_debug_pub.add('Split Action:'||p_x_line_rec.split_action_code);
18000: end if;
18001: IF l_count = 0 THEN
18002:
17995: -- Valid Shipping Method Code.
17996:
17997: if l_debug_level > 0 then
17998: oe_debug_pub.add('Split By:'||p_x_line_rec.split_by);
17999: oe_debug_pub.add('Split Action:'||p_x_line_rec.split_action_code);
18000: end if;
18001: IF l_count = 0 THEN
18002:
18003: IF (nvl(p_x_line_rec.split_by,'X') <> 'SYSTEM' and
18010: and list_line_type_code = 'TSN'
18011: and modified_to = p_x_line_rec.shipping_method_code;
18012: IF v_count > 0 THEN
18013: IF l_debug_level > 0 THEN
18014: oe_debug_pub.add('Deleting the tsn adjustments');
18015: END IF;
18016: DELETE FROM OE_PRICE_ADJUSTMENTS
18017: WHERE LINE_ID = p_x_line_rec.line_id
18018: AND LIST_LINE_TYPE_CODE = 'TSN'
18023: --bug 4190357
18024:
18025:
18026: if l_debug_level > 0 then
18027: oe_debug_pub.add('Calling process_order to clear the Shipping Method',2);
18028: oe_debug_pub.add('Value of shipping_method_code :'||p_x_line_rec.shipping_method_code,2);
18029: end if;
18030: --bug 4190357
18031: select meaning into l_meaning from oe_ship_methods_v where lookup_type = 'SHIP_METHOD' and lookup_code=p_x_line_rec.shipping_method_code;
18024:
18025:
18026: if l_debug_level > 0 then
18027: oe_debug_pub.add('Calling process_order to clear the Shipping Method',2);
18028: oe_debug_pub.add('Value of shipping_method_code :'||p_x_line_rec.shipping_method_code,2);
18029: end if;
18030: --bug 4190357
18031: select meaning into l_meaning from oe_ship_methods_v where lookup_type = 'SHIP_METHOD' and lookup_code=p_x_line_rec.shipping_method_code;
18032: --bug 4190357
18037: p_x_line_rec.shipping_method_code := l_modified_from;
18038: End If;
18039: ELSE
18040: if l_debug_level > 0 then
18041: oe_debug_pub.add('SYSTEM SPLIT Donot clear the Shipping Method',2);
18042: end if;
18043: END IF;
18044:
18045: OE_MSG_PUB.Update_Msg_Context(p_attribute_code => 'SHIPPING_METHOD');
18050: OE_MSG_PUB.Add;
18051: OE_MSG_PUB.Update_Msg_Context(p_attribute_code => null);
18052:
18053: if l_debug_level > 0 then
18054: oe_debug_pub.add('Value of freight_carrier after the call :'
18055: ||p_x_line_rec.shipping_method_code,2);
18056: end if;
18057:
18058: END IF;
18061: END IF;
18062:
18063: --14076417 start
18064: if l_debug_level > 0 then
18065: oe_debug_pub.add('OEXULINB1- SplitActionCode = ' ||p_x_line_rec.split_action_code
18066: ||' -SplitLineID- '||p_x_line_rec.split_from_line_id);
18067: oe_debug_pub.add('OEXULINB2- commitment_id = ' ||p_x_line_rec.commitment_id
18068: ||' -OldCommitment- '||p_old_line_rec.commitment_id);
18069: end if;
18063: --14076417 start
18064: if l_debug_level > 0 then
18065: oe_debug_pub.add('OEXULINB1- SplitActionCode = ' ||p_x_line_rec.split_action_code
18066: ||' -SplitLineID- '||p_x_line_rec.split_from_line_id);
18067: oe_debug_pub.add('OEXULINB2- commitment_id = ' ||p_x_line_rec.commitment_id
18068: ||' -OldCommitment- '||p_old_line_rec.commitment_id);
18069: end if;
18070: --14076417 end
18071:
18164:
18165: -- retain the original commitment functionality
18166: IF Not Oe_Commitment_pvt.do_commitment_sequencing THEN
18167: if l_debug_level > 0 then
18168: oe_debug_pub.add('entering evaluate commitment!',1);
18169: end if;
18170: oe_commitment_pvt.evaluate_commitment(
18171: p_commitment_id => p_x_line_rec.commitment_id,
18172: p_header_id => p_x_line_rec.header_id,
18175: x_msg_count => l_msg_count,
18176: x_msg_data => l_msg_data);
18177: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
18178: if l_debug_level > 0 then
18179: oe_debug_pub.add('Value of Commitment_Id B4 Clear_Commitment_Id:'
18180: ||p_x_line_rec.commitment_id,1);
18181: end if;
18182: Clear_Commitment_Id
18183: ( p_x_line_rec => p_x_line_rec);
18181: end if;
18182: Clear_Commitment_Id
18183: ( p_x_line_rec => p_x_line_rec);
18184: if l_debug_level > 0 then
18185: oe_debug_pub.add('Value of Commitment_Id after the call :'
18186: ||p_x_line_rec.commitment_id,1);
18187: end if;
18188: Raise FND_API.G_EXC_ERROR;
18189:
18223: -- Performance Improvement Bug 1929163:
18224: -- Log request to apply automatic attachments based on profile
18225: IF G_APPLY_AUTOMATIC_ATCHMT = 'Y' THEN
18226: if l_debug_level > 0 then
18227: oe_debug_pub.add('log request to apply atchmt',1);
18228: end if;
18229: OE_delayed_requests_Pvt.Log_Request
18230: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
18231: p_entity_id => p_x_line_rec.line_id,
18239: ELSE
18240:
18241: IF p_x_line_rec.split_by = 'SYSTEM' THEN
18242: if l_debug_level > 0 then
18243: oe_debug_pub.add('log request to copy all atchmt',1);
18244: end if;
18245: OE_delayed_requests_Pvt.Log_Request
18246: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
18247: p_entity_id => p_x_line_rec.line_id,
18265:
18266: EXCEPTION
18267: WHEN OTHERS THEN
18268: IF l_debug_level > 0 THEN
18269: oe_debug_pub.add('SQL error - '||sqlerrm);
18270: END IF;
18271: END;
18272:
18273:
18272:
18273:
18274: IF nvl(l_ship_to_org_id,-1) = nvl(p_x_line_rec.ship_to_org_id,-1) THEN --
18275: IF l_debug_level > 0 THEN
18276: oe_debug_pub.add('log request to copy all atchmt',1);
18277: END IF;
18278: OE_delayed_requests_Pvt.Log_Request
18279: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
18280: p_entity_id => p_x_line_rec.line_id,
18287: );
18288:
18289: ELSE --
18290: IF l_debug_level > 0 THEN
18291: oe_debug_pub.add('log request to apply atchmt',1);
18292: END IF;
18293: OE_delayed_requests_Pvt.Log_Request
18294: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
18295: p_entity_id => p_x_line_rec.line_id,
18298: p_requesting_entity_id => p_x_line_rec.line_id,
18299: x_return_status => l_return_status
18300: );
18301: IF l_debug_level > 0 THEN
18302: oe_debug_pub.add('log request to copy manual atchmt',1);
18303: END IF;
18304: OE_delayed_requests_Pvt.Log_Request
18305: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
18306: p_entity_id => p_x_line_rec.line_id,
18314:
18315: END IF;
18316: ELSE -- G_APPLY_AUTOMATIC_ATCHMT <> 'Y'
18317: if l_debug_level > 0 then
18318: oe_debug_pub.add('log request to copy manual atchmt',1);
18319: end if;
18320: OE_delayed_requests_Pvt.Log_Request
18321: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
18322: p_entity_id => p_x_line_rec.line_id,
18334: ELSE -- 5893276
18335: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
18336: G_APPLY_AUTOMATIC_ATCHMT = 'Y' THEN
18337: if l_debug_level > 0 then
18338: oe_debug_pub.add('log request to apply atchmt for UPDATE ',1);
18339: end if;
18340:
18341: --6896311
18342:
18399:
18400: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
18401: p_x_line_rec.item_type_code = OE_GLOBALS.G_ITEM_MODEL THEN
18402: if l_debug_level > 0 then
18403: oe_debug_pub.add('clear the cached top model record', 1);
18404: oe_debug_pub.add('model line: '|| p_x_line_rec.line_id, 1);
18405: end if;
18406: OE_Order_Cache.Clear_Top_Model_Line(p_key => p_x_line_rec.line_id);
18407: END IF;
18400: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
18401: p_x_line_rec.item_type_code = OE_GLOBALS.G_ITEM_MODEL THEN
18402: if l_debug_level > 0 then
18403: oe_debug_pub.add('clear the cached top model record', 1);
18404: oe_debug_pub.add('model line: '|| p_x_line_rec.line_id, 1);
18405: end if;
18406: OE_Order_Cache.Clear_Top_Model_Line(p_key => p_x_line_rec.line_id);
18407: END IF;
18408:
18407: END IF;
18408:
18409: -- Changes for Late Demand Penalty Factor
18410: if l_debug_level > 0 then
18411: oe_debug_pub.add('Late Demand Penalty Factor',1);
18412: end if;
18413: IF(p_x_line_rec.late_demand_penalty_factor IS NOT NULL AND
18414: p_x_line_rec.late_demand_penalty_factor <> FND_API.G_MISS_NUM AND
18415: p_x_line_rec.late_demand_penalty_factor < 0) THEN
18429: -- scheduling and scheduling may or may not require on the
18430: -- line. However, we need to set the resource flag.
18431:
18432: if l_debug_level > 0 then
18433: oe_debug_pub.add('Setting the resource ',1);
18434: end if;
18435: IF NOT OE_GLOBALS.Equal(p_old_line_rec.ship_from_org_id,
18436: p_x_line_rec.ship_from_org_id)
18437: THEN
18437: THEN
18438: IF p_x_line_rec.ship_from_org_id is not null
18439: THEN
18440: if l_debug_level > 0 then
18441: oe_debug_pub.add('Setting re_source_flag to N',1);
18442: end if;
18443: p_x_line_rec.re_source_flag := 'N';
18444: ELSE
18445: if l_debug_level > 0 then
18442: end if;
18443: p_x_line_rec.re_source_flag := 'N';
18444: ELSE
18445: if l_debug_level > 0 then
18446: oe_debug_pub.add('1.Setting re_source_flag to null',1);
18447: end if;
18448: p_x_line_rec.re_source_flag := '';
18449: END IF;
18450: ELSIF p_x_line_rec.ship_from_org_id is null
18449: END IF;
18450: ELSIF p_x_line_rec.ship_from_org_id is null
18451: THEN
18452: if l_debug_level > 0 then
18453: oe_debug_pub.add('2.Setting re_source_flag to null',1);
18454: end if;
18455: p_x_line_rec.re_source_flag := '';
18456: END IF;
18457:
18470: AND p_x_line_rec.item_relationship_type IS NULL
18471: THEN
18472:
18473: if l_debug_level > 0 then
18474: oe_debug_pub.add('PWP: clearing out original item fields');
18475: end if;
18476: p_x_line_rec.Original_Inventory_Item_Id := Null;
18477: p_x_line_rec.Original_item_identifier_Type := Null;
18478: p_x_line_rec.Original_ordered_item_id := Null;
18512:
18513: /* 7576948: Commenting for IR ISO CMS Project
18514:
18515: if l_debug_level > 0 then
18516: oe_debug_pub.add('Before checking for system split on int ord');
18517: end if;
18518: IF (p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE) AND
18519: (p_x_line_rec.split_by = 'SYSTEM') AND
18520: (p_x_line_rec.order_source_id = 10) THEN
18559: IF (p_x_line_rec.operation = OE_GLOBALS.G_OPR_DELETE AND
18560: p_x_line_rec.item_type_code = 'CONFIG') THEN
18561:
18562: IF l_debug_level > 0 THEN
18563: oe_debug_pub.ADD('Processing DROPSHIP_CMS Request for CONFIG Line');
18564: END IF;
18565:
18566: i := oe_delayed_requests_pvt.G_Delayed_Requests.first;
18567:
18571: AND oe_delayed_requests_pvt.G_Delayed_Requests(i).entity_code = OE_GLOBALS.G_ENTITY_ALL
18572: AND oe_delayed_requests_pvt.G_Delayed_Requests(i).entity_id = p_x_line_rec.line_id) THEN
18573:
18574: IF l_debug_level > 0 THEN
18575: oe_debug_pub.add('G_Delayed_Requests.entity_code/entity_id' ||
18576: oe_delayed_requests_pvt.G_Delayed_Requests(i).entity_code || '/' ||
18577: oe_delayed_requests_pvt.G_Delayed_Requests(i).entity_id);
18578: oe_debug_pub.add('G_Delayed_Requests.request_type' ||
18579: oe_delayed_requests_pvt.G_Delayed_Requests(i).request_type);
18574: IF l_debug_level > 0 THEN
18575: oe_debug_pub.add('G_Delayed_Requests.entity_code/entity_id' ||
18576: oe_delayed_requests_pvt.G_Delayed_Requests(i).entity_code || '/' ||
18577: oe_delayed_requests_pvt.G_Delayed_Requests(i).entity_id);
18578: oe_debug_pub.add('G_Delayed_Requests.request_type' ||
18579: oe_delayed_requests_pvt.G_Delayed_Requests(i).request_type);
18580:
18581: END IF;
18582:
18623: END IF;
18624:
18625:
18626: if l_debug_level > 0 then
18627: OE_DEBUG_PUB.add('Exiting from Lines Pre-Write process',1);
18628: end if;
18629: EXCEPTION
18630: WHEN FND_API.G_EXC_ERROR THEN
18631: RAISE;
18657: l_return_status VARCHAR2(30);
18658: l_reason_code VARCHAR2(30);
18659: l_reason_comments VARCHAR2(2000);
18660: --
18661: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
18662: --
18663: BEGIN
18664: /*
18665: The p_process_step value passed in determines the processes run. The first time it is called
18678: IF OE_GLOBALS.OE_AUDIT_HISTORY_TBL.exists(l_ind) THEN
18679: IF OE_GLOBALS.oe_audit_history_tbl(l_ind).LINE_ID = p_x_line_rec.line_id AND
18680: OE_GLOBALS.oe_audit_history_tbl(l_ind).HISTORY_TYPE = 'R' THEN -- flag 'R' denotes requires reason
18681: if l_debug_level > 0 then
18682: OE_DEBUG_PUB.add('OEXULINB- Audit Reason Required', 5);
18683: end if;
18684: IF (p_x_line_rec.change_reason IS NULL OR
18685: p_x_line_rec.change_reason = FND_API.G_MISS_CHAR OR
18686: NOT OE_Validate.Change_Reason_Code(p_x_line_rec.change_reason)) THEN
18691: IF l_reason_code IS NULL THEN
18692: -- bug 3636884, defaulting reason from group API
18693: IF OE_GLOBALS.G_DEFAULT_REASON THEN
18694: if l_debug_level > 0 then
18695: oe_debug_pub.add('Defaulting Audit Reason for Order Line', 1);
18696: end if;
18697: p_x_line_rec.change_reason := 'SYSTEM';
18698: ELSE
18699: OE_DEBUG_PUB.add('Reason code for change is missing or invalid', 1);
18695: oe_debug_pub.add('Defaulting Audit Reason for Order Line', 1);
18696: end if;
18697: p_x_line_rec.change_reason := 'SYSTEM';
18698: ELSE
18699: OE_DEBUG_PUB.add('Reason code for change is missing or invalid', 1);
18700: fnd_message.set_name('ONT','OE_AUDIT_REASON_RQD');
18701: fnd_message.set_token('OBJECT','ORDER LINE');
18702: oe_msg_pub.add;
18703: RAISE FND_API.G_EXC_ERROR;
18705: END IF;
18706: END IF;
18707: ELSE
18708: if l_debug_level > 0 then
18709: OE_DEBUG_PUB.add('Reason code for change is missing or invalid', 1);
18710: end if;
18711: fnd_message.set_name('ONT','OE_AUDIT_REASON_RQD');
18712: fnd_message.set_token('OBJECT','ORDER LINE');
18713: oe_msg_pub.add;
18754: p_wf_result_code => null,
18755: x_return_status => l_return_status);
18756:
18757: if l_debug_level > 0 then
18758: OE_DEBUG_PUB.add('Return status after inserting split history : '||l_return_status,5);
18759: end if;
18760:
18761: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
18762: if l_debug_level > 0 then
18759: end if;
18760:
18761: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
18762: if l_debug_level > 0 then
18763: oe_debug_pub.add('Error while inserting Line split History ',1);
18764: end if;
18765: IF l_return_status = FND_API.G_RET_STS_ERROR then
18766: raise FND_API.G_EXC_ERROR;
18767: ELSE
18782: OE_GLOBALS.G_REASON_COMMENTS := p_x_line_rec.change_comments;
18783: OE_GLOBALS.G_CAPTURED_REASON := 'Y';
18784: ELSE
18785: if l_debug_level > 0 then
18786: OE_DEBUG_PUB.add('Reason code for versioning is missing or invalid', 1);
18787: end if;
18788: -- if OE_GLOBALS.G_UI_FLAG then --bug5716140
18789: IF OE_GLOBALS.G_UI_FLAG
18790: OR ( p_x_line_rec.split_action_code = 'SPLIT'
18795: END IF;
18796:
18797: --log delayed request
18798: if l_debug_level > 0 then
18799: oe_debug_pub.add('log versioning request',1);
18800: end if;
18801: OE_Delayed_Requests_Pvt.Log_Request(p_entity_code => OE_GLOBALS.G_ENTITY_ALL,
18802: p_entity_id => p_x_line_rec.header_id,
18803: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
18813: FOR l_ind in 1..OE_GLOBALS.oe_audit_history_tbl.last LOOP
18814: IF OE_GLOBALS.OE_AUDIT_HISTORY_TBL.exists(l_ind) THEN
18815: IF OE_GLOBALS.oe_audit_history_tbl(l_ind).line_id = p_x_line_rec.line_id THEN
18816: if l_debug_level > 0 then
18817: OE_DEBUG_PUB.add('OEXULINB:calling oe_order_chg_pvt.recordlinehist', 5);
18818: end if;
18819:
18820: /* Commenting the below code for bug#14387840
18821: --11.5.10 Versioning/Audit Trail updates
18842: p_wf_activity_code => null,
18843: p_wf_result_code => null,
18844: x_return_status => l_return_status);
18845: if l_debug_level > 0 then
18846: OE_DEBUG_PUB.add('IN OEXULINB:After'||l_return_status,5);
18847: end if;
18848:
18849: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
18850: if l_debug_level > 0 then
18847: end if;
18848:
18849: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
18850: if l_debug_level > 0 then
18851: oe_debug_pub.add('Inserting Line Audit History error',1);
18852: end if;
18853: IF l_return_status = FND_API.G_RET_STS_ERROR then
18854: raise FND_API.G_EXC_ERROR;
18855: ELSE
18860: -- commenting out for bug#14387840
18861: -- END IF;
18862: -- now the history is inserted successfully, remove the entry from pl/sql table
18863: if l_debug_level > 0 then
18864: oe_debug_pub.add('Deleting the history entry for line ID : '||OE_GLOBALS.oe_audit_history_tbl(l_ind).line_id,1);
18865: end if;
18866: OE_GLOBALS.oe_audit_history_tbl.delete(l_ind);
18867: END IF;
18868: END IF;
18970: l_line_rec OE_Order_PUB.Line_Rec_Type;
18971: l_cursor_flag VARCHAR2(1) := null;
18972:
18973: BEGIN
18974: oe_debug_pub.add('Entering OE_LINE_UTIL.CASCADE_LINE_NUMBER ');
18975: oe_debug_pub.add('AK line_id ' || p_line_id);
18976: oe_debug_pub.add('AK line_iset_d ' || p_line_set_id);
18977: oe_debug_pub.add('AK line_number' || p_line_number);
18978: oe_debug_pub.add('AK item_type_code' || p_item_type_code);
18971: l_cursor_flag VARCHAR2(1) := null;
18972:
18973: BEGIN
18974: oe_debug_pub.add('Entering OE_LINE_UTIL.CASCADE_LINE_NUMBER ');
18975: oe_debug_pub.add('AK line_id ' || p_line_id);
18976: oe_debug_pub.add('AK line_iset_d ' || p_line_set_id);
18977: oe_debug_pub.add('AK line_number' || p_line_number);
18978: oe_debug_pub.add('AK item_type_code' || p_item_type_code);
18979:
18972:
18973: BEGIN
18974: oe_debug_pub.add('Entering OE_LINE_UTIL.CASCADE_LINE_NUMBER ');
18975: oe_debug_pub.add('AK line_id ' || p_line_id);
18976: oe_debug_pub.add('AK line_iset_d ' || p_line_set_id);
18977: oe_debug_pub.add('AK line_number' || p_line_number);
18978: oe_debug_pub.add('AK item_type_code' || p_item_type_code);
18979:
18980: IF p_item_type_code = OE_GLOBALS.G_ITEM_STANDARD THEN
18973: BEGIN
18974: oe_debug_pub.add('Entering OE_LINE_UTIL.CASCADE_LINE_NUMBER ');
18975: oe_debug_pub.add('AK line_id ' || p_line_id);
18976: oe_debug_pub.add('AK line_iset_d ' || p_line_set_id);
18977: oe_debug_pub.add('AK line_number' || p_line_number);
18978: oe_debug_pub.add('AK item_type_code' || p_item_type_code);
18979:
18980: IF p_item_type_code = OE_GLOBALS.G_ITEM_STANDARD THEN
18981:
18974: oe_debug_pub.add('Entering OE_LINE_UTIL.CASCADE_LINE_NUMBER ');
18975: oe_debug_pub.add('AK line_id ' || p_line_id);
18976: oe_debug_pub.add('AK line_iset_d ' || p_line_set_id);
18977: oe_debug_pub.add('AK line_number' || p_line_number);
18978: oe_debug_pub.add('AK item_type_code' || p_item_type_code);
18979:
18980: IF p_item_type_code = OE_GLOBALS.G_ITEM_STANDARD THEN
18981:
18982: OPEN Standard_line_number;
18983: l_cursor_flag := 'S';
18984:
18985: -- Update line number on the child service lines
18986: /*lchen rewrite the update statement to fix performance bug 1869179 */
18987: oe_debug_pub.add('l_cursor_flag= ' ||l_cursor_flag );
18988:
18989: LOOP
18990: FETCH standard_line_number
18991: INTO l_line_id,
19006: WHEN OTHERS THEN
19007: l_dummy := 0;
19008: END;
19009:
19010: oe_debug_pub.add('l_line_id= ' || l_line_id);
19011: oe_debug_pub.add('In the loop of standard_line_number, update child service line numbers');
19012:
19013: UPDATE oe_order_lines
19014: Set line_number = p_line_number,
19007: l_dummy := 0;
19008: END;
19009:
19010: oe_debug_pub.add('l_line_id= ' || l_line_id);
19011: oe_debug_pub.add('In the loop of standard_line_number, update child service line numbers');
19012:
19013: UPDATE oe_order_lines
19014: Set line_number = p_line_number,
19015: lock_control = lock_control + 1
19031: l_line_rec.option_number,
19032: l_line_rec.service_number;
19033: EXIT WHEN Standard_line_number%NOTFOUND;
19034:
19035: oe_debug_pub.add(' before calling wf_util');
19036: oe_debug_pub.add('line_rec.line_id=' || l_line_rec.line_id);
19037:
19038: oe_order_wf_util.set_line_user_key(l_line_rec);
19039:
19032: l_line_rec.service_number;
19033: EXIT WHEN Standard_line_number%NOTFOUND;
19034:
19035: oe_debug_pub.add(' before calling wf_util');
19036: oe_debug_pub.add('line_rec.line_id=' || l_line_rec.line_id);
19037:
19038: oe_order_wf_util.set_line_user_key(l_line_rec);
19039:
19040: END LOOP;
19049:
19050: OPEN Model_line_number;
19051: l_cursor_flag := 'M';
19052:
19053: oe_debug_pub.add('l_cursor_flag= ' ||l_cursor_flag );
19054: -- Update line number on the child option/service/class lines
19055:
19056: UPDATE oe_order_lines
19057: Set line_number = p_line_number,
19077: l_line_rec.option_number,
19078: l_line_rec.service_number;
19079: EXIT WHEN Model_Line_Number%NOTFOUND;
19080:
19081: oe_debug_pub.add(' before calling wf_util');
19082: oe_debug_pub.add('line_rec.line_id=' || l_line_rec.line_id);
19083:
19084: oe_order_wf_util.set_line_user_key(l_line_rec);
19085:
19078: l_line_rec.service_number;
19079: EXIT WHEN Model_Line_Number%NOTFOUND;
19080:
19081: oe_debug_pub.add(' before calling wf_util');
19082: oe_debug_pub.add('line_rec.line_id=' || l_line_rec.line_id);
19083:
19084: oe_order_wf_util.set_line_user_key(l_line_rec);
19085:
19086: END LOOP;
19091: -- Update line numbers for service lines
19092:
19093: OPEN SERVICE_line_number;
19094: l_cursor_flag := 'O';
19095: oe_debug_pub.add('l_cursor_flag= ' ||l_cursor_flag );
19096:
19097: -- Update line number on the child option/service/class lines
19098: --lchen rewrite the update statement to fix performance bug 1869179
19099:
19118: WHEN OTHERS THEN
19119: l_dummy := 0;
19120: END;
19121:
19122: oe_debug_pub.add('l_line_id = ' ||l_dummy);
19123: oe_debug_pub.add('in service_line_number loop, update service line number');
19124:
19125: UPDATE oe_order_lines
19126: Set line_number = p_line_number,
19119: l_dummy := 0;
19120: END;
19121:
19122: oe_debug_pub.add('l_line_id = ' ||l_dummy);
19123: oe_debug_pub.add('in service_line_number loop, update service line number');
19124:
19125: UPDATE oe_order_lines
19126: Set line_number = p_line_number,
19127: lock_control = lock_control + 1
19142: l_line_rec.option_number,
19143: l_line_rec.service_number;
19144: EXIT WHEN service_Line_Number%NOTFOUND;
19145:
19146: oe_debug_pub.add(' before calling wf_util');
19147: oe_debug_pub.add('line_rec.line_id=' || l_line_rec.line_id);
19148:
19149: oe_order_wf_util.set_line_user_key(l_line_rec);
19150: END LOOP;
19143: l_line_rec.service_number;
19144: EXIT WHEN service_Line_Number%NOTFOUND;
19145:
19146: oe_debug_pub.add(' before calling wf_util');
19147: oe_debug_pub.add('line_rec.line_id=' || l_line_rec.line_id);
19148:
19149: oe_order_wf_util.set_line_user_key(l_line_rec);
19150: END LOOP;
19151: END IF;
19152: CLOSE Service_line_number;
19153:
19154: END IF; /*p_item_type_code*/
19155:
19156: oe_debug_pub.add('Exiting OE_LINE_UTIL.CASCADE_LINE_NUMBER ');
19157:
19158: EXCEPTION
19159:
19160: WHEN NO_DATA_FOUND THEN
19256: AND WIAS.activity_status = 'NOTIFIED'
19257: AND WPA.activity_name = 'AUTHORIZE_TO_SHIP_WAIT'
19258: AND WPA.instance_id = WIAS.process_activity;
19259:
19260: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
19261:
19262: l_close_act_complete NUMBER := 0;
19263:
19264: BEGIN
19263:
19264: BEGIN
19265:
19266: if l_debug_level > 0 then
19267: oe_debug_pub.add('Entering Post_Write_Process',1);
19268: end if;
19269:
19270: -- QUOTING change
19271: IF (p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE
19278: ,p_old_line_rec.transaction_phase_code)
19279: )
19280: THEN
19281: if l_debug_level > 0 then
19282: oe_debug_pub.add('Call evaluate_holds_post_write for CREATE');
19283: end if;
19284: OE_Holds_PUB.evaluate_holds_post_write
19285: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE
19286: ,p_entity_id => p_x_line_rec.line_id
19295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
19296: END IF;
19297:
19298: if l_debug_level > 0 then
19299: oe_debug_pub.add('After evaluate_holds_post_write in LINE Post Write');
19300: end if;
19301: END IF;
19302: /* bug 8471521 --- Moved the code after scheduling ---
19303: --Call the delayed request for holds evaluation. This is needed for a
19304: --scheduling fix.
19305: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
19306:
19307: if l_debug_level > 0 then
19308: oe_debug_pub.add('Calling DelayedReg for evaluate_holds in post_write for UPDATE');
19309: end if;
19310:
19311: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
19312: (p_request_type =>OE_GLOBALS.G_EVAL_HOLD_SOURCE
19353: I := OE_Config_Pvt.OE_FREEZE_INC_ITEMS_TBL.FIRST;
19354: WHILE I is not null
19355: LOOP
19356: if l_debug_level > 0 then
19357: oe_debug_pub.add(I || ' freeze inc items call looping '||p_x_line_rec.line_id, 4);
19358: end if;
19359: IF p_x_line_rec.line_id = OE_Config_Pvt.OE_FREEZE_INC_ITEMS_TBL(I)
19360: THEN
19361: /* Start DOO Pre Exploded Kit ER 9339742 */
19382: -- Log a delayed request for its execution after the whole Kit is
19383: -- imported and records are posted to OE_Order_Lines_All table
19384: -- This request will be logged for Kit model line
19385:
19386: oe_debug_pub.add(' Logging G_PRE_EXPLODED_KIT delayed requests');
19387: OE_delayed_requests_Pvt.log_request(
19388: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
19389: p_entity_id => p_x_line_rec.top_model_line_id, -- The top model line
19390: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
19394: x_return_status => l_return_status);
19395: ELSE
19396: /* End DOO Pre Exploded Kit ER 9339742 */
19397: if l_debug_level > 0 then
19398: oe_debug_pub.add('PO: Calling freeze_inc_items call', 2);
19399: end if;
19400: l_return_status :=
19401: OE_Config_Util.Process_Included_Items
19402: (p_line_rec => p_x_line_rec,
19402: (p_line_rec => p_x_line_rec,
19403: p_freeze => TRUE);
19404:
19405: if l_debug_level > 0 then
19406: oe_debug_pub.add('PO: After Calling Process_Included_Items call: ' ||
19407: l_return_status, 2);
19408: end if;
19409:
19410: END IF; -- DOO Preexploded kit ER
19439:
19440: --4504362: Branch scheduling check removed
19441:
19442: if l_debug_level > 0 then
19443: oe_debug_pub.add('OESCH_PERFORM_SCHEDULING :' ||
19444: OE_SCHEDULE_UTIL.OESCH_PERFORM_SCHEDULING,1);
19445: end if;
19446:
19447: /* 7576948: IR ISO Change Management project Start */
19462: -- nvl(p_x_line_rec.ordered_quantity,0) = 0 THEN -- Commented for bug 7611039
19463: OE_SCHEDULE_UTIL.OESCH_PERFORM_SCHEDULING := 'Y';
19464:
19465: IF l_debug_level > 0 THEN
19466: oe_debug_pub.add(' Setting global OE_Schedule_GRP.G_ISO_Planning_Update to TRUE',5);
19467: END IF;
19468: END IF;
19469:
19470: /* ============================= */
19476: AND p_x_line_rec.operation <> OE_GLOBALS.G_OPR_DELETE
19477: THEN
19478:
19479: if l_debug_level > 0 then
19480: oe_debug_pub.add('PO: Calling new Schedule_line from post write',1);
19481: end if;
19482:
19483: oe_split_util.g_sch_recursion := 'TRUE';
19484:
19482:
19483: oe_split_util.g_sch_recursion := 'TRUE';
19484:
19485: if l_debug_level > 0 then
19486: oe_debug_pub.add(' New Schedule Line',1);
19487: end if;
19488: OE_SCHEDULE_UTIL.Schedule_Line
19489: (p_x_line_rec => p_x_line_rec
19490: ,p_old_line_rec => p_old_line_rec
19509: elsif p_x_line_rec.arrival_set_id is not null then
19510: l_set_id:=p_x_line_rec.arrival_set_id;
19511: end if;
19512: if l_debug_level > 0 then
19513: oe_debug_pub.add(' Line has set information, update the sets');
19514: end if;
19515: OE_Set_Util.Update_Set
19516: (p_Set_Id =>l_set_id,
19517: p_Ship_From_Org_Id =>p_x_line_rec.Ship_From_Org_Id,
19532:
19533: oe_split_util.g_sch_recursion := 'FALSE';
19534:
19535: if l_debug_level > 0 then
19536: oe_debug_pub.add('PO: After Calling Schedule_line: ' ||
19537: l_return_status,1);
19538: oe_debug_pub.add('SCH: p_x_line_rec.schedule_status_code '||
19539: p_x_line_rec.schedule_status_code,1);
19540: end if;
19534:
19535: if l_debug_level > 0 then
19536: oe_debug_pub.add('PO: After Calling Schedule_line: ' ||
19537: l_return_status,1);
19538: oe_debug_pub.add('SCH: p_x_line_rec.schedule_status_code '||
19539: p_x_line_rec.schedule_status_code,1);
19540: end if;
19541:
19542: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
19594: ,to_char(p_x_line_rec.line_id)
19595: ,'CLOSE_LINE',
19596: 'RETRY','CANCEL');
19597: if l_debug_level > 0 then
19598: OE_DEBUG_PUB.ADD('After Calling Wf Handle Error ');
19599: end if;
19600:
19601: -- Added for FP bug 6682329. The below query is added to fix the data corruption
19602: -- issues where both cancelled_flag and open_flag were getting set to 'Y'.
19601: -- Added for FP bug 6682329. The below query is added to fix the data corruption
19602: -- issues where both cancelled_flag and open_flag were getting set to 'Y'.
19603:
19604: IF nvl(p_x_line_rec.cancelled_flag,'N') = 'Y' THEN
19605: oe_debug_pub.add(' Line is cancelled, Close_Line WF act is ? ');
19606: select count(*) into l_close_act_complete
19607: from wf_item_activity_statuses s,
19608: wf_process_activities p
19609: where s.process_activity = p.instance_id
19612: and p.activity_name = 'CLOSE_LINE'
19613: and activity_result_code in ('NOT_ELIGIBLE','COMPLETE')
19614: and s.activity_status = 'COMPLETE';
19615: IF l_close_act_complete = 0 THEN
19616: oe_debug_pub.add(' Close_Line failed. Rollback the changes');
19617: FND_MESSAGE.SET_NAME('ONT','OE_CLOSE_LINE_ERROR');
19618: OE_MSG_PUB.ADD;
19619: RAISE FND_API.G_EXC_ERROR;
19620: END IF;
19632: l_ctr := OE_GLOBALS.G_START_LINE_FLOWS_TBL.FIRST;
19633: WHILE (l_ctr IS NOT NULL) LOOP
19634: IF (OE_GLOBALS.G_START_LINE_FLOWS_TBL(l_ctr).LINE_ID =
19635: p_x_line_rec.line_id) THEN
19636: oe_debug_pub.add('Cancellation:Deleting from OE_GLOBALS.G_START_LINE_FLOWS_TBL for lineID:' || p_x_line_rec.line_id);
19637: OE_GLOBALS.G_START_LINE_FLOWS_TBL.DELETE(l_ctr);
19638: EXIT;
19639: END IF;
19640: l_ctr := OE_GLOBALS.G_START_LINE_FLOWS_TBL.NEXT(l_ctr);
19647: p_x_line_rec.ato_line_id IS NULL AND
19648: p_x_line_rec.item_type_code = 'INCLUDED' AND
19649: nvl(p_x_line_rec.model_remnant_flag, 'N') = 'Y'
19650: THEN
19651: oe_debug_pub.add('In case of line level cancellation: calling Handle_RFR() ');
19652: Handle_RFR(p_top_model_line_id => p_x_line_rec.top_model_line_id,
19653: p_line_id => p_x_line_rec.line_id,
19654: p_link_to_line_id => p_x_line_rec.link_to_line_id );
19655: END IF;
19661: END IF;
19662: END IF;
19663:
19664: if l_debug_level > 0 then
19665: oe_debug_pub.add('RQ: ' || p_x_line_rec.reserved_quantity,1);
19666: end if;
19667:
19668: -- bug 8471521 Moved the code after scheduling call to avoid the issue happens because of the ware house change..
19669: --Call the delayed request for holds evaluation. This is needed for a
19670: --scheduling fix.
19671: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
19672:
19673: if l_debug_level > 0 then
19674: oe_debug_pub.add('Calling DelayedReg for evaluate_holds in post_write for UPDATE');
19675: end if;
19676:
19677: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
19678: (p_request_type =>OE_GLOBALS.G_EVAL_HOLD_SOURCE
19701: --------------------------------------------------------------------
19702:
19703: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
19704: if l_debug_level > 0 then
19705: oe_debug_pub.add('Authorization flag is: ' ||
19706: p_x_line_rec.authorized_to_ship_flag);
19707: end if;
19708: IF p_x_line_rec.authorized_to_ship_flag = 'Y' AND
19709: NOT OE_GLOBALS.Equal(p_x_line_rec.authorized_to_ship_flag,
19763: )
19764: THEN
19765:
19766: if l_debug_level > 0 then
19767: oe_debug_pub.add('Before Calling Create Credit');
19768: end if;
19769:
19770: -- Bug# 5726848 IF condition modified for allowing update of sales credit for copied orders.
19771: IF NOT (nvl(p_x_line_rec.source_document_type_id,-99) = 2 AND
19831:
19832: END IF;
19833:
19834: if l_debug_level > 0 then
19835: oe_debug_pub.add('Exiting Post_Write_Process',1);
19836: end if;
19837:
19838: EXCEPTION
19839:
19874: l_return_status VARCHAR2(1);
19875: I NUMBER;
19876: l_count NUMBER;
19877: l_valid_line_number VARCHAR2(1) := 'Y';
19878: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
19879: BEGIN
19880:
19881: if l_debug_level > 0 then
19882: oe_debug_pub.add('entering Post_Line_Process', 1);
19878: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
19879: BEGIN
19880:
19881: if l_debug_level > 0 then
19882: oe_debug_pub.add('entering Post_Line_Process', 1);
19883: end if;
19884:
19885: -- Create Sets for lines and call group scheduling if any
19886: /*
19904: ,x_return_status => l_return_status
19905: );
19906:
19907: if l_debug_level > 0 then
19908: oe_debug_pub.add('ret sts: '|| l_return_status, 4);
19909: end if;
19910:
19911: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
19912: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
19958: END IF;
19959:
19960:
19961: IF OE_Config_Pvt.OE_MODIFY_INC_ITEMS_TBL.COUNT > 0 THEN
19962: oe_debug_pub.add('calling modufy inc items', 3);
19963: OE_Config_Pvt.Modify_Included_Items
19964: (x_return_status => l_return_status);
19965: OE_Config_Pvt.OE_MODIFY_INC_ITEMS_TBL.DELETE;
19966:
19985:
19986: -- added for bug fix 2375829
19987:
19988: if l_debug_level > 0 then
19989: oe_debug_pub.add('line tbl count: '||p_x_line_tbl.COUNT, 3);
19990: end if;
19991:
19992: I := p_x_line_tbl.FIRST;
19993:
19995: LOOP
19996:
19997: IF nvl(p_x_line_tbl(I).booked_flag, 'N') = 'N' THEN
19998: if l_debug_level > 0 then
19999: oe_debug_pub.add('not booked ', 3);
20000: end if;
20001: --below two lines are commented for bug 14298754
20002: -- EXIT;
20003: -- END IF;
20003: -- END IF;
20004: ELSE -- Added for bug 14298755
20005:
20006: if l_debug_level > 0 then
20007: oe_debug_pub.add(p_x_line_tbl(I).operation ||
20008: ' cancelled flag ' || p_x_line_tbl(I).cancelled_flag||
20009: ' shp interf '||p_x_line_tbl(I).shipping_interfaced_flag, 3);
20010: end if;
20011:
20016: nvl(p_x_line_tbl(I).ship_model_complete_flag, 'N') = 'Y' AND
20017: nvl(p_x_line_tbl(I).shipping_interfaced_flag, 'N') = 'N' AND
20018: nvl(p_x_line_tbl(I).model_remnant_flag, 'N') = 'N'
20019: THEN
20020: oe_debug_pub.add('cancel or delete, call smc shipping', 1);
20021:
20022: SELECT count(*)
20023: INTO l_count
20024: FROM oe_order_lines
20026: AND shipping_interfaced_flag = 'Y';
20027:
20028: IF l_count = 0 THEN
20029:
20030: oe_debug_pub.add('need to call smc shipping', 1);
20031:
20032: OE_Shipping_Integration_PVT.Process_SMC_Shipping
20033: (p_line_id => p_x_line_tbl(I).line_id
20034: ,p_top_model_line_id => p_x_line_tbl(I).top_model_line_id
20133: -- We will call split_scheduling here for lines which got created
20134: -- thru splits.
20135:
20136: if l_debug_level > 0 then
20137: oe_debug_pub.add('Calling Split Scheduling',1);
20138: end if;
20139:
20140: -- 4504362 :Branch Scheduling checks removed.
20141: IF p_x_line_tbl.count > 0 THEN -- 10626432
20147:
20148: OE_SPLIT_UTIL.G_SPLIT_ACTION := FALSE;
20149:
20150: if l_debug_level > 0 then
20151: oe_debug_pub.add('After Calling Split Scheduling: ' ||
20152: l_return_status,1);
20153: end if;
20154:
20155: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
20164:
20165: IF OE_SPLIT_UTIL.G_SPLIT_ACTION = TRUE THEN
20166:
20167: if l_debug_level > 0 then
20168: oe_debug_pub.add('Logging g_split_action',2);
20169: end if;
20170:
20171: I := p_x_line_tbl.FIRST;
20172: WHILE I is NOT NULL
20181: p_x_line_tbl(I).split_from_line_id <> FND_API.G_MISS_NUM AND
20182: p_x_line_tbl(I).operation = OE_GLOBALS.G_OPR_CREATE) THEN
20183:
20184: if l_debug_level > 0 then
20185: oe_debug_pub.add('Logging G_SPLIT_SCHEDULE' ||
20186: p_x_line_tbl(I).line_id, 2);
20187: end if;
20188:
20189: OE_delayed_requests_Pvt.log_request(
20215: END IF; -- if not recursion and process = true.
20216:
20217:
20218: if l_debug_level > 0 then
20219: oe_debug_pub.add('leaving Post_Line_Process', 1);
20220: end if;
20221: EXCEPTION
20222:
20223: WHEN FND_API.G_EXC_ERROR THEN
20220: end if;
20221: EXCEPTION
20222:
20223: WHEN FND_API.G_EXC_ERROR THEN
20224: oe_debug_pub.add('execution error', 1);
20225: RAISE;
20226:
20227: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
20228: oe_debug_pub.add('unexp error', 1);
20224: oe_debug_pub.add('execution error', 1);
20225: RAISE;
20226:
20227: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
20228: oe_debug_pub.add('unexp error', 1);
20229: RAISE;
20230:
20231: WHEN OTHERS THEN
20232: oe_debug_pub.add('others error', 1);
20228: oe_debug_pub.add('unexp error', 1);
20229: RAISE;
20230:
20231: WHEN OTHERS THEN
20232: oe_debug_pub.add('others error', 1);
20233: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
20234: THEN
20235: oe_msg_pub.Add_Exc_Msg
20236: ( G_PKG_NAME
20293: )
20294: RETURN BOOLEAN
20295: IS
20296:
20297: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
20298:
20299: BEGIN
20300: /* INVCONV
20301: IF FND_PROFILE.VALUE ('ONT_PROCESS_INSTALLED_FLAG') = 'N' THEN
20313: OE_Order_Cache.Load_Item (p_inventory_item_id
20314: ,p_ship_from_org_id);
20315: -- IF x_item_rec.process_warehouse_flag = 'Y' INVCONV
20316: -- AND INVCONV
20317: oe_debug_pub.add('in function Dual_uom_control - tracking_quantity_ind = ' || x_item_rec.tracking_quantity_ind);
20318: IF x_item_rec.tracking_quantity_ind = 'PS' -- INVCONV
20319: THEN
20320:
20321: IF l_debug_level > 0 THEN
20318: IF x_item_rec.tracking_quantity_ind = 'PS' -- INVCONV
20319: THEN
20320:
20321: IF l_debug_level > 0 THEN
20322: oe_debug_pub.add('Dual_uom_control is TRUE ', 1);
20323: end if;
20324: RETURN TRUE;
20325: END IF;
20326: END IF;
20325: END IF;
20326: END IF;
20327:
20328: IF l_debug_level > 0 THEN
20329: oe_debug_pub.add('Dual_uom_control is FALSE ', 1);
20330: end if;
20331:
20332: RETURN FALSE;
20333:
20342: ( G_PKG_NAME ,
20343: 'dual_uom_control'
20344: );
20345: END IF;
20346: oe_debug_pub.add('others in dual_uom_control', 1);
20347: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
20348:
20349: END dual_uom_control ;
20350:
20361: l_msg_count NUMBER;
20362: l_msg_data VARCHAR2(2000);
20363: l_item_rec OE_ORDER_CACHE.item_rec_type;
20364:
20365: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
20366:
20367: BEGIN
20368: if l_debug_level > 0 then
20369: oe_debug_pub.add('Enter Get dual uom');
20365: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
20366:
20367: BEGIN
20368: if l_debug_level > 0 then
20369: oe_debug_pub.add('Enter Get dual uom');
20370: end if;
20371:
20372: IF dual_uom_control -- INVCONV Process_Characteristics
20373: (p_line_rec.inventory_item_id,p_line_rec.ship_from_org_id,l_item_rec) THEN
20372: IF dual_uom_control -- INVCONV Process_Characteristics
20373: (p_line_rec.inventory_item_id,p_line_rec.ship_from_org_id,l_item_rec) THEN
20374: IF l_item_rec.tracking_quantity_ind = 'PS' THEN -- INVCONV
20375: if l_debug_level > 0 then
20376: oe_debug_pub.add('Get dual uom - tracking in P and S ');
20377: end if;
20378: -- convert 4 digit apps OPM codes to equivalent 3 byte APPS codes
20379: -- Primary UM
20380: GMI_Reservation_Util.Get_AppsUOM_from_OPMUOM
20386:
20387:
20388:
20389: if l_debug_level > 0 then
20390: oe_debug_pub.add('Get Dual Uom returns dual UM of ' || l_item_rec.secondary_uom_code);
20391: end if;
20392: END IF;
20393: END IF;
20394: RETURN l_item_rec.secondary_uom_code; -- INVCONV
20397:
20398: WHEN NO_DATA_FOUND THEN
20399:
20400: if l_debug_level > 0 then
20401: oe_debug_pub.add('No Data Found Get Dual Uom' );
20402: end if;
20403: RETURN NULL;
20404:
20405: WHEN OTHERS THEN
20410: 'Get_Dual_Uom'
20411: );
20412: END IF;
20413: if l_debug_level > 0 then
20414: oe_debug_pub.add('others in get_dual uom', 1);
20415: end if;
20416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
20417:
20418:
20460: NULL;
20461: ELSE
20462: RETURN p_line_rec.preferred_grade;
20463: END IF;
20464: oe_debug_pub.add('OPM Test grade ctl for preferred grade');
20465:
20466: IF l_item_rec.grade_ctl = 1 THEN
20467: OPEN C_GRADE1;
20468: FETCH C_GRADE1 into l_preferred_grade;
20488: ( G_PKG_NAME ,
20489: 'Get_Preferred_Grade'
20490: );
20491: END IF;
20492: oe_debug_pub.add('others in get_preferred_grade', 1);
20493: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
20494:
20495:
20496: END Get_Preferred_Grade; */
20539: l_status VARCHAR2(1);
20540: l_msg_count NUMBER;
20541: -- l_msg_data VARCHAR2(2000); -- INVCONV
20542: UOM_CONVERSION_FAILED EXCEPTION; -- OPM B1478461
20543: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
20544: l_buffer VARCHAR2(2000); -- INVCONV
20545:
20546: --X_message VARCHAR2(1000); -- INVCONV
20547: --X_temp NUMBER;
20551: BEGIN
20552:
20553:
20554: IF l_debug_level > 0 THEN
20555: oe_debug_pub.add('Entering Sync Dual Qty');
20556: END IF;
20557:
20558:
20559: /* Moved this code from below to here - 2999767 */
20566: IF l_item_rec.tracking_quantity_ind <> 'PS'
20567:
20568: THEN
20569: IF l_debug_level > 0 THEN
20570: oe_debug_pub.add('Sync Dual Qty not dual controlled - return'); -- INVCONV
20571: END IF;
20572: p_x_line_rec.ordered_quantity2 := NULL;
20573: RETURN;
20574: END IF;
20574: END IF;
20575: ELSE
20576:
20577: IF l_debug_level > 0 THEN
20578: oe_debug_pub.add('not dual controlled - return');
20579: END IF;
20580:
20581: -- p_x_line_rec.ordered_quantity2 := NULL; OPM 2711743
20582: RETURN;
20582: RETURN;
20583: END IF;
20584:
20585: IF (OE_OE_FORM_CANCEL_LINE.g_ord_lvl_can) THEN -- 5141545
20586: oe_debug_pub.add ('Sync Dual Qty - Cancellation so return ' );
20587: return;
20588: else
20589: oe_debug_pub.add ('Sync Dual Qty - NOT a cancellation ' );
20590: END IF;
20585: IF (OE_OE_FORM_CANCEL_LINE.g_ord_lvl_can) THEN -- 5141545
20586: oe_debug_pub.add ('Sync Dual Qty - Cancellation so return ' );
20587: return;
20588: else
20589: oe_debug_pub.add ('Sync Dual Qty - NOT a cancellation ' );
20590: END IF;
20591:
20592:
20593: IF l_debug_level > 0 THEN
20590: END IF;
20591:
20592:
20593: IF l_debug_level > 0 THEN
20594: oe_debug_pub.add ('In sync_dual_qty');
20595: oe_debug_pub.add ('ordered_quantity = ' || p_x_line_rec.ordered_quantity );
20596: oe_debug_pub.add ('ordered_quantity2 = ' || p_x_line_rec.ordered_quantity2 );
20597:
20598: oe_debug_pub.add ('ordered_quantity_uom = ' || p_x_line_rec.order_quantity_uom );
20591:
20592:
20593: IF l_debug_level > 0 THEN
20594: oe_debug_pub.add ('In sync_dual_qty');
20595: oe_debug_pub.add ('ordered_quantity = ' || p_x_line_rec.ordered_quantity );
20596: oe_debug_pub.add ('ordered_quantity2 = ' || p_x_line_rec.ordered_quantity2 );
20597:
20598: oe_debug_pub.add ('ordered_quantity_uom = ' || p_x_line_rec.order_quantity_uom );
20599: oe_debug_pub.add ('ordered_quantity_uom2 = ' || p_x_line_rec.ordered_quantity_uom2 );
20592:
20593: IF l_debug_level > 0 THEN
20594: oe_debug_pub.add ('In sync_dual_qty');
20595: oe_debug_pub.add ('ordered_quantity = ' || p_x_line_rec.ordered_quantity );
20596: oe_debug_pub.add ('ordered_quantity2 = ' || p_x_line_rec.ordered_quantity2 );
20597:
20598: oe_debug_pub.add ('ordered_quantity_uom = ' || p_x_line_rec.order_quantity_uom );
20599: oe_debug_pub.add ('ordered_quantity_uom2 = ' || p_x_line_rec.ordered_quantity_uom2 );
20600: oe_debug_pub.add ('inventory_item_id = ' || p_x_line_rec.inventory_item_id );
20594: oe_debug_pub.add ('In sync_dual_qty');
20595: oe_debug_pub.add ('ordered_quantity = ' || p_x_line_rec.ordered_quantity );
20596: oe_debug_pub.add ('ordered_quantity2 = ' || p_x_line_rec.ordered_quantity2 );
20597:
20598: oe_debug_pub.add ('ordered_quantity_uom = ' || p_x_line_rec.order_quantity_uom );
20599: oe_debug_pub.add ('ordered_quantity_uom2 = ' || p_x_line_rec.ordered_quantity_uom2 );
20600: oe_debug_pub.add ('inventory_item_id = ' || p_x_line_rec.inventory_item_id );
20601: oe_debug_pub.add ('ship_from_org_id = ' || p_x_line_rec.ship_from_org_id );
20602: oe_debug_pub.add ('secondary_default_ind = ' || l_item_rec.secondary_default_ind );
20595: oe_debug_pub.add ('ordered_quantity = ' || p_x_line_rec.ordered_quantity );
20596: oe_debug_pub.add ('ordered_quantity2 = ' || p_x_line_rec.ordered_quantity2 );
20597:
20598: oe_debug_pub.add ('ordered_quantity_uom = ' || p_x_line_rec.order_quantity_uom );
20599: oe_debug_pub.add ('ordered_quantity_uom2 = ' || p_x_line_rec.ordered_quantity_uom2 );
20600: oe_debug_pub.add ('inventory_item_id = ' || p_x_line_rec.inventory_item_id );
20601: oe_debug_pub.add ('ship_from_org_id = ' || p_x_line_rec.ship_from_org_id );
20602: oe_debug_pub.add ('secondary_default_ind = ' || l_item_rec.secondary_default_ind );
20603: oe_debug_pub.add ('p_x_line_rec.source_document_type_id = ' || p_x_line_rec.source_document_type_id );
20596: oe_debug_pub.add ('ordered_quantity2 = ' || p_x_line_rec.ordered_quantity2 );
20597:
20598: oe_debug_pub.add ('ordered_quantity_uom = ' || p_x_line_rec.order_quantity_uom );
20599: oe_debug_pub.add ('ordered_quantity_uom2 = ' || p_x_line_rec.ordered_quantity_uom2 );
20600: oe_debug_pub.add ('inventory_item_id = ' || p_x_line_rec.inventory_item_id );
20601: oe_debug_pub.add ('ship_from_org_id = ' || p_x_line_rec.ship_from_org_id );
20602: oe_debug_pub.add ('secondary_default_ind = ' || l_item_rec.secondary_default_ind );
20603: oe_debug_pub.add ('p_x_line_rec.source_document_type_id = ' || p_x_line_rec.source_document_type_id );
20604:
20597:
20598: oe_debug_pub.add ('ordered_quantity_uom = ' || p_x_line_rec.order_quantity_uom );
20599: oe_debug_pub.add ('ordered_quantity_uom2 = ' || p_x_line_rec.ordered_quantity_uom2 );
20600: oe_debug_pub.add ('inventory_item_id = ' || p_x_line_rec.inventory_item_id );
20601: oe_debug_pub.add ('ship_from_org_id = ' || p_x_line_rec.ship_from_org_id );
20602: oe_debug_pub.add ('secondary_default_ind = ' || l_item_rec.secondary_default_ind );
20603: oe_debug_pub.add ('p_x_line_rec.source_document_type_id = ' || p_x_line_rec.source_document_type_id );
20604:
20605: IF p_x_line_rec.ordered_quantity_uom2 = FND_API.G_MISS_CHAR THEN
20598: oe_debug_pub.add ('ordered_quantity_uom = ' || p_x_line_rec.order_quantity_uom );
20599: oe_debug_pub.add ('ordered_quantity_uom2 = ' || p_x_line_rec.ordered_quantity_uom2 );
20600: oe_debug_pub.add ('inventory_item_id = ' || p_x_line_rec.inventory_item_id );
20601: oe_debug_pub.add ('ship_from_org_id = ' || p_x_line_rec.ship_from_org_id );
20602: oe_debug_pub.add ('secondary_default_ind = ' || l_item_rec.secondary_default_ind );
20603: oe_debug_pub.add ('p_x_line_rec.source_document_type_id = ' || p_x_line_rec.source_document_type_id );
20604:
20605: IF p_x_line_rec.ordered_quantity_uom2 = FND_API.G_MISS_CHAR THEN
20606: oe_debug_pub.add ('ordered_quantity_uom2 = G_MISS_CHAR ' );
20599: oe_debug_pub.add ('ordered_quantity_uom2 = ' || p_x_line_rec.ordered_quantity_uom2 );
20600: oe_debug_pub.add ('inventory_item_id = ' || p_x_line_rec.inventory_item_id );
20601: oe_debug_pub.add ('ship_from_org_id = ' || p_x_line_rec.ship_from_org_id );
20602: oe_debug_pub.add ('secondary_default_ind = ' || l_item_rec.secondary_default_ind );
20603: oe_debug_pub.add ('p_x_line_rec.source_document_type_id = ' || p_x_line_rec.source_document_type_id );
20604:
20605: IF p_x_line_rec.ordered_quantity_uom2 = FND_API.G_MISS_CHAR THEN
20606: oe_debug_pub.add ('ordered_quantity_uom2 = G_MISS_CHAR ' );
20607: ELSIF
20602: oe_debug_pub.add ('secondary_default_ind = ' || l_item_rec.secondary_default_ind );
20603: oe_debug_pub.add ('p_x_line_rec.source_document_type_id = ' || p_x_line_rec.source_document_type_id );
20604:
20605: IF p_x_line_rec.ordered_quantity_uom2 = FND_API.G_MISS_CHAR THEN
20606: oe_debug_pub.add ('ordered_quantity_uom2 = G_MISS_CHAR ' );
20607: ELSIF
20608: p_x_line_rec.ordered_quantity_uom2 is null THEN
20609: oe_debug_pub.add ('ordered_quantity_uom2 = null' );
20610: END IF;
20605: IF p_x_line_rec.ordered_quantity_uom2 = FND_API.G_MISS_CHAR THEN
20606: oe_debug_pub.add ('ordered_quantity_uom2 = G_MISS_CHAR ' );
20607: ELSIF
20608: p_x_line_rec.ordered_quantity_uom2 is null THEN
20609: oe_debug_pub.add ('ordered_quantity_uom2 = null' );
20610: END IF;
20611: IF p_x_line_rec.ordered_quantity2 = FND_API.G_MISS_NUM THEN
20612: oe_debug_pub.add ('ordered_quantity2 = G_MISS_NUM ' );
20613: ELSIF
20608: p_x_line_rec.ordered_quantity_uom2 is null THEN
20609: oe_debug_pub.add ('ordered_quantity_uom2 = null' );
20610: END IF;
20611: IF p_x_line_rec.ordered_quantity2 = FND_API.G_MISS_NUM THEN
20612: oe_debug_pub.add ('ordered_quantity2 = G_MISS_NUM ' );
20613: ELSIF
20614: p_x_line_rec.ordered_quantity2 is null THEN
20615: oe_debug_pub.add ('ordered_quantity2 = null' );
20616: END IF;
20611: IF p_x_line_rec.ordered_quantity2 = FND_API.G_MISS_NUM THEN
20612: oe_debug_pub.add ('ordered_quantity2 = G_MISS_NUM ' );
20613: ELSIF
20614: p_x_line_rec.ordered_quantity2 is null THEN
20615: oe_debug_pub.add ('ordered_quantity2 = null' );
20616: END IF;
20617:
20618:
20619: END IF;
20635: (p_x_line_rec.ordered_quantity2 IS NOT NULL and
20636: p_x_line_rec.ordered_quantity2 <> FND_API.G_MISS_NUM )
20637: ) THEN
20638: IF l_debug_level > 0 THEN
20639: oe_debug_pub.add('Sync_dual_qty IF (OE_GLOBALS.G_UI_FLAG) and ship froms = - early exit ');
20640: END IF;
20641: RETURN;
20642: END IF;
20643: -- bug 4053117 end
20691: /* End Bug2999767 */
20692: THEN
20693:
20694: IF l_debug_level > 0 THEN
20695: oe_debug_pub.add('Sync_dual_qty - early exit ');
20696: END IF;
20697:
20698: RETURN;
20699: END IF; -- OPM B1661023 04/02/01
20706: (p_x_line_rec.ordered_quantity2 IS NULL OR
20707: p_x_line_rec.ordered_quantity2 = FND_API.G_MISS_NUM ) THEN
20708:
20709: IF l_debug_level > 0 THEN
20710: oe_debug_pub.add ('Sync_dual_qty - both quantities empty so early return');
20711: END IF;
20712:
20713: RETURN;
20714: END IF;
20713: RETURN;
20714: END IF;
20715:
20716: IF l_debug_level > 0 THEN
20717: oe_debug_pub.add('Sync_dual_qty - Convert for dual Scenario',1); -- INVCONV
20718: END IF;
20719:
20720: /* -- Bug3052287 INVCONV
20721: -- When the primary UOM1 itself is not populated, derive it from l_item_rec.
20754: (p_x_line_rec.ordered_quantity IS NULL) OR
20755: (p_x_line_rec.ordered_quantity2 IS NULL) THEN
20756:
20757: IF l_debug_level > 0 THEN
20758: oe_debug_pub.add('Sync_dual_qty - change detected ',1);
20759: END IF;
20760:
20761: -- IF l_item_rec.dualum_ind in (0,3) INVCONV
20762: IF (l_item_rec.secondary_default_ind = 'N' or
20768:
20769: /* NO UM Conversion required for types 3 so return here and not internal order line -- INVCONV
20770: ============================================================*/
20771: IF l_debug_level > 0 THEN
20772: oe_debug_pub.add('Sync_dual_qty - default ind is N or null - early return ',1);
20773: END IF;
20774:
20775: RETURN;
20776: END IF;
20777: ELSE
20778: /* No sync required
20779: ==================*/
20780: IF l_debug_level > 0 THEN
20781: oe_debug_pub.add('Sync_dual_qty - no change detected so no sync',1);
20782: END IF;
20783:
20784: RETURN;
20785: END IF; -- IF (NOT OE_GLOBALS.EQUAL(p_x_line_rec.ordered_quantity
20783:
20784: RETURN;
20785: END IF; -- IF (NOT OE_GLOBALS.EQUAL(p_x_line_rec.ordered_quantity
20786:
20787: oe_debug_pub.add('Sync_dual_qty - here 1 ',1);
20788:
20789: IF (NOT OE_GLOBALS.EQUAL(p_x_line_rec.ordered_quantity
20790: ,p_old_line_rec.ordered_quantity )) OR
20791: p_x_line_rec.ordered_quantity2 IS NULL THEN
20801: NOT (nvl(p_x_line_rec.source_document_type_id,-99) = 10) ) -- INVCONV DEC 23 not for internal order line
20802: THEN
20803:
20804: IF l_debug_level > 0 THEN
20805: oe_debug_pub.add('Check the deviation ');
20806: END IF;
20807:
20808:
20809:
20828: , p_uom_code2 => l_item_rec.secondary_uom_code );
20829: IF l_return = 0
20830: then
20831: IF l_debug_level > 0 THEN
20832: oe_debug_pub.add('Sync_dual_qty - tolerance error 1 ' ,1);
20833: END IF;
20834:
20835: l_buffer := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, -- INVCONV
20836: p_encoded => 'F');
20835: l_buffer := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, -- INVCONV
20836: p_encoded => 'F');
20837: oe_msg_pub.add_text(p_message_text => l_buffer);
20838: IF l_debug_level > 0 THEN
20839: oe_debug_pub.add(l_buffer,1);
20840: END IF;
20841: RAISE fnd_api.g_exc_error;
20842:
20843: else
20841: RAISE fnd_api.g_exc_error;
20842:
20843: else
20844: IF l_debug_level > 0 THEN
20845: oe_debug_pub.add('Sync_dual_qty - No tolerance error so return ',1);
20846: END IF;
20847: RETURN;
20848: END IF; -- IF l_return = 0
20849:
20852: END IF; -- IF l_item_rec.secondary_default_ind = 'D'
20853:
20854:
20855: IF l_debug_level > 0 THEN
20856: oe_debug_pub.add('Sync_dual_qty - uom conversion primary to secondary');
20857: END IF;
20858:
20859: -- OPM June 2003 3011880 begin - when converting qtys, if the p_x_line_rec.ordered_quantity_uom2 is not available yet,
20860: -- then convert the opm um2 to the apps um for the call to get_opm_converted_qty below which requires apps uoms
20870: ,x_Apps_UOM => p_x_line_rec.ordered_quantity_uom2
20871: ,x_return_status => l_status
20872: ,x_msg_count => l_msg_count
20873: ,x_msg_data => l_msg_data);
20874: oe_debug_pub.add('OPM in sync_dual - Get_AppsUOM_from_OPMUOM returns dual UM of ' || p_x_line_rec.ordered_quantity_uom2);
20875: END IF; */
20876:
20877: -- OPM June 2003 3011880 end
20878:
20909: ,NULL -- To uom name
20910: );
20911:
20912: IF l_debug_level > 0 THEN
20913: oe_debug_pub.add('Sync_dual_qty - secondary qty after conversion is '||l_converted_qty);
20914: END IF;
20915: -- Feb 2003 2683316 end
20916:
20917: IF (l_converted_qty < 0) THEN -- OPM B1478461 Start
20949:
20950: IF l_return = 0
20951: then
20952: IF l_debug_level > 0 THEN
20953: oe_debug_pub.add('Sync_dual_qty - tolerance error 2' ,1);
20954: END IF;
20955:
20956: l_buffer := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, -- INVCONV
20957: p_encoded => 'F');
20956: l_buffer := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, -- INVCONV
20957: p_encoded => 'F');
20958: oe_msg_pub.add_text(p_message_text => l_buffer);
20959: IF l_debug_level > 0 THEN
20960: oe_debug_pub.add(l_buffer,1);
20961: END IF;
20962: RAISE fnd_api.g_exc_error;
20963:
20964:
20963:
20964:
20965: else
20966: IF l_debug_level > 0 THEN
20967: oe_debug_pub.add('Sync_dual_qty - No tolerance error so return ',1);
20968: END IF;
20969: RETURN;
20970: END IF; -- IF l_return = 0
20971:
21010: IF l_item_rec.secondary_default_ind = 'F' and
21011: OE_GLOBALS.EQUAL(p_x_line_rec.ordered_quantity2 ,NVL(p_old_line_rec.ordered_quantity2 ,p_x_line_rec.ordered_quantity2))
21012: and p_x_line_rec.ordered_quantity is not null THEN
21013:
21014: IF l_debug_level > 0 THEN oe_debug_pub.add('Sync_dual_qty - do not reconvert the secondary to primary when it exists and secondary is changed
21015: from null to non null - early return');
21016: END IF;
21017: return;
21018: END IF;
21034: raise UOM_CONVERSION_FAILED;
21035: END IF; -- OPM B1478461 End
21036:
21037: IF l_debug_level > 0 THEN
21038: oe_debug_pub.add(' Sync_dual_qty - primary qty after conversion is '||l_converted_qty);
21039: END IF;
21040:
21041: p_x_line_rec.ordered_quantity := l_converted_qty;
21042:
21075: ( G_PKG_NAME ,
21076: 'Sync_Dual_Qty'
21077: );
21078: END IF;
21079: oe_debug_pub.add('Exception handling: others in Sync_Dual_Qty', 1);
21080: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
21081:
21082:
21083: END Sync_Dual_Qty;
21103: l_msg_data VARCHAR2(2000);
21104:
21105: BEGIN
21106:
21107: oe_debug_pub.add('OPM Enter Calculate_Ordered_Quantity2');
21108:
21109:
21110: -- If this is a process line, load the item details from cache
21111: --==============================================================
21120: -- Usually ordered_quantity2 is not calculated for items where
21121: dualum_ind=3, but in a split scenario, the calc IS automated.
21122: --============================================================
21123: IF l_item_rec.dualum_ind in (1,2,3) THEN
21124: oe_debug_pub.add('OPM Dualum ind 3 is true');
21125:
21126:
21127: -- Feb 2003 2683316 - changed the call to GMI uom_conversion above to get_opm_converted_qty
21128: -- to resolve rounding issues
21133: p_apps_from_uom => p_line_rec.order_quantity_uom ,
21134: p_apps_to_uom => p_line_rec.ordered_quantity_uom2,
21135: p_original_qty => p_line_rec.ordered_quantity);
21136:
21137: oe_debug_pub.add('OPM secondary in Calculate_Ordered_Quantity2 after new get_opm_converted_qty is '||l_ordered_quantity2);
21138:
21139: -- Feb 2003 2683316 end
21140:
21141: ELSE
21141: ELSE
21142: l_ordered_quantity2 := NULL;
21143: END IF;
21144:
21145: oe_debug_pub.add('OPM Return ordered_quantity2 set to '|| l_ordered_quantity2);
21146: RETURN l_ordered_quantity2;
21147:
21148: EXCEPTION
21149:
21175: --Added for bug 14296662
21176: l_shipping_uom VARCHAR2(3) := NULL;
21177:
21178: l_return_code NUMBER; -- INVCONV
21179: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level; -- INVCONV
21180: l_qty number; -- INVCONV
21181: l_qty2 number; -- INVCONV
21182: l_ordered_qty number; --nocopy impact changes
21183: BEGIN
21182: l_ordered_qty number; --nocopy impact changes
21183: BEGIN
21184:
21185: if l_debug_level > 0 then -- INVCONV
21186: oe_debug_pub.add('Entering Pre_Attribute_Security - reserved_quantity = ' || p_x_line_rec.reserved_quantity );
21187: end if;
21188:
21189: -- Added this code for Splits
21190: -- Need to send the rounded QTY for line if the
21212: from oe_order_lines_all
21213: where line_id = p_x_line_rec.split_from_line_id;
21214: exception
21215: when no_data_found then
21216: oe_debug_pub.add('setting the uom to null');
21217: l_shipping_uom:=null;
21218: end;
21219: --bug 6196000
21220: END IF;
21240: END IF;
21241: END IF;-- ship uom is null 14296662
21242: END IF;
21243: END IF ; -- same UOM condition 14296662
21244: oe_debug_pub.add('PAS 2 Qty :'||p_x_line_rec.ordered_quantity);
21245:
21246: -- Populate Set Ids IF Set Names are given
21247: -- This will harcode the defaulting for schduling attributes
21248: -- THis is kept outside defaulting framework to handle cases
21258: -- OPM 02/JUN/00 END
21259: -- INVCONV
21260: -- check this - why call here ?? need to know where to call in proper place - ask OM team
21261:
21262: --oe_debug_pub.add('reserved_quantity = ' || p_x_line_rec.reserved_quantity );
21263: -- oe_debug_pub.add('reserved_quantity2 = ' || p_x_line_rec.reserved_quantity2 );
21264: IF NOT(OE_GLOBALS.G_UI_FLAG) and -- 4958890
21265: p_x_line_rec.ordered_quantity <> FND_API.G_MISS_NUM And
21266: p_x_line_rec.ordered_quantity IS NOT NULL and
21259: -- INVCONV
21260: -- check this - why call here ?? need to know where to call in proper place - ask OM team
21261:
21262: --oe_debug_pub.add('reserved_quantity = ' || p_x_line_rec.reserved_quantity );
21263: -- oe_debug_pub.add('reserved_quantity2 = ' || p_x_line_rec.reserved_quantity2 );
21264: IF NOT(OE_GLOBALS.G_UI_FLAG) and -- 4958890
21265: p_x_line_rec.ordered_quantity <> FND_API.G_MISS_NUM And
21266: p_x_line_rec.ordered_quantity IS NOT NULL and
21267: p_x_line_rec.ordered_quantity2 <> FND_API.G_MISS_NUM And
21286: end if;
21287:
21288:
21289: if l_debug_level > 0 then -- INVCONV
21290: oe_debug_pub.add('pre_attribute_security - about to call calculate_dual_quantity. l_qty = ' || l_qty);
21291: oe_debug_pub.add('pre_attribute_security - about to call calculate_dual_quantity. l_qty2 = ' || l_qty2);
21292: end if;
21293: IF l_qty <>0 or
21294: l_qty2 <> 0
21287:
21288:
21289: if l_debug_level > 0 then -- INVCONV
21290: oe_debug_pub.add('pre_attribute_security - about to call calculate_dual_quantity. l_qty = ' || l_qty);
21291: oe_debug_pub.add('pre_attribute_security - about to call calculate_dual_quantity. l_qty2 = ' || l_qty2);
21292: end if;
21293: IF l_qty <>0 or
21294: l_qty2 <> 0
21295: then
21326: END IF; -- IF l_return_code <> 0 THEN -- INVCONV
21327:
21328:
21329: IF l_debug_level > 0 THEN
21330: oe_debug_pub.add('Pre_Attribute_Security after call to calculate_dual_quantity for reserved_quantities - return status = : ' || l_return_code);
21331: oe_debug_pub.add('reserved_quantity = : ' || p_x_line_rec.reserved_quantity);
21332: oe_debug_pub.add('reserved_quantity2 = : ' || p_x_line_rec.reserved_quantity2);
21333:
21334: END IF;
21327:
21328:
21329: IF l_debug_level > 0 THEN
21330: oe_debug_pub.add('Pre_Attribute_Security after call to calculate_dual_quantity for reserved_quantities - return status = : ' || l_return_code);
21331: oe_debug_pub.add('reserved_quantity = : ' || p_x_line_rec.reserved_quantity);
21332: oe_debug_pub.add('reserved_quantity2 = : ' || p_x_line_rec.reserved_quantity2);
21333:
21334: END IF;
21335:
21328:
21329: IF l_debug_level > 0 THEN
21330: oe_debug_pub.add('Pre_Attribute_Security after call to calculate_dual_quantity for reserved_quantities - return status = : ' || l_return_code);
21331: oe_debug_pub.add('reserved_quantity = : ' || p_x_line_rec.reserved_quantity);
21332: oe_debug_pub.add('reserved_quantity2 = : ' || p_x_line_rec.reserved_quantity2);
21333:
21334: END IF;
21335:
21336: END IF; -- IF l_qty <>0 then
21364: l_flag BOOLEAN;
21365: l_notify_cto BOOLEAN;
21366: l_ato_item_qty_change BOOLEAN;
21367: l_pto_ato_create BOOLEAN;
21368: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
21369: BEGIN
21370: if l_debug_level > 0 then
21371: oe_debug_pub.add('entering Log_CTO_Requests', 1);
21372: end if;
21367: l_pto_ato_create BOOLEAN;
21368: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
21369: BEGIN
21370: if l_debug_level > 0 then
21371: oe_debug_pub.add('entering Log_CTO_Requests', 1);
21372: end if;
21373:
21374: l_flag := FALSE;
21375:
21383: OE_Code_Control.Code_Release_Level >= '110510')
21384: THEN
21385:
21386: if l_debug_level > 0 then
21387: oe_debug_pub.add('configuration scheduled', 5);
21388: end if;
21389:
21390: IF OE_Code_Control.Code_release_Level < '110510' THEN
21391:
21400: l_flag := TRUE;
21401: EXCEPTION
21402: WHEN NO_DATA_FOUND THEN
21403: if l_debug_level > 0 then
21404: oe_debug_pub.add('config item not yet created', 2);
21405: end if;
21406: END;
21407: ELSE
21408: l_flag := TRUE;
21408: l_flag := TRUE;
21409: END IF;
21410: ELSE
21411: if l_debug_level > 0 then
21412: oe_debug_pub.add('flag is false', 2);
21413: end if;
21414: END IF;
21415:
21416: l_ato_item_qty_change := FALSE;
21422: p_old_line_rec.schedule_status_code is NOT NULL AND
21423: p_x_line_rec.operation <> OE_GLOBALS.G_OPR_CREATE
21424: THEN
21425: if l_debug_level > 0 then
21426: oe_debug_pub.add('ato item, may need to notify cto', 4);
21427: end if;
21428: l_flag := TRUE;
21429:
21430: IF p_x_line_rec.ordered_quantity = 0 AND
21430: IF p_x_line_rec.ordered_quantity = 0 AND
21431: p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
21432:
21433: if l_debug_level > 0 then
21434: oe_debug_pub.add('ato item qty made to 0'|| p_x_line_rec.open_flag, 4);
21435: end if;
21436: l_ato_item_qty_change := TRUE;
21437:
21438: END IF;
21439:
21440: END IF;
21441:
21442: if l_debug_level > 0 then
21443: oe_debug_pub.add('split? : ' || p_x_line_rec.split_action_code, 3);
21444: oe_debug_pub.add('split from : ' || p_x_line_rec.split_from_line_id, 3);
21445: oe_debug_pub.add('line id: ' || p_x_line_rec.line_id, 3);
21446: oe_debug_pub.add('ato line id: ' || p_x_line_rec.ato_line_id , 3);
21447: oe_debug_pub.add('item type: ' || p_x_line_rec.item_type_code, 3);
21440: END IF;
21441:
21442: if l_debug_level > 0 then
21443: oe_debug_pub.add('split? : ' || p_x_line_rec.split_action_code, 3);
21444: oe_debug_pub.add('split from : ' || p_x_line_rec.split_from_line_id, 3);
21445: oe_debug_pub.add('line id: ' || p_x_line_rec.line_id, 3);
21446: oe_debug_pub.add('ato line id: ' || p_x_line_rec.ato_line_id , 3);
21447: oe_debug_pub.add('item type: ' || p_x_line_rec.item_type_code, 3);
21448: oe_debug_pub.add('operation: ' || p_x_line_rec.operation, 3);
21441:
21442: if l_debug_level > 0 then
21443: oe_debug_pub.add('split? : ' || p_x_line_rec.split_action_code, 3);
21444: oe_debug_pub.add('split from : ' || p_x_line_rec.split_from_line_id, 3);
21445: oe_debug_pub.add('line id: ' || p_x_line_rec.line_id, 3);
21446: oe_debug_pub.add('ato line id: ' || p_x_line_rec.ato_line_id , 3);
21447: oe_debug_pub.add('item type: ' || p_x_line_rec.item_type_code, 3);
21448: oe_debug_pub.add('operation: ' || p_x_line_rec.operation, 3);
21449: oe_debug_pub.add('old qty: ' || p_old_line_rec.ordered_quantity, 3);
21442: if l_debug_level > 0 then
21443: oe_debug_pub.add('split? : ' || p_x_line_rec.split_action_code, 3);
21444: oe_debug_pub.add('split from : ' || p_x_line_rec.split_from_line_id, 3);
21445: oe_debug_pub.add('line id: ' || p_x_line_rec.line_id, 3);
21446: oe_debug_pub.add('ato line id: ' || p_x_line_rec.ato_line_id , 3);
21447: oe_debug_pub.add('item type: ' || p_x_line_rec.item_type_code, 3);
21448: oe_debug_pub.add('operation: ' || p_x_line_rec.operation, 3);
21449: oe_debug_pub.add('old qty: ' || p_old_line_rec.ordered_quantity, 3);
21450: oe_debug_pub.add('new qty: ' || p_x_line_rec.ordered_quantity, 3);
21443: oe_debug_pub.add('split? : ' || p_x_line_rec.split_action_code, 3);
21444: oe_debug_pub.add('split from : ' || p_x_line_rec.split_from_line_id, 3);
21445: oe_debug_pub.add('line id: ' || p_x_line_rec.line_id, 3);
21446: oe_debug_pub.add('ato line id: ' || p_x_line_rec.ato_line_id , 3);
21447: oe_debug_pub.add('item type: ' || p_x_line_rec.item_type_code, 3);
21448: oe_debug_pub.add('operation: ' || p_x_line_rec.operation, 3);
21449: oe_debug_pub.add('old qty: ' || p_old_line_rec.ordered_quantity, 3);
21450: oe_debug_pub.add('new qty: ' || p_x_line_rec.ordered_quantity, 3);
21451: oe_debug_pub.add('old ssd: ' || p_old_line_rec.schedule_ship_date, 3);
21444: oe_debug_pub.add('split from : ' || p_x_line_rec.split_from_line_id, 3);
21445: oe_debug_pub.add('line id: ' || p_x_line_rec.line_id, 3);
21446: oe_debug_pub.add('ato line id: ' || p_x_line_rec.ato_line_id , 3);
21447: oe_debug_pub.add('item type: ' || p_x_line_rec.item_type_code, 3);
21448: oe_debug_pub.add('operation: ' || p_x_line_rec.operation, 3);
21449: oe_debug_pub.add('old qty: ' || p_old_line_rec.ordered_quantity, 3);
21450: oe_debug_pub.add('new qty: ' || p_x_line_rec.ordered_quantity, 3);
21451: oe_debug_pub.add('old ssd: ' || p_old_line_rec.schedule_ship_date, 3);
21452: oe_debug_pub.add('new ssd: ' || p_x_line_rec.schedule_ship_date, 3);
21445: oe_debug_pub.add('line id: ' || p_x_line_rec.line_id, 3);
21446: oe_debug_pub.add('ato line id: ' || p_x_line_rec.ato_line_id , 3);
21447: oe_debug_pub.add('item type: ' || p_x_line_rec.item_type_code, 3);
21448: oe_debug_pub.add('operation: ' || p_x_line_rec.operation, 3);
21449: oe_debug_pub.add('old qty: ' || p_old_line_rec.ordered_quantity, 3);
21450: oe_debug_pub.add('new qty: ' || p_x_line_rec.ordered_quantity, 3);
21451: oe_debug_pub.add('old ssd: ' || p_old_line_rec.schedule_ship_date, 3);
21452: oe_debug_pub.add('new ssd: ' || p_x_line_rec.schedule_ship_date, 3);
21453: oe_debug_pub.add('old rd: ' || p_old_line_rec.request_date, 3);
21446: oe_debug_pub.add('ato line id: ' || p_x_line_rec.ato_line_id , 3);
21447: oe_debug_pub.add('item type: ' || p_x_line_rec.item_type_code, 3);
21448: oe_debug_pub.add('operation: ' || p_x_line_rec.operation, 3);
21449: oe_debug_pub.add('old qty: ' || p_old_line_rec.ordered_quantity, 3);
21450: oe_debug_pub.add('new qty: ' || p_x_line_rec.ordered_quantity, 3);
21451: oe_debug_pub.add('old ssd: ' || p_old_line_rec.schedule_ship_date, 3);
21452: oe_debug_pub.add('new ssd: ' || p_x_line_rec.schedule_ship_date, 3);
21453: oe_debug_pub.add('old rd: ' || p_old_line_rec.request_date, 3);
21454: oe_debug_pub.add('new rd: ' || p_x_line_rec.request_date, 3);
21447: oe_debug_pub.add('item type: ' || p_x_line_rec.item_type_code, 3);
21448: oe_debug_pub.add('operation: ' || p_x_line_rec.operation, 3);
21449: oe_debug_pub.add('old qty: ' || p_old_line_rec.ordered_quantity, 3);
21450: oe_debug_pub.add('new qty: ' || p_x_line_rec.ordered_quantity, 3);
21451: oe_debug_pub.add('old ssd: ' || p_old_line_rec.schedule_ship_date, 3);
21452: oe_debug_pub.add('new ssd: ' || p_x_line_rec.schedule_ship_date, 3);
21453: oe_debug_pub.add('old rd: ' || p_old_line_rec.request_date, 3);
21454: oe_debug_pub.add('new rd: ' || p_x_line_rec.request_date, 3);
21455: oe_debug_pub.add('old sad: ' || p_old_line_rec.schedule_arrival_date,3);
21448: oe_debug_pub.add('operation: ' || p_x_line_rec.operation, 3);
21449: oe_debug_pub.add('old qty: ' || p_old_line_rec.ordered_quantity, 3);
21450: oe_debug_pub.add('new qty: ' || p_x_line_rec.ordered_quantity, 3);
21451: oe_debug_pub.add('old ssd: ' || p_old_line_rec.schedule_ship_date, 3);
21452: oe_debug_pub.add('new ssd: ' || p_x_line_rec.schedule_ship_date, 3);
21453: oe_debug_pub.add('old rd: ' || p_old_line_rec.request_date, 3);
21454: oe_debug_pub.add('new rd: ' || p_x_line_rec.request_date, 3);
21455: oe_debug_pub.add('old sad: ' || p_old_line_rec.schedule_arrival_date,3);
21456: oe_debug_pub.add('new sad: ' || p_x_line_rec.schedule_arrival_date,3);
21449: oe_debug_pub.add('old qty: ' || p_old_line_rec.ordered_quantity, 3);
21450: oe_debug_pub.add('new qty: ' || p_x_line_rec.ordered_quantity, 3);
21451: oe_debug_pub.add('old ssd: ' || p_old_line_rec.schedule_ship_date, 3);
21452: oe_debug_pub.add('new ssd: ' || p_x_line_rec.schedule_ship_date, 3);
21453: oe_debug_pub.add('old rd: ' || p_old_line_rec.request_date, 3);
21454: oe_debug_pub.add('new rd: ' || p_x_line_rec.request_date, 3);
21455: oe_debug_pub.add('old sad: ' || p_old_line_rec.schedule_arrival_date,3);
21456: oe_debug_pub.add('new sad: ' || p_x_line_rec.schedule_arrival_date,3);
21457: oe_debug_pub.add('new sch sts: ' || p_x_line_rec.schedule_status_code,3);
21450: oe_debug_pub.add('new qty: ' || p_x_line_rec.ordered_quantity, 3);
21451: oe_debug_pub.add('old ssd: ' || p_old_line_rec.schedule_ship_date, 3);
21452: oe_debug_pub.add('new ssd: ' || p_x_line_rec.schedule_ship_date, 3);
21453: oe_debug_pub.add('old rd: ' || p_old_line_rec.request_date, 3);
21454: oe_debug_pub.add('new rd: ' || p_x_line_rec.request_date, 3);
21455: oe_debug_pub.add('old sad: ' || p_old_line_rec.schedule_arrival_date,3);
21456: oe_debug_pub.add('new sad: ' || p_x_line_rec.schedule_arrival_date,3);
21457: oe_debug_pub.add('new sch sts: ' || p_x_line_rec.schedule_status_code,3);
21458: oe_debug_pub.add('old sch sts: ' || p_old_line_rec.schedule_status_code,3);
21451: oe_debug_pub.add('old ssd: ' || p_old_line_rec.schedule_ship_date, 3);
21452: oe_debug_pub.add('new ssd: ' || p_x_line_rec.schedule_ship_date, 3);
21453: oe_debug_pub.add('old rd: ' || p_old_line_rec.request_date, 3);
21454: oe_debug_pub.add('new rd: ' || p_x_line_rec.request_date, 3);
21455: oe_debug_pub.add('old sad: ' || p_old_line_rec.schedule_arrival_date,3);
21456: oe_debug_pub.add('new sad: ' || p_x_line_rec.schedule_arrival_date,3);
21457: oe_debug_pub.add('new sch sts: ' || p_x_line_rec.schedule_status_code,3);
21458: oe_debug_pub.add('old sch sts: ' || p_old_line_rec.schedule_status_code,3);
21459: oe_debug_pub.add('open flag: ' || p_x_line_rec.open_flag,3);
21452: oe_debug_pub.add('new ssd: ' || p_x_line_rec.schedule_ship_date, 3);
21453: oe_debug_pub.add('old rd: ' || p_old_line_rec.request_date, 3);
21454: oe_debug_pub.add('new rd: ' || p_x_line_rec.request_date, 3);
21455: oe_debug_pub.add('old sad: ' || p_old_line_rec.schedule_arrival_date,3);
21456: oe_debug_pub.add('new sad: ' || p_x_line_rec.schedule_arrival_date,3);
21457: oe_debug_pub.add('new sch sts: ' || p_x_line_rec.schedule_status_code,3);
21458: oe_debug_pub.add('old sch sts: ' || p_old_line_rec.schedule_status_code,3);
21459: oe_debug_pub.add('open flag: ' || p_x_line_rec.open_flag,3);
21460: oe_debug_pub.add('cascade: ' || oe_config_util.CASCADE_CHANGES_FLAG, 3);
21453: oe_debug_pub.add('old rd: ' || p_old_line_rec.request_date, 3);
21454: oe_debug_pub.add('new rd: ' || p_x_line_rec.request_date, 3);
21455: oe_debug_pub.add('old sad: ' || p_old_line_rec.schedule_arrival_date,3);
21456: oe_debug_pub.add('new sad: ' || p_x_line_rec.schedule_arrival_date,3);
21457: oe_debug_pub.add('new sch sts: ' || p_x_line_rec.schedule_status_code,3);
21458: oe_debug_pub.add('old sch sts: ' || p_old_line_rec.schedule_status_code,3);
21459: oe_debug_pub.add('open flag: ' || p_x_line_rec.open_flag,3);
21460: oe_debug_pub.add('cascade: ' || oe_config_util.CASCADE_CHANGES_FLAG, 3);
21461: oe_debug_pub.add('validate: ' || OE_CONFIG_PVT.OECFG_VALIDATE_CONFIG, 3);
21454: oe_debug_pub.add('new rd: ' || p_x_line_rec.request_date, 3);
21455: oe_debug_pub.add('old sad: ' || p_old_line_rec.schedule_arrival_date,3);
21456: oe_debug_pub.add('new sad: ' || p_x_line_rec.schedule_arrival_date,3);
21457: oe_debug_pub.add('new sch sts: ' || p_x_line_rec.schedule_status_code,3);
21458: oe_debug_pub.add('old sch sts: ' || p_old_line_rec.schedule_status_code,3);
21459: oe_debug_pub.add('open flag: ' || p_x_line_rec.open_flag,3);
21460: oe_debug_pub.add('cascade: ' || oe_config_util.CASCADE_CHANGES_FLAG, 3);
21461: oe_debug_pub.add('validate: ' || OE_CONFIG_PVT.OECFG_VALIDATE_CONFIG, 3);
21462: oe_debug_pub.add('ui: ' || OE_CONFIG_UTIL.G_CONFIG_UI_USED, 3);
21455: oe_debug_pub.add('old sad: ' || p_old_line_rec.schedule_arrival_date,3);
21456: oe_debug_pub.add('new sad: ' || p_x_line_rec.schedule_arrival_date,3);
21457: oe_debug_pub.add('new sch sts: ' || p_x_line_rec.schedule_status_code,3);
21458: oe_debug_pub.add('old sch sts: ' || p_old_line_rec.schedule_status_code,3);
21459: oe_debug_pub.add('open flag: ' || p_x_line_rec.open_flag,3);
21460: oe_debug_pub.add('cascade: ' || oe_config_util.CASCADE_CHANGES_FLAG, 3);
21461: oe_debug_pub.add('validate: ' || OE_CONFIG_PVT.OECFG_VALIDATE_CONFIG, 3);
21462: oe_debug_pub.add('ui: ' || OE_CONFIG_UTIL.G_CONFIG_UI_USED, 3);
21463:
21456: oe_debug_pub.add('new sad: ' || p_x_line_rec.schedule_arrival_date,3);
21457: oe_debug_pub.add('new sch sts: ' || p_x_line_rec.schedule_status_code,3);
21458: oe_debug_pub.add('old sch sts: ' || p_old_line_rec.schedule_status_code,3);
21459: oe_debug_pub.add('open flag: ' || p_x_line_rec.open_flag,3);
21460: oe_debug_pub.add('cascade: ' || oe_config_util.CASCADE_CHANGES_FLAG, 3);
21461: oe_debug_pub.add('validate: ' || OE_CONFIG_PVT.OECFG_VALIDATE_CONFIG, 3);
21462: oe_debug_pub.add('ui: ' || OE_CONFIG_UTIL.G_CONFIG_UI_USED, 3);
21463:
21464: oe_debug_pub.add('old qty2: ' || p_old_line_rec.ordered_quantity2, 3); -- INVCONV
21457: oe_debug_pub.add('new sch sts: ' || p_x_line_rec.schedule_status_code,3);
21458: oe_debug_pub.add('old sch sts: ' || p_old_line_rec.schedule_status_code,3);
21459: oe_debug_pub.add('open flag: ' || p_x_line_rec.open_flag,3);
21460: oe_debug_pub.add('cascade: ' || oe_config_util.CASCADE_CHANGES_FLAG, 3);
21461: oe_debug_pub.add('validate: ' || OE_CONFIG_PVT.OECFG_VALIDATE_CONFIG, 3);
21462: oe_debug_pub.add('ui: ' || OE_CONFIG_UTIL.G_CONFIG_UI_USED, 3);
21463:
21464: oe_debug_pub.add('old qty2: ' || p_old_line_rec.ordered_quantity2, 3); -- INVCONV
21465: oe_debug_pub.add('new qty2: ' || p_x_line_rec.ordered_quantity2, 3);
21458: oe_debug_pub.add('old sch sts: ' || p_old_line_rec.schedule_status_code,3);
21459: oe_debug_pub.add('open flag: ' || p_x_line_rec.open_flag,3);
21460: oe_debug_pub.add('cascade: ' || oe_config_util.CASCADE_CHANGES_FLAG, 3);
21461: oe_debug_pub.add('validate: ' || OE_CONFIG_PVT.OECFG_VALIDATE_CONFIG, 3);
21462: oe_debug_pub.add('ui: ' || OE_CONFIG_UTIL.G_CONFIG_UI_USED, 3);
21463:
21464: oe_debug_pub.add('old qty2: ' || p_old_line_rec.ordered_quantity2, 3); -- INVCONV
21465: oe_debug_pub.add('new qty2: ' || p_x_line_rec.ordered_quantity2, 3);
21466: oe_debug_pub.add('old uom2: ' || p_old_line_rec.ordered_quantity_uom2, 3); -- INVCONV
21460: oe_debug_pub.add('cascade: ' || oe_config_util.CASCADE_CHANGES_FLAG, 3);
21461: oe_debug_pub.add('validate: ' || OE_CONFIG_PVT.OECFG_VALIDATE_CONFIG, 3);
21462: oe_debug_pub.add('ui: ' || OE_CONFIG_UTIL.G_CONFIG_UI_USED, 3);
21463:
21464: oe_debug_pub.add('old qty2: ' || p_old_line_rec.ordered_quantity2, 3); -- INVCONV
21465: oe_debug_pub.add('new qty2: ' || p_x_line_rec.ordered_quantity2, 3);
21466: oe_debug_pub.add('old uom2: ' || p_old_line_rec.ordered_quantity_uom2, 3); -- INVCONV
21467: oe_debug_pub.add('new uom2: ' || p_x_line_rec.ordered_quantity_uom2, 3);
21468: oe_debug_pub.add('old uom: ' || p_old_line_rec.order_quantity_uom, 3); -- INVCONV
21461: oe_debug_pub.add('validate: ' || OE_CONFIG_PVT.OECFG_VALIDATE_CONFIG, 3);
21462: oe_debug_pub.add('ui: ' || OE_CONFIG_UTIL.G_CONFIG_UI_USED, 3);
21463:
21464: oe_debug_pub.add('old qty2: ' || p_old_line_rec.ordered_quantity2, 3); -- INVCONV
21465: oe_debug_pub.add('new qty2: ' || p_x_line_rec.ordered_quantity2, 3);
21466: oe_debug_pub.add('old uom2: ' || p_old_line_rec.ordered_quantity_uom2, 3); -- INVCONV
21467: oe_debug_pub.add('new uom2: ' || p_x_line_rec.ordered_quantity_uom2, 3);
21468: oe_debug_pub.add('old uom: ' || p_old_line_rec.order_quantity_uom, 3); -- INVCONV
21469: oe_debug_pub.add('new uom: ' || p_x_line_rec.order_quantity_uom, 3);
21462: oe_debug_pub.add('ui: ' || OE_CONFIG_UTIL.G_CONFIG_UI_USED, 3);
21463:
21464: oe_debug_pub.add('old qty2: ' || p_old_line_rec.ordered_quantity2, 3); -- INVCONV
21465: oe_debug_pub.add('new qty2: ' || p_x_line_rec.ordered_quantity2, 3);
21466: oe_debug_pub.add('old uom2: ' || p_old_line_rec.ordered_quantity_uom2, 3); -- INVCONV
21467: oe_debug_pub.add('new uom2: ' || p_x_line_rec.ordered_quantity_uom2, 3);
21468: oe_debug_pub.add('old uom: ' || p_old_line_rec.order_quantity_uom, 3); -- INVCONV
21469: oe_debug_pub.add('new uom: ' || p_x_line_rec.order_quantity_uom, 3);
21470:
21463:
21464: oe_debug_pub.add('old qty2: ' || p_old_line_rec.ordered_quantity2, 3); -- INVCONV
21465: oe_debug_pub.add('new qty2: ' || p_x_line_rec.ordered_quantity2, 3);
21466: oe_debug_pub.add('old uom2: ' || p_old_line_rec.ordered_quantity_uom2, 3); -- INVCONV
21467: oe_debug_pub.add('new uom2: ' || p_x_line_rec.ordered_quantity_uom2, 3);
21468: oe_debug_pub.add('old uom: ' || p_old_line_rec.order_quantity_uom, 3); -- INVCONV
21469: oe_debug_pub.add('new uom: ' || p_x_line_rec.order_quantity_uom, 3);
21470:
21471:
21464: oe_debug_pub.add('old qty2: ' || p_old_line_rec.ordered_quantity2, 3); -- INVCONV
21465: oe_debug_pub.add('new qty2: ' || p_x_line_rec.ordered_quantity2, 3);
21466: oe_debug_pub.add('old uom2: ' || p_old_line_rec.ordered_quantity_uom2, 3); -- INVCONV
21467: oe_debug_pub.add('new uom2: ' || p_x_line_rec.ordered_quantity_uom2, 3);
21468: oe_debug_pub.add('old uom: ' || p_old_line_rec.order_quantity_uom, 3); -- INVCONV
21469: oe_debug_pub.add('new uom: ' || p_x_line_rec.order_quantity_uom, 3);
21470:
21471:
21472: oe_debug_pub.add('ssd old' ||
21465: oe_debug_pub.add('new qty2: ' || p_x_line_rec.ordered_quantity2, 3);
21466: oe_debug_pub.add('old uom2: ' || p_old_line_rec.ordered_quantity_uom2, 3); -- INVCONV
21467: oe_debug_pub.add('new uom2: ' || p_x_line_rec.ordered_quantity_uom2, 3);
21468: oe_debug_pub.add('old uom: ' || p_old_line_rec.order_quantity_uom, 3); -- INVCONV
21469: oe_debug_pub.add('new uom: ' || p_x_line_rec.order_quantity_uom, 3);
21470:
21471:
21472: oe_debug_pub.add('ssd old' ||
21473: to_char (new_time (p_old_line_rec.schedule_ship_date, 'PST', 'EST'),
21468: oe_debug_pub.add('old uom: ' || p_old_line_rec.order_quantity_uom, 3); -- INVCONV
21469: oe_debug_pub.add('new uom: ' || p_x_line_rec.order_quantity_uom, 3);
21470:
21471:
21472: oe_debug_pub.add('ssd old' ||
21473: to_char (new_time (p_old_line_rec.schedule_ship_date, 'PST', 'EST'),
21474: 'DD-MON-YY HH24:MI:SS'), 3);
21475: oe_debug_pub.add('ssd new' ||
21476: to_char (new_time (p_x_line_rec.schedule_ship_date, 'PST', 'EST'),
21471:
21472: oe_debug_pub.add('ssd old' ||
21473: to_char (new_time (p_old_line_rec.schedule_ship_date, 'PST', 'EST'),
21474: 'DD-MON-YY HH24:MI:SS'), 3);
21475: oe_debug_pub.add('ssd new' ||
21476: to_char (new_time (p_x_line_rec.schedule_ship_date, 'PST', 'EST'),
21477: 'DD-MON-YY HH24:MI:SS'), 3);
21478: end if;
21479:
21487: p_x_line_rec.split_from_line_id <> FND_API.G_MISS_NUM AND
21488: p_x_line_rec.operation = 'CREATE') THEN
21489:
21490: if l_debug_level > 0 then
21491: oe_debug_pub.add('compare for ato model now', 3);
21492: end if;
21493:
21494: IF NOT OE_GLOBALS.Equal(p_x_line_rec.ship_from_org_id,
21495: p_old_line_rec.ship_from_org_id) THEN
21494: IF NOT OE_GLOBALS.Equal(p_x_line_rec.ship_from_org_id,
21495: p_old_line_rec.ship_from_org_id) THEN
21496:
21497: if l_debug_level > 0 then
21498: oe_debug_pub.add('cto_change logged for warehouse change', 3);
21499: end if;
21500: l_notify_cto := TRUE;
21501:
21502: OE_delayed_requests_Pvt.log_request
21516: IF NOT OE_GLOBALS.Equal(p_x_line_rec.ordered_quantity,
21517: p_old_line_rec.ordered_quantity) THEN
21518:
21519: if l_debug_level > 0 then
21520: oe_debug_pub.add('cto_change logged for qty change', 3);
21521: end if;
21522:
21523: l_notify_cto := TRUE;
21524:
21539: IF NOT OE_GLOBALS.Equal(p_x_line_rec.request_date,
21540: p_old_line_rec.request_date) THEN
21541:
21542: if l_debug_level > 0 then
21543: oe_debug_pub.add('cto_change logged for req date change', 3);
21544: end if;
21545: l_notify_cto := TRUE;
21546:
21547: OE_delayed_requests_Pvt.log_request
21563: NOT l_ato_item_qty_change
21564: THEN
21565:
21566: if l_debug_level > 0 then
21567: oe_debug_pub.add('cto_change logged for sch ship date change', 3);
21568: end if;
21569: l_notify_cto := TRUE;
21570:
21571: OE_delayed_requests_Pvt.log_request
21586: p_old_line_rec.schedule_arrival_date) AND
21587: NOT l_ato_item_qty_change THEN
21588:
21589: if l_debug_level > 0 then
21590: oe_debug_pub.add('cto_change logged for sch arr date change', 3);
21591: end if;
21592: l_notify_cto := TRUE;
21593:
21594: OE_delayed_requests_Pvt.log_request
21610: IF NOT OE_GLOBALS.Equal(p_x_line_rec.ordered_quantity2,
21611: p_old_line_rec.ordered_quantity2) THEN
21612:
21613: if l_debug_level > 0 then
21614: oe_debug_pub.add('cto_change logged for qty2 change', 3);
21615: end if;
21616:
21617: l_notify_cto := TRUE;
21618:
21633: IF NOT OE_GLOBALS.Equal(p_x_line_rec.ordered_quantity_uom2,
21634: p_old_line_rec.ordered_quantity_uom2) THEN
21635:
21636: if l_debug_level > 0 then
21637: oe_debug_pub.add('cto_change logged for Uom2 change', 3);
21638: end if;
21639:
21640: l_notify_cto := TRUE;
21641:
21656: IF NOT OE_GLOBALS.Equal(p_x_line_rec.order_quantity_uom,
21657: p_old_line_rec.order_quantity_uom) THEN
21658:
21659: if l_debug_level > 0 then
21660: oe_debug_pub.add('cto_change logged for Uom change', 3);
21661: end if;
21662:
21663: l_notify_cto := TRUE;
21664:
21684: p_x_line_rec.schedule_ship_date is NULL AND
21685: p_old_line_rec.schedule_ship_date is NOT NULL THEN
21686:
21687: if l_debug_level > 0 then
21688: oe_debug_pub.add('cto_change logged for unschedule', 3);
21689: end if;
21690:
21691: l_notify_cto := TRUE;
21692:
21715: NOT (p_x_line_rec.split_from_line_id is NOT NULL AND
21716: p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE) -- split create
21717: THEN
21718: if l_debug_level > 0 then
21719: oe_debug_pub.add('part of ato', 3);
21720: end if;
21721:
21722: l_pto_ato_create := FALSE;
21723:
21732: WHEN NO_DATA_FOUND THEN
21733:
21734: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
21735: if l_debug_level > 0 then
21736: oe_debug_pub.add('pto top model and opr create', 1);
21737: end if;
21738: l_pto_ato_create := TRUE;
21739: END IF;
21740: END;
21749:
21750: THEN
21751:
21752: if l_debug_level > 0 then
21753: oe_debug_pub.add('cto_change logged for config change', 3);
21754: end if;
21755:
21756: l_notify_cto := TRUE;
21757:
21768: IF p_x_line_rec.operation <> OE_GLOBALS.G_OPR_DELETE AND
21769: OE_Code_Control.Code_Release_Level >= '110510' THEN
21770:
21771: if l_debug_level > 0 then
21772: oe_debug_pub.add('cto_change logged for decimal change', 3);
21773: end if;
21774:
21775: OE_delayed_requests_Pvt.log_request
21776: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE, --Bug 14375128
21789:
21790: END IF;
21791: ELSE
21792: if l_debug_level > 0 then
21793: oe_debug_pub.add('no need to log here', 3);
21794: end if;
21795: END IF;
21796:
21797: l_num := 0;
21820:
21821: EXCEPTION
21822: when no_data_found then
21823: if l_debug_level > 0 then
21824: oe_debug_pub.add('was not a ato model', 3);
21825: end if;
21826: END;
21827: END IF;
21828:
21827: END IF;
21828:
21829: IF l_num = 1 THEN
21830: if l_debug_level > 0 then
21831: oe_debug_pub.add('new split ato model '|| p_x_line_rec.line_id, 3);
21832: end if;
21833:
21834: OE_delayed_requests_Pvt.log_request
21835: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE, --Bug 14375128
21847:
21848: IF l_notify_cto THEN
21849:
21850: if l_debug_level > 0 then
21851: oe_debug_pub.add('notify_cto logged', 3);
21852: end if;
21853:
21854: OE_delayed_requests_Pvt.log_request
21855: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE, --Bug 14375128
21883: l_flag := TRUE;
21884: EXCEPTION
21885: WHEN NO_DATA_FOUND THEN
21886: if l_debug_level > 0 then
21887: oe_debug_pub.add('config item not yet created', 2);
21888: end if;
21889: WHEN TOO_MANY_ROWS THEN
21890: if l_debug_level > 0 then
21891: oe_debug_pub.add('many config items', 2);
21887: oe_debug_pub.add('config item not yet created', 2);
21888: end if;
21889: WHEN TOO_MANY_ROWS THEN
21890: if l_debug_level > 0 then
21891: oe_debug_pub.add('many config items', 2);
21892: end if;
21893: l_flag := TRUE;
21894: END;
21895: ELSE
21896: l_flag := TRUE;
21897: END IF;
21898: ELSE
21899: if l_debug_level > 0 then
21900: oe_debug_pub.add('not pto/ato config create, flag false', 2);
21901: end if;
21902: END IF;
21903:
21904:
21903:
21904:
21905: IF l_flag THEN
21906: if l_debug_level > 0 then
21907: oe_debug_pub.add('pto ato and config exist'|| p_x_line_rec.line_id, 2);
21908: end if;
21909:
21910: OE_delayed_requests_Pvt.log_request
21911: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE, --Bug 14375128
21930:
21931: END IF;
21932:
21933: if l_debug_level > 0 then
21934: oe_debug_pub.add('leaving Log_CTO_Requests', 1);
21935: end if;
21936: EXCEPTION
21937: WHEN OTHERS THEN
21938: if l_debug_level > 0 then
21935: end if;
21936: EXCEPTION
21937: WHEN OTHERS THEN
21938: if l_debug_level > 0 then
21939: oe_debug_pub.add('exception in Log_CTO_Requests'|| sqlerrm, 1);
21940: end if;
21941: RAISE;
21942: END Log_CTO_Requests;
21943:
21982: l_fulfilled_flag VARCHAR2(1) := 'N';
21983: l_model_item VARCHAR2(2000);
21984: l_config_rev_change VARCHAR2(1) := 'N';
21985: l_ord_item VARCHAR2(2000);
21986: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
21987: BEGIN
21988: if l_debug_level > 0 then
21989: oe_debug_pub.add('entering Log_Config_Requests', 1);
21990: end if;
21985: l_ord_item VARCHAR2(2000);
21986: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
21987: BEGIN
21988: if l_debug_level > 0 then
21989: oe_debug_pub.add('entering Log_Config_Requests', 1);
21990: end if;
21991:
21992:
21993: ------------------------ copy for model split -------------
21997: p_x_line_rec.split_from_line_id is not null -- split
21998: THEN
21999:
22000: if l_debug_level > 0 then
22001: oe_debug_pub.add
22002: ('split_from_line_id: '|| p_x_line_rec.split_from_line_id, 1);
22003: oe_debug_pub.add('new model: '|| p_x_line_rec.line_id, 1);
22004: end if;
22005:
21999:
22000: if l_debug_level > 0 then
22001: oe_debug_pub.add
22002: ('split_from_line_id: '|| p_x_line_rec.split_from_line_id, 1);
22003: oe_debug_pub.add('new model: '|| p_x_line_rec.line_id, 1);
22004: end if;
22005:
22006: BEGIN
22007: SELECT config_header_id, config_rev_nbr, configuration_id
22010: WHERE line_id = p_x_line_rec.split_from_line_id;
22011: EXCEPTION
22012: WHEN no_data_found THEN
22013: if l_debug_level > 0 then
22014: oe_debug_pub.add('Parent model is not validated', 1);
22015: end if;
22016: -- should we raise exception??
22017: END;
22018:
22016: -- should we raise exception??
22017: END;
22018:
22019: if l_debug_level > 0 then
22020: oe_debug_pub.add('Logging a request after spllit
22021: to copy the configuration in SPC', 1);
22022: end if;
22023: OE_Delayed_Requests_Pvt.Log_Request(
22024: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
22034:
22035: END IF;
22036:
22037: if l_debug_level > 0 then
22038: oe_debug_pub.add('after copy config request ', 3);
22039: end if;
22040:
22041: -------------------------- copy config done -----------------------
22042:
22042:
22043:
22044: IF nvl(p_x_line_rec.model_remnant_flag, 'N') = 'Y' THEN
22045: if l_debug_level > 0 then
22046: oe_debug_pub.add('returning from log_config as remnant', 1);
22047: end if;
22048: RETURN;
22049: END IF;
22050:
22068: FND_MESSAGE.Set_Name('ONT', 'OE_CONFIG_MODEL_CLOSED');
22069: FND_MESSAGE.Set_Token('MODEL', l_model_item);
22070: OE_MSG_PUB.Add;
22071: if l_debug_level > 0 then
22072: oe_debug_pub.add('model line is closed', 1);
22073: end if;
22074: RAISE FND_API.G_EXC_ERROR;
22075: END IF;
22076:
22078: FND_MESSAGE.Set_Name('ONT', 'OE_CONFIG_MODEL_FULFILLED');
22079: FND_MESSAGE.Set_Token('MODEL', l_model_item);
22080: OE_MSG_PUB.Add;
22081: if l_debug_level > 0 then
22082: oe_debug_pub.add('model line is fulfilled', 1);
22083: end if;
22084: RAISE FND_API.G_EXC_ERROR;
22085: END IF;
22086:
22084: RAISE FND_API.G_EXC_ERROR;
22085: END IF;
22086:
22087: if l_debug_level > 0 then
22088: oe_debug_pub.add('Logging a request to validate configuration ', 1);
22089: end if;
22090:
22091: OE_delayed_requests_Pvt.log_request(
22092: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
22096: p_request_type => OE_GLOBALS.G_VALIDATE_CONFIGURATION,
22097: x_return_status => x_return_status);
22098:
22099: if l_debug_level > 0 then
22100: oe_debug_pub.add('Logging a request to delete option from oe/spc', 1);
22101: end if;
22102:
22103: OE_Delayed_Requests_Pvt.Log_Request(
22104: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
22120:
22121: ---------------- update/create-------------------------------------
22122:
22123: if l_debug_level > 0 then
22124: oe_debug_pub.add('item_type_code: '||p_x_line_rec.item_type_code, 1);
22125: oe_debug_pub.add('validate flag: '||OE_CONFIG_PVT.OECFG_VALIDATE_CONFIG, 1);
22126: end if;
22127:
22128: l_flag := FALSE;
22121: ---------------- update/create-------------------------------------
22122:
22123: if l_debug_level > 0 then
22124: oe_debug_pub.add('item_type_code: '||p_x_line_rec.item_type_code, 1);
22125: oe_debug_pub.add('validate flag: '||OE_CONFIG_PVT.OECFG_VALIDATE_CONFIG, 1);
22126: end if;
22127:
22128: l_flag := FALSE;
22129:
22130: IF p_x_line_rec.item_type_code = OE_GLOBALS.G_ITEM_MODEL AND
22131: p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
22132: p_x_line_rec.booked_flag = 'Y' THEN
22133: if l_debug_level > 0 then
22134: oe_debug_pub.add('setting flag to true for model', 1);
22135: end if;
22136: l_flag := TRUE;
22137: END IF;
22138:
22143: NOT OE_GLOBALS.Equal(p_x_line_rec.ordered_quantity,
22144: p_old_line_rec.ordered_quantity )
22145: THEN
22146: if l_debug_level > 0 then
22147: oe_debug_pub.add('set flag to true'|| p_old_line_rec.ordered_quantity, 1);
22148: oe_debug_pub.add('new qty ' || p_x_line_rec.ordered_quantity, 1);
22149: end if;
22150: l_flag := TRUE;
22151: END IF;
22144: p_old_line_rec.ordered_quantity )
22145: THEN
22146: if l_debug_level > 0 then
22147: oe_debug_pub.add('set flag to true'|| p_old_line_rec.ordered_quantity, 1);
22148: oe_debug_pub.add('new qty ' || p_x_line_rec.ordered_quantity, 1);
22149: end if;
22150: l_flag := TRUE;
22151: END IF;
22152:
22154: NOT OE_GLOBALS.Equal(p_x_line_rec.config_rev_nbr,
22155: p_old_line_rec.config_rev_nbr)
22156: THEN
22157: if l_debug_level > 0 then
22158: oe_debug_pub.add('set flag to true, old rev '|| p_old_line_rec.config_rev_nbr, 1);
22159: oe_debug_pub.add('new rev ' || p_x_line_rec.config_rev_nbr, 1);
22160: end if;
22161: l_config_rev_change := 'Y';
22162: l_flag := TRUE;
22155: p_old_line_rec.config_rev_nbr)
22156: THEN
22157: if l_debug_level > 0 then
22158: oe_debug_pub.add('set flag to true, old rev '|| p_old_line_rec.config_rev_nbr, 1);
22159: oe_debug_pub.add('new rev ' || p_x_line_rec.config_rev_nbr, 1);
22160: end if;
22161: l_config_rev_change := 'Y';
22162: l_flag := TRUE;
22163: END IF;
22164:
22165: IF l_flag AND OE_CONFIG_PVT.OECFG_VALIDATE_CONFIG = 'Y' THEN
22166:
22167: if l_debug_level > 0 then
22168: oe_debug_pub.add('p_x_line_rec.operation' || p_x_line_rec.operation, 1);
22169: oe_debug_pub.add
22170: ('Split_from_line_id: '||p_x_line_rec.split_from_line_id ,3);
22171: oe_debug_pub.add
22172: ('Split_action_code: '|| p_x_line_rec.split_action_code ,3);
22165: IF l_flag AND OE_CONFIG_PVT.OECFG_VALIDATE_CONFIG = 'Y' THEN
22166:
22167: if l_debug_level > 0 then
22168: oe_debug_pub.add('p_x_line_rec.operation' || p_x_line_rec.operation, 1);
22169: oe_debug_pub.add
22170: ('Split_from_line_id: '||p_x_line_rec.split_from_line_id ,3);
22171: oe_debug_pub.add
22172: ('Split_action_code: '|| p_x_line_rec.split_action_code ,3);
22173: end if;
22167: if l_debug_level > 0 then
22168: oe_debug_pub.add('p_x_line_rec.operation' || p_x_line_rec.operation, 1);
22169: oe_debug_pub.add
22170: ('Split_from_line_id: '||p_x_line_rec.split_from_line_id ,3);
22171: oe_debug_pub.add
22172: ('Split_action_code: '|| p_x_line_rec.split_action_code ,3);
22173: end if;
22174:
22175:
22178: IF p_x_line_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
22179: p_x_line_rec.split_from_line_id is not null
22180: THEN
22181: if l_debug_level > 0 then
22182: oe_debug_pub.add('This is a new model after split', 1);
22183: end if;
22184:
22185: ELSIF p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
22186: nvl(p_x_line_rec.split_action_code, 'X') = 'SPLIT'
22185: ELSIF p_x_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
22186: nvl(p_x_line_rec.split_action_code, 'X') = 'SPLIT'
22187: THEN
22188: if l_debug_level > 0 then
22189: oe_debug_pub.add('This is a parent split model', 1);
22190: end if;
22191:
22192: ELSE
22193: -- If we got here, it means this isn't a split.
22191:
22192: ELSE
22193: -- If we got here, it means this isn't a split.
22194: if l_debug_level > 0 then
22195: oe_debug_pub.add('Logging a request to validate configuration',1);
22196: end if;
22197:
22198: IF l_model_open_flag = 'N' THEN
22199: FND_MESSAGE.Set_Name('ONT', 'OE_CONFIG_MODEL_CLOSED');
22199: FND_MESSAGE.Set_Name('ONT', 'OE_CONFIG_MODEL_CLOSED');
22200: FND_MESSAGE.Set_Token('MODEL', l_model_item);
22201: OE_MSG_PUB.Add;
22202: if l_debug_level > 0 then
22203: oe_debug_pub.add('model line is closed', 1);
22204: end if;
22205: RAISE FND_API.G_EXC_ERROR;
22206: END IF;
22207:
22209: FND_MESSAGE.Set_Name('ONT', 'OE_CONFIG_MODEL_FULFILLED');
22210: FND_MESSAGE.Set_Token('MODEL', l_model_item);
22211: OE_MSG_PUB.Add;
22212: if l_debug_level > 0 then
22213: oe_debug_pub.add('model line is fulfilled', 1);
22214: end if;
22215: RAISE FND_API.G_EXC_ERROR;
22216: END IF;
22217:
22230: FND_MESSAGE.Set_Token('ITEM', l_ord_item);
22231: OE_MSG_PUB.Add;
22232:
22233: IF l_debug_level > 0 THEN
22234: oe_debug_pub.add
22235: ('Child lines with zero qty can not be created', 1);
22236: END IF;
22237: RAISE FND_API.G_EXC_ERROR;
22238: END IF;
22251: AND NOT(OE_GENESIS_UTIL.G_INCOMING_FROM_DOO) -- Bug 16491708
22252: THEN
22253:
22254: if l_debug_level > 0 then
22255: oe_debug_pub.add('Logging a request to update configuration', 1);
22256: end if;
22257:
22258: l_cancellation := 'N';
22259:
22258: l_cancellation := 'N';
22259:
22260: IF OE_Sales_Can_Util.G_Require_Reason THEN
22261: if l_debug_level > 0 then
22262: oe_debug_pub.add('this is a cancellation', 1);
22263: end if;
22264: l_cancellation := 'Y';
22265: ELSE
22266: if l_debug_level > 0 then
22263: end if;
22264: l_cancellation := 'Y';
22265: ELSE
22266: if l_debug_level > 0 then
22267: oe_debug_pub.add('this is not a cancellation', 1);
22268: end if;
22269: END IF;
22270:
22271: if l_debug_level > 0 then
22268: end if;
22269: END IF;
22270:
22271: if l_debug_level > 0 then
22272: oe_debug_pub.add
22273: (p_x_line_rec.item_type_code || p_x_line_rec.ordered_quantity, 1);
22274: end if;
22275:
22276: OE_Delayed_Requests_Pvt.Log_Request(
22296:
22297: END IF;
22298:
22299: if l_debug_level > 0 then
22300: oe_debug_pub.add('leaving Log_Config_Requests', 1);
22301: end if;
22302: EXCEPTION
22303: WHEN OTHERS THEN
22304: if l_debug_level > 0 then
22301: end if;
22302: EXCEPTION
22303: WHEN OTHERS THEN
22304: if l_debug_level > 0 then
22305: oe_debug_pub.add('exception in Log_Config_Requests'|| sqlerrm, 1);
22306: end if;
22307: RAISE;
22308: END Log_Config_Requests;
22309:
22385: l_change_configuration BOOLEAN := FALSE;
22386: l_modify_included_items BOOLEAN := FALSE;
22387: l_return_status VARCHAR2(1);
22388: l_entity_id NUMBER;
22389: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
22390: BEGIN
22391: if l_debug_level > 0 then
22392: oe_debug_pub.add('entering Log_Cascade_Requests', 1);
22393: end if;
22388: l_entity_id NUMBER;
22389: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
22390: BEGIN
22391: if l_debug_level > 0 then
22392: oe_debug_pub.add('entering Log_Cascade_Requests', 1);
22393: end if;
22394:
22395: -------- cascading from parent to child only -------------
22396:
22415: l_param3 := p_x_line_rec.change_reason;
22416: l_param4 := p_x_line_rec.change_comments;
22417:
22418: if l_debug_level > 0 then
22419: oe_debug_pub.add('ordered qty of model/kit changed:' ||l_param2,1);
22420: end if;
22421:
22422: l_cascade_changes := TRUE;
22423:
22437: p_old_line_rec.project_id)
22438: THEN
22439: l_param5 := p_x_line_rec.project_id;
22440: if l_debug_level > 0 then
22441: oe_debug_pub.add('model/ATO sub,project_id changed: '||l_param5,1);
22442: end if;
22443: l_cascade_changes := TRUE;
22444: END IF;
22445:
22446: IF NOT OE_GLOBALS.Equal(p_x_line_rec.task_id,p_old_line_rec.task_id)
22447: THEN
22448: l_param6 := p_x_line_rec.task_id;
22449: if l_debug_level > 0 then
22450: oe_debug_pub.add('model /ATO sub,task_id changed: '||l_param6,1);
22451: end if;
22452: l_cascade_changes := TRUE;
22453: END IF;
22454:
22507: p_old_line_rec.shipped_quantity)
22508: THEN
22509: l_param9 := to_char(p_x_line_rec.shipped_quantity);
22510: if l_debug_level > 0 then
22511: oe_debug_pub.add
22512: ('model / ATO subconfig, shipped quantity changed: '||l_param9,1);
22513: end if;
22514:
22515: l_cascade_changes := TRUE;
22529: p_old_line_rec.source_type_code)
22530: THEN
22531: l_param7 := p_x_line_rec.source_type_code;
22532: if l_debug_level > 0 then
22533: oe_debug_pub.add('ATO cascade source type '|| l_param7,1);
22534: end if;
22535: l_cascade_changes := TRUE;
22536: END IF;
22537:
22550: THEN
22551: l_param16 := p_x_line_rec.freight_terms_code;
22552:
22553: if l_debug_level > 0 then
22554: oe_debug_pub.add
22555: ('Freight term code changed: '||l_param16,1);
22556: end if;
22557:
22558: l_cascade_changes := TRUE;
22571: THEN
22572: l_date_param2 := p_x_line_rec.promise_date;
22573:
22574: if l_debug_level > 0 then
22575: oe_debug_pub.add('Promise date changed: '||l_date_param2,1);
22576: end if;
22577:
22578: l_cascade_changes := TRUE;
22579: END IF;
22583:
22584: -- log a request only if not a split
22585:
22586: if l_debug_level > 0 then
22587: oe_debug_pub.add
22588: ('CASCADE_CHANGES_FLAG, N means cascade : '
22589: ||OE_CONFIG_UTIL.CASCADE_CHANGES_FLAG, 1);
22590: end if;
22591:
22591:
22592:
22593: IF l_cascade_changes THEN
22594: if l_debug_level > 0 then
22595: oe_debug_pub.add('Logging Request to Cascade changes',1);
22596: oe_debug_pub.add('Item Type is: ' || p_x_line_rec.item_type_code,3);
22597: oe_debug_pub.add('Comp Code is: ' || p_x_line_rec.component_code,3);
22598: end if;
22599:
22592:
22593: IF l_cascade_changes THEN
22594: if l_debug_level > 0 then
22595: oe_debug_pub.add('Logging Request to Cascade changes',1);
22596: oe_debug_pub.add('Item Type is: ' || p_x_line_rec.item_type_code,3);
22597: oe_debug_pub.add('Comp Code is: ' || p_x_line_rec.component_code,3);
22598: end if;
22599:
22600: l_cancellation := 'N';
22593: IF l_cascade_changes THEN
22594: if l_debug_level > 0 then
22595: oe_debug_pub.add('Logging Request to Cascade changes',1);
22596: oe_debug_pub.add('Item Type is: ' || p_x_line_rec.item_type_code,3);
22597: oe_debug_pub.add('Comp Code is: ' || p_x_line_rec.component_code,3);
22598: end if;
22599:
22600: l_cancellation := 'N';
22601: IF OE_Sales_Can_Util.G_Require_Reason THEN
22599:
22600: l_cancellation := 'N';
22601: IF OE_Sales_Can_Util.G_Require_Reason THEN
22602: if l_debug_level > 0 then
22603: oe_debug_pub.add('this is a cancellation', 1);
22604: end if;
22605: l_cancellation := 'Y';
22606: END IF;
22607:
22638:
22639: ------------ changing from any line to all lines -------------
22640:
22641: if l_debug_level > 0 then
22642: oe_debug_pub.add('change configuration requests', 3);
22643: end if;
22644:
22645: --6717302:
22646: -- 5932543 - do not call process order if the split is happening through
22715:
22716: END IF;
22717:
22718: if l_debug_level > 0 then
22719: oe_debug_pub.add('logging a req. to chg config', 1);
22720: end if;
22721:
22722: OE_Delayed_Requests_Pvt.Log_Request(
22723: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
22747:
22748: EXCEPTION
22749: WHEN NO_DATA_FOUND THEN
22750: if l_debug_level > 0 then
22751: oe_debug_pub.add('modify inc items requests NOT reqd', 3);
22752: end if;
22753: RETURN;
22754: END;
22755:
22753: RETURN;
22754: END;
22755:
22756: if l_debug_level > 0 then
22757: oe_debug_pub.add('modify inc items request reqd', 3);
22758: end if;
22759:
22760: -- Modified for bug 8636027
22761: -- l_num := p_x_line_rec.line_id;
22790: nvl(p_x_line_rec.split_action_code, 'X') <> 'SPLIT' AND
22791: OE_CONFIG_UTIL.CASCADE_CHANGES_FLAG = 'N' -- not for model change
22792: THEN
22793: if l_debug_level > 0 then
22794: oe_debug_pub.add('cascade class changes to included items', 1);
22795: end if;
22796:
22797: IF NOT OE_GLOBALS.Equal(p_x_line_rec.ordered_quantity,
22798: p_old_line_rec.ordered_quantity) THEN
22801: FND_API.G_MISS_NUM THEN
22802: OE_Config_Pvt.OE_MODIFY_INC_ITEMS_TBL(l_num).param1
22803: := p_old_line_rec.ordered_quantity;
22804: if l_debug_level > 0 then
22805: oe_debug_pub.add('qty changed 1st time ' || l_param1, 4);
22806: end if;
22807: END IF;
22808:
22809: OE_Config_Pvt.OE_MODIFY_INC_ITEMS_TBL(l_num).param2
22818: := p_x_line_rec.change_comments;
22819: -- change_comments
22820:
22821: if l_debug_level > 0 then
22822: oe_debug_pub.add
22823: ('ord qty of class changed:' || p_x_line_rec.ordered_quantity,1);
22824: end if;
22825:
22826: l_modify_included_items := TRUE;
22830: IF NOT OE_GLOBALS.Equal(p_x_line_rec.project_id,p_old_line_rec.project_id) THEN
22831: OE_Config_Pvt.OE_MODIFY_INC_ITEMS_TBL(l_num).param5
22832: := p_x_line_rec.project_id;
22833: if l_debug_level > 0 then
22834: oe_debug_pub.add('model/ATO subconfig,project changed: '||l_param5,1);
22835: end if;
22836: l_modify_included_items := TRUE;
22837: END IF;
22838:
22841: THEN
22842: OE_Config_Pvt.OE_MODIFY_INC_ITEMS_TBL(l_num).param6
22843: := p_x_line_rec.task_id;
22844: if l_debug_level > 0 then
22845: oe_debug_pub.add('model /ATO subconfig,task changed: '||l_param6,1);
22846: end if;
22847: l_modify_included_items := TRUE;
22848: END IF;
22849:
22890:
22891:
22892: IF l_modify_included_items THEN
22893: if l_debug_level > 0 then
22894: oe_debug_pub.add('something changed'|| p_x_line_rec.operation, 2);
22895: end if;
22896:
22897: OE_Config_Pvt.OE_MODIFY_INC_ITEMS_TBL(l_num).param10 :=
22898: p_x_line_rec.operation;
22912:
22913: x_return_status := l_return_status;
22914:
22915: if l_debug_level > 0 then
22916: oe_debug_pub.add('leaving Log_Config_Requests', 1);
22917: end if;
22918: EXCEPTION
22919: WHEN OTHERS THEN
22920: if l_debug_level > 0 then
22917: end if;
22918: EXCEPTION
22919: WHEN OTHERS THEN
22920: if l_debug_level > 0 then
22921: oe_debug_pub.add('exception in Log_Cascade_Requests'|| sqlerrm, 1);
22922: end if;
22923: RAISE;
22924: END Log_Cascade_Requests;
22925:
23046: ,p_order_type_id IN NUMBER
23047: ,x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2)
23048: IS
23049: l_count NUMBER;
23050: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
23051: BEGIN
23052:
23053: if l_debug_level > 0 then
23054: oe_debug_pub.add('Entering Log_Scheduling_Requests',1);
23050: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
23051: BEGIN
23052:
23053: if l_debug_level > 0 then
23054: oe_debug_pub.add('Entering Log_Scheduling_Requests',1);
23055: oe_debug_pub.add('p_caller' || p_caller,1);
23056: end if;
23057: IF NOT OE_GLOBALS.Equal(p_x_line_rec.schedule_ship_date,
23058: p_old_line_rec.schedule_ship_date)
23051: BEGIN
23052:
23053: if l_debug_level > 0 then
23054: oe_debug_pub.add('Entering Log_Scheduling_Requests',1);
23055: oe_debug_pub.add('p_caller' || p_caller,1);
23056: end if;
23057: IF NOT OE_GLOBALS.Equal(p_x_line_rec.schedule_ship_date,
23058: p_old_line_rec.schedule_ship_date)
23059: THEN
23057: IF NOT OE_GLOBALS.Equal(p_x_line_rec.schedule_ship_date,
23058: p_old_line_rec.schedule_ship_date)
23059: THEN
23060: if l_debug_level > 0 then
23061: oe_debug_pub.add('Schedule shipdate is changed',1);
23062: end if;
23063:
23064: /* 7576948: Commented for IR ISO CMS Project
23065:
23085: AND p_x_line_rec.ordered_quantity > 0 THEN
23086:
23087: -- Fix for bug 2347447
23088: if l_debug_level > 0 then
23089: oe_debug_pub.ADD('Update Shipping : logging delayed request for '
23090: || to_char(p_x_line_rec.line_id) ,1);
23091: end if;
23092:
23093: OE_Delayed_Requests_Pvt.Log_Request(
23115:
23116: -- bug 3636884, defaulting reason from group API
23117: IF OE_GLOBALS.G_DEFAULT_REASON THEN
23118: if l_debug_level > 0 then
23119: oe_debug_pub.add('Defaulting Audit Reason for Order Line', 1);
23120: end if;
23121: p_x_line_rec.change_reason := 'SYSTEM';
23122: ELSE
23123: if l_debug_level > 0 then
23120: end if;
23121: p_x_line_rec.change_reason := 'SYSTEM';
23122: ELSE
23123: if l_debug_level > 0 then
23124: oe_debug_pub.add('Audit Required Reason missing - error', 1);
23125: end if;
23126: fnd_message.set_name('ONT','OE_AUDIT_REASON_RQD');
23127: fnd_message.set_token('OBJECT','ORDER LINE');
23128: oe_msg_pub.add;
23139: p_x_line_rec.ato_line_id is NOT NULL)) AND
23140: p_x_line_rec.item_type_code <> OE_GLOBALS.G_ITEM_CONFIG
23141: THEN
23142: if l_debug_level > 0 then
23143: oe_debug_pub.add('Before logging Log_CTO_Requests', 1);
23144: end if;
23145: Log_CTO_Requests( p_x_line_rec => p_x_line_rec
23146: ,p_old_line_rec => p_old_line_rec
23147: ,x_return_status => x_return_status);
23151: END IF; -- External
23152: --bug 3988559 modify sfadnavi BEGIN
23153:
23154: if l_debug_level > 0 then
23155: oe_debug_pub.add('Before calling Version_Audit_Process',1);
23156: end if;
23157:
23158: --Adding code to log versioning/audit request
23159: OE_Line_Util.Version_Audit_Process(p_x_line_rec => p_x_line_rec,
23163:
23164:
23165:
23166: if l_debug_level > 0 then
23167: oe_debug_pub.add('Exiting Log_Scheduling_Requests',1);
23168: end if;
23169:
23170:
23171: END Log_Scheduling_Requests;
23195: l_converted_qty NUMBER(19,9);
23196: l_item_rec OE_ORDER_CACHE.item_rec_type;
23197: --l_OPM_UOM VARCHAR2(4); -- INVCONV
23198: l_error_message VARCHAR2(1000); -- INVCONV
23199: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level; -- INVCONV
23200: l_return NUMBER;
23201: l_status VARCHAR2(1);
23202: l_return_status VARCHAR2(30);
23203: l_msg_count NUMBER;
23212:
23213: -- First of all, if this procedure is called from a source other then UI
23214:
23215: IF l_debug_level > 0 THEN
23216: oe_debug_pub.add ('Enter Calculate_dual_quantity');
23217: oe_debug_pub.add ('p_ordered_quantity = ' || p_ordered_quantity );
23218: oe_debug_pub.add ('p_old_ordered_quantity = ' || p_old_ordered_quantity );
23219: oe_debug_pub.add ('p_ordered_quantity2 = ' || p_ordered_quantity2 );
23220: oe_debug_pub.add ('p_old_ordered_quantity2 = ' || p_old_ordered_quantity2 );
23213: -- First of all, if this procedure is called from a source other then UI
23214:
23215: IF l_debug_level > 0 THEN
23216: oe_debug_pub.add ('Enter Calculate_dual_quantity');
23217: oe_debug_pub.add ('p_ordered_quantity = ' || p_ordered_quantity );
23218: oe_debug_pub.add ('p_old_ordered_quantity = ' || p_old_ordered_quantity );
23219: oe_debug_pub.add ('p_ordered_quantity2 = ' || p_ordered_quantity2 );
23220: oe_debug_pub.add ('p_old_ordered_quantity2 = ' || p_old_ordered_quantity2 );
23221: oe_debug_pub.add ('p_ordered_quantity_uom = ' || p_ordered_quantity_uom );
23214:
23215: IF l_debug_level > 0 THEN
23216: oe_debug_pub.add ('Enter Calculate_dual_quantity');
23217: oe_debug_pub.add ('p_ordered_quantity = ' || p_ordered_quantity );
23218: oe_debug_pub.add ('p_old_ordered_quantity = ' || p_old_ordered_quantity );
23219: oe_debug_pub.add ('p_ordered_quantity2 = ' || p_ordered_quantity2 );
23220: oe_debug_pub.add ('p_old_ordered_quantity2 = ' || p_old_ordered_quantity2 );
23221: oe_debug_pub.add ('p_ordered_quantity_uom = ' || p_ordered_quantity_uom );
23222: oe_debug_pub.add ('p_ordered_quantity_uom2 = ' || p_ordered_quantity_uom2 );
23215: IF l_debug_level > 0 THEN
23216: oe_debug_pub.add ('Enter Calculate_dual_quantity');
23217: oe_debug_pub.add ('p_ordered_quantity = ' || p_ordered_quantity );
23218: oe_debug_pub.add ('p_old_ordered_quantity = ' || p_old_ordered_quantity );
23219: oe_debug_pub.add ('p_ordered_quantity2 = ' || p_ordered_quantity2 );
23220: oe_debug_pub.add ('p_old_ordered_quantity2 = ' || p_old_ordered_quantity2 );
23221: oe_debug_pub.add ('p_ordered_quantity_uom = ' || p_ordered_quantity_uom );
23222: oe_debug_pub.add ('p_ordered_quantity_uom2 = ' || p_ordered_quantity_uom2 );
23223: oe_debug_pub.add ('p_inventory_item_id = ' || p_inventory_item_id );
23216: oe_debug_pub.add ('Enter Calculate_dual_quantity');
23217: oe_debug_pub.add ('p_ordered_quantity = ' || p_ordered_quantity );
23218: oe_debug_pub.add ('p_old_ordered_quantity = ' || p_old_ordered_quantity );
23219: oe_debug_pub.add ('p_ordered_quantity2 = ' || p_ordered_quantity2 );
23220: oe_debug_pub.add ('p_old_ordered_quantity2 = ' || p_old_ordered_quantity2 );
23221: oe_debug_pub.add ('p_ordered_quantity_uom = ' || p_ordered_quantity_uom );
23222: oe_debug_pub.add ('p_ordered_quantity_uom2 = ' || p_ordered_quantity_uom2 );
23223: oe_debug_pub.add ('p_inventory_item_id = ' || p_inventory_item_id );
23224: oe_debug_pub.add ('p_ship_from_org_id = ' || p_ship_from_org_id );
23217: oe_debug_pub.add ('p_ordered_quantity = ' || p_ordered_quantity );
23218: oe_debug_pub.add ('p_old_ordered_quantity = ' || p_old_ordered_quantity );
23219: oe_debug_pub.add ('p_ordered_quantity2 = ' || p_ordered_quantity2 );
23220: oe_debug_pub.add ('p_old_ordered_quantity2 = ' || p_old_ordered_quantity2 );
23221: oe_debug_pub.add ('p_ordered_quantity_uom = ' || p_ordered_quantity_uom );
23222: oe_debug_pub.add ('p_ordered_quantity_uom2 = ' || p_ordered_quantity_uom2 );
23223: oe_debug_pub.add ('p_inventory_item_id = ' || p_inventory_item_id );
23224: oe_debug_pub.add ('p_ship_from_org_id = ' || p_ship_from_org_id );
23225: oe_debug_pub.add ('p_lot_number = ' || p_lot_number );
23218: oe_debug_pub.add ('p_old_ordered_quantity = ' || p_old_ordered_quantity );
23219: oe_debug_pub.add ('p_ordered_quantity2 = ' || p_ordered_quantity2 );
23220: oe_debug_pub.add ('p_old_ordered_quantity2 = ' || p_old_ordered_quantity2 );
23221: oe_debug_pub.add ('p_ordered_quantity_uom = ' || p_ordered_quantity_uom );
23222: oe_debug_pub.add ('p_ordered_quantity_uom2 = ' || p_ordered_quantity_uom2 );
23223: oe_debug_pub.add ('p_inventory_item_id = ' || p_inventory_item_id );
23224: oe_debug_pub.add ('p_ship_from_org_id = ' || p_ship_from_org_id );
23225: oe_debug_pub.add ('p_lot_number = ' || p_lot_number );
23226: oe_debug_pub.add ('x_ui_flag = ' || x_ui_flag );
23219: oe_debug_pub.add ('p_ordered_quantity2 = ' || p_ordered_quantity2 );
23220: oe_debug_pub.add ('p_old_ordered_quantity2 = ' || p_old_ordered_quantity2 );
23221: oe_debug_pub.add ('p_ordered_quantity_uom = ' || p_ordered_quantity_uom );
23222: oe_debug_pub.add ('p_ordered_quantity_uom2 = ' || p_ordered_quantity_uom2 );
23223: oe_debug_pub.add ('p_inventory_item_id = ' || p_inventory_item_id );
23224: oe_debug_pub.add ('p_ship_from_org_id = ' || p_ship_from_org_id );
23225: oe_debug_pub.add ('p_lot_number = ' || p_lot_number );
23226: oe_debug_pub.add ('x_ui_flag = ' || x_ui_flag );
23227: END IF;
23220: oe_debug_pub.add ('p_old_ordered_quantity2 = ' || p_old_ordered_quantity2 );
23221: oe_debug_pub.add ('p_ordered_quantity_uom = ' || p_ordered_quantity_uom );
23222: oe_debug_pub.add ('p_ordered_quantity_uom2 = ' || p_ordered_quantity_uom2 );
23223: oe_debug_pub.add ('p_inventory_item_id = ' || p_inventory_item_id );
23224: oe_debug_pub.add ('p_ship_from_org_id = ' || p_ship_from_org_id );
23225: oe_debug_pub.add ('p_lot_number = ' || p_lot_number );
23226: oe_debug_pub.add ('x_ui_flag = ' || x_ui_flag );
23227: END IF;
23228:
23221: oe_debug_pub.add ('p_ordered_quantity_uom = ' || p_ordered_quantity_uom );
23222: oe_debug_pub.add ('p_ordered_quantity_uom2 = ' || p_ordered_quantity_uom2 );
23223: oe_debug_pub.add ('p_inventory_item_id = ' || p_inventory_item_id );
23224: oe_debug_pub.add ('p_ship_from_org_id = ' || p_ship_from_org_id );
23225: oe_debug_pub.add ('p_lot_number = ' || p_lot_number );
23226: oe_debug_pub.add ('x_ui_flag = ' || x_ui_flag );
23227: END IF;
23228:
23229: -- First of all, if this procedure is called from a source other then UI
23222: oe_debug_pub.add ('p_ordered_quantity_uom2 = ' || p_ordered_quantity_uom2 );
23223: oe_debug_pub.add ('p_inventory_item_id = ' || p_inventory_item_id );
23224: oe_debug_pub.add ('p_ship_from_org_id = ' || p_ship_from_org_id );
23225: oe_debug_pub.add ('p_lot_number = ' || p_lot_number );
23226: oe_debug_pub.add ('x_ui_flag = ' || x_ui_flag );
23227: END IF;
23228:
23229: -- First of all, if this procedure is called from a source other then UI
23230: /* If neither quantity is present, no calculation is required
23232:
23233: IF p_ordered_quantity2 = fnd_api.g_miss_num THEN
23234: p_ordered_quantity2 := 0;
23235: IF l_debug_level > 0 THEN
23236: oe_debug_pub.add('Calculate_dual_quantity - p_ordered_quantity2 = fnd_api.g_miss_num' );
23237: END IF;
23238:
23239: END IF;
23240:
23243: p_ordered_quantity = FND_API.G_MISS_NUM ) AND
23244: (p_ordered_quantity2 IS NULL OR
23245: p_ordered_quantity2 = FND_API.G_MISS_NUM ) THEN
23246: IF l_debug_level > 0 THEN
23247: oe_debug_pub.add ('Calculate_dual_quantity - both quantities empty so early return');
23248: END IF;
23249: RETURN;
23250: END IF;
23251: END IF; -- IF( X_UI_FLAG = 1 ) THEN
23265: RETURN;
23266: END IF;
23267:
23268: IF l_debug_level > 0 THEN
23269: oe_debug_pub.add('Calculate_dual_quantity secondary_default_ind is ' || l_item_rec.secondary_default_ind);
23270: END IF;
23271:
23272: IF ( X_UI_FLAG = 0 ) THEN
23273: IF (NVL(p_ordered_quantity2,0) = 0
23274: OR l_item_rec.secondary_default_ind = 'F' ) -- INVCONV
23275: THEN
23276:
23277: IF l_debug_level > 0 THEN
23278: oe_debug_pub.add('Calculate_dual_quantity : quantity2 is null OR is type F - so calculate it');
23279: END IF;
23280:
23281: /* p_ordered_quantity2 := GMI_Reservation_Util.get_opm_converted_qty( INVCONV
23282: p_apps_item_id => p_inventory_item_id,
23300: raise UOM_CONVERSION_FAILED;
23301: END IF;
23302: p_ordered_quantity2 := l_converted_qty; -- INVCONV
23303: IF l_debug_level > 0 THEN
23304: oe_debug_pub.add('Calculate_dual_quantity : calculated quantity2 is '||p_ordered_quantity2);
23305: END IF;
23306:
23307: -- ELSIF (l_item_rec.dualum_ind in (2,3) ) THEN
23308: /* passed quantity is not null and secondary_default_ind in ('D','N (dualum_ind is 2 or 3) */
23323:
23324: IF l_return = 0
23325: then
23326: IF l_debug_level > 0 THEN
23327: oe_debug_pub.add('Calculate_dual_quantity - tolerance error 1' ,1);
23328: END IF;
23329:
23330: l_buffer := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, -- INVCONV
23331: p_encoded => 'F');
23330: l_buffer := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, -- INVCONV
23331: p_encoded => 'F');
23332: oe_msg_pub.add_text(p_message_text => l_buffer);
23333: IF l_debug_level > 0 THEN
23334: oe_debug_pub.add(l_buffer,1);
23335: END IF;
23336: RAISE TOLERANCE_ERROR ;
23337:
23338: else
23336: RAISE TOLERANCE_ERROR ;
23337:
23338: else
23339: IF l_debug_level > 0 THEN
23340: oe_debug_pub.add('Calculate_dual_quantity - No tolerance error so return ',1);
23341: END IF;
23342: x_return_status := 0;
23343: RETURN;
23344: END IF; -- IF l_return = 0
23373: END IF; -- IF ( X_UI_FLAG = 0 ) THEN
23374:
23375:
23376: IF l_debug_level > 0 THEN
23377: oe_debug_pub.add('Calculate_dual_quantity - Convert for dual controlled item Scenario',1);
23378: END IF;
23379:
23380: /* Has one of the two quantities changed
23381: =======================================*/
23386: (p_ordered_quantity IS NULL) OR
23387: (p_ordered_quantity2 IS NULL) THEN
23388:
23389: IF l_debug_level > 0 THEN
23390: oe_debug_pub.add('Calculate_dual_quantity - change detected ',1);
23391: END IF;
23392:
23393: /*
23394: IF l_item_rec.dualum_ind = 1 THEN
23415:
23416: IF (l_status <> FND_API.G_RET_STS_SUCCESS)
23417: THEN
23418: x_return_status := -1;
23419: oe_debug_pub.add('OPM After Get_OPMUOM_from_appsUOM - failed : apps_uom = ' || p_ordered_quantity_uom || 'opm_uom = ' || l_opm_uom );
23420: ELSE
23421: x_return_status := 1;
23422: oe_debug_pub.add('OPM After Get_OPMUOM_from_appsUOM : apps_uom = ' || p_ordered_quantity_uom || 'opm_uom = ' || l_opm_uom );
23423: END IF; */
23418: x_return_status := -1;
23419: oe_debug_pub.add('OPM After Get_OPMUOM_from_appsUOM - failed : apps_uom = ' || p_ordered_quantity_uom || 'opm_uom = ' || l_opm_uom );
23420: ELSE
23421: x_return_status := 1;
23422: oe_debug_pub.add('OPM After Get_OPMUOM_from_appsUOM : apps_uom = ' || p_ordered_quantity_uom || 'opm_uom = ' || l_opm_uom );
23423: END IF; */
23424:
23425:
23426: IF (NOT OE_GLOBALS.EQUAL(p_ordered_quantity
23436: p_ordered_quantity2 is NOT NULL THEN
23437:
23438: /* Only do tolerance check if both quantities populated */
23439: IF l_debug_level > 0 THEN
23440: oe_debug_pub.add('Calculate_dual_quantity - Check the deviation ');
23441: END IF;
23442:
23443: l_return := INV_CONVERT.Within_Deviation -- INVCONV
23444: ( p_organization_id =>
23454:
23455: IF l_return = 0
23456: then
23457: IF l_debug_level > 0 THEN
23458: oe_debug_pub.add('Calculate_dual_quantity - tolerance error 2' ,1);
23459: END IF;
23460: l_buffer := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, -- INVCONV
23461: p_encoded => 'F');
23462: oe_msg_pub.add_text(p_message_text => l_buffer);
23460: l_buffer := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, -- INVCONV
23461: p_encoded => 'F');
23462: oe_msg_pub.add_text(p_message_text => l_buffer);
23463: IF l_debug_level > 0 THEN
23464: oe_debug_pub.add(l_buffer,1);
23465: END IF;
23466: RAISE TOLERANCE_ERROR ;
23467:
23468: else
23466: RAISE TOLERANCE_ERROR ;
23467:
23468: else
23469: IF l_debug_level > 0 THEN
23470: oe_debug_pub.add('Calculate_dual_quantity - No tolerance error so return ',1);
23471: END IF;
23472: x_return_status := 0;
23473: RETURN;
23474: END IF; -- IF l_return = 0
23483: ,0);
23484: -- if change is within of tolerance, no further action
23485:
23486: IF (l_return NOT in (-68, -69)) THEN
23487: oe_debug_pub.add(' OPM : calculate_dual_qty .No tolerance error so return ');
23488: RETURN;
23489: ELSE --- IF (l_item_rec.dualum_ind = 3 )THEN
23490: x_return_status := l_return;
23491: oe_debug_pub.add('Calculate_dual_quantity - deviation error so return ');
23487: oe_debug_pub.add(' OPM : calculate_dual_qty .No tolerance error so return ');
23488: RETURN;
23489: ELSE --- IF (l_item_rec.dualum_ind = 3 )THEN
23490: x_return_status := l_return;
23491: oe_debug_pub.add('Calculate_dual_quantity - deviation error so return ');
23492: RETURN;
23493: END IF; */
23494:
23495: END IF; -- IF (l_item_rec.secondary_default_ind in ('D','N')THEN
23496:
23497: -- IF (l_item_rec.dualum_ind in (1,2) )THEN INVCONV
23498: IF (l_item_rec.secondary_default_ind in ('F','D') ) THEN -- INVCONV
23499: IF l_debug_level > 0 THEN
23500: oe_debug_pub.add('Calculate_dual_qty - uom conversion primary to secondary');
23501: END IF;
23502: /*l_converted_qty :=GMICUOM.uom_conversion
23503: (l_item_rec.opm_item_id,0
23504: ,p_ordered_quantity
23534: END IF;
23535:
23536:
23537: IF l_debug_level > 0 THEN
23538: oe_debug_pub.add('Calculate_dual_quantity : calculated quantity2 is '||p_ordered_quantity2);
23539: END IF;
23540:
23541:
23542:
23570:
23571: IF l_return = 0
23572: then
23573: IF l_debug_level > 0 THEN
23574: oe_debug_pub.add('Calculate_dual_quantity - tolerance error 3' ,1);
23575: END IF;
23576:
23577: l_buffer := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, -- INVCONV
23578: p_encoded => 'F');
23577: l_buffer := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, -- INVCONV
23578: p_encoded => 'F');
23579: oe_msg_pub.add_text(p_message_text => l_buffer);
23580: IF l_debug_level > 0 THEN
23581: oe_debug_pub.add(l_buffer,1);
23582: END IF;
23583: RAISE TOLERANCE_ERROR ;
23584:
23585: else
23583: RAISE TOLERANCE_ERROR ;
23584:
23585: else
23586: IF l_debug_level > 0 THEN
23587: oe_debug_pub.add('Calculate_dual_quantity - No tolerance error so return ',1);
23588: END IF;
23589: RETURN;
23590: END IF; -- IF l_return = 0
23591:
23598: ,l_item_rec.opm_item_um2
23599: ,0);
23600: -- if change is within tolerance, no further action
23601: IF (l_return NOT in (-68, -69)) THEN
23602: oe_debug_pub.add(' OPM : calculate_dual_qty .No tolerance error so return ');
23603: RETURN;
23604: ELSE -- IF (l_item_rec.dualum_ind = 3 )THEN
23605: x_return_status := l_return;
23606: oe_debug_pub.add('Calculate_dual_quantity .deviation error so return ');
23602: oe_debug_pub.add(' OPM : calculate_dual_qty .No tolerance error so return ');
23603: RETURN;
23604: ELSE -- IF (l_item_rec.dualum_ind = 3 )THEN
23605: x_return_status := l_return;
23606: oe_debug_pub.add('Calculate_dual_quantity .deviation error so return ');
23607: RETURN;
23608: END IF; */
23609:
23610: END IF; -- IF (l_item_rec.secondary_default_ind in ('D','N')and -- INVCONV
23647: raise UOM_CONVERSION_FAILED;
23648: END IF;
23649:
23650: IF l_debug_level > 0 THEN
23651: oe_debug_pub.add('Calculate_dual_quantity - convert to ordered qty gives ' || p_ordered_quantity);
23652: END IF;
23653: END IF; -- IF (l_item_rec.secondary_default_ind in ('F','D') -- INVCONV
23654:
23655: END IF; -- IF (NVL(p_ordered_quantity2,0) = 0
23654:
23655: END IF; -- IF (NVL(p_ordered_quantity2,0) = 0
23656:
23657: IF l_debug_level > 0 THEN
23658: oe_debug_pub.add('Calculate_dual_quantity - exiting ordered qty = ' || p_ordered_quantity);
23659: oe_debug_pub.add('Calculate_dual_quantity - exiting ordered qty2 = ' || p_ordered_quantity2);
23660: END IF;
23661: EXCEPTION
23662:
23655: END IF; -- IF (NVL(p_ordered_quantity2,0) = 0
23656:
23657: IF l_debug_level > 0 THEN
23658: oe_debug_pub.add('Calculate_dual_quantity - exiting ordered qty = ' || p_ordered_quantity);
23659: oe_debug_pub.add('Calculate_dual_quantity - exiting ordered qty2 = ' || p_ordered_quantity2);
23660: END IF;
23661: EXCEPTION
23662:
23663: WHEN UOM_CONVERSION_FAILED THEN
23660: END IF;
23661: EXCEPTION
23662:
23663: WHEN UOM_CONVERSION_FAILED THEN
23664: oe_debug_pub.add('Exception handling: UOM_CONVERSION_FAILED in calculate_dual_qty', 1);
23665: FND_MESSAGE.SET_NAME('INV','INV_NO_CONVERSION_ERR'); -- INVCONV
23666: OE_MSG_PUB.Add;
23667: x_return_status := -99999;
23668: --RAISE FND_API.G_EXC_ERROR;
23668: --RAISE FND_API.G_EXC_ERROR;
23669:
23670:
23671: WHEN TOLERANCE_ERROR THEN -- INVCONV
23672: oe_debug_pub.add('Exception handling: TOLERANCE_ERROR in calculate_dual_qty', 1);
23673: x_return_status := -1;
23674: --RAISE -- FND_API.G_EXC_ERROR; -- INVCONV
23675:
23676: WHEN OTHERS THEN
23680: ( G_PKG_NAME ,
23681: 'Calculate_dual_quantity'
23682: );
23683: END IF;
23684: oe_debug_pub.add('Exception handling: others in calculate_dual_qty', 1);
23685: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
23686:
23687: END calculate_dual_quantity;
23688:
23694: )
23695: IS
23696: l_return_status VARCHAR2(30);
23697: --
23698: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
23699: --
23700: BEGIN
23701:
23702: if l_debug_level > 0 then
23699: --
23700: BEGIN
23701:
23702: if l_debug_level > 0 then
23703: oe_debug_pub.add('line id : '||p_x_line_rec.line_id);
23704: oe_debug_pub.add('new blanket number : '||p_x_line_rec.blanket_number);
23705: oe_debug_pub.add('old blanket number : '||p_old_line_rec.blanket_number);
23706: oe_debug_pub.add('fulfilled flag : '||p_x_line_rec.fulfilled_flag);
23707: oe_debug_pub.add('operation : '||p_x_line_rec.operation);
23700: BEGIN
23701:
23702: if l_debug_level > 0 then
23703: oe_debug_pub.add('line id : '||p_x_line_rec.line_id);
23704: oe_debug_pub.add('new blanket number : '||p_x_line_rec.blanket_number);
23705: oe_debug_pub.add('old blanket number : '||p_old_line_rec.blanket_number);
23706: oe_debug_pub.add('fulfilled flag : '||p_x_line_rec.fulfilled_flag);
23707: oe_debug_pub.add('operation : '||p_x_line_rec.operation);
23708: oe_debug_pub.add('split from line ID : '||p_x_line_rec.split_from_line_id);
23701:
23702: if l_debug_level > 0 then
23703: oe_debug_pub.add('line id : '||p_x_line_rec.line_id);
23704: oe_debug_pub.add('new blanket number : '||p_x_line_rec.blanket_number);
23705: oe_debug_pub.add('old blanket number : '||p_old_line_rec.blanket_number);
23706: oe_debug_pub.add('fulfilled flag : '||p_x_line_rec.fulfilled_flag);
23707: oe_debug_pub.add('operation : '||p_x_line_rec.operation);
23708: oe_debug_pub.add('split from line ID : '||p_x_line_rec.split_from_line_id);
23709: oe_debug_pub.add('split action code : '||p_x_line_rec.split_action_code);
23702: if l_debug_level > 0 then
23703: oe_debug_pub.add('line id : '||p_x_line_rec.line_id);
23704: oe_debug_pub.add('new blanket number : '||p_x_line_rec.blanket_number);
23705: oe_debug_pub.add('old blanket number : '||p_old_line_rec.blanket_number);
23706: oe_debug_pub.add('fulfilled flag : '||p_x_line_rec.fulfilled_flag);
23707: oe_debug_pub.add('operation : '||p_x_line_rec.operation);
23708: oe_debug_pub.add('split from line ID : '||p_x_line_rec.split_from_line_id);
23709: oe_debug_pub.add('split action code : '||p_x_line_rec.split_action_code);
23710: oe_debug_pub.add('split by : '||p_x_line_rec.split_by);
23703: oe_debug_pub.add('line id : '||p_x_line_rec.line_id);
23704: oe_debug_pub.add('new blanket number : '||p_x_line_rec.blanket_number);
23705: oe_debug_pub.add('old blanket number : '||p_old_line_rec.blanket_number);
23706: oe_debug_pub.add('fulfilled flag : '||p_x_line_rec.fulfilled_flag);
23707: oe_debug_pub.add('operation : '||p_x_line_rec.operation);
23708: oe_debug_pub.add('split from line ID : '||p_x_line_rec.split_from_line_id);
23709: oe_debug_pub.add('split action code : '||p_x_line_rec.split_action_code);
23710: oe_debug_pub.add('split by : '||p_x_line_rec.split_by);
23711: end if;
23704: oe_debug_pub.add('new blanket number : '||p_x_line_rec.blanket_number);
23705: oe_debug_pub.add('old blanket number : '||p_old_line_rec.blanket_number);
23706: oe_debug_pub.add('fulfilled flag : '||p_x_line_rec.fulfilled_flag);
23707: oe_debug_pub.add('operation : '||p_x_line_rec.operation);
23708: oe_debug_pub.add('split from line ID : '||p_x_line_rec.split_from_line_id);
23709: oe_debug_pub.add('split action code : '||p_x_line_rec.split_action_code);
23710: oe_debug_pub.add('split by : '||p_x_line_rec.split_by);
23711: end if;
23712:
23705: oe_debug_pub.add('old blanket number : '||p_old_line_rec.blanket_number);
23706: oe_debug_pub.add('fulfilled flag : '||p_x_line_rec.fulfilled_flag);
23707: oe_debug_pub.add('operation : '||p_x_line_rec.operation);
23708: oe_debug_pub.add('split from line ID : '||p_x_line_rec.split_from_line_id);
23709: oe_debug_pub.add('split action code : '||p_x_line_rec.split_action_code);
23710: oe_debug_pub.add('split by : '||p_x_line_rec.split_by);
23711: end if;
23712:
23713: -- BUG 2746595, send currency code as request_unique_key1 parameter to
23706: oe_debug_pub.add('fulfilled flag : '||p_x_line_rec.fulfilled_flag);
23707: oe_debug_pub.add('operation : '||p_x_line_rec.operation);
23708: oe_debug_pub.add('split from line ID : '||p_x_line_rec.split_from_line_id);
23709: oe_debug_pub.add('split action code : '||p_x_line_rec.split_action_code);
23710: oe_debug_pub.add('split by : '||p_x_line_rec.split_by);
23711: end if;
23712:
23713: -- BUG 2746595, send currency code as request_unique_key1 parameter to
23714: -- process release request. This is required as 2 distinct requests need to
23777: )
23778: THEN
23779:
23780: if l_debug_level > 0 then
23781: oe_debug_pub.add('log blanket requests for complete neg');
23782: end if;
23783:
23784: OE_Order_Cache.Load_Order_Header(p_x_line_rec.header_id);
23785:
23937: EXCEPTION
23938: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
23939: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
23940: WHEN OTHERS THEN
23941: oe_debug_pub.add('Others error in Log_Blanket_Request');
23942: oe_debug_pub.add('Error :'||substr(sqlerrm,1,200));
23943: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
23944: THEN
23945: OE_MSG_PUB.Add_Exc_Msg
23938: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
23939: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
23940: WHEN OTHERS THEN
23941: oe_debug_pub.add('Others error in Log_Blanket_Request');
23942: oe_debug_pub.add('Error :'||substr(sqlerrm,1,200));
23943: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
23944: THEN
23945: OE_MSG_PUB.Add_Exc_Msg
23946: ( G_PKG_NAME ,
23992: up_f oe_price_adjustments.updated_flag%TYPE;
23993: row_count NUMBER;
23994:
23995: BEGIN
23996: oe_debug_pub.ADD('Entering OE_LINE_UTIL.UPDATE_ADJUSTMENT_FLAGS',1);
23997:
23998: IF p_old_line_rec.inventory_item_id IS NULL THEN
23999: --new item, dont need to do anything
24000: oe_debug_pub.ADD('New Item, dont have to do anything',1);
23996: oe_debug_pub.ADD('Entering OE_LINE_UTIL.UPDATE_ADJUSTMENT_FLAGS',1);
23997:
23998: IF p_old_line_rec.inventory_item_id IS NULL THEN
23999: --new item, dont need to do anything
24000: oe_debug_pub.ADD('New Item, dont have to do anything',1);
24001: oe_debug_pub.ADD('Exiting OE_LINE_UTIL.UPDATE_ADJUSTMENT_FLAGS',1);
24002: RETURN;
24003: END IF;
24004:
23997:
23998: IF p_old_line_rec.inventory_item_id IS NULL THEN
23999: --new item, dont need to do anything
24000: oe_debug_pub.ADD('New Item, dont have to do anything',1);
24001: oe_debug_pub.ADD('Exiting OE_LINE_UTIL.UPDATE_ADJUSTMENT_FLAGS',1);
24002: RETURN;
24003: END IF;
24004:
24005: --deleting the IUE adjustment
24005: --deleting the IUE adjustment
24006: /* DELETE FROM oe_price_adjustments
24007: where line_id=p_old_line_rec.line_id AND list_line_type_code='IUE';*/
24008:
24009: oe_debug_pub.ADD('trying to delete IUE adjustments...',1);
24010: OPEN c2;
24011: FETCH c2 INTO iue_adj_id;
24012: IF c2%found THEN
24013: oe_line_adj_util.delete_row(p_price_adjustment_id=>iue_adj_id);
24010: OPEN c2;
24011: FETCH c2 INTO iue_adj_id;
24012: IF c2%found THEN
24013: oe_line_adj_util.delete_row(p_price_adjustment_id=>iue_adj_id);
24014: oe_debug_pub.ADD('deleted IUE association:'||SQL%rowcount||' row(s)',1);
24015: oe_debug_pub.ADD('looking for item parent lines...',1);
24016: END IF;
24017: CLOSE c2;
24018:
24011: FETCH c2 INTO iue_adj_id;
24012: IF c2%found THEN
24013: oe_line_adj_util.delete_row(p_price_adjustment_id=>iue_adj_id);
24014: oe_debug_pub.ADD('deleted IUE association:'||SQL%rowcount||' row(s)',1);
24015: oe_debug_pub.ADD('looking for item parent lines...',1);
24016: END IF;
24017: CLOSE c2;
24018:
24019:
24023: --loop through all the parents
24024: FETCH c1 INTO child_adj_id, parent_adj_id,child_line_id;
24025: EXIT WHEN c1%notfound;
24026:
24027: oe_debug_pub.ADD('found parent line:'||parent_adj_id||' for child line:'||child_adj_id,1);
24028:
24029: --delete the adjustment if this is the child line.
24030: IF child_line_id=p_old_line_rec.line_id then
24031: oe_debug_pub.ADD('trying to delete adjustments for line_id:'||p_old_line_rec.line_id,1);
24027: oe_debug_pub.ADD('found parent line:'||parent_adj_id||' for child line:'||child_adj_id,1);
24028:
24029: --delete the adjustment if this is the child line.
24030: IF child_line_id=p_old_line_rec.line_id then
24031: oe_debug_pub.ADD('trying to delete adjustments for line_id:'||p_old_line_rec.line_id,1);
24032: oe_line_adj_util.delete_row(p_line_id=>p_old_line_rec.line_id);
24033: oe_debug_pub.ADD('child adj id '||child_adj_id,1);
24034: OE_Line_Adj_Assocs_Util.delete_row(
24035: p_price_adjustment_id=>child_adj_id);
24029: --delete the adjustment if this is the child line.
24030: IF child_line_id=p_old_line_rec.line_id then
24031: oe_debug_pub.ADD('trying to delete adjustments for line_id:'||p_old_line_rec.line_id,1);
24032: oe_line_adj_util.delete_row(p_line_id=>p_old_line_rec.line_id);
24033: oe_debug_pub.ADD('child adj id '||child_adj_id,1);
24034: OE_Line_Adj_Assocs_Util.delete_row(
24035: p_price_adjustment_id=>child_adj_id);
24036: END IF;
24037:
24040: SELECT COUNT(*) INTO row_count
24041: FROM oe_price_adj_assocs opaa,oe_price_adjustments opa
24042: WHERE opaa.price_adjustment_id=parent_adj_id
24043: AND opaa.rltd_price_adj_id=opa.price_adjustment_id;
24044: oe_debug_pub.ADD('total '||row_count||' free child record(s)',1);
24045:
24046: IF row_count>0 THEN
24047: --not the only free item, this adjustment is applied _and_ updated = 'Y'
24048: UPDATE oe_price_adjustments
24047: --not the only free item, this adjustment is applied _and_ updated = 'Y'
24048: UPDATE oe_price_adjustments
24049: SET applied_flag='Y',updated_flag='Y'
24050: WHERE price_adjustment_id=parent_adj_id;
24051: oe_debug_pub.ADD('updated parent adjustment: applied_flag=Y,updated_flag=Y:'||SQL%rowcount||' row(s)',1);
24052: UPDATE oe_price_adjustments
24053: SET updated_flag = 'Y' where price_adjustment_id in
24054: (select rltd_price_adj_id from oe_price_adj_assocs
24055: where price_adjustment_id = parent_adj_id);
24057: --the last (or only) free item, make parent adjustment applied='N'
24058: UPDATE oe_price_adjustments
24059: SET applied_flag='N',updated_flag='Y'
24060: WHERE price_adjustment_id=parent_adj_id;
24061: oe_debug_pub.ADD('updated parent adjustment: applied_flag=N,updated_flag=Y:'||SQL%rowcount||' rows',1);
24062: END IF;
24063: SELECT applied_flag,updated_flag INTO app_f,up_f
24064: FROM oe_price_adjustments
24065: WHERE price_adjustment_id=parent_adj_id;
24062: END IF;
24063: SELECT applied_flag,updated_flag INTO app_f,up_f
24064: FROM oe_price_adjustments
24065: WHERE price_adjustment_id=parent_adj_id;
24066: oe_debug_pub.ADD('price_adjustment_id:'||parent_adj_id||' applied_flag='||app_f||' updated_flag='||up_f,1);
24067:
24068:
24069: END LOOP;
24070: CLOSE c1;
24067:
24068:
24069: END LOOP;
24070: CLOSE c1;
24071: oe_debug_pub.ADD('...done looking for item parent lines',1);
24072: oe_debug_pub.ADD('Exiting OE_LINE_UTIL.UPDATE_ADJUSTMENT_FLAGS',1);
24073: RETURN;
24074:
24075: END update_adjustment_flags;
24068:
24069: END LOOP;
24070: CLOSE c1;
24071: oe_debug_pub.ADD('...done looking for item parent lines',1);
24072: oe_debug_pub.ADD('Exiting OE_LINE_UTIL.UPDATE_ADJUSTMENT_FLAGS',1);
24073: RETURN;
24074:
24075: END update_adjustment_flags;
24076:
24144: , p_old_line_rec IN OE_Order_PUB.Line_Rec_Type
24145: )
24146: IS
24147: l_return_status VARCHAR2(30);
24148: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
24149: l_operation VARCHAR2(30) := p_x_line_rec.operation;
24150: l_count NUMBER;
24151: l_ref_data_elem_changed VARCHAR2(1) := 'N';
24152: l_cust_po_attr_change BOOLEAN := FALSE ;
24155: l_ref_data_only boolean:=FALSE;
24156: BEGIN
24157:
24158: IF l_debug_level > 0 THEN
24159: OE_DEBUG_PUB.Add('Entering Log_Dropship_CMS_Request...', 2);
24160: END IF;
24161:
24162: SELECT count(*)
24163: INTO l_count
24166: AND header_id = p_x_line_rec.header_id;
24167:
24168: IF l_count = 0 THEN
24169: IF l_debug_level > 0 THEN
24170: OE_DEBUG_PUB.Add('No Records in Drop Ship Sources,Returning...', 2);
24171: END IF;
24172: RETURN;
24173: END IF;
24174:
24203: OR NOT OE_GLOBALS.EQUAL(p_x_line_rec.shipping_method_code
24204: ,p_old_line_rec.shipping_method_code) THEN
24205:
24206: IF l_debug_level > 0 THEN
24207: OE_DEBUG_PUB.Add('Change in Reference Data Elements...', 2);
24208: END IF;
24209:
24210: l_ref_data_elem_changed := 'Y';
24211: l_ref_data_only := true;
24220: OR NOT OE_GLOBALS.EQUAL(p_x_line_rec.customer_shipment_number
24221: ,p_old_line_rec.customer_shipment_number) THEN
24222: --{
24223: IF l_debug_level > 0 THEN
24224: OE_DEBUG_PUB.Add('Change in customer PO Reference Data Elements...', 2);
24225: END IF;
24226: l_ref_data_elem_changed := 'Y';
24227: l_cust_po_attr_change:=true;
24228: --}
24232: --{
24233: IF Nvl(p_x_line_rec.shipped_quantity,0)>0 THEN
24234: --{
24235: if l_debug_level > 0 then
24236: oe_debug_pub.add('Drop ship line is already received.So do not log CMS request', 1);
24237: l_log_cust_po_change:=FALSE;
24238: end if;
24239: --}
24240: ELSE
24254: AND INTERFACE_SOURCE_CODE='RCV'
24255: AND SOURCE_DOCUMENT_CODE='PO';
24256:
24257: if l_debug_level > 0 then
24258: oe_debug_pub.add('line has been received either fully or partially do not log request', 1);
24259: l_log_cust_po_change:=FALSE;
24260: end if;
24261:
24262: EXCEPTION
24261:
24262: EXCEPTION
24263: WHEN No_Data_Found THEN
24264: if l_debug_level > 0 then
24265: oe_debug_pub.add('line is not yet received can interface to PO', 1);
24266: end if;
24267: l_log_cust_po_change:=TRUE;
24268: END;
24269: --}
24277: FND_MESSAGE.Set_Name('ONT','ONT_DS_OPM_QTY_CHANGED');
24278: OE_MSG_PUB.Add;
24279:
24280: IF l_debug_level > 0 THEN
24281: OE_DEBUG_PUB.Add('Warning!! Secondary Qty Changed...', 2);
24282: END IF;
24283: END IF;
24284:
24285: IF NOT OE_GLOBALS.EQUAL(p_x_line_rec.ordered_quantity_uom2
24288: FND_MESSAGE.Set_Name('ONT','ONT_DS_OPM_UOM_CHANGED');
24289: OE_MSG_PUB.Add;
24290:
24291: IF l_debug_level > 0 THEN
24292: OE_DEBUG_PUB.Add('Warning!! Secondary Qty UOM Changed...', 2);
24293: END IF;
24294: END IF;
24295:
24296: IF NOT OE_GLOBALS.EQUAL(p_x_line_rec.preferred_grade
24299: FND_MESSAGE.Set_Name('ONT', 'ONT_DS_OPM_GRADE_CHANGED');
24300: OE_MSG_PUB.Add;
24301:
24302: IF l_debug_level > 0 THEN
24303: OE_DEBUG_PUB.Add('Warning!! OPM Grade Changed...', 2);
24304: END IF;
24305:
24306: END IF; */
24307:
24334: l_operation := 'CANCEL';
24335: END IF;
24336:
24337: IF l_debug_level > 0 THEN
24338: OE_DEBUG_PUB.Add('-----Logging Dropship_CMS_Request----for Entity:'||
24339: p_x_line_rec.line_id, 2);
24340: END IF;
24341:
24342: OE_Delayed_Requests_Pvt.Log_Request
24370:
24371: END IF;
24372:
24373: IF l_debug_level > 0 THEN
24374: OE_DEBUG_PUB.Add('After Logging CMS_Request...'||l_return_status, 2);
24375: END IF;
24376:
24377: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
24378: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
24378: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
24379: END IF;
24380:
24381: IF l_debug_level > 0 THEN
24382: OE_DEBUG_PUB.Add('Exiting Log_Dropship_CMS_Request...', 2);
24383: END IF;
24384:
24385:
24386: EXCEPTION
24386: EXCEPTION
24387:
24388: WHEN FND_API.G_EXC_ERROR THEN
24389: IF l_debug_level > 0 THEN
24390: OE_DEBUG_PUB.Add('Execution Error in Log_Dropship_CMS_Request', 2);
24391: END IF;
24392: RAISE FND_API.G_EXC_ERROR;
24393:
24394: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
24392: RAISE FND_API.G_EXC_ERROR;
24393:
24394: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
24395: IF l_debug_level > 0 THEN
24396: OE_DEBUG_PUB.Add('Unexpected Error in Log_Dropship_CMS_Request'||
24397: sqlerrm, 1);
24398: END IF;
24399: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
24400:
24422: l_open_rfr_lines NUMBER;
24423: l_activity_status_code VARCHAR2(30);
24424: l_result_out VARCHAR2(30);
24425: l_return_status VARCHAR2(30);
24426: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
24427:
24428: BEGIN
24429: IF l_debug_level > 0 THEN
24430: oe_debug_pub.add('Entering HANDLE_RFR ... ', 1);
24426: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
24427:
24428: BEGIN
24429: IF l_debug_level > 0 THEN
24430: oe_debug_pub.add('Entering HANDLE_RFR ... ', 1);
24431: oe_debug_pub.add(' with p_line_id '|| p_line_id , 1);
24432: oe_debug_pub.add(' with p_top_model_line_id '|| p_top_model_line_id , 1);
24433: oe_debug_pub.add(' with p_link_to_line_id '|| p_link_to_line_id , 1);
24434: END IF;
24427:
24428: BEGIN
24429: IF l_debug_level > 0 THEN
24430: oe_debug_pub.add('Entering HANDLE_RFR ... ', 1);
24431: oe_debug_pub.add(' with p_line_id '|| p_line_id , 1);
24432: oe_debug_pub.add(' with p_top_model_line_id '|| p_top_model_line_id , 1);
24433: oe_debug_pub.add(' with p_link_to_line_id '|| p_link_to_line_id , 1);
24434: END IF;
24435:
24428: BEGIN
24429: IF l_debug_level > 0 THEN
24430: oe_debug_pub.add('Entering HANDLE_RFR ... ', 1);
24431: oe_debug_pub.add(' with p_line_id '|| p_line_id , 1);
24432: oe_debug_pub.add(' with p_top_model_line_id '|| p_top_model_line_id , 1);
24433: oe_debug_pub.add(' with p_link_to_line_id '|| p_link_to_line_id , 1);
24434: END IF;
24435:
24436: SELECT nvl(bic.required_for_revenue, 0)
24429: IF l_debug_level > 0 THEN
24430: oe_debug_pub.add('Entering HANDLE_RFR ... ', 1);
24431: oe_debug_pub.add(' with p_line_id '|| p_line_id , 1);
24432: oe_debug_pub.add(' with p_top_model_line_id '|| p_top_model_line_id , 1);
24433: oe_debug_pub.add(' with p_link_to_line_id '|| p_link_to_line_id , 1);
24434: END IF;
24435:
24436: SELECT nvl(bic.required_for_revenue, 0)
24437: INTO l_is_rfr
24443: AND bic.component_item_id = Line.inventory_item_id;
24444:
24445: IF l_is_rfr = 1 THEN
24446: IF l_debug_level > 0 THEN
24447: oe_debug_pub.add('Component being cancelled is marked as RFR, checking if any other RFR Lines are open', 5);
24448: END IF;
24449:
24450: SELECT count(1)
24451: INTO l_open_rfr_lines
24461:
24462: IF l_open_rfr_lines = 0 THEN
24463:
24464: IF l_debug_level > 0 THEN
24465: oe_debug_pub.add('No more pending RFR lines under current parent, checking status of Parent Line', 5);
24466: END IF;
24467:
24468: BEGIN
24469: SELECT ACTIVITY_STATUS
24479:
24480: EXCEPTION
24481: WHEN OTHERS THEN
24482: l_activity_status_code := null;
24483: oe_debug_pub.add(' in exception block - '||SQLERRM, 5);
24484: END;
24485:
24486: IF l_activity_status_code = 'NOTIFIED' THEN
24487: IF l_debug_level > 0 THEN
24484: END;
24485:
24486: IF l_activity_status_code = 'NOTIFIED' THEN
24487: IF l_debug_level > 0 THEN
24488: oe_debug_pub.add('Parent Line waiting to be invoiced, calling API to Invoice Parent ', 5);
24489: END IF;
24490:
24491: OE_Invoice_PUB.Interface_Line( p_link_to_line_id
24492: ,OE_GLOBALS.G_WFI_LIN
24493: ,l_result_out
24494: ,l_return_status);
24495:
24496: IF l_debug_level > 0 THEN
24497: oe_debug_pub.add( ' after call to invoice api: l_result_out: '||l_result_out ) ;
24498: oe_debug_pub.add( ' after call to invoice api: l_return_status: '|| l_return_status ) ;
24499: END IF;
24500:
24501: /*
24494: ,l_return_status);
24495:
24496: IF l_debug_level > 0 THEN
24497: oe_debug_pub.add( ' after call to invoice api: l_result_out: '||l_result_out ) ;
24498: oe_debug_pub.add( ' after call to invoice api: l_return_status: '|| l_return_status ) ;
24499: END IF;
24500:
24501: /*
24502: Need to check only l_return_status. If SUCCESS, do COMPLETE with default transition
24502: Need to check only l_return_status. If SUCCESS, do COMPLETE with default transition
24503: */
24504: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
24505: IF l_debug_level > 0 THEN
24506: oe_debug_pub.add( 'Updating Line Flow Status and pushing WF ');
24507: END IF;
24508: Update oe_order_lines
24509: Set flow_status_code = 'INVOICED'
24510: Where line_id = p_link_to_line_id;
24512: BEGIN
24513: WF_ENGINE.CompleteActivityInternalName(OE_GLOBALS.G_WFI_LIN, p_link_to_line_id, 'INVOICING_WAIT_FOR_RFR', null);
24514: EXCEPTION
24515: WHEN OTHERS THEN
24516: oe_debug_pub.add(' Error in completing activity; SQL Message - '||SQLERRM, 5);
24517: END;
24518: ELSE
24519: oe_debug_pub.add(' l_return_status is not equal to Success, do nothing ', 5);
24520: END IF; --checking l_return_status
24515: WHEN OTHERS THEN
24516: oe_debug_pub.add(' Error in completing activity; SQL Message - '||SQLERRM, 5);
24517: END;
24518: ELSE
24519: oe_debug_pub.add(' l_return_status is not equal to Success, do nothing ', 5);
24520: END IF; --checking l_return_status
24521:
24522: ELSE
24523: IF l_debug_level > 0 THEN
24520: END IF; --checking l_return_status
24521:
24522: ELSE
24523: IF l_debug_level > 0 THEN
24524: oe_debug_pub.add('Parent Line is not waiting to be Invoiced, do nothing', 5);
24525: END IF;
24526: END IF; -- activity_status=NOTIFIED
24527: ELSE
24528: IF l_debug_level > 0 THEN
24525: END IF;
24526: END IF; -- activity_status=NOTIFIED
24527: ELSE
24528: IF l_debug_level > 0 THEN
24529: oe_debug_pub.add('Other RFR lines are still open, no need to Invoice Parent Line', 5);
24530: END IF;
24531: END IF; -- IF l_open_rfr_lines ...
24532: ELSE
24533: IF l_debug_level > 0 THEN
24530: END IF;
24531: END IF; -- IF l_open_rfr_lines ...
24532: ELSE
24533: IF l_debug_level > 0 THEN
24534: oe_debug_pub.add('Current line being cancelled is not RFR', 5);
24535: END IF;
24536: END IF; -- IF l_is_rfr ...
24537:
24538:
24536: END IF; -- IF l_is_rfr ...
24537:
24538:
24539: IF l_debug_level > 0 THEN
24540: oe_debug_pub.add('Exiting HANDLE_RFR ...', 1);
24541: END IF;
24542:
24543: END HANDLE_RFR;
24544:
24568: x_deliver_to_contact_id NUMBER;
24569:
24570: l_index NUMBER;
24571: l_sold_to_org_id NUMBER;
24572: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
24573: BEGIN
24574:
24575: x_return_status := FND_API.G_RET_STS_SUCCESS;
24576:
24574:
24575: x_return_status := FND_API.G_RET_STS_SUCCESS;
24576:
24577: IF l_debug_level >0 then
24578: oe_debug_pub.add('Entering OE_LINE_UTIL.Get_customer_info_ids :'||p_line_customer_info_tbl.count);
24579: End IF;
24580:
24581: IF p_line_customer_info_tbl.count = 0 THEN
24582: x_return_status := FND_API.G_RET_STS_SUCCESS;
24703: p_x_line_tbl(l_index).invoice_to_contact_id := x_invoice_to_contact_id;
24704: p_x_line_tbl(l_index).deliver_to_contact_id := x_deliver_to_contact_id;
24705:
24706: IF l_debug_level > 0 THEN
24707: oe_debug_pub.add('p_x_line_tbl('||l_index||').sold_to_org_id :'||p_x_line_tbl(l_index).sold_to_org_id);
24708: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_customer_id :'||p_x_line_tbl(l_index).ship_to_customer_id);
24709: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_customer_id :'||p_x_line_tbl(l_index).invoice_to_customer_id);
24710: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_customer_id :'||p_x_line_tbl(l_index).deliver_to_customer_id);
24711:
24704: p_x_line_tbl(l_index).deliver_to_contact_id := x_deliver_to_contact_id;
24705:
24706: IF l_debug_level > 0 THEN
24707: oe_debug_pub.add('p_x_line_tbl('||l_index||').sold_to_org_id :'||p_x_line_tbl(l_index).sold_to_org_id);
24708: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_customer_id :'||p_x_line_tbl(l_index).ship_to_customer_id);
24709: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_customer_id :'||p_x_line_tbl(l_index).invoice_to_customer_id);
24710: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_customer_id :'||p_x_line_tbl(l_index).deliver_to_customer_id);
24711:
24712: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_org_id :'||p_x_line_tbl(l_index).ship_to_org_id);
24705:
24706: IF l_debug_level > 0 THEN
24707: oe_debug_pub.add('p_x_line_tbl('||l_index||').sold_to_org_id :'||p_x_line_tbl(l_index).sold_to_org_id);
24708: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_customer_id :'||p_x_line_tbl(l_index).ship_to_customer_id);
24709: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_customer_id :'||p_x_line_tbl(l_index).invoice_to_customer_id);
24710: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_customer_id :'||p_x_line_tbl(l_index).deliver_to_customer_id);
24711:
24712: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_org_id :'||p_x_line_tbl(l_index).ship_to_org_id);
24713: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_org_id :'||p_x_line_tbl(l_index).invoice_to_org_id);
24706: IF l_debug_level > 0 THEN
24707: oe_debug_pub.add('p_x_line_tbl('||l_index||').sold_to_org_id :'||p_x_line_tbl(l_index).sold_to_org_id);
24708: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_customer_id :'||p_x_line_tbl(l_index).ship_to_customer_id);
24709: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_customer_id :'||p_x_line_tbl(l_index).invoice_to_customer_id);
24710: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_customer_id :'||p_x_line_tbl(l_index).deliver_to_customer_id);
24711:
24712: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_org_id :'||p_x_line_tbl(l_index).ship_to_org_id);
24713: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_org_id :'||p_x_line_tbl(l_index).invoice_to_org_id);
24714: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_org_id :'||p_x_line_tbl(l_index).deliver_to_org_id);
24708: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_customer_id :'||p_x_line_tbl(l_index).ship_to_customer_id);
24709: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_customer_id :'||p_x_line_tbl(l_index).invoice_to_customer_id);
24710: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_customer_id :'||p_x_line_tbl(l_index).deliver_to_customer_id);
24711:
24712: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_org_id :'||p_x_line_tbl(l_index).ship_to_org_id);
24713: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_org_id :'||p_x_line_tbl(l_index).invoice_to_org_id);
24714: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_org_id :'||p_x_line_tbl(l_index).deliver_to_org_id);
24715:
24716: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_contact_id :'||p_x_line_tbl(l_index).ship_to_contact_id);
24709: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_customer_id :'||p_x_line_tbl(l_index).invoice_to_customer_id);
24710: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_customer_id :'||p_x_line_tbl(l_index).deliver_to_customer_id);
24711:
24712: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_org_id :'||p_x_line_tbl(l_index).ship_to_org_id);
24713: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_org_id :'||p_x_line_tbl(l_index).invoice_to_org_id);
24714: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_org_id :'||p_x_line_tbl(l_index).deliver_to_org_id);
24715:
24716: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_contact_id :'||p_x_line_tbl(l_index).ship_to_contact_id);
24717: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_contact_id :'||p_x_line_tbl(l_index).invoice_to_contact_id);
24710: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_customer_id :'||p_x_line_tbl(l_index).deliver_to_customer_id);
24711:
24712: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_org_id :'||p_x_line_tbl(l_index).ship_to_org_id);
24713: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_org_id :'||p_x_line_tbl(l_index).invoice_to_org_id);
24714: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_org_id :'||p_x_line_tbl(l_index).deliver_to_org_id);
24715:
24716: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_contact_id :'||p_x_line_tbl(l_index).ship_to_contact_id);
24717: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_contact_id :'||p_x_line_tbl(l_index).invoice_to_contact_id);
24718: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_contact_id :'||p_x_line_tbl(l_index).deliver_to_contact_id);
24712: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_org_id :'||p_x_line_tbl(l_index).ship_to_org_id);
24713: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_org_id :'||p_x_line_tbl(l_index).invoice_to_org_id);
24714: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_org_id :'||p_x_line_tbl(l_index).deliver_to_org_id);
24715:
24716: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_contact_id :'||p_x_line_tbl(l_index).ship_to_contact_id);
24717: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_contact_id :'||p_x_line_tbl(l_index).invoice_to_contact_id);
24718: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_contact_id :'||p_x_line_tbl(l_index).deliver_to_contact_id);
24719:
24720: END IF;
24713: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_org_id :'||p_x_line_tbl(l_index).invoice_to_org_id);
24714: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_org_id :'||p_x_line_tbl(l_index).deliver_to_org_id);
24715:
24716: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_contact_id :'||p_x_line_tbl(l_index).ship_to_contact_id);
24717: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_contact_id :'||p_x_line_tbl(l_index).invoice_to_contact_id);
24718: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_contact_id :'||p_x_line_tbl(l_index).deliver_to_contact_id);
24719:
24720: END IF;
24721:
24714: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_org_id :'||p_x_line_tbl(l_index).deliver_to_org_id);
24715:
24716: oe_debug_pub.add('p_x_line_tbl('||l_index||').ship_to_contact_id :'||p_x_line_tbl(l_index).ship_to_contact_id);
24717: oe_debug_pub.add('p_x_line_tbl('||l_index||').invoice_to_contact_id :'||p_x_line_tbl(l_index).invoice_to_contact_id);
24718: oe_debug_pub.add('p_x_line_tbl('||l_index||').deliver_to_contact_id :'||p_x_line_tbl(l_index).deliver_to_contact_id);
24719:
24720: END IF;
24721:
24722:
24733:
24734: OE_CUSTOMER_INFO_PVT.G_SOLD_TO_CUSTOMER_ID := NULL;
24735:
24736: IF l_debug_level >0 then
24737: oe_debug_pub.add('Entering OE_LINE_UTIL.Get_customer_info_ids :'||p_line_customer_info_tbl.count);
24738: End IF;
24739:
24740:
24741:
24785: ---------------------------------------------*/
24786: Function Is_Subscription_Service_Line (p_line_id IN NUMBER)
24787: RETURN BOOLEAN
24788: IS
24789: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
24790: l_subscription_enable_flag varchar2(10) := '';
24791: BEGIN
24792: If l_debug_level > 0 THEN
24793: oe_debug_pub.add('Entering Is_Subscription_Service_Line p_line_id = '||p_line_id);
24789: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
24790: l_subscription_enable_flag varchar2(10) := '';
24791: BEGIN
24792: If l_debug_level > 0 THEN
24793: oe_debug_pub.add('Entering Is_Subscription_Service_Line p_line_id = '||p_line_id);
24794: End If;
24795: select subscription_enable_flag
24796: into l_subscription_enable_flag
24797: from oe_order_lines_all
24798: where line_id = p_line_id;
24799: If NVL(l_subscription_enable_flag,'N') = 'Y' THEN
24800: -- Subscription Servcie Line
24801: If l_debug_level > 0 THEN
24802: oe_debug_pub.add('.. Is_Subscription_Service_Line TRUE ..',5);
24803: End If;
24804: RETURN TRUE;
24805: Else
24806: -- Not Subscription Service
24804: RETURN TRUE;
24805: Else
24806: -- Not Subscription Service
24807: If l_debug_level > 0 THEN
24808: oe_debug_pub.add('.. Is_Subscription_Service_Line FALSE ..',5);
24809: End If;
24810: RETURN FALSE;
24811: End If;
24812: EXCEPTION
24810: RETURN FALSE;
24811: End If;
24812: EXCEPTION
24813: WHEN NO_DATA_FOUND THEN
24814: oe_debug_pub.ADD('In NO DATA FOUND of Is_Subscription_Service_Line',1);
24815: RETURN FALSE;
24816: END Is_Subscription_Service_Line;
24817: -- sol_ord_er #16014165 end
24818:
24842: AND l.line_id = p_line_id AND prg.price_adjustment_id = a.price_adjustment_id
24843: AND prg.list_line_type_code = 'PRG'
24844: AND ROWNUM <2;
24845:
24846: oe_debug_pub.ADD('price_adjustment id of the original prg line '||l_orig_pr_adjustment_id,1);
24847: oe_debug_pub.ADD('rltd price_adjustment id of the original prg line '||l_or_rltd_padj_id,1);
24848: oe_debug_pub.ADD('list line id of the original prg line '||l_prg_list_line_id,1);
24849: oe_debug_pub.ADD('list line id of the assoc list line '||l_assoc_list_line_id,1);
24850:
24843: AND prg.list_line_type_code = 'PRG'
24844: AND ROWNUM <2;
24845:
24846: oe_debug_pub.ADD('price_adjustment id of the original prg line '||l_orig_pr_adjustment_id,1);
24847: oe_debug_pub.ADD('rltd price_adjustment id of the original prg line '||l_or_rltd_padj_id,1);
24848: oe_debug_pub.ADD('list line id of the original prg line '||l_prg_list_line_id,1);
24849: oe_debug_pub.ADD('list line id of the assoc list line '||l_assoc_list_line_id,1);
24850:
24851: px_org_pr_adjustment_id := l_orig_pr_adjustment_id;
24844: AND ROWNUM <2;
24845:
24846: oe_debug_pub.ADD('price_adjustment id of the original prg line '||l_orig_pr_adjustment_id,1);
24847: oe_debug_pub.ADD('rltd price_adjustment id of the original prg line '||l_or_rltd_padj_id,1);
24848: oe_debug_pub.ADD('list line id of the original prg line '||l_prg_list_line_id,1);
24849: oe_debug_pub.ADD('list line id of the assoc list line '||l_assoc_list_line_id,1);
24850:
24851: px_org_pr_adjustment_id := l_orig_pr_adjustment_id;
24852: px_or_rltd_padj_id := l_or_rltd_padj_id;
24845:
24846: oe_debug_pub.ADD('price_adjustment id of the original prg line '||l_orig_pr_adjustment_id,1);
24847: oe_debug_pub.ADD('rltd price_adjustment id of the original prg line '||l_or_rltd_padj_id,1);
24848: oe_debug_pub.ADD('list line id of the original prg line '||l_prg_list_line_id,1);
24849: oe_debug_pub.ADD('list line id of the assoc list line '||l_assoc_list_line_id,1);
24850:
24851: px_org_pr_adjustment_id := l_orig_pr_adjustment_id;
24852: px_or_rltd_padj_id := l_or_rltd_padj_id;
24853: px_prg_list_line_id := l_prg_list_line_id;
24855:
24856: px_prg_exist := 'Y';
24857:
24858:
24859: oe_debug_pub.ADD('Dis is associated',1);
24860:
24861:
24862: EXCEPTION
24863: WHEN NO_DATA_FOUND THEN
24860:
24861:
24862: EXCEPTION
24863: WHEN NO_DATA_FOUND THEN
24864: oe_debug_pub.ADD('In NO DATA FOUND of copy_assoc',1);
24865: px_prg_exist := 'N';
24866:
24867: END copy_assoc;
24868: --bug 16317238 end