[Home] [Help]
2440:
2441: IF (p_line_rec.source_type_code = OE_GLOBALS.G_SOURCE_EXTERNAL)
2442: AND (p_old_line_rec.schedule_status_code is null)
2443: THEN
2444: FND_MESSAGE.SET_NAME('ONT','OE_DS_COULD_NOT_SCH');
2445: FND_MESSAGE.SET_TOKEN('LINE',p_line_rec.line_number);
2446: RETURN FALSE;
2447: END IF;
2448:
2441: IF (p_line_rec.source_type_code = OE_GLOBALS.G_SOURCE_EXTERNAL)
2442: AND (p_old_line_rec.schedule_status_code is null)
2443: THEN
2444: FND_MESSAGE.SET_NAME('ONT','OE_DS_COULD_NOT_SCH');
2445: FND_MESSAGE.SET_TOKEN('LINE',p_line_rec.line_number);
2446: RETURN FALSE;
2447: END IF;
2448:
2449: If (l_schedule_status_code is null) AND
2450: ((l_schedule_action_code = OESCH_ACT_UNSCHEDULE) OR
2451: (l_schedule_action_code = OESCH_ACT_UNDEMAND) OR
2452: (l_schedule_action_code = OESCH_ACT_UNRESERVE))
2453: THEN
2454: FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_ACTION_DONE_NO_EXP');
2455: OE_MSG_PUB.Add;
2456: RETURN FALSE;
2457: END IF;
2458:
2791: p_old_line_rec.ordered_quantity = FND_API.G_MISS_NUM) AND
2792: (p_line_rec.ordered_quantity is null OR
2793: p_line_rec.ordered_quantity = FND_API.G_MISS_NUM)) THEN
2794:
2795: FND_MESSAGE.SET_NAME('ONT','OE_SCH_MISSING_QUANTITY');
2796: OE_MSG_PUB.Add;
2797:
2798: l_return_status := FND_API.G_RET_STS_ERROR;
2799: END IF;
2809: (nvl(p_line_rec.cancelled_flag,'N') = 'N')) THEN
2810:
2811: IF p_line_rec.schedule_action_code is not null THEN
2812:
2813: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ZERO_QTY');
2814: OE_MSG_PUB.Add;
2815:
2816: IF l_debug_level > 0 THEN
2817: oe_debug_pub.add( 'E2' , 1 ) ;
2829:
2830: -- The line is cancelled. Cannot perform scheduling
2831: -- on it.
2832:
2833: FND_MESSAGE.SET_NAME('ONT','OE_SCH_LINE_FULLY_CANCELLED');
2834: OE_MSG_PUB.Add;
2835:
2836: IF l_debug_level > 0 THEN
2837: oe_debug_pub.add( 'E3' , 1 ) ;
2855:
2856: -- The line is cancelled. Cannot perform scheduling
2857: -- on it.
2858:
2859: FND_MESSAGE.SET_NAME('ONT','OE_SCH_LINE_SHIPPED');
2860: OE_MSG_PUB.Add;
2861:
2862: IF l_debug_level > 0 THEN
2863: oe_debug_pub.add( 'OE_SCH_LINE_SHIPPED' , 1 ) ;
2877: IF p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_CONFIG THEN
2878: IF l_debug_level > 0 THEN
2879: oe_debug_pub.add( 'INSIDE CONFIG ITEM...RESERVED QTY CHANGED' , 1 ) ;
2880: END IF;
2881: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_ACTION');
2882: FND_MESSAGE.SET_TOKEN('ACTION',OE_Id_To_Value.Inventory_Item(p_line_rec.inventory_item_id));
2883: OE_MSG_PUB.Add;
2884: l_return_status := FND_API.G_RET_STS_ERROR;
2885: END IF;
2878: IF l_debug_level > 0 THEN
2879: oe_debug_pub.add( 'INSIDE CONFIG ITEM...RESERVED QTY CHANGED' , 1 ) ;
2880: END IF;
2881: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_ACTION');
2882: FND_MESSAGE.SET_TOKEN('ACTION',OE_Id_To_Value.Inventory_Item(p_line_rec.inventory_item_id));
2883: OE_MSG_PUB.Add;
2884: l_return_status := FND_API.G_RET_STS_ERROR;
2885: END IF;
2886: -- Bug 2314463 End
2888: -- Reserved Quantity has changed
2889: IF (p_line_rec.ordered_quantity < p_line_rec.reserved_quantity)
2890: THEN
2891:
2892: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RES_MORE_ORD_QTY');
2893: OE_MSG_PUB.Add;
2894:
2895: IF l_debug_level > 0 THEN
2896: oe_debug_pub.add( 'E4' , 1 ) ;
2901: -- Reserved2 Quantity has changed -- INVCONV
2902: IF (p_line_rec.ordered_quantity2 < p_line_rec.reserved_quantity2)
2903: THEN
2904:
2905: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RES_MORE_ORD_QTY');
2906: OE_MSG_PUB.Add;
2907:
2908: IF l_debug_level > 0 THEN
2909: oe_debug_pub.add( 'E4a' , 1 ) ;
2917: IF (p_line_rec.schedule_action_code = OESCH_ACT_UNSCHEDULE OR
2918: p_line_rec.schedule_action_code = OESCH_ACT_UNRESERVE) AND
2919: (p_line_rec.reserved_quantity is not null) THEN
2920:
2921: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RES_QTY_CHG_NOT_ALLOWED');
2922: OE_MSG_PUB.Add;
2923: l_return_status := FND_API.G_RET_STS_ERROR;
2924: IF l_debug_level > 0 THEN
2925: oe_debug_pub.add( 'E5' , 1 ) ;
2940: THEN
2941: IF (p_line_rec.ordered_quantity < p_line_rec.reserved_quantity)
2942: THEN
2943:
2944: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RES_MORE_ORD_QTY');
2945: OE_MSG_PUB.Add;
2946:
2947: l_return_status := FND_API.G_RET_STS_ERROR;
2948: IF l_debug_level > 0 THEN
2966: THEN
2967: IF (p_line_rec.ordered_quantity2 < p_line_rec.reserved_quantity2)
2968: THEN
2969:
2970: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RES_MORE_ORD_QTY');
2971: OE_MSG_PUB.Add;
2972:
2973: l_return_status := FND_API.G_RET_STS_ERROR;
2974: IF l_debug_level > 0 THEN
2985:
2986: IF (p_line_rec.order_quantity_uom is null OR
2987: p_line_rec.order_quantity_uom = FND_API.G_MISS_CHAR) THEN
2988:
2989: FND_MESSAGE.SET_NAME('ONT','OE_SCH_MISSING_UOM');
2990: OE_MSG_PUB.Add;
2991:
2992: l_return_status := FND_API.G_RET_STS_ERROR;
2993: IF l_debug_level > 0 THEN
3004:
3005: IF (p_line_rec.inventory_item_id is null OR
3006: p_line_rec.inventory_item_id = FND_API.G_MISS_NUM) THEN
3007:
3008: FND_MESSAGE.SET_NAME('ONT','OE_SCH_MISSING_ITEM');
3009: OE_MSG_PUB.Add;
3010:
3011: l_return_status := FND_API.G_RET_STS_ERROR;
3012: END IF;
3020: END IF;
3021: IF (p_line_rec.request_date is null OR
3022: p_line_rec.request_date = FND_API.G_MISS_DATE) THEN
3023:
3024: FND_MESSAGE.SET_NAME('ONT','OE_SCH_MISSING_REQUEST_DATE');
3025: OE_MSG_PUB.Add;
3026: l_return_status := FND_API.G_RET_STS_ERROR;
3027: END IF;
3028:
3035: (p_line_rec.schedule_action_code = OESCH_ACT_UNDEMAND OR
3036: p_line_rec.schedule_action_code = OESCH_ACT_UNSCHEDULE))
3037: THEN
3038:
3039: FND_MESSAGE.SET_NAME('ONT','OE_SCH_OE_ORDER_FAILED');
3040: OE_MSG_PUB.Add;
3041:
3042: l_return_status := FND_API.G_RET_STS_ERROR;
3043: END IF;
3096: END IF;
3097: END IF;
3098:
3099: IF (l_result = FND_API.G_TRUE) THEN
3100: FND_MESSAGE.SET_NAME('ONT','OE_SCH_LINE_ON_HOLD');
3101: OE_MSG_PUB.Add;
3102: l_return_status := FND_API.G_RET_STS_ERROR;
3103: END IF;
3104:
3126: (p_line_rec.schedule_ship_date is NOT NULL OR
3127: p_line_rec.schedule_arrival_date is NOT NULL))
3128: THEN
3129:
3130: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ACTION_NOT_ALLOWED');
3131: FND_MESSAGE.SET_TOKEN('ACTION',
3132: nvl(p_line_rec.schedule_action_code,OESCH_ACT_SCHEDULE));
3133: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',
3134: nvl(sch_cached_line_type,sch_cached_order_type));
3127: p_line_rec.schedule_arrival_date is NOT NULL))
3128: THEN
3129:
3130: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ACTION_NOT_ALLOWED');
3131: FND_MESSAGE.SET_TOKEN('ACTION',
3132: nvl(p_line_rec.schedule_action_code,OESCH_ACT_SCHEDULE));
3133: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',
3134: nvl(sch_cached_line_type,sch_cached_order_type));
3135: OE_MSG_PUB.Add;
3129:
3130: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ACTION_NOT_ALLOWED');
3131: FND_MESSAGE.SET_TOKEN('ACTION',
3132: nvl(p_line_rec.schedule_action_code,OESCH_ACT_SCHEDULE));
3133: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',
3134: nvl(sch_cached_line_type,sch_cached_order_type));
3135: OE_MSG_PUB.Add;
3136: l_return_status := FND_API.G_RET_STS_ERROR;
3137: END IF;
3137: END IF;
3138: ELSIF l_scheduling_level_code = SCH_LEVEL_TWO OR
3139: p_line_rec.reserved_quantity > 0 THEN
3140: IF p_line_rec.schedule_action_code = OESCH_ACT_RESERVE THEN
3141: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ACTION_NOT_ALLOWED');
3142: FND_MESSAGE.SET_TOKEN('ACTION',
3143: nvl(p_line_rec.schedule_action_code,OESCH_ACT_RESERVE));
3144: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',
3145: nvl(sch_cached_line_type,sch_cached_order_type));
3138: ELSIF l_scheduling_level_code = SCH_LEVEL_TWO OR
3139: p_line_rec.reserved_quantity > 0 THEN
3140: IF p_line_rec.schedule_action_code = OESCH_ACT_RESERVE THEN
3141: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ACTION_NOT_ALLOWED');
3142: FND_MESSAGE.SET_TOKEN('ACTION',
3143: nvl(p_line_rec.schedule_action_code,OESCH_ACT_RESERVE));
3144: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',
3145: nvl(sch_cached_line_type,sch_cached_order_type));
3146: OE_MSG_PUB.Add;
3140: IF p_line_rec.schedule_action_code = OESCH_ACT_RESERVE THEN
3141: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ACTION_NOT_ALLOWED');
3142: FND_MESSAGE.SET_TOKEN('ACTION',
3143: nvl(p_line_rec.schedule_action_code,OESCH_ACT_RESERVE));
3144: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',
3145: nvl(sch_cached_line_type,sch_cached_order_type));
3146: OE_MSG_PUB.Add;
3147: l_return_status := FND_API.G_RET_STS_ERROR;
3148: END IF;
3189: WHEN NO_DATA_FOUND THEN
3190: IF l_debug_level > 0 THEN
3191: oe_debug_pub.add( 'NO BILL IS DEFINED' , 2 ) ;
3192: END IF;
3193: FND_MESSAGE.SET_NAME('ONT','OE_BOM_NO_BILL_IN_VAL_ORG');
3194: FND_MESSAGE.SET_TOKEN('ITEM',nvl(p_line_rec.ordered_item,p_line_rec.inventory_item_id));
3195: FND_MESSAGE.SET_TOKEN('ORG',l_org_id);
3196: OE_MSG_PUB.Add;
3197: l_return_status := FND_API.G_RET_STS_ERROR;
3190: IF l_debug_level > 0 THEN
3191: oe_debug_pub.add( 'NO BILL IS DEFINED' , 2 ) ;
3192: END IF;
3193: FND_MESSAGE.SET_NAME('ONT','OE_BOM_NO_BILL_IN_VAL_ORG');
3194: FND_MESSAGE.SET_TOKEN('ITEM',nvl(p_line_rec.ordered_item,p_line_rec.inventory_item_id));
3195: FND_MESSAGE.SET_TOKEN('ORG',l_org_id);
3196: OE_MSG_PUB.Add;
3197: l_return_status := FND_API.G_RET_STS_ERROR;
3198:
3191: oe_debug_pub.add( 'NO BILL IS DEFINED' , 2 ) ;
3192: END IF;
3193: FND_MESSAGE.SET_NAME('ONT','OE_BOM_NO_BILL_IN_VAL_ORG');
3194: FND_MESSAGE.SET_TOKEN('ITEM',nvl(p_line_rec.ordered_item,p_line_rec.inventory_item_id));
3195: FND_MESSAGE.SET_TOKEN('ORG',l_org_id);
3196: OE_MSG_PUB.Add;
3197: l_return_status := FND_API.G_RET_STS_ERROR;
3198:
3199: WHEN OTHERS THEN
3325: , x_msg_data => l_msg_data);
3326:
3327: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
3328: THEN
3329: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
3330: FND_MESSAGE.SET_TOKEN('BY_PROC','GMI_Reservation_Util.Get_OPM_item_from_Apps');
3331: FND_MESSAGE.SET_TOKEN('WHERE','OE_ORDER_SCH_UTIL');
3332: RAISE FND_API.G_EXC_ERROR;
3333: END IF;
3326:
3327: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
3328: THEN
3329: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
3330: FND_MESSAGE.SET_TOKEN('BY_PROC','GMI_Reservation_Util.Get_OPM_item_from_Apps');
3331: FND_MESSAGE.SET_TOKEN('WHERE','OE_ORDER_SCH_UTIL');
3332: RAISE FND_API.G_EXC_ERROR;
3333: END IF;
3334:
3327: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
3328: THEN
3329: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
3330: FND_MESSAGE.SET_TOKEN('BY_PROC','GMI_Reservation_Util.Get_OPM_item_from_Apps');
3331: FND_MESSAGE.SET_TOKEN('WHERE','OE_ORDER_SCH_UTIL');
3332: RAISE FND_API.G_EXC_ERROR;
3333: END IF;
3334:
3335: get_process_query_quantities ( p_org_id => p_org_id,
3791:
3792: EXCEPTION
3793: WHEN OTHERS THEN
3794: l_return_status := FND_API.G_RET_STS_ERROR;
3795: fnd_message.set_name('ONT', 'OE_INVALID_ITEM_WHSE');
3796: OE_MSG_PUB.Add;
3797: END;
3798:
3799:
3798:
3799:
3800: IF l_revision_code = 2 OR l_lot_code = 2 THEN
3801: -- 2 == YES
3802: fnd_message.set_name('ONT', 'OE_SUBINV_NOT_ALLOWED');
3803: OE_MSG_PUB.Add;
3804: IF p_action = OESCH_ACT_RESERVE THEN
3805: l_return_status := FND_API.G_RET_STS_ERROR;
3806: RAISE FND_API.G_EXC_ERROR;
3858: END IF;
3859: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3860: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
3861: IF l_msg_data is not null THEN
3862: fnd_message.set_encoded(l_msg_data);
3863: l_buffer := fnd_message.get;
3864: oe_msg_pub.add_text(p_message_text => l_buffer);
3865: IF l_debug_level > 0 THEN
3866: oe_debug_pub.add( L_MSG_DATA , 1 ) ;
3859: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3860: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
3861: IF l_msg_data is not null THEN
3862: fnd_message.set_encoded(l_msg_data);
3863: l_buffer := fnd_message.get;
3864: oe_msg_pub.add_text(p_message_text => l_buffer);
3865: IF l_debug_level > 0 THEN
3866: oe_debug_pub.add( L_MSG_DATA , 1 ) ;
3867: END IF;
4534: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4535: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4536: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
4537: IF l_msg_data is not null THEN
4538: fnd_message.set_encoded(l_msg_data);
4539: l_buffer := fnd_message.get;
4540: oe_msg_pub.add_text(p_message_text => l_buffer);
4541: IF l_debug_level > 0 THEN
4542: oe_debug_pub.add( 'ERROR : '|| L_BUFFER , 1 ) ;
4535: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4536: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
4537: IF l_msg_data is not null THEN
4538: fnd_message.set_encoded(l_msg_data);
4539: l_buffer := fnd_message.get;
4540: oe_msg_pub.add_text(p_message_text => l_buffer);
4541: IF l_debug_level > 0 THEN
4542: oe_debug_pub.add( 'ERROR : '|| L_BUFFER , 1 ) ;
4543: END IF;
4646:
4647: EXCEPTION
4648: WHEN OTHERS THEN
4649: l_return_status := FND_API.G_RET_STS_ERROR;
4650: fnd_message.set_name('ONT', 'OE_INVALID_ITEM_WHSE');
4651: OE_MSG_PUB.Add;
4652: END;
4653:
4654:
4653:
4654:
4655: IF l_revision_code = 2 OR l_lot_code = 2 THEN
4656: -- 2 == YES
4657: fnd_message.set_name('ONT', 'OE_SUBINV_NOT_ALLOWED');
4658: OE_MSG_PUB.Add;
4659: IF l_line_rec.schedule_action_code = OESCH_ACT_RESERVE THEN
4660: l_return_status := FND_API.G_RET_STS_ERROR;
4661: RAISE FND_API.G_EXC_ERROR;
4720: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4721: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4722: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
4723: IF l_msg_data is not null THEN
4724: fnd_message.set_encoded(l_msg_data);
4725: l_buffer := fnd_message.get;
4726: oe_msg_pub.add_text(p_message_text => l_buffer);
4727: END IF;
4728:
4721: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4722: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
4723: IF l_msg_data is not null THEN
4724: fnd_message.set_encoded(l_msg_data);
4725: l_buffer := fnd_message.get;
4726: oe_msg_pub.add_text(p_message_text => l_buffer);
4727: END IF;
4728:
4729: IF l_line_rec.Schedule_action_code = OESCH_ACT_RESERVE THEN
4807: -- Reservation qty cannot be reduced when line is
4808: -- interfaced to wsh.
4809: -- Give a message here tell the user we are not unreserving
4810: -- Added code here to fix bug 2038201.
4811: FND_MESSAGE.SET_NAME('ONT','OE_SCH_UNRSV_NOT_ALLOWED');
4812: OE_MSG_PUB.Add;
4813:
4814: goto end_of_processing;
4815:
5062: -- Reservation qty cannot be reduced when line is
5063: -- interfaced to wsh.
5064: -- Give a message here tell the user we are not unreserving
5065: -- Added code here to fix bug 2038201.
5066: FND_MESSAGE.SET_NAME('ONT','OE_SCH_UNRSV_NOT_ALLOWED');
5067: OE_MSG_PUB.Add;
5068:
5069: goto end_of_processing;
5070:
5169: goto end_of_processing;
5170: ELSE
5171: -- Action_Unschedule will only unreserve if not interfaced to WSH
5172: -- Give a message here tell the user we are not unreserving
5173: FND_MESSAGE.SET_NAME('ONT','OE_SCH_UNRSV_NOT_ALLOWED');
5174: OE_MSG_PUB.Add;
5175: goto end_of_processing;
5176: END IF;
5177:
5175: goto end_of_processing;
5176: END IF;
5177:
5178: ELSE
5179: FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_ACTION_DONE_NO_EXP');
5180: OE_MSG_PUB.Add;
5181: goto end_of_processing;
5182: END IF;
5183:
5196:
5197: goto end_of_processing;
5198:
5199: ELSE
5200: FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_ACTION_DONE_NO_EXP');
5201: OE_MSG_PUB.Add;
5202: goto end_of_processing;
5203: END IF;
5204:
5391:
5392: --Commenting this code not to display the message when
5393: --scheduled inclued lines being re-scheduled through schedule_parent-line.
5394: IF (l_line_rec.schedule_status_code IS NOT NULL) THEN
5395: /* FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_ACTION_DONE_NO_EXP');
5396: OE_MSG_PUB.Add;*/
5397: IF l_debug_level > 0 THEN
5398: oe_debug_pub.add( ' SCHEDULED LINE , GOTO END OF PROCESSING' , 3 ) ;
5399: END IF;
5425: END IF;
5426:
5427: IF OE_GLOBALS.Equal(l_line_rec.ordered_quantity,
5428: l_line_rec.reserved_quantity) THEN
5429: FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_ACTION_DONE_NO_EXP');
5430: OE_MSG_PUB.Add;
5431: goto end_of_processing;
5432:
5433: END IF;
7028: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7029: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7030: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
7031: IF l_msg_data is not null THEN
7032: fnd_message.set_encoded(l_msg_data);
7033: l_buffer := fnd_message.get;
7034: oe_msg_pub.add_text(p_message_text => l_buffer);
7035: IF l_debug_level > 0 THEN
7036: oe_debug_pub.add( 'ERROR : '|| L_BUFFER , 1 ) ;
7029: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7030: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
7031: IF l_msg_data is not null THEN
7032: fnd_message.set_encoded(l_msg_data);
7033: l_buffer := fnd_message.get;
7034: oe_msg_pub.add_text(p_message_text => l_buffer);
7035: IF l_debug_level > 0 THEN
7036: oe_debug_pub.add( 'ERROR : '|| L_BUFFER , 1 ) ;
7037: END IF;
7420: IF l_debug_level > 0 THEN
7421: oe_debug_pub.add( 'ERROR FROM MRP: ' || P_ATP_TABLE.ERROR_CODE ( J ) , 1 ) ;
7422: END IF;
7423: IF p_atp_table.error_code(J) = 80 THEN
7424: FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_SOURCE');
7425: OE_MSG_PUB.Add;
7426: ELSE
7427:
7428: IF l_debug_level > 0 THEN
7478: ELSE
7479: IF l_debug_level > 0 THEN
7480: oe_debug_pub.add( 'ADDING MESSAGE TO THE STACK' , 1 ) ;
7481: END IF;
7482: FND_MESSAGE.SET_NAME('ONT','OE_SCH_OE_ORDER_FAILED');
7483: FND_MESSAGE.SET_TOKEN('EXPLANATION',l_explanation);
7484: OE_MSG_PUB.Add;
7485: END IF;
7486: END IF;
7479: IF l_debug_level > 0 THEN
7480: oe_debug_pub.add( 'ADDING MESSAGE TO THE STACK' , 1 ) ;
7481: END IF;
7482: FND_MESSAGE.SET_NAME('ONT','OE_SCH_OE_ORDER_FAILED');
7483: FND_MESSAGE.SET_TOKEN('EXPLANATION',l_explanation);
7484: OE_MSG_PUB.Add;
7485: END IF;
7486: END IF;
7487:
7826: IF l_debug_level > 0 THEN
7827: oe_debug_pub.add( 'SCH: MRP HAS RETURNED A NULL SHIP DATE' , 2 ) ;
7828: END IF;
7829: l_line_rec.visible_demand_flag := 'N';
7830: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ATP_ERROR');
7831: OE_MSG_PUB.Add;
7832: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7833: END IF;
7834: -- Bug 2375055 End
8022: IF l_debug_level > 0 THEN
8023: oe_debug_pub.add( 'SCH: MRP HAS RETURNED A NULL SHIP DATE' , 2 ) ;
8024: END IF;
8025: l_line_rec.visible_demand_flag := 'N';
8026: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ATP_ERROR');
8027: OE_MSG_PUB.Add;
8028: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8029: END IF;
8030: -- Bug 2375055 End
9063: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9064: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
9065: THEN
9066: IF l_msg_data is not null THEN
9067: fnd_message.set_encoded(l_msg_data);
9068: l_buffer := fnd_message.get;
9069: oe_msg_pub.add_text(p_message_text => l_buffer);
9070: IF l_debug_level > 0 THEN
9071: oe_debug_pub.add( 'ERROR : '|| L_BUFFER , 1 ) ;
9064: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
9065: THEN
9066: IF l_msg_data is not null THEN
9067: fnd_message.set_encoded(l_msg_data);
9068: l_buffer := fnd_message.get;
9069: oe_msg_pub.add_text(p_message_text => l_buffer);
9070: IF l_debug_level > 0 THEN
9071: oe_debug_pub.add( 'ERROR : '|| L_BUFFER , 1 ) ;
9072: END IF;
9128: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9129: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
9130: THEN
9131: IF l_msg_data is not null THEN
9132: fnd_message.set_encoded(l_msg_data);
9133: l_buffer := fnd_message.get;
9134: oe_msg_pub.add_text(p_message_text => l_buffer);
9135: IF l_debug_level > 0 THEN
9136: oe_debug_pub.add( 'ERROR : '|| L_BUFFER , 1 ) ;
9129: ELSIF l_return_status = FND_API.G_RET_STS_ERROR
9130: THEN
9131: IF l_msg_data is not null THEN
9132: fnd_message.set_encoded(l_msg_data);
9133: l_buffer := fnd_message.get;
9134: oe_msg_pub.add_text(p_message_text => l_buffer);
9135: IF l_debug_level > 0 THEN
9136: oe_debug_pub.add( 'ERROR : '|| L_BUFFER , 1 ) ;
9137: END IF;
9288: END IF;
9289: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9290: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
9291: IF l_msg_data is not null THEN
9292: fnd_message.set_encoded(l_msg_data);
9293: l_buffer := fnd_message.get;
9294: oe_msg_pub.add_text(p_message_text => l_buffer);
9295: IF l_debug_level > 0 THEN
9296: oe_debug_pub.add( 'ERROR : '|| L_BUFFER , 1 ) ;
9289: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9290: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
9291: IF l_msg_data is not null THEN
9292: fnd_message.set_encoded(l_msg_data);
9293: l_buffer := fnd_message.get;
9294: oe_msg_pub.add_text(p_message_text => l_buffer);
9295: IF l_debug_level > 0 THEN
9296: oe_debug_pub.add( 'ERROR : '|| L_BUFFER , 1 ) ;
9297: END IF;
9513: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
9514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9515: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
9516: IF l_msg_data is not null THEN
9517: fnd_message.set_encoded(l_msg_data);
9518: l_buffer := fnd_message.get;
9519: oe_msg_pub.add_text(p_message_text => l_buffer);
9520: IF l_debug_level > 0 THEN
9521: oe_debug_pub.add( 'ERROR : '|| L_BUFFER , 1 ) ;
9514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9515: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
9516: IF l_msg_data is not null THEN
9517: fnd_message.set_encoded(l_msg_data);
9518: l_buffer := fnd_message.get;
9519: oe_msg_pub.add_text(p_message_text => l_buffer);
9520: IF l_debug_level > 0 THEN
9521: oe_debug_pub.add( 'ERROR : '|| L_BUFFER , 1 ) ;
9522: END IF;
10313: IF l_failed_rsv_temp_tbl.count > 0 THEN
10314: IF l_debug_level > 0 THEN
10315: oe_debug_pub.add( ' THE RESERVATION PROCESS HAS FAILED ' , 1 ) ;
10316: END IF;
10317: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RSV_FAILURE');
10318: OE_MSG_PUB.Add;
10319: END IF;
10320:
10321: -- Error Handling Start