[Home] [Help]
236: > p_latest_acceptable_date)) THEN
237: IF l_debug_level > 0 THEN
238: oe_debug_pub.add( 'LAD VIOLATED ' , 1 ) ;
239: END IF;
240: Fnd_Message.set_name('ONT','ONT_SCH_LAD_VIOLATE');
241: Oe_Msg_Pub.Add;
242: END IF;
243: /* -- 3349770 this will be only validated when user enters manually.
244: ELSIF l_lad_flag = 'H' THEN
250: > p_latest_acceptable_date)) THEN
251: IF l_debug_level > 0 THEN
252: oe_debug_pub.add( 'SCHEDULE DATE EXCEEDS LAD ' , 1 ) ;
253: END IF;
254: Fnd_Message.set_name('ONT','ONT_SCH_LAD_SCH_FAILED');
255: Oe_Msg_Pub.Add;
256: RAISE FND_API.G_EXC_ERROR;
257: END IF;
258: */
890:
891: EXCEPTION
892: WHEN OTHERS THEN
893: x_return_status := FND_API.G_RET_STS_ERROR;
894: fnd_message.set_name('ONT', 'OE_INVALID_ITEM_WHSE');
895: OE_MSG_PUB.Add;
896: END;
897:
898: IF l_revision_code = 2
898: IF l_revision_code = 2
899: OR l_lot_code = 2
900: THEN
901: -- 2 == YES
902: FND_MESSAGE.SET_NAME('ONT', 'OE_SUBINV_NOT_ALLOWED');
903: OE_MSG_PUB.Add;
904: IF p_line_rec.Schedule_action_code = OESCH_ACT_RESERVE THEN
905: x_return_status := FND_API.G_RET_STS_ERROR;
906: RAISE FND_API.G_EXC_ERROR;
3862: IF l_debug_level > 0 THEN
3863: oe_debug_pub.add( 'MRP HAS RETURNED ANY DATA' , 1 ) ;
3864: END IF;
3865:
3866: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ATP_ERROR');
3867: OE_MSG_PUB.Add;
3868: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3869:
3870: END IF;
4014: oe_debug_pub.add( 'ERROR FROM MRP: ' || P_ATP_REC.ERROR_CODE ( J ) , 1 ) ;
4015: END IF;
4016: IF p_atp_rec.error_code(J) = 80 THEN
4017:
4018: FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_SOURCE');
4019: OE_MSG_PUB.Add;
4020:
4021: ELSE
4022:
4083: oe_debug_pub.add( 'ADDING MESSAGE TO THE STACK' , 1 ) ;
4084: END IF;
4085: -- 4558018
4086: IF p_atp_rec.Ship_Date(J) IS NOT NULL THEN
4087: FND_MESSAGE.SET_NAME('ONT','ONT_SCH_FAILED_WITH_DATE');
4088: FND_MESSAGE.SET_TOKEN('EXPLANATION',l_explanation);
4089: FND_MESSAGE.SET_TOKEN('NEXT_DATE',p_atp_rec.Ship_Date(J));
4090:
4091: ELSE
4084: END IF;
4085: -- 4558018
4086: IF p_atp_rec.Ship_Date(J) IS NOT NULL THEN
4087: FND_MESSAGE.SET_NAME('ONT','ONT_SCH_FAILED_WITH_DATE');
4088: FND_MESSAGE.SET_TOKEN('EXPLANATION',l_explanation);
4089: FND_MESSAGE.SET_TOKEN('NEXT_DATE',p_atp_rec.Ship_Date(J));
4090:
4091: ELSE
4092: FND_MESSAGE.SET_NAME('ONT','OE_SCH_OE_ORDER_FAILED');
4085: -- 4558018
4086: IF p_atp_rec.Ship_Date(J) IS NOT NULL THEN
4087: FND_MESSAGE.SET_NAME('ONT','ONT_SCH_FAILED_WITH_DATE');
4088: FND_MESSAGE.SET_TOKEN('EXPLANATION',l_explanation);
4089: FND_MESSAGE.SET_TOKEN('NEXT_DATE',p_atp_rec.Ship_Date(J));
4090:
4091: ELSE
4092: FND_MESSAGE.SET_NAME('ONT','OE_SCH_OE_ORDER_FAILED');
4093: FND_MESSAGE.SET_TOKEN('EXPLANATION',l_explanation);
4088: FND_MESSAGE.SET_TOKEN('EXPLANATION',l_explanation);
4089: FND_MESSAGE.SET_TOKEN('NEXT_DATE',p_atp_rec.Ship_Date(J));
4090:
4091: ELSE
4092: FND_MESSAGE.SET_NAME('ONT','OE_SCH_OE_ORDER_FAILED');
4093: FND_MESSAGE.SET_TOKEN('EXPLANATION',l_explanation);
4094: END IF;
4095: OE_MSG_PUB.Add;
4096: END IF;
4089: FND_MESSAGE.SET_TOKEN('NEXT_DATE',p_atp_rec.Ship_Date(J));
4090:
4091: ELSE
4092: FND_MESSAGE.SET_NAME('ONT','OE_SCH_OE_ORDER_FAILED');
4093: FND_MESSAGE.SET_TOKEN('EXPLANATION',l_explanation);
4094: END IF;
4095: OE_MSG_PUB.Add;
4096: END IF;
4097: END IF; -- 80
4337: IF l_debug_level > 0 THEN
4338: oe_debug_pub.add( 'NEW INVENTORY ITEM :' || P_ATP_REC.INVENTORY_ITEM_ID ( J ) , 1 ) ;
4339: END IF;
4340:
4341: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ITEM_CHANGE');
4342: FND_MESSAGE.SET_TOKEN('OLDITEM',p_x_line_rec.ordered_item);
4343: FND_MESSAGE.SET_TOKEN('NEWITEM', p_atp_rec.inventory_item_name(J));
4344: OE_MSG_PUB.Add;
4345:
4338: oe_debug_pub.add( 'NEW INVENTORY ITEM :' || P_ATP_REC.INVENTORY_ITEM_ID ( J ) , 1 ) ;
4339: END IF;
4340:
4341: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ITEM_CHANGE');
4342: FND_MESSAGE.SET_TOKEN('OLDITEM',p_x_line_rec.ordered_item);
4343: FND_MESSAGE.SET_TOKEN('NEWITEM', p_atp_rec.inventory_item_name(J));
4344: OE_MSG_PUB.Add;
4345:
4346: -- Added below call for ER 6110708
4339: END IF;
4340:
4341: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ITEM_CHANGE');
4342: FND_MESSAGE.SET_TOKEN('OLDITEM',p_x_line_rec.ordered_item);
4343: FND_MESSAGE.SET_TOKEN('NEWITEM', p_atp_rec.inventory_item_name(J));
4344: OE_MSG_PUB.Add;
4345:
4346: -- Added below call for ER 6110708
4347: IF nvl(p_x_line_rec.booked_flag, 'N') = 'Y' THEN
4514: p_x_line_rec.schedule_ship_date , 2 ) ;
4515: oe_debug_pub.add( 'SCH: Schedule Arr Date' ||
4516: p_x_line_rec.schedule_arrival_date , 2 ) ;
4517: END IF;
4518: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ATP_ERROR');
4519: OE_MSG_PUB.Add;
4520: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4521: END IF;
4522:
4551: oe_debug_pub.add( 'RSCH: ITEM HAS BEEN SUBSTITUTED' , 1 ) ;
4552: oe_debug_pub.add( 'RSCH NEW INVENTORY ITEM :' || P_ATP_REC.INVENTORY_ITEM_ID ( J ) , 1 ) ;
4553: END IF;
4554:
4555: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ITEM_CHANGE');
4556: FND_MESSAGE.SET_TOKEN('OLDITEM',p_x_line_rec.ordered_item);
4557: FND_MESSAGE.SET_TOKEN('NEWITEM', p_atp_rec.inventory_item_name(J));
4558: OE_MSG_PUB.Add;
4559:
4552: oe_debug_pub.add( 'RSCH NEW INVENTORY ITEM :' || P_ATP_REC.INVENTORY_ITEM_ID ( J ) , 1 ) ;
4553: END IF;
4554:
4555: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ITEM_CHANGE');
4556: FND_MESSAGE.SET_TOKEN('OLDITEM',p_x_line_rec.ordered_item);
4557: FND_MESSAGE.SET_TOKEN('NEWITEM', p_atp_rec.inventory_item_name(J));
4558: OE_MSG_PUB.Add;
4559:
4560: -- Added below call for ER 6110708
4553: END IF;
4554:
4555: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ITEM_CHANGE');
4556: FND_MESSAGE.SET_TOKEN('OLDITEM',p_x_line_rec.ordered_item);
4557: FND_MESSAGE.SET_TOKEN('NEWITEM', p_atp_rec.inventory_item_name(J));
4558: OE_MSG_PUB.Add;
4559:
4560: -- Added below call for ER 6110708
4561: IF nvl(p_x_line_rec.booked_flag, 'N') = 'Y' THEN
4755:
4756: IF l_debug_level > 0 THEN
4757: oe_debug_pub.add( 'RSCH: MRP HAS NOT RETURNING VALID DATE' , 2 ) ;
4758: END IF;
4759: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ATP_ERROR');
4760: OE_MSG_PUB.Add;
4761: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4762: END IF;
4763:
5163: oe_debug_pub.add( 'Before setting message for: ' || P_ATP_REC.ERROR_CODE(J) , 2 ) ;
5164: END IF;
5165:
5166: l_old_set_id := l_new_set_id;
5167: FND_MESSAGE.SET_NAME('ONT','OE_SCH_GROUP_MEMBER_FAILED');
5168: OE_MSG_PUB.Add;
5169:
5170:
5171: END IF;
5404: ,p_source_document_type_id => l_source_document_type_id);
5405:
5406: IF p_atp_rec.error_code(J) = 80 THEN
5407:
5408: FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_SOURCE');
5409: OE_MSG_PUB.Add;
5410: l_explanation := null;
5411:
5412: ELSIF p_atp_rec.error_code(J) <> 0 THEN
5419:
5420: IF l_debug_level > 0 THEN
5421: oe_debug_pub.add( 'ADDING MESSAGE TO THE STACK' , 1 ) ;
5422: END IF;
5423: FND_MESSAGE.SET_NAME('ONT','OE_SCH_OE_ORDER_FAILED');
5424: FND_MESSAGE.SET_TOKEN('EXPLANATION',l_explanation);
5425: OE_MSG_PUB.Add;
5426:
5427: ELSE
5420: IF l_debug_level > 0 THEN
5421: oe_debug_pub.add( 'ADDING MESSAGE TO THE STACK' , 1 ) ;
5422: END IF;
5423: FND_MESSAGE.SET_NAME('ONT','OE_SCH_OE_ORDER_FAILED');
5424: FND_MESSAGE.SET_TOKEN('EXPLANATION',l_explanation);
5425: OE_MSG_PUB.Add;
5426:
5427: ELSE
5428:
5425: OE_MSG_PUB.Add;
5426:
5427: ELSE
5428:
5429: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ATP_ERROR');
5430: OE_MSG_PUB.Add;
5431: END IF;
5432:
5433:
5447: oe_debug_pub.add( 'Before setting message for: ' || P_ATP_REC.ERROR_CODE ( J ) , 2 ) ;
5448: END IF;
5449:
5450: l_old_set_id := l_new_set_id;
5451: FND_MESSAGE.SET_NAME('ONT','OE_SCH_GROUP_MEMBER_FAILED');
5452: OE_MSG_PUB.Add;
5453:
5454: ELSIF p_atp_rec.error_code(J) <> 0
5455: AND p_atp_rec.error_code(J) <> 19 THEN
5474: ,p_source_document_line_id => p_line_tbl(I).source_document_line_id);
5475:
5476: IF p_atp_rec.error_code(J) = 80 THEN
5477:
5478: FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_SOURCE');
5479: OE_MSG_PUB.Add;
5480: l_explanation := null;
5481:
5482: ELSE
5488:
5489: IF l_debug_level > 0 THEN
5490: oe_debug_pub.add( 'ADDING MESSAGE TO THE STACK' , 1 ) ;
5491: END IF;
5492: FND_MESSAGE.SET_NAME('ONT','OE_SCH_OE_ORDER_FAILED');
5493: FND_MESSAGE.SET_TOKEN('EXPLANATION',l_explanation);
5494: OE_MSG_PUB.Add;
5495:
5496:
5489: IF l_debug_level > 0 THEN
5490: oe_debug_pub.add( 'ADDING MESSAGE TO THE STACK' , 1 ) ;
5491: END IF;
5492: FND_MESSAGE.SET_NAME('ONT','OE_SCH_OE_ORDER_FAILED');
5493: FND_MESSAGE.SET_TOKEN('EXPLANATION',l_explanation);
5494: OE_MSG_PUB.Add;
5495:
5496:
5497: END IF;
5807: , x_msg_data => l_msg_data);
5808:
5809: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
5810: THEN
5811: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
5812: FND_MESSAGE.SET_TOKEN('BY_PROC',
5813: 'GMI_Reservation_Util.Get_OPM_item_from_Apps');
5814: FND_MESSAGE.SET_TOKEN('WHERE','OE_SCHEDULE_UTIL');
5815: RAISE FND_API.G_EXC_ERROR;
5808:
5809: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
5810: THEN
5811: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
5812: FND_MESSAGE.SET_TOKEN('BY_PROC',
5813: 'GMI_Reservation_Util.Get_OPM_item_from_Apps');
5814: FND_MESSAGE.SET_TOKEN('WHERE','OE_SCHEDULE_UTIL');
5815: RAISE FND_API.G_EXC_ERROR;
5816: END IF;
5810: THEN
5811: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
5812: FND_MESSAGE.SET_TOKEN('BY_PROC',
5813: 'GMI_Reservation_Util.Get_OPM_item_from_Apps');
5814: FND_MESSAGE.SET_TOKEN('WHERE','OE_SCHEDULE_UTIL');
5815: RAISE FND_API.G_EXC_ERROR;
5816: END IF;
5817: get_process_query_quantities ( p_org_id => p_org_id,
5818: p_item_id => l_ic_item_mst_rec.item_id,
6368: END IF;
6369:
6370: IF l_qty2_to_reserve = -99999 THEN
6371: -- conversion failed
6372: FND_MESSAGE.SET_NAME('INV','INV_NO_CONVERSION_ERR'); -- INVCONV
6373: OE_MSG_PUB.ADD;
6374: IF l_debug_level > 0 THEN
6375: oe_debug_pub.add( 'ERROR on UOM conversion to Secondary UOM which is '||p_x_line_rec.ordered_quantity_uom2 , 1 ) ;
6376: END IF;
7246: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7247: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7248: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7249: IF l_msg_data is not null THEN
7250: fnd_message.set_encoded(l_msg_data);
7251: l_buffer := fnd_message.get;
7252: oe_msg_pub.add_text(p_message_text => l_buffer);
7253: IF l_debug_level > 0 THEN
7254: oe_debug_pub.add( 'ERROR : '|| L_BUFFER , 1 ) ;
7247: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7248: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7249: IF l_msg_data is not null THEN
7250: fnd_message.set_encoded(l_msg_data);
7251: l_buffer := fnd_message.get;
7252: oe_msg_pub.add_text(p_message_text => l_buffer);
7253: IF l_debug_level > 0 THEN
7254: oe_debug_pub.add( 'ERROR : '|| L_BUFFER , 1 ) ;
7255: END IF;
7531: END IF;
7532:
7533: IF l_qty2_to_reserve = -99999 THEN
7534: -- conversion failed
7535: FND_MESSAGE.SET_NAME('INV','INV_NO_CONVERSION_ERR'); -- INVCONV
7536: OE_MSG_PUB.ADD;
7537: IF l_debug_level > 0 THEN
7538: oe_debug_pub.add( 'ERROR on UOM conversion to Secondary UOM which is '||p_x_line_rec.ordered_quantity_uom2 , 1 ) ;
7539: END IF;
7901: oe_debug_pub.add( 'UPDATE SHIP DATE , EXTERNAL '|| P_X_LINE_REC.LINE_ID , 1 ) ;
7902: END IF;
7903:
7904: IF p_x_line_rec.ship_from_org_id is NULL THEN
7905: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ATO_WHSE_REQD');
7906: OE_MSG_PUB.Add;
7907: RAISE FND_API.G_EXC_ERROR;
7908: END IF;
7909:
8854: THEN
8855: IF l_debug_level > 0 THEN
8856: oe_debug_pub.add( 'INVALID SCH ACTION ' , 1 ) ;
8857: END IF;
8858: FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_ACTION_DONE_NO_EXP');
8859: OE_MSG_PUB.Add;
8860: RETURN FALSE;
8861: END IF;
8862:
9365: p_old_line_rec.ordered_quantity = FND_API.G_MISS_NUM) AND
9366: (p_line_rec.ordered_quantity is null OR
9367: p_line_rec.ordered_quantity = FND_API.G_MISS_NUM)) THEN
9368:
9369: FND_MESSAGE.SET_NAME('ONT','OE_SCH_MISSING_QUANTITY');
9370: OE_MSG_PUB.Add;
9371: IF l_debug_level > 0 THEN
9372: oe_debug_pub.add( 'E1' , 1 ) ;
9373: END IF;
9386:
9387: IF p_sch_action is not null
9388: AND p_caller = SCH_INTERNAL THEN
9389:
9390: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ZERO_QTY');
9391: OE_MSG_PUB.Add;
9392:
9393: IF l_debug_level > 0 THEN
9394: oe_debug_pub.add( 'E2' , 1 ) ;
9411:
9412: -- The line is cancelled. Cannot perform scheduling
9413: -- on it.
9414:
9415: FND_MESSAGE.SET_NAME('ONT','OE_SCH_LINE_FULLY_CANCELLED');
9416: OE_MSG_PUB.Add;
9417:
9418: IF l_debug_level > 0 THEN
9419: oe_debug_pub.add( 'E3' , 1 ) ;
9435:
9436: -- The line is cancelled. Cannot perform scheduling
9437: -- on it.
9438:
9439: FND_MESSAGE.SET_NAME('ONT','OE_SCH_LINE_SHIPPED');
9440: OE_MSG_PUB.Add;
9441:
9442: IF l_debug_level > 0 THEN
9443: oe_debug_pub.add( 'E4' , 1 ) ;
9457:
9458: -- The line is Fulfilled. Cannot perform scheduling
9459: -- on it.
9460:
9461: FND_MESSAGE.SET_NAME('ONT','OE_SCH_LINE_FULFILLED');
9462: OE_MSG_PUB.Add;
9463:
9464: IF l_debug_level > 0 THEN
9465: oe_debug_pub.add( 'E4.1' , 1 ) ;
9482: IF (p_line_rec.ordered_quantity < p_line_rec.reserved_quantity)
9483: AND OE_GLOBALS.Equal(p_old_line_rec.order_quantity_uom, p_line_rec.order_quantity_uom) --Bug 6335352
9484: THEN
9485:
9486: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RES_MORE_ORD_QTY');
9487: OE_MSG_PUB.Add;
9488:
9489: IF l_debug_level > 0 THEN
9490: oe_debug_pub.add( 'E5' , 1 ) ;
9497: IF (p_sch_action = OESCH_ACT_UNSCHEDULE OR
9498: p_sch_action = OESCH_ACT_UNRESERVE) AND
9499: (p_line_rec.reserved_quantity is not null) THEN
9500:
9501: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RES_QTY_CHG_NOT_ALLOWED');
9502: OE_MSG_PUB.Add;
9503: x_return_status := FND_API.G_RET_STS_ERROR;
9504: IF l_debug_level > 0 THEN
9505: oe_debug_pub.add( 'E6' , 1 ) ;
9513: -- Reserved Quantity2 has changed
9514: IF (p_line_rec.ordered_quantity2 < p_line_rec.reserved_quantity2)
9515: THEN
9516:
9517: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RES_MORE_ORD_QTY');
9518: OE_MSG_PUB.Add;
9519:
9520: IF l_debug_level > 0 THEN
9521: oe_debug_pub.add( 'E5a' , 1 ) ;
9528: IF (p_sch_action = OESCH_ACT_UNSCHEDULE OR
9529: p_sch_action = OESCH_ACT_UNRESERVE) AND
9530: (p_line_rec.reserved_quantity2 is not null) THEN
9531:
9532: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RES_QTY_CHG_NOT_ALLOWED');
9533: OE_MSG_PUB.Add;
9534: x_return_status := FND_API.G_RET_STS_ERROR;
9535: IF l_debug_level > 0 THEN
9536: oe_debug_pub.add( 'E6A' , 1 ) ;
9554: THEN
9555: IF (p_line_rec.ordered_quantity < p_line_rec.reserved_quantity)
9556: THEN
9557:
9558: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RES_MORE_ORD_QTY');
9559: OE_MSG_PUB.Add;
9560:
9561: x_return_status := FND_API.G_RET_STS_ERROR;
9562: IF l_debug_level > 0 THEN
9575: THEN
9576: IF (p_line_rec.ordered_quantity2 < p_line_rec.reserved_quantity2)
9577: THEN
9578:
9579: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RES_MORE_ORD_QTY');
9580: OE_MSG_PUB.Add;
9581:
9582: x_return_status := FND_API.G_RET_STS_ERROR;
9583: IF l_debug_level > 0 THEN
9594:
9595: IF (p_line_rec.order_quantity_uom is null OR
9596: p_line_rec.order_quantity_uom = FND_API.G_MISS_CHAR) THEN
9597:
9598: FND_MESSAGE.SET_NAME('ONT','OE_SCH_MISSING_UOM');
9599: OE_MSG_PUB.Add;
9600:
9601: x_return_status := FND_API.G_RET_STS_ERROR;
9602: IF l_debug_level > 0 THEN
9613:
9614: IF (p_line_rec.inventory_item_id is null OR
9615: p_line_rec.inventory_item_id = FND_API.G_MISS_NUM) THEN
9616:
9617: FND_MESSAGE.SET_NAME('ONT','OE_SCH_MISSING_ITEM');
9618: OE_MSG_PUB.Add;
9619:
9620: IF l_debug_level > 0 THEN
9621: oe_debug_pub.add( 'E9' , 1 ) ;
9632: END IF;
9633: IF (p_line_rec.request_date is null OR
9634: p_line_rec.request_date = FND_API.G_MISS_DATE) THEN
9635:
9636: FND_MESSAGE.SET_NAME('ONT','OE_SCH_MISSING_REQUEST_DATE');
9637: OE_MSG_PUB.Add;
9638: IF l_debug_level > 0 THEN
9639: oe_debug_pub.add( 'E10' , 1 ) ;
9640: END IF;
9648: oe_debug_pub.add( 'CHECKING THAT LINE HAS A WAREHOUSE...' , 1 ) ;
9649: END IF;
9650: IF (p_line_rec.ship_from_org_id is null OR
9651: p_line_rec.ship_from_org_id = FND_API.G_MISS_NUM) THEN
9652: FND_MESSAGE.SET_NAME('ONT','ONT_SCH_BYPASS_MISS_WSH');
9653: OE_MSG_PUB.Add;
9654:
9655: IF l_debug_level > 0 THEN
9656: oe_debug_pub.add( 'ERROR BYPASS' , 1 ) ;
9670: (p_sch_action = OESCH_ACT_UNDEMAND OR
9671: p_sch_action = OESCH_ACT_UNSCHEDULE)
9672: THEN
9673:
9674: FND_MESSAGE.SET_NAME('ONT','OE_SCH_CANNOT_UNSCH_SET');
9675: OE_MSG_PUB.Add;
9676: IF l_debug_level > 0 THEN
9677: oe_debug_pub.add( 'E11' , 1 ) ;
9678: END IF;
9735: END IF;
9736: END IF;
9737:
9738: IF (l_result = FND_API.G_TRUE) THEN
9739: FND_MESSAGE.SET_NAME('ONT','OE_SCH_LINE_ON_HOLD');
9740: OE_MSG_PUB.Add;
9741: x_return_status := FND_API.G_RET_STS_ERROR;
9742: END IF;
9743:
9772: oe_debug_pub.add( 'CHECKING THAT LINE HAS A WAREHOUSE...' , 1 ) ;
9773: END IF;
9774: IF (p_line_rec.ship_from_org_id is null OR
9775: p_line_rec.ship_from_org_id = FND_API.G_MISS_NUM) THEN
9776: FND_MESSAGE.SET_NAME('ONT','OE_SCH_INACTIVE_MISS_WSH');
9777: FND_MESSAGE.SET_TOKEN('LTYPE',
9778: nvl(sch_cached_line_type,'0'));
9779: OE_MSG_PUB.Add;
9780:
9773: END IF;
9774: IF (p_line_rec.ship_from_org_id is null OR
9775: p_line_rec.ship_from_org_id = FND_API.G_MISS_NUM) THEN
9776: FND_MESSAGE.SET_NAME('ONT','OE_SCH_INACTIVE_MISS_WSH');
9777: FND_MESSAGE.SET_TOKEN('LTYPE',
9778: nvl(sch_cached_line_type,'0'));
9779: OE_MSG_PUB.Add;
9780:
9781: IF l_debug_level > 0 THEN
9791: END IF;
9792: IF (p_line_rec.item_type_code <> 'STANDARD'
9793: OR p_line_rec.ato_line_id is not null) THEN
9794:
9795: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_INACTIVE_STD_ONLY');
9796: FND_MESSAGE.SET_TOKEN('LTYPE',
9797: nvl(sch_cached_line_type,'0'));
9798: OE_MSG_PUB.Add;
9799:
9792: IF (p_line_rec.item_type_code <> 'STANDARD'
9793: OR p_line_rec.ato_line_id is not null) THEN
9794:
9795: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_INACTIVE_STD_ONLY');
9796: FND_MESSAGE.SET_TOKEN('LTYPE',
9797: nvl(sch_cached_line_type,'0'));
9798: OE_MSG_PUB.Add;
9799:
9800: IF l_debug_level > 0 THEN
9812: -- We will now allow standard lines into sets.
9813: IF (p_line_rec.ship_set_id is not null OR
9814: P_line_rec.arrival_set_id is not null)THEN
9815:
9816: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_INACTIVE_STD_ONLY');
9817: FND_MESSAGE.SET_TOKEN('LTYPE',
9818: nvl(sch_cached_line_type,'0'));
9819: OE_MSG_PUB.Add;
9820:
9813: IF (p_line_rec.ship_set_id is not null OR
9814: P_line_rec.arrival_set_id is not null)THEN
9815:
9816: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_INACTIVE_STD_ONLY');
9817: FND_MESSAGE.SET_TOKEN('LTYPE',
9818: nvl(sch_cached_line_type,'0'));
9819: OE_MSG_PUB.Add;
9820:
9821: IF l_debug_level > 0 THEN
9838: (p_line_rec.schedule_ship_date is NOT NULL OR
9839: p_line_rec.schedule_arrival_date is NOT NULL))
9840: THEN
9841:
9842: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ACTION_NOT_ALLOWED');
9843: FND_MESSAGE.SET_TOKEN('ACTION',
9844: nvl(p_sch_action,OESCH_ACT_SCHEDULE));
9845: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',
9846: nvl(sch_cached_line_type,sch_cached_order_type));
9839: p_line_rec.schedule_arrival_date is NOT NULL))
9840: THEN
9841:
9842: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ACTION_NOT_ALLOWED');
9843: FND_MESSAGE.SET_TOKEN('ACTION',
9844: nvl(p_sch_action,OESCH_ACT_SCHEDULE));
9845: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',
9846: nvl(sch_cached_line_type,sch_cached_order_type));
9847: OE_MSG_PUB.Add;
9841:
9842: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ACTION_NOT_ALLOWED');
9843: FND_MESSAGE.SET_TOKEN('ACTION',
9844: nvl(p_sch_action,OESCH_ACT_SCHEDULE));
9845: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',
9846: nvl(sch_cached_line_type,sch_cached_order_type));
9847: OE_MSG_PUB.Add;
9848: IF l_debug_level > 0 THEN
9849: oe_debug_pub.add( 'E12' , 1 ) ;
9860: -- 2766876
9861: IF (NVL(p_line_rec.reserved_quantity,0) > 0
9862: AND p_sch_action = OESCH_ACT_SCHEDULE)
9863: OR p_sch_action = OESCH_ACT_RESERVE THEN
9864: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ACTION_NOT_ALLOWED');
9865: FND_MESSAGE.SET_TOKEN('ACTION',
9866: nvl(p_sch_action,OESCH_ACT_RESERVE));
9867: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',
9868: nvl(sch_cached_line_type,sch_cached_order_type));
9861: IF (NVL(p_line_rec.reserved_quantity,0) > 0
9862: AND p_sch_action = OESCH_ACT_SCHEDULE)
9863: OR p_sch_action = OESCH_ACT_RESERVE THEN
9864: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ACTION_NOT_ALLOWED');
9865: FND_MESSAGE.SET_TOKEN('ACTION',
9866: nvl(p_sch_action,OESCH_ACT_RESERVE));
9867: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',
9868: nvl(sch_cached_line_type,sch_cached_order_type));
9869: OE_MSG_PUB.Add;
9863: OR p_sch_action = OESCH_ACT_RESERVE THEN
9864: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ACTION_NOT_ALLOWED');
9865: FND_MESSAGE.SET_TOKEN('ACTION',
9866: nvl(p_sch_action,OESCH_ACT_RESERVE));
9867: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',
9868: nvl(sch_cached_line_type,sch_cached_order_type));
9869: OE_MSG_PUB.Add;
9870: IF l_debug_level > 0 THEN
9871: oe_debug_pub.add( 'E13' , 1 ) ;
9879: l_scheduling_level_code = SCH_LEVEL_FIVE OR
9880: NVL(fnd_profile.value('ONT_BYPASS_ATP'),'N') = 'Y' THEN
9881: IF p_sch_action = OESCH_ACT_ATP_CHECK THEN
9882: -- levels Four and Five CANNOT have ATP Performed
9883: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_ACTION_NOT_ALLOWED');
9884: FND_MESSAGE.SET_TOKEN('ACTION',
9885: (nvl(p_sch_action, OESCH_ACT_ATP_CHECK)));
9886: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',
9887: nvl(sch_cached_line_type,sch_cached_order_type));
9880: NVL(fnd_profile.value('ONT_BYPASS_ATP'),'N') = 'Y' THEN
9881: IF p_sch_action = OESCH_ACT_ATP_CHECK THEN
9882: -- levels Four and Five CANNOT have ATP Performed
9883: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_ACTION_NOT_ALLOWED');
9884: FND_MESSAGE.SET_TOKEN('ACTION',
9885: (nvl(p_sch_action, OESCH_ACT_ATP_CHECK)));
9886: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',
9887: nvl(sch_cached_line_type,sch_cached_order_type));
9888: OE_MSG_PUB.Add;
9882: -- levels Four and Five CANNOT have ATP Performed
9883: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_ACTION_NOT_ALLOWED');
9884: FND_MESSAGE.SET_TOKEN('ACTION',
9885: (nvl(p_sch_action, OESCH_ACT_ATP_CHECK)));
9886: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',
9887: nvl(sch_cached_line_type,sch_cached_order_type));
9888: OE_MSG_PUB.Add;
9889: IF l_debug_level > 0 THEN
9890: oe_debug_pub.add( 'E13.1' , 1 ) ;
9909: -- Reservation qty cannot be reduced when line is
9910: -- interfaced to wsh. Give a message here tell the user we are
9911: -- not unreserving. Added code here to fix bug 2038201.
9912:
9913: FND_MESSAGE.SET_NAME('ONT','OE_SCH_UNRSV_NOT_ALLOWED');
9914: OE_MSG_PUB.Add;
9915: IF l_debug_level > 0 THEN
9916: oe_debug_pub.add( 'E14' , 1 ) ;
9917: END IF;
9938: IF p_line_rec.ship_from_org_id is NULL AND
9939: p_sch_action = OE_SCHEDULE_UTIL.OESCH_ACT_SCHEDULE
9940: THEN
9941:
9942: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ATO_WHSE_REQD');
9943: OE_MSG_PUB.Add;
9944: IF l_debug_level > 0 THEN
9945: oe_debug_pub.add( 'E15' , 1 ) ;
9946: END IF;
9952: OR p_sch_action = OE_SCHEDULE_UTIL.OESCH_ACT_UNRESERVE)
9953: AND p_line_rec.schedule_status_code is null
9954: THEN
9955:
9956: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RES_NO_CONFIG');
9957: OE_MSG_PUB.Add;
9958: IF l_debug_level > 0 THEN
9959: oe_debug_pub.add( 'E16' , 1 ) ;
9960: END IF;
9971: IF p_sch_action = OE_SCHEDULE_UTIL.OESCH_ACT_RESERVE
9972: AND p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_CONFIG
9973: AND p_line_rec.booked_flag <> 'Y'
9974: THEN
9975: FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_ACTION_DONE_NO_EXP');
9976: OE_MSG_PUB.Add;
9977: IF l_debug_level > 0 THEN
9978: oe_debug_pub.add( 'E16.0' , 1 );
9979: END IF;
9985: AND ( p_sch_action = OE_SCHEDULE_UTIL.OESCH_ACT_RESERVE
9986: OR p_sch_action = OE_SCHEDULE_UTIL.OESCH_ACT_UNRESERVE)
9987: AND p_line_rec.schedule_status_code IS NULL
9988: THEN
9989: FND_MESSAGE.SET_NAME('ONT','ONT_SCH_NOT_RESERVABLE');
9990: OE_MSG_PUB.Add;
9991: IF l_debug_level > 0 THEN
9992: oe_debug_pub.add( 'E16.1' , 1 ) ;
9993: END IF;
10040: END IF;
10041: IF l_debug_level > 0 THEN
10042: oe_debug_pub.add( 'E17' , 1 ) ;
10043: END IF;
10044: FND_MESSAGE.SET_NAME('ONT','OE_BOM_NO_BILL_IN_SHP_ORG');
10045: FND_MESSAGE.SET_TOKEN('ITEM',p_line_rec.ordered_item);
10046:
10047: -- Bug 2367743 Start
10048: Select ORGANIZATION_CODE
10041: IF l_debug_level > 0 THEN
10042: oe_debug_pub.add( 'E17' , 1 ) ;
10043: END IF;
10044: FND_MESSAGE.SET_NAME('ONT','OE_BOM_NO_BILL_IN_SHP_ORG');
10045: FND_MESSAGE.SET_TOKEN('ITEM',p_line_rec.ordered_item);
10046:
10047: -- Bug 2367743 Start
10048: Select ORGANIZATION_CODE
10049: Into l_org_code
10051: Where ORGANIZATION_ID = NVL(p_line_rec.ship_from_org_id,l_org_id);
10052: IF l_debug_level > 0 THEN
10053: oe_debug_pub.add( 'ORGANIZATION CODE:'||L_ORG_CODE , 2 ) ;
10054: END IF;
10055: FND_MESSAGE.SET_TOKEN('ORG',l_org_code);
10056: -- Bug 2367743 End
10057:
10058: OE_MSG_PUB.Add;
10059: x_return_status := FND_API.G_RET_STS_ERROR;
10074: THEN
10075:
10076: -- Added code here to fix bug 2038201.
10077: oe_debug_pub.add('E18',1);
10078: FND_MESSAGE.SET_NAME('ONT','OE_SCH_UNRSV_NOT_ALLOWED');
10079: OE_MSG_PUB.Add;
10080: x_return_status := FND_API.G_RET_STS_ERROR;
10081:
10082: END IF;
10105:
10106: IF l_debug_level > 0 THEN
10107: oe_debug_pub.add( 'E19' , 1 ) ;
10108: END IF;
10109: FND_MESSAGE.SET_NAME('ONT','OE_SCH_UNSCH_CONFIG_EXISTS');
10110: OE_MSG_PUB.Add;
10111: x_return_status := FND_API.G_RET_STS_ERROR;
10112:
10113: EXCEPTION
10116: WHEN TOO_MANY_ROWS THEN
10117: IF l_debug_level > 0 THEN
10118: oe_debug_pub.add( 'E19 TOO MANY ROWS' , 1 ) ;
10119: END IF;
10120: FND_MESSAGE.SET_NAME('ONT','OE_SCH_UNSCH_CONFIG_EXISTS');
10121: OE_MSG_PUB.Add;
10122: x_return_status := FND_API.G_RET_STS_ERROR;
10123:
10124: END;
10140: l_order_date_type_code := Get_Date_Type(p_line_rec.header_id);
10141:
10142: IF nvl(l_order_date_type_code,'SHIP') = 'ARRIVAL' THEN
10143:
10144: FND_MESSAGE.SET_NAME('ONT','OE_SCH_INV_SHP_DATE');
10145: OE_MSG_PUB.Add;
10146:
10147: OE_DEBUG_PUB.Add('E20 Order date Type - Arrival');
10148: x_return_status := FND_API.G_RET_STS_ERROR;
10164: l_order_date_type_code := Get_Date_Type(p_line_rec.header_id);
10165:
10166: IF nvl(l_order_date_type_code,'SHIP') = 'SHIP' THEN
10167:
10168: FND_MESSAGE.SET_NAME('ONT','OE_SCH_INV_ARR_DATE');
10169: OE_MSG_PUB.Add;
10170:
10171: OE_DEBUG_PUB.Add('E21 Order date Type - Ship');
10172:
10192: THEN
10193:
10194: -- only authorized users have authority to update the
10195: -- Overide ATP Field
10196: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_OVER_ATP_NO_AUTH');
10197: OE_MSG_PUB.Add;
10198: IF l_debug_level > 0 THEN
10199: oe_debug_pub.add( 'E22 INVALID AUTOTIZE' ) ;
10200: END IF;
10216: THEN
10217:
10218: -- only authorized users have authority to update scheduling attributes
10219: -- on an overridden line
10220: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_OVER_ATP_NO_AUTH_MOD');
10221: OE_MSG_PUB.Add;
10222: IF l_debug_level > 0 THEN
10223: oe_debug_pub.add( 'E23 USER DOES NOT HAVE AUTHORITY TO UPDATE SCHEDULE ATTRIBUTES' , 1 ) ;
10224: END IF;
10229: IF NVL(p_line_rec.override_atp_date_code, 'N') = 'Y' AND
10230: (p_sch_action = OESCH_ACT_UNDEMAND OR
10231: P_sch_action = OESCH_ACT_UNSCHEDULE) THEN
10232: -- Only Authorized users have authority to unschedule an overriddenline
10233: FND_MESSAGE.SET_NAME('ONT','OE_SCH_OVER_ATP_NO_AUTH_UNCHK');
10234: OE_MSG_PUB.Add;
10235: IF l_debug_level > 0 THEN
10236: oe_debug_pub.add( 'E24 GENERAL USER CANNOT UNSCHEDULE AN OVERRIDDEN LINE' , 1 ) ;
10237: END IF;
10255: WHEN OTHERS THEN
10256: NULL;
10257: END;
10258: IF l_found = 'Y' THEN
10259: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_OVER_ATP_NO_AUTH_MOD');
10260: OE_MSG_PUB.Add;
10261: X_return_status := FND_API.G_RET_STS_ERROR;
10262: END IF;
10263: END IF;
10285: IF l_override > 0 THEN
10286:
10287: -- only authorized users have authority to update scheduling
10288: -- attributes in a set with an overridden line
10289: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_OVER_ATP_NO_AUTH_SET');
10290: OE_MSG_PUB.Add;
10291: IF l_debug_level > 0 THEN
10292: oe_debug_pub.add( 'E25 USER DOES NOT HAVE AUTHORITY TO UPDATE SCHEDULE ATTRIBUTES ON A SET WITH AN OVERRIDDEN LINE' , 1 ) ;
10293: END IF;
10327: -- lines can be scheduled for the schedule ship date of the set AND
10328: -- Authorized users cannot add an overridden line if the schedule
10329: -- ship date soes not match the set
10330:
10331: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_OVER_ATP_NO_AUTH_SET');
10332: OE_MSG_PUB.Add;
10333: IF l_debug_level > 0 THEN
10334: oe_debug_pub.add( 'E26 UNABLE TO ADD THE LINE TO THE SET' , 1 ) ;
10335: END IF;
10374: END IF; -- ship from
10375: IF l_overridden = 'Y' THEN
10376: --3517527 set_status check commented
10377: -- IF l_set_rec.set_status <> 'T' THEN
10378: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_OVER_ATP_NO_AUTH_SET');
10379: OE_MSG_PUB.Add;
10380: -- END IF;
10381: IF l_debug_level > 0 THEN
10382: oe_debug_pub.add( 'E27 UNABLE TO ADD THE line TO THE SET' , 1 ) ;
10396: IF NOT Valid_Set_Addition
10397: (p_top_model_line_id => p_line_rec.top_model_line_id,
10398: p_set_type => l_set_rec.set_type) THEN
10399:
10400: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_OVER_ATP_NO_AUTH_SET');
10401: OE_MSG_PUB.Add;
10402: IF l_debug_level > 0 THEN
10403: oe_debug_pub.add( 'E28 UNABLE TO ADD THE Model TO THE SET' , 1 ) ;
10404: END IF;
10433: < trunc(p_line_rec.request_date) THEN
10434: IF l_debug_level > 0 THEN
10435: oe_debug_pub.add ('E29 Request date exceeds Latest Acceptable Date',1);
10436: END IF;
10437: FND_MESSAGE.SET_NAME('ONT','ONT_SCH_REQUEST_EXCEED_LAD');
10438: OE_MSG_PUB.Add;
10439: x_return_status := FND_API.G_RET_STS_ERROR;
10440: ELSIF ((l_order_date_type_code = 'SHIP'
10441: AND trunc(NVL(p_line_rec.schedule_ship_date,p_line_rec.request_date))
10445: > trunc(NVL(p_line_rec.latest_acceptable_date,p_line_rec.request_date)))) THEN
10446: IF l_debug_level > 0 THEN
10447: oe_debug_pub.add('E30 Schedule date exceeds Latest Acceptable Date',1);
10448: END IF;
10449: FND_MESSAGE.SET_NAME('ONT','ONT_SCH_LAD_SCH_FAILED');
10450: OE_MSG_PUB.Add;
10451: x_return_status := FND_API.G_RET_STS_ERROR;
10452: END IF;
10453: -- 3894212
10471: AND l_set_rec.schedule_ship_date IS NOT NULL THEN
10472: IF l_debug_level > 0 THEN
10473: oe_debug_pub.add('E30.1 Schedule date exceeds Latest Acceptable Date',1);
10474: END IF;
10475: FND_MESSAGE.SET_NAME('ONT','ONT_SCH_LAD_SCH_FAILED');
10476: OE_MSG_PUB.Add;
10477: x_return_status := FND_API.G_RET_STS_ERROR;
10478: END IF;
10479: END IF;
10517: IF l_found = 'Y' THEN
10518: IF l_debug_level > 0 THEN
10519: oe_debug_pub.add('E31 Reservation(s) cannot be created. The line has been pick confirmed/staged',1);
10520: END IF;
10521: FND_MESSAGE.SET_NAME('ONT','ONT_SCH_RSV_FAILURE_STAGED');
10522: OE_MSG_PUB.Add;
10523: x_return_status := FND_API.G_RET_STS_ERROR;
10524: END IF;
10525: END IF;
10758: RAISE FND_API.G_EXC_ERROR;
10759: END IF;
10760:
10761: ELSE
10762: FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_ACTION_DONE_NO_EXP');
10763: OE_MSG_PUB.Add;
10764: l_update_flag := FND_API.G_FALSE;
10765: END IF;
10766:
10782: RAISE FND_API.G_EXC_ERROR;
10783: END IF;
10784:
10785: ELSE
10786: FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_ACTION_DONE_NO_EXP');
10787: OE_MSG_PUB.Add;
10788: l_update_flag := FND_API.G_FALSE;
10789: END IF;
10790:
14219: IF l_failed_rsv_temp_tbl.count > 0 THEN
14220: IF l_debug_level > 0 THEN
14221: oe_debug_pub.add( ' THE RESERVATION PROCESS HAS FAILED ' , 1 ) ;
14222: END IF;
14223: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RSV_FAILURE');
14224: OE_MSG_PUB.Add;
14225: END IF;
14226:
14227: -- Error Handling Start
16038: AND ORGANIZATION_ID = p_new_ship_from_org_id;
16039:
16040: IF l_shippable_flag <> p_old_shippable_flag THEN
16041: oe_debug_pub.add( 'Item substitution cannot happen between shippable and non-shippable items' , 5 ) ;
16042: Fnd_Message.set_name('ONT','OE_SCH_LOOP_SHP_NONSHP');
16043: Oe_Msg_Pub.Add;
16044: OE_SCHEDULE_UTIL.OESCH_ITEM_IS_SUBSTITUTED := 'N';
16045: RAISE FND_API.G_EXC_ERROR;
16046: END IF;