82: WHEN OTHERS THEN
83: IF l_debug_level > 0 THEN
84: oe_debug_pub.add('SQL Other Error : '||sqlerrm,1);
85: END IF;
86: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
87: THEN
88: OE_MSG_PUB.Add_Exc_Msg
89: ( G_PKG_NAME ,
90: 'Get_freight_carrier'
84: oe_debug_pub.add('SQL Other Error : '||sqlerrm,1);
85: END IF;
86: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
87: THEN
88: OE_MSG_PUB.Add_Exc_Msg
89: ( G_PKG_NAME ,
90: 'Get_freight_carrier'
91: );
92: END IF;
125: p_old_header_rec.order_category_code IS NOT NULL ) THEN
126: IF NOT OE_GLOBALS.EQUAL(p_old_header_rec.order_category_code,
127: l_category_code) THEN
128: FND_MESSAGE.SET_NAME('ONT','OE_ORD_CAT_CONST');
129: OE_MSG_PUB.ADD;
130: IF l_debug_level > 0 THEN
131: oe_debug_pub.add( 'ORDER CATEGORY CONSTRAINED' ) ;
132: END IF;
133: RAISE FND_API.G_EXC_ERROR;
148: RAISE FND_API.G_EXC_ERROR;
149: --End Of Fix
150:
151: WHEN OTHERS THEN
152: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
153: THEN
154: OE_MSG_PUB.Add_Exc_Msg
155: ( G_PKG_NAME ,
156: 'Get_order_category'
150:
151: WHEN OTHERS THEN
152: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
153: THEN
154: OE_MSG_PUB.Add_Exc_Msg
155: ( G_PKG_NAME ,
156: 'Get_order_category'
157: );
158: END IF;
286: RETURN p_header_rec.customer_preference_set_code;
287: EXCEPTION
288:
289: WHEN OTHERS THEN
290: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
291: THEN
292: OE_MSG_PUB.Add_Exc_Msg
293: ( G_PKG_NAME ,
294: 'Get_customer_preference_set'
288:
289: WHEN OTHERS THEN
290: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
291: THEN
292: OE_MSG_PUB.Add_Exc_Msg
293: ( G_PKG_NAME ,
294: 'Get_customer_preference_set'
295: );
296: END IF;
347: EXCEPTION
348:
349: WHEN OTHERS THEN
350:
351: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
352: THEN
353: OE_MSG_PUB.Add_Exc_Msg
354: ( G_PKG_NAME ,
355: 'Get_Header'
349: WHEN OTHERS THEN
350:
351: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
352: THEN
353: OE_MSG_PUB.Add_Exc_Msg
354: ( G_PKG_NAME ,
355: 'Get_Header'
356: );
357: END IF;
406: EXCEPTION
407:
408: WHEN OTHERS THEN
409:
410: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
411: THEN
412: OE_MSG_PUB.Add_Exc_Msg
413: ( G_PKG_NAME ,
414: 'Get_Ordered_Date'
408: WHEN OTHERS THEN
409:
410: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
411: THEN
412: OE_MSG_PUB.Add_Exc_Msg
413: ( G_PKG_NAME ,
414: 'Get_Ordered_Date'
415: );
416: END IF;
441: EXCEPTION
442:
443: WHEN OTHERS THEN
444:
445: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
446: THEN
447: OE_MSG_PUB.Add_Exc_Msg
448: ( G_PKG_NAME ,
449: 'Get_Version_Number'
443: WHEN OTHERS THEN
444:
445: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
446: THEN
447: OE_MSG_PUB.Add_Exc_Msg
448: ( G_PKG_NAME ,
449: 'Get_Version_Number'
450: );
451: END IF;
473: EXCEPTION
474:
475: WHEN OTHERS THEN
476:
477: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
478: THEN
479: OE_MSG_PUB.Add_Exc_Msg
480: ( G_PKG_NAME ,
481: 'Get_Order_Source'
475: WHEN OTHERS THEN
476:
477: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
478: THEN
479: OE_MSG_PUB.Add_Exc_Msg
480: ( G_PKG_NAME ,
481: 'Get_Order_Source'
482: );
483: END IF;
564: fnd_message.set_token('TEXT1',
565: OE_Order_UTIL.Get_Attribute_Name('ORDER_TYPE'));
566: END IF;
567:
568: OE_MSG_PUB.Add;
569:
570: END IF;
571:
572: RETURN l_contract_template_id;
573:
574: EXCEPTION
575:
576: WHEN OTHERS THEN
577: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
578: THEN
579: OE_MSG_PUB.Add_Exc_Msg
580: ( G_PKG_NAME ,
581: 'Get_contract_template_id'
575:
576: WHEN OTHERS THEN
577: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
578: THEN
579: OE_MSG_PUB.Add_Exc_Msg
580: ( G_PKG_NAME ,
581: 'Get_contract_template_id'
582: );
583: END IF;
1264: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1265:
1266: WHEN OTHERS THEN
1267:
1268: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1269: THEN
1270: OE_MSG_PUB.Add_Exc_Msg
1271: ( G_PKG_NAME,
1272: 'Attributes'
1266: WHEN OTHERS THEN
1267:
1268: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1269: THEN
1270: OE_MSG_PUB.Add_Exc_Msg
1271: ( G_PKG_NAME,
1272: 'Attributes'
1273: );
1274: END IF;