DBA Data[Home] [Help]

APPS.OE_OE_FORM_LINE_ADJ dependencies on OE_OE_FORM_LINE

Line 1: PACKAGE BODY OE_OE_Form_Line_Adj AS

1: PACKAGE BODY OE_OE_Form_Line_Adj AS
2: /* $Header: OEXFLADB.pls 120.2 2006/07/25 11:47:16 ppnair noship $ */
3:
4: -- Global constant holding the package name
5:

Line 6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OE_OE_Form_Line_Adj';

2: /* $Header: OEXFLADB.pls 120.2 2006/07/25 11:47:16 ppnair noship $ */
3:
4: -- Global constant holding the package name
5:
6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OE_OE_Form_Line_Adj';
7:
8: -- Global variables holding cached record.
9:
10: g_Line_Adj_rec OE_Order_PUB.Line_Adj_Rec_Type

Line 248: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.DEFAULT_ATTRIBUTES' , 1 ) ;

244: --
245: BEGIN
246:
247: IF l_debug_level > 0 THEN
248: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.DEFAULT_ATTRIBUTES' , 1 ) ;
249: END IF;
250:
251: -- Set the UI flag
252: OE_GLOBALS.G_UI_FLAG := TRUE;

Line 503: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.DEFAULT_ATTRIBUTES' , 1 ) ;

499: , p_data => x_msg_data
500: );
501:
502: IF l_debug_level > 0 THEN
503: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.DEFAULT_ATTRIBUTES' , 1 ) ;
504: END IF;
505:
506: EXCEPTION
507:

Line 807: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.CHANGE_ATTRIBUTES' , 1 ) ;

803: --
804: BEGIN
805:
806: IF l_debug_level > 0 THEN
807: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.CHANGE_ATTRIBUTES' , 1 ) ;
808: END IF;
809:
810: --initialize record.
811: l_line_rec.line_id := NULL;

Line 897: oe_debug_pub.add( ' IN OE_OE_FORM_LINE_ADJ:'||SQLERRM ) ;

893: AND nvl(lin.line_id,l_x_Line_Adj_rec.line_id) = l_x_Line_Adj_rec.line_id
894: AND rownum = 1;
895: EXCEPTION WHEN OTHERS THEN
896: IF l_debug_level > 0 THEN
897: oe_debug_pub.add( ' IN OE_OE_FORM_LINE_ADJ:'||SQLERRM ) ;
898: END IF;
899: END;
900: END IF;
901: ELSIF p_attr_id = OE_Line_Adj_Util.G_MODIFIER_MECHANISM_TYPE_CODE then

Line 1138: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_x_line_adj_rec.line_id,

1134: Then
1135: IF l_debug_level > 0 THEN
1136: oe_debug_pub.add( ' CS BEFORE GETTING LINE' ) ;
1137: END IF;
1138: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_x_line_adj_rec.line_id,
1139: x_line_rec=>l_line_rec);
1140: End If;
1141:
1142: --Cascading adjustments for service lines

Line 1216: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_x_line_adj_rec.line_id,

1212: If p_attr_id = OE_Line_Adj_Util.G_CHANGE_REASON_CODE Then
1213:
1214: --If no line queried, requery again else just use this to
1215: If nvl(l_line_rec.line_id,FND_API.G_MISS_NUM) = FND_API.G_MISS_NUM Then
1216: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_x_line_adj_rec.line_id,
1217: x_line_rec=>l_line_rec);
1218: End If;
1219:
1220: --Only do that for top model line

Line 1875: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.CHANGE_ATTRIBUTES' , 1 ) ;

1871: , p_data => x_msg_data
1872: );
1873:
1874: IF l_debug_level > 0 THEN
1875: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.CHANGE_ATTRIBUTES' , 1 ) ;
1876: END IF;
1877:
1878: EXCEPTION
1879:

Line 2012: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.VALIDATE_AND_WRITE' , 1 ) ;

