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.5 2011/09/27 09:58:22 nilegupt ship $ */
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.5 2011/09/27 09:58:22 nilegupt ship $ */
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 1140: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_x_line_adj_rec.line_id,

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

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

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

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

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

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

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

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

2230: , p_data => x_msg_data
2231: );
2232:
2233: IF l_debug_level > 0 THEN
2234: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.VALIDATE_AND_WRITE' , 1 ) ;
2235: END IF;
2236:
2237: EXCEPTION
2238:

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

2348: --
2349: BEGIN
2350:
2351: IF l_debug_level > 0 THEN
2352: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.DELETE_ROW' , 1 ) ;
2353: END IF;
2354:
2355: -- Set the UI flag
2356: OE_GLOBALS.G_UI_FLAG := TRUE;

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

2395: If l_x_line_adj_rec.arithmetic_operator = '%' Then
2396: IF l_debug_level > 0 THEN
2397: oe_debug_pub.add( ' CS BEFORE GETTING LINE' ) ;
2398: END IF;
2399: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_x_line_adj_rec.line_id,
2400: x_line_rec=>l_line_rec);
2401:
2402: If nvl(l_line_rec.line_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM and
2403: l_line_rec.service_reference_line_id Is Not Null --make sure is adjustment for a service line

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

2499: , p_data => x_msg_data
2500: );
2501:
2502: IF l_debug_level > 0 THEN
2503: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.DELETE_ROW' , 1 ) ;
2504: END IF;
2505:
2506: EXCEPTION
2507:

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

2603: --
2604: BEGIN
2605:
2606: IF l_debug_level > 0 THEN
2607: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.PROCESS_DELAYED_REQUESTS' , 1 ) ;
2608: END IF;
2609:
2610: /*
2611: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype

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

2764: ( p_count => x_msg_count
2765: , p_data => x_msg_data
2766: );
2767:
2768: oe_debug_pub.add('Exiting OE_OE_FORM_LINE_ADJ.PROCESS_DELAYED_REQUESTS', 1);
2769:
2770: ****************************************************************/
2771:
2772: EXCEPTION

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

2874: --
2875: BEGIN
2876:
2877: IF l_debug_level > 0 THEN
2878: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.REPLACE_ATTRIBUTES' , 1 ) ;
2879: END IF;
2880:
2881: -- Set the UI flag
2882: OE_GLOBALS.G_UI_FLAG := TRUE;

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

2932: --IF (p_operand_per_pqty IS NULL) THEN
2933: If l_x_line_adj_rec.line_id is not Null
2934: and l_x_line_adj_rec.list_line_type_code <> 'LUMPSUM'
2935: Then
2936: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_x_line_adj_rec.line_id,
2937: x_line_rec=>l_line_rec);
2938:
2939: If nvl(l_line_rec.pricing_quantity,0) <> 0 Then
2940: l_x_line_adj_rec.adjusted_amount_per_pqty := (p_adjusted_amount * l_line_rec.Ordered_Quantity)/l_line_rec.pricing_quantity;

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

2954: IF (p_operand_per_pqty IS NULL) THEN
2955: If l_x_line_adj_rec.line_id is not Null
2956: and l_x_line_adj_rec.list_line_type_code <> 'LUMPSUM'
2957: Then
2958: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_x_line_adj_rec.line_id,
2959: x_line_rec=>l_line_rec);
2960:
2961: If nvl(l_line_rec.pricing_quantity,0) <> 0 Then
2962: l_x_line_adj_rec.operand_per_pqty := (p_operand * l_line_rec.Ordered_Quantity)/l_line_rec.pricing_quantity;

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

3036: , p_data => x_msg_data
3037: );
3038:
3039: IF l_debug_level > 0 THEN
3040: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.REPLACE_ATTRIBUTES' , 1 ) ;
3041: END IF;
3042:
3043: EXCEPTION
3044:

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

3124: --
3125: BEGIN
3126:
3127: IF l_debug_level > 0 THEN
3128: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.LOCK_ROW' , 1 ) ;
3129: END IF;
3130:
3131: -- Load Line_Adj record
3132:

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

3162: , p_data => x_msg_data
3163: );
3164:
3165: IF l_debug_level > 0 THEN
3166: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.LOCK_ROW' , 1 ) ;
3167: END IF;
3168:
3169: EXCEPTION
3170:

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

3205: --
3206: BEGIN
3207:
3208: IF l_debug_level > 0 THEN
3209: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.WRITE_LINE_ADJ' , 1 ) ;
3210: END IF;
3211:
3212: g_Line_Adj_rec := p_Line_Adj_rec;
3213:

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

3217:
3218: END IF;
3219:
3220: IF l_debug_level > 0 THEN
3221: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.WRITE_LINE_ADJ' , 1 ) ;
3222: END IF;
3223:
3224: END Write_Line_Adj;
3225:

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

3235: --
3236: BEGIN
3237:
3238: IF l_debug_level > 0 THEN
3239: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.GET_LINE_ADJ' , 1 ) ;
3240: END IF;
3241:
3242: IF p_price_adjustment_id <> g_Line_Adj_rec.price_adjustment_id
3243: THEN

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

3257:
3258: END IF;
3259:
3260: IF l_debug_level > 0 THEN
3261: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.GET_LINE_ADJ' , 1 ) ;
3262: END IF;
3263:
3264: IF p_db_record THEN
3265:

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

3283: --
3284: BEGIN
3285:
3286: IF l_debug_level > 0 THEN
3287: oe_debug_pub.add( 'ENTERING OE_OE_FORM_LINE_ADJ.CLEAR_LINE_ADJ' , 1 ) ;
3288: END IF;
3289:
3290: g_Line_Adj_rec := OE_Order_PUB.G_MISS_LINE_ADJ_REC;
3291: g_db_Line_Adj_rec := OE_Order_PUB.G_MISS_LINE_ADJ_REC;

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

3290: g_Line_Adj_rec := OE_Order_PUB.G_MISS_LINE_ADJ_REC;
3291: g_db_Line_Adj_rec := OE_Order_PUB.G_MISS_LINE_ADJ_REC;
3292:
3293: IF l_debug_level > 0 THEN
3294: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE_ADJ.CLEAR_LINE_ADJ' , 1 ) ;
3295: END IF;
3296:
3297: END Clear_Line_Adj;
3298:

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

3329: If l_line_adj_tbl(1).operand_per_pqty is NULL Then
3330: If l_line_adj_tbl(1).line_id is not Null
3331: and l_line_adj_tbl(1).list_line_type_code Not In ('%','LUMPSUM')
3332: Then
3333: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_line_adj_tbl(1).line_id,
3334: x_line_rec=>l_line_rec);
3335:
3336: If nvl(l_line_rec.pricing_quantity,0) <> 0 Then
3337: 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 3352: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_line_adj_tbl(1).line_id,

3348: If l_line_adj_tbl(1).adjusted_amount_per_pqty is NULL Then
3349:
3350: If l_line_rec.line_id Is Null and l_line_adj_tbl(1).line_id is not null Then
3351: --get line only if this line_rec does not exists
3352: Oe_Oe_Form_Line.Get_Line(p_line_id=>l_line_adj_tbl(1).line_id,
3353: x_line_rec=>l_line_rec);
3354: End If;
3355:
3356: If nvl(l_line_rec.pricing_quantity,0) <> 0

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

3386: EXCEPTION WHEN OTHERS THEN
3387: -- lagrawal bug 3673050
3388: OE_GLOBALS.G_UI_FLAG := FALSE;
3389: IF l_debug_level > 0 THEN
3390: oe_debug_pub.add( ' IN OE_OE_FORM_LINE_ADJ.INSER_ROW:'||SQLERRM ) ;
3391: END IF;
3392: END;
3393: END IF;
3394:

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

3440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3441:
3442: OE_MSG_PUB.Add_Exc_Msg
3443: ( G_PKG_NAME
3444: , 'Oe_Oe_Form_Line_Adj.Insert_Row:'||SQLERRM
3445: );
3446: IF l_debug_level > 0 THEN
3447: oe_debug_pub.add( 'OE_OE_FORM_LINE_ADJ.INSERT_ROW:'||SQLERRM ) ;
3448: END IF;

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

3443: ( G_PKG_NAME
3444: , 'Oe_Oe_Form_Line_Adj.Insert_Row:'||SQLERRM
3445: );
3446: IF l_debug_level > 0 THEN
3447: oe_debug_pub.add( 'OE_OE_FORM_LINE_ADJ.INSERT_ROW:'||SQLERRM ) ;
3448: END IF;
3449: -- Get message count and data
3450:
3451: OE_MSG_PUB.Count_And_Get

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

3526: END IF;
3527: End If;
3528: Exception When Others Then
3529: IF l_debug_level > 0 THEN
3530: oe_debug_pub.add( ' EXECPTION IN OE_OE_FORM_LINE_ADJ:'||SQLERRM ) ;
3531: END IF;
3532: End;
3533:
3534: --This Procedure will either change,create or delete adjustments

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

3671: End Loop;
3672:
3673: Exception When Others Then
3674: IF l_debug_level > 0 THEN
3675: oe_debug_pub.add( 'IN OE_OE_FORM_LINE_ADJ.PROCESS_ADJ:'||SQLERRM||':'||STMT ) ;
3676: END IF;
3677: End;
3678:
3679:

Line 3680: END OE_OE_Form_Line_Adj;

3676: END IF;
3677: End;
3678:
3679:
3680: END OE_OE_Form_Line_Adj;