2008: --
2009: BEGIN
2010:
2011: IF l_debug_level > 0 THEN
2012: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.VALIDATE_AND_WRITE' , 1 ) ;
2013: END IF;
2014:
2015: -- Set the UI flag
2016: OE_GLOBALS.G_UI_FLAG := TRUE;

Line 2217: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.VALIDATE_AND_WRITE' , 1 ) ;

2213: , p_data => x_msg_data
2214: );
2215:
2216: IF l_debug_level > 0 THEN
2217: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.VALIDATE_AND_WRITE' , 1 ) ;
2218: END IF;
2219:
2220: EXCEPTION
2221:

Line 2335: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.DELETE_ROW' , 1 ) ;

2331: --
2332: BEGIN
2333:
2334: IF l_debug_level > 0 THEN
2335: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.DELETE_ROW' , 1 ) ;
2336: END IF;
2337:
2338: -- Set the UI flag
2339: OE_GLOBALS.G_UI_FLAG := TRUE;

Line 2382: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_x_line_adj_rec.line_id,

2378: If l_x_line_adj_rec.arithmetic_operator = '%' Then
2379: IF l_debug_level > 0 THEN
2380: oe_debug_pub.add( ' CS BEFORE GETTING LINE' ) ;
2381: END IF;
2382: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_x_line_adj_rec.line_id,
2383: x_line_rec=>l_line_rec);
2384:
2385: If nvl(l_line_rec.line_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM and
2386: l_line_rec.service_reference_line_id Is Not Null --make sure is adjustment for a service line

Line 2486: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.DELETE_ROW' , 1 ) ;

2482: , p_data => x_msg_data
2483: );
2484:
2485: IF l_debug_level > 0 THEN
2486: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.DELETE_ROW' , 1 ) ;
2487: END IF;
2488:
2489: EXCEPTION
2490:

Line 2590: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.PROCESS_DELAYED_REQUESTS' , 1 ) ;

2586: --
2587: BEGIN
2588:
2589: IF l_debug_level > 0 THEN
2590: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.PROCESS_DELAYED_REQUESTS' , 1 ) ;
2591: END IF;
2592:
2593: /*
2594: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype

Line 2751: oe_debug_pub.add('Exiting OE_OE_FORM_LINE_ADJ.PROCESS_DELAYED_REQUESTS', 1);

2747: ( p_count => x_msg_count
2748: , p_data => x_msg_data
2749: );
2750:
2751: oe_debug_pub.add('Exiting OE_OE_FORM_LINE_ADJ.PROCESS_DELAYED_REQUESTS', 1);
2752:
2753: ****************************************************************/
2754:
2755: EXCEPTION

Line 2861: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.REPLACE_ATTRIBUTES' , 1 ) ;

2857: --
2858: BEGIN
2859:
2860: IF l_debug_level > 0 THEN
2861: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.REPLACE_ATTRIBUTES' , 1 ) ;
2862: END IF;
2863:
2864: -- Set the UI flag
2865: OE_GLOBALS.G_UI_FLAG := TRUE;

Line 2919: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_x_line_adj_rec.line_id,

2915: --IF (p_operand_per_pqty IS NULL) THEN
2916: If l_x_line_adj_rec.line_id is not Null
2917: and l_x_line_adj_rec.list_line_type_code <> 'LUMPSUM'
2918: Then
2919: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_x_line_adj_rec.line_id,
2920: x_line_rec=>l_line_rec);
2921:
2922: If nvl(l_line_rec.pricing_quantity,0) <> 0 Then
2923: l_x_line_adj_rec.adjusted_amount_per_pqty := (p_adjusted_amount * l_line_rec.Ordered_Quantity)/l_line_rec.pricing_quantity;

Line 2941: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_x_line_adj_rec.line_id,

2937: IF (p_operand_per_pqty IS NULL) THEN
2938: If l_x_line_adj_rec.line_id is not Null
2939: and l_x_line_adj_rec.list_line_type_code <> 'LUMPSUM'
2940: Then
2941: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_x_line_adj_rec.line_id,
2942: x_line_rec=>l_line_rec);
2943:
2944: If nvl(l_line_rec.pricing_quantity,0) <> 0 Then
2945: l_x_line_adj_rec.operand_per_pqty := (p_operand * l_line_rec.Ordered_Quantity)/l_line_rec.pricing_quantity;

Line 3023: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.REPLACE_ATTRIBUTES' , 1 ) ;

3019: , p_data => x_msg_data
3020: );
3021:
3022: IF l_debug_level > 0 THEN
3023: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.REPLACE_ATTRIBUTES' , 1 ) ;
3024: END IF;
3025:
3026: EXCEPTION
3027:

Line 3111: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.LOCK_ROW' , 1 ) ;

3107: --
3108: BEGIN
3109:
3110: IF l_debug_level > 0 THEN
3111: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.LOCK_ROW' , 1 ) ;
3112: END IF;
3113:
3114: -- Load Line_Adj record
3115:

Line 3149: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.LOCK_ROW' , 1 ) ;

3145: , p_data => x_msg_data
3146: );
3147:
3148: IF l_debug_level > 0 THEN
3149: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.LOCK_ROW' , 1 ) ;
3150: END IF;
3151:
3152: EXCEPTION
3153:

Line 3192: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.WRITE_LINE_ADJ' , 1 ) ;

3188: --
3189: BEGIN
3190:
3191: IF l_debug_level > 0 THEN
3192: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.WRITE_LINE_ADJ' , 1 ) ;
3193: END IF;
3194:
3195: g_Line_Adj_rec := p_Line_Adj_rec;
3196:

Line 3204: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.WRITE_LINE_ADJ' , 1 ) ;

3200:
3201: END IF;
3202:
3203: IF l_debug_level > 0 THEN
3204: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.WRITE_LINE_ADJ' , 1 ) ;
3205: END IF;
3206:
3207: END Write_Line_Adj;
3208:

Line 3222: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.GET_LINE_ADJ' , 1 ) ;

3218: --
3219: BEGIN
3220:
3221: IF l_debug_level > 0 THEN
3222: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.GET_LINE_ADJ' , 1 ) ;
3223: END IF;
3224:
3225: IF p_price_adjustment_id <> g_Line_Adj_rec.price_adjustment_id
3226: THEN

Line 3244: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.GET_LINE_ADJ' , 1 ) ;

3240:
3241: END IF;
3242:
3243: IF l_debug_level > 0 THEN
3244: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.GET_LINE_ADJ' , 1 ) ;
3245: END IF;
3246:
3247: IF p_db_record THEN
3248:

Line 3270: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.CLEAR_LINE_ADJ' , 1 ) ;

3266: --
3267: BEGIN
3268:
3269: IF l_debug_level > 0 THEN
3270: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.CLEAR_LINE_ADJ' , 1 ) ;
3271: END IF;
3272:
3273: g_Line_Adj_rec := OE_Order_PUB.G_MISS_LINE_ADJ_REC;
3274: g_db_Line_Adj_rec := OE_Order_PUB.G_MISS_LINE_ADJ_REC;

Line 3277: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.CLEAR_LINE_ADJ' , 1 ) ;

3273: g_Line_Adj_rec := OE_Order_PUB.G_MISS_LINE_ADJ_REC;
3274: g_db_Line_Adj_rec := OE_Order_PUB.G_MISS_LINE_ADJ_REC;
3275:
3276: IF l_debug_level > 0 THEN
3277: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.CLEAR_LINE_ADJ' , 1 ) ;
3278: END IF;
3279:
3280: END Clear_Line_Adj;
3281:

Line 3316: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_line_adj_tbl(1).line_id,

3312: If l_line_adj_tbl(1).operand_per_pqty is NULL Then
3313: If l_line_adj_tbl(1).line_id is not Null
3314: and l_line_adj_tbl(1).list_line_type_code Not In ('%','LUMPSUM')
3315: Then
3316: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_line_adj_tbl(1).line_id,
3317: x_line_rec=>l_line_rec);
3318:
3319: If nvl(l_line_rec.pricing_quantity,0) <> 0 Then
3320: l_line_adj_tbl(1).operand_per_pqty := (l_line_adj_tbl(1).operand * l_line_rec.Ordered_Quantity)/l_line_rec.pricing_quantity;

Line 3335: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_line_adj_tbl(1).line_id,

3331: If l_line_adj_tbl(1).adjusted_amount_per_pqty is NULL Then
3332:
3333: If l_line_rec.line_id Is Null and l_line_adj_tbl(1).line_id is not null Then
3334: --get line only if this line_rec does not exists
3335: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_line_adj_tbl(1).line_id,
3336: x_line_rec=>l_line_rec);
3337: End If;
3338:
3339: If nvl(l_line_rec.pricing_quantity,0) <> 0

Line 3373: oe_debug_pub.add( ' IN OE_OE_FORM_LINE_ADJ.INSER_ROW:'||SQLERRM ) ;

3369: EXCEPTION WHEN OTHERS THEN
3370: -- lagrawal bug 3673050
3371: OE_GLOBALS.G_UI_FLAG := FALSE;
3372: IF l_debug_level > 0 THEN
3373: oe_debug_pub.add( ' IN OE_OE_FORM_LINE_ADJ.INSER_ROW:'||SQLERRM ) ;
3374: END IF;
3375: END;
3376: END IF;
3377:

Line 3414: , 'Oe_Oe_Form_Line_Adj.Insert_Row:'||SQLERRM

3410: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3411:
3412: OE_MSG_PUB.Add_Exc_Msg
3413: ( G_PKG_NAME
3414: , 'Oe_Oe_Form_Line_Adj.Insert_Row:'||SQLERRM
3415: );
3416: IF l_debug_level > 0 THEN
3417: oe_debug_pub.add( 'OE_OE_FORM_LINE_ADJ.INSERT_ROW:'||SQLERRM ) ;
3418: END IF;

Line 3417: oe_debug_pub.add( 'OE_OE_FORM_LINE_ADJ.INSERT_ROW:'||SQLERRM ) ;

3413: ( G_PKG_NAME
3414: , 'Oe_Oe_Form_Line_Adj.Insert_Row:'||SQLERRM
3415: );
3416: IF l_debug_level > 0 THEN
3417: oe_debug_pub.add( 'OE_OE_FORM_LINE_ADJ.INSERT_ROW:'||SQLERRM ) ;
3418: END IF;
3419: -- Get message count and data
3420:
3421: OE_MSG_PUB.Count_And_Get

Line 3500: oe_debug_pub.add( ' EXECPTION IN OE_OE_FORM_LINE_ADJ:'||SQLERRM ) ;

3496: END IF;
3497: End If;
3498: Exception When Others Then
3499: IF l_debug_level > 0 THEN
3500: oe_debug_pub.add( ' EXECPTION IN OE_OE_FORM_LINE_ADJ:'||SQLERRM ) ;
3501: END IF;
3502: End;
3503:
3504: --This Procedure will either change,create or delete adjustments

Line 3645: oe_debug_pub.add( 'IN OE_OE_FORM_LINE_ADJ.PROCESS_ADJ:'||SQLERRM||':'||STMT ) ;

3641: End Loop;
3642:
3643: Exception When Others Then
3644: IF l_debug_level > 0 THEN
3645: oe_debug_pub.add( 'IN OE_OE_FORM_LINE_ADJ.PROCESS_ADJ:'||SQLERRM||':'||STMT ) ;
3646: END IF;
3647: End;
3648:
3649:

Line 3650: END OE_OE_Form_Line_Adj;

3646: END IF;
3647: End;
3648:
3649:
3650: END OE_OE_Form_Line_Adj;