DBA Data[Home] [Help]

APPS.OE_ORDER_UTIL dependencies on OE_DEBUG_PUB

Line 196: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

192: l_change_reason VARCHAR2(30);
193: l_change_comments VARCHAR2(2000);
194: -- End Audit/Versioning Changes
195: --
196: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
197: --
198: BEGIN
199: x_return_status := FND_API.G_RET_STS_SUCCESS;
200:

Line 202: oe_debug_pub.add( 'ENTERING OE_ORDER_UTIL.UPDATE_GLOBAL_PICTURE' , 1 ) ;

198: BEGIN
199: x_return_status := FND_API.G_RET_STS_SUCCESS;
200:
201: IF l_debug_level > 0 THEN
202: oe_debug_pub.add( 'ENTERING OE_ORDER_UTIL.UPDATE_GLOBAL_PICTURE' , 1 ) ;
203: END IF;
204:
205: /* The global entities will be populated for booked orders */
206: /* coming in via Process Order or for entered orders via the GUI */

Line 211: oe_debug_pub.add( 'UI FLAG IS FALSE' , 1 ) ;

207: /* or at 11.5.10 or higher (for versioning changes) */
208:
209: IF NOT (OE_GLOBALS.G_UI_FLAG ) THEN
210: IF l_debug_level > 0 THEN
211: oe_debug_pub.add( 'UI FLAG IS FALSE' , 1 ) ;
212: END IF;
213: end if;
214:
215: -- check for code set level, Update_Global_Picture is at OM Pack H level

Line 218: oe_debug_pub.add( 'CODE_RELEASE_LEVEL='|| OE_CODE_CONTROL.CODE_RELEASE_LEVEL , 1 ) ;

214:
215: -- check for code set level, Update_Global_Picture is at OM Pack H level
216:
217: IF l_debug_level > 0 THEN
218: oe_debug_pub.add( 'CODE_RELEASE_LEVEL='|| OE_CODE_CONTROL.CODE_RELEASE_LEVEL , 1 ) ;
219: END IF;
220:
221: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110508'
222: THEN

Line 226: oe_debug_pub.add( 'GETTING THE CACHE' || P_HEADER_ID ) ;

222: THEN
223:
224: IF p_header_id is not NULL THEN
225: IF l_debug_level > 0 THEN
226: oe_debug_pub.add( 'GETTING THE CACHE' || P_HEADER_ID ) ;
227: END IF;
228: OE_Order_Cache.Load_Order_Header(p_header_id);
229: END IF;
230:

Line 232: oe_debug_pub.add( 'CACHED VALUE' || OE_ORDER_CACHE.G_HEADER_REC.BOOKED_FLAG ) ;

228: OE_Order_Cache.Load_Order_Header(p_header_id);
229: END IF;
230:
231: IF l_debug_level > 0 THEN
232: oe_debug_pub.add( 'CACHED VALUE' || OE_ORDER_CACHE.G_HEADER_REC.BOOKED_FLAG ) ;
233: END IF;
234: IF (oe_order_cache.g_header_rec.booked_flag = 'Y') OR
235: (OE_GLOBALS.G_UI_FLAG ) OR
236: OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN

Line 247: oe_debug_pub.add( 'P_HEADER_ID=' || P_HEADER_ID , 1 ) ;

243: -- and if it's not there, query it and add to global picture
244:
245: IF(p_header_id is not null) THEN
246: IF l_debug_level > 0 THEN
247: oe_debug_pub.add( 'P_HEADER_ID=' || P_HEADER_ID , 1 ) ;
248: END IF;
249:
250: IF g_old_header_rec.header_id=FND_API.G_MISS_NUM OR
251: g_old_header_rec.header_id is NULL THEN

Line 260: oe_debug_pub.add( 'P_HEADER_REC.HEADER_ID=' || P_HEADER_REC.HEADER_ID , 1 ) ;

256: IF p_header_Rec.header_id is not null and
257: p_header_Rec.operation = oe_globals.g_opr_create THEN
258: IF l_debug_level > 0 THEN
259:
260: oe_debug_pub.add( 'P_HEADER_REC.HEADER_ID=' || P_HEADER_REC.HEADER_ID , 1 ) ;
261: END IF;
262: g_old_header_rec := p_header_Rec;
263: IF l_debug_level > 0 THEN
264: oe_debug_pub.add( 'JPN: OLD HEADER GLOBAL PIC UPDATED' ) ;

Line 264: oe_debug_pub.add( 'JPN: OLD HEADER GLOBAL PIC UPDATED' ) ;

260: oe_debug_pub.add( 'P_HEADER_REC.HEADER_ID=' || P_HEADER_REC.HEADER_ID , 1 ) ;
261: END IF;
262: g_old_header_rec := p_header_Rec;
263: IF l_debug_level > 0 THEN
264: oe_debug_pub.add( 'JPN: OLD HEADER GLOBAL PIC UPDATED' ) ;
265: END IF;
266: ELSE
267: oe_header_util.query_row( p_header_id =>p_header_id,
268: x_header_rec => l_old_header_rec);

Line 271: oe_debug_pub.add( 'JPN: OLD HEADER GLOBAL PIC UPDATED AFTER QUERY' ) ;

267: oe_header_util.query_row( p_header_id =>p_header_id,
268: x_header_rec => l_old_header_rec);
269: g_old_header_rec := l_old_header_rec;
270: IF l_debug_level > 0 THEN
271: oe_debug_pub.add( 'JPN: OLD HEADER GLOBAL PIC UPDATED AFTER QUERY' ) ;
272: END IF;
273: END IF;
274: ELSE
275: g_old_header_rec := p_old_header_rec;

Line 277: oe_debug_pub.add( 'JPN: OLD HEADER GLOBAL PIC UPDATED IN THIS LOOP' ) ;

273: END IF;
274: ELSE
275: g_old_header_rec := p_old_header_rec;
276: IF l_debug_level > 0 THEN
277: oe_debug_pub.add( 'JPN: OLD HEADER GLOBAL PIC UPDATED IN THIS LOOP' ) ;
278: END IF;
279: END IF;
280: END IF;
281:

Line 283: oe_debug_pub.add( 'GLOBAL OLD HEADER BOOKED FLAG VALUE' || G_OLD_HEADER_REC.BOOKED_FLAG ) ;

279: END IF;
280: END IF;
281:
282: IF l_debug_level > 0 THEN
283: oe_debug_pub.add( 'GLOBAL OLD HEADER BOOKED FLAG VALUE' || G_OLD_HEADER_REC.BOOKED_FLAG ) ;
284: END IF;
285:
286: IF p_upd_new_rec_If_Exists THEN
287: /* Update the record in the new global table */

Line 289: oe_debug_pub.add( 'INSIDE LOOP P_UPD_NEW_REC' ) ;

285:
286: IF p_upd_new_rec_If_Exists THEN
287: /* Update the record in the new global table */
288: IF l_debug_level > 0 THEN
289: oe_debug_pub.add( 'INSIDE LOOP P_UPD_NEW_REC' ) ;
290: END IF;
291: -- Begin Audit/Versioning changes (retain old change reason)
292: IF (OE_CODE_CONTROL.Code_Release_Level >= '110510' AND
293: g_header_rec.change_reason IS NOT NULL AND

Line 312: oe_debug_pub.add( 'GLOBAL HEADER BOOKED FLAG VALUE' || G_HEADER_REC.BOOKED_FLAG ) ;

308: END IF;
309: -- End Audit/Versioning changes
310:
311: IF l_debug_level > 0 THEN
312: oe_debug_pub.add( 'GLOBAL HEADER BOOKED FLAG VALUE' || G_HEADER_REC.BOOKED_FLAG ) ;
313: oe_debug_pub.add( 'GLOBAL HEADER REC OPERATION' || G_HEADER_REC.OPERATION ) ;
314: END IF;
315: END IF; -- update flag is set
316:

Line 313: oe_debug_pub.add( 'GLOBAL HEADER REC OPERATION' || G_HEADER_REC.OPERATION ) ;

309: -- End Audit/Versioning changes
310:
311: IF l_debug_level > 0 THEN
312: oe_debug_pub.add( 'GLOBAL HEADER BOOKED FLAG VALUE' || G_HEADER_REC.BOOKED_FLAG ) ;
313: oe_debug_pub.add( 'GLOBAL HEADER REC OPERATION' || G_HEADER_REC.OPERATION ) ;
314: END IF;
315: END IF; -- update flag is set
316:
317: /* return the index value */

Line 321: oe_debug_pub.add( ' OD GLOBAL HEADER_ID= '|| G_OLD_HEADER_REC.HEADER_ID , 1 ) ;

317: /* return the index value */
318: x_index:=1;
319:
320: IF l_debug_level > 0 THEN
321: oe_debug_pub.add( ' OD GLOBAL HEADER_ID= '|| G_OLD_HEADER_REC.HEADER_ID , 1 ) ;
322: oe_debug_pub.add( ' NEW GLOBAL HEADER_ID= '|| G_HEADER_REC.HEADER_ID , 1 ) ;
323: END IF;
324:
325: END IF; -- header_id is not null

Line 322: oe_debug_pub.add( ' NEW GLOBAL HEADER_ID= '|| G_HEADER_REC.HEADER_ID , 1 ) ;

318: x_index:=1;
319:
320: IF l_debug_level > 0 THEN
321: oe_debug_pub.add( ' OD GLOBAL HEADER_ID= '|| G_OLD_HEADER_REC.HEADER_ID , 1 ) ;
322: oe_debug_pub.add( ' NEW GLOBAL HEADER_ID= '|| G_HEADER_REC.HEADER_ID , 1 ) ;
323: END IF;
324:
325: END IF; -- header_id is not null
326:

Line 329: oe_debug_pub.add( 'P_HDR_SCR_ID=' || P_HDR_SCR_ID , 1 ) ;

325: END IF; -- header_id is not null
326:
327: IF (p_hdr_scr_id is not null) THEN
328: IF l_debug_level > 0 THEN
329: oe_debug_pub.add( 'P_HDR_SCR_ID=' || P_HDR_SCR_ID , 1 ) ;
330: END IF;
331:
332: /* search the old global header sales credits table */
333: Return_Glb_Ent_Index(

Line 341: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;

337: l_result,
338: l_return_stat);
339:
340: IF l_debug_level > 0 THEN
341: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
342: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
343: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
344: END IF;
345:

Line 342: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;

338: l_return_stat);
339:
340: IF l_debug_level > 0 THEN
341: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
342: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
343: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
344: END IF;
345:
346: IF l_result = FND_API.G_FALSE THEN

Line 343: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;

339:
340: IF l_debug_level > 0 THEN
341: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
342: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
343: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
344: END IF;
345:
346: IF l_result = FND_API.G_FALSE THEN
347:

Line 355: oe_debug_pub.add( 'JPN: OLD HEADER SALES CREDITS GLOBAL PIC UPDATED' ) ;

351: IF p_hdr_scr_rec.sales_credit_id is not null and
352: p_hdr_scr_rec.operation = oe_globals.g_opr_create THEN
353: g_old_header_scredit_tbl(l_ind):= p_hdr_scr_rec;
354: IF l_debug_level > 0 THEN
355: oe_debug_pub.add( 'JPN: OLD HEADER SALES CREDITS GLOBAL PIC UPDATED' ) ;
356: END IF;
357: ELSE
358: OE_HEADER_SCREDIT_UTIL.Query_Row(p_sales_credit_id => p_hdr_scr_id,
359: x_header_scredit_rec =>l_old_hdr_scr_rec); g_old_header_scredit_tbl(l_ind) :=l_old_hdr_scr_rec;

Line 361: oe_debug_pub.add( 'JPN: OLD HEADER SCREDIT GLOBAL PIC UPDATED AFTER QUERY' ) ;

357: ELSE
358: OE_HEADER_SCREDIT_UTIL.Query_Row(p_sales_credit_id => p_hdr_scr_id,
359: x_header_scredit_rec =>l_old_hdr_scr_rec); g_old_header_scredit_tbl(l_ind) :=l_old_hdr_scr_rec;
360: IF l_debug_level > 0 THEN
361: oe_debug_pub.add( 'JPN: OLD HEADER SCREDIT GLOBAL PIC UPDATED AFTER QUERY' ) ;
362: END IF;
363: END IF;
364:
365: ELSE

Line 394: oe_debug_pub.add( 'GLOBAL HDR_SCR_REC OPERATION' || G_HEADER_SCREDIT_TBL ( L_IND ) .OPERATION ) ;

390: END IF;
391: -- End Audit/Versioning changes
392:
393: IF l_debug_level > 0 THEN
394: oe_debug_pub.add( 'GLOBAL HDR_SCR_REC OPERATION' || G_HEADER_SCREDIT_TBL ( L_IND ) .OPERATION ) ;
395: END IF;
396: END IF; -- update flag is set
397:
398: /* return the index value */

Line 402: oe_debug_pub.add( 'OLD SCR_ID ' || G_OLD_HEADER_SCREDIT_TBL ( L_IND ) .SALES_CREDIT_ID , 1 ) ;

398: /* return the index value */
399: x_index := l_ind;
400:
401: IF l_debug_level > 0 THEN
402: oe_debug_pub.add( 'OLD SCR_ID ' || G_OLD_HEADER_SCREDIT_TBL ( L_IND ) .SALES_CREDIT_ID , 1 ) ;
403: oe_debug_pub.add( 'NEW SCR_ID' || G_HEADER_SCREDIT_TBL ( L_IND ) .SALES_CREDIT_ID , 1 ) ;
404: END IF;
405:
406: END IF; -- hdr_scr_id is not null

Line 403: oe_debug_pub.add( 'NEW SCR_ID' || G_HEADER_SCREDIT_TBL ( L_IND ) .SALES_CREDIT_ID , 1 ) ;

399: x_index := l_ind;
400:
401: IF l_debug_level > 0 THEN
402: oe_debug_pub.add( 'OLD SCR_ID ' || G_OLD_HEADER_SCREDIT_TBL ( L_IND ) .SALES_CREDIT_ID , 1 ) ;
403: oe_debug_pub.add( 'NEW SCR_ID' || G_HEADER_SCREDIT_TBL ( L_IND ) .SALES_CREDIT_ID , 1 ) ;
404: END IF;
405:
406: END IF; -- hdr_scr_id is not null
407:

Line 411: oe_debug_pub.add( 'P_HDR_ADJ_ID=' || P_HDR_ADJ_ID , 1 ) ;

407:
408:
409: IF (p_hdr_adj_id is not null) THEN
410: IF l_debug_level > 0 THEN
411: oe_debug_pub.add( 'P_HDR_ADJ_ID=' || P_HDR_ADJ_ID , 1 ) ;
412: END IF;
413:
414: /* search the old global header adjustments table */
415: Return_Glb_Ent_Index(

Line 423: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;

419: l_result,
420: l_return_stat);
421:
422: IF l_debug_level > 0 THEN
423: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
424: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
425: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
426: END IF;
427:

Line 424: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;

420: l_return_stat);
421:
422: IF l_debug_level > 0 THEN
423: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
424: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
425: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
426: END IF;
427:
428: IF l_result = FND_API.G_FALSE THEN

Line 425: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;

421:
422: IF l_debug_level > 0 THEN
423: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
424: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
425: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
426: END IF;
427:
428: IF l_result = FND_API.G_FALSE THEN
429: IF p_old_hdr_adj_rec.price_adjustment_id = FND_API.G_MISS_NUM OR

Line 436: oe_debug_pub.add( 'JPN: OLD HEADER ADJ GLOBAL PIC UPDATED' ) ;

432: IF p_hdr_adj_rec.price_adjustment_id is not null and
433: p_hdr_adj_rec.operation = oe_globals.g_opr_create THEN
434: g_old_header_adj_tbl(l_ind):= p_hdr_adj_rec;
435: IF l_debug_level > 0 THEN
436: oe_debug_pub.add( 'JPN: OLD HEADER ADJ GLOBAL PIC UPDATED' ) ;
437: END IF;
438: ELSE
439: OE_HEADER_ADJ_UTIL.Query_Row(p_price_adjustment_id => p_hdr_adj_id,
440: x_header_adj_rec =>l_old_hdr_adj_rec);

Line 445: oe_debug_pub.add('Updating the old global table');

441: g_old_header_adj_tbl(l_ind):=l_old_hdr_adj_rec;
442: END IF;
443: ELSE
444: IF l_debug_level > 0 THEN
445: oe_debug_pub.add('Updating the old global table');
446: END IF;
447: g_old_header_adj_tbl(l_ind) := p_old_hdr_adj_rec;
448: END IF;
449: END IF;

Line 475: oe_debug_pub.add( 'GLOBAL HDR_ADJ_REC OPERATION' || G_HEADER_ADJ_TBL ( L_IND ) .OPERATION ) ;

471: END IF;
472: -- End Audit/Versioning changes
473:
474: IF l_debug_level > 0 THEN
475: oe_debug_pub.add( 'GLOBAL HDR_ADJ_REC OPERATION' || G_HEADER_ADJ_TBL ( L_IND ) .OPERATION ) ;
476: END IF;
477: END IF; -- update flag is set
478:
479: /* return the index value */

Line 484: oe_debug_pub.add( 'OLD HDR ADJ ID' || G_OLD_HEADER_ADJ_TBL ( L_IND ) .PRICE_ADJUSTMENT_ID , 1 ) ;

480: x_index := l_ind;
481:
482: /* commented the debug statement for bug # 2919714 hashraf
483: IF l_debug_level > 0 THEN
484: oe_debug_pub.add( 'OLD HDR ADJ ID' || G_OLD_HEADER_ADJ_TBL ( L_IND ) .PRICE_ADJUSTMENT_ID , 1 ) ;
485: END IF;
486: */
487:
488: END IF; -- adj_hdr_id is not null

Line 493: oe_debug_pub.add( 'P_LINE_ID=' || P_LINE_ID , 1 ) ;

489:
490:
491: IF (p_line_id is not null) THEN
492: IF l_debug_level > 0 THEN
493: oe_debug_pub.add( 'P_LINE_ID=' || P_LINE_ID , 1 ) ;
494: END IF;
495:
496: /* search the old global line table */
497: Return_Glb_Ent_Index(

Line 505: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;

501: l_result,
502: l_return_stat);
503:
504: IF l_debug_level > 0 THEN
505: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
506: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
507: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
508: END IF;
509:

Line 506: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;

502: l_return_stat);
503:
504: IF l_debug_level > 0 THEN
505: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
506: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
507: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
508: END IF;
509:
510: IF l_result = FND_API.G_FALSE then

Line 507: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;

503:
504: IF l_debug_level > 0 THEN
505: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
506: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
507: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
508: END IF;
509:
510: IF l_result = FND_API.G_FALSE then
511: IF p_old_line_rec.line_id = FND_API.G_MISS_NUM OR

Line 518: oe_debug_pub.add( 'JPN: OLD LINE GLOBAL PIC UPDATED' ) ;

514: IF p_line_rec.line_id is not null and
515: p_line_rec.operation = oe_globals.g_opr_create THEN
516: g_old_line_tbl(l_ind):= p_line_rec;
517: IF l_debug_level > 0 THEN
518: oe_debug_pub.add( 'JPN: OLD LINE GLOBAL PIC UPDATED' ) ;
519: END IF;
520: ELSE
521: OE_LINE_UTIL.Query_Row(p_line_id => p_line_id,
522: x_line_rec => l_old_line_rec);

Line 525: oe_debug_pub.add( 'JPN: OLD LINE GLOBAL PIC UPDATED AFTER QUERY' ) ;

521: OE_LINE_UTIL.Query_Row(p_line_id => p_line_id,
522: x_line_rec => l_old_line_rec);
523: g_old_line_tbl(l_ind):=l_old_line_rec;
524: IF l_debug_level > 0 THEN
525: oe_debug_pub.add( 'JPN: OLD LINE GLOBAL PIC UPDATED AFTER QUERY' ) ;
526: END IF;
527: END IF;
528:
529: ELSE

Line 558: oe_debug_pub.add( 'GLOBAL LINE REC OPERATION' || G_LINE_TBL ( L_IND ) .OPERATION ) ;

554: END IF;
555: -- End Audit/Versioning changes
556:
557: IF l_debug_level > 0 THEN
558: oe_debug_pub.add( 'GLOBAL LINE REC OPERATION' || G_LINE_TBL ( L_IND ) .OPERATION ) ;
559: END IF;
560: END IF; -- update flag is set
561:
562: /* return the index value */

Line 566: oe_debug_pub.add( 'OLD LINE ID' || G_OLD_LINE_TBL ( L_IND ) .LINE_ID , 1 ) ;

562: /* return the index value */
563: x_index := l_ind;
564:
565: IF l_debug_level > 0 THEN
566: oe_debug_pub.add( 'OLD LINE ID' || G_OLD_LINE_TBL ( L_IND ) .LINE_ID , 1 ) ;
567: END IF;
568:
569: END IF; -- line_id is not null
570:

Line 574: oe_debug_pub.add( 'P_LINE_SCR_ID=' || P_LINE_SCR_ID , 1 ) ;

570:
571:
572: IF (p_line_scr_id is not null) THEN
573: IF l_debug_level > 0 THEN
574: oe_debug_pub.add( 'P_LINE_SCR_ID=' || P_LINE_SCR_ID , 1 ) ;
575: END IF;
576:
577: /* search the old global line sales credits table */
578: Return_Glb_Ent_Index(

Line 586: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;

582: l_result,
583: l_return_stat);
584:
585: IF l_debug_level > 0 THEN
586: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
587: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
588: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
589: END IF;
590:

Line 587: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;

583: l_return_stat);
584:
585: IF l_debug_level > 0 THEN
586: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
587: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
588: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
589: END IF;
590:
591: IF l_result = FND_API.G_FALSE THEN

Line 588: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;

584:
585: IF l_debug_level > 0 THEN
586: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
587: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
588: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
589: END IF;
590:
591: IF l_result = FND_API.G_FALSE THEN
592: IF p_old_line_scr_rec.sales_credit_id = FND_API.G_MISS_NUM OR

Line 599: oe_debug_pub.add( 'JPN: OLD LINE SALES CREDITS GLOBAL PIC UPDATED' ) ;

595: IF p_line_scr_rec.sales_credit_id is not null and
596: p_line_scr_rec.operation = oe_globals.g_opr_create THEN
597: g_old_line_scredit_tbl(l_ind):= p_line_scr_rec;
598: IF l_debug_level > 0 THEN
599: oe_debug_pub.add( 'JPN: OLD LINE SALES CREDITS GLOBAL PIC UPDATED' ) ;
600: END IF;
601: ELSE
602: OE_LINE_SCREDIT_UTIL.Query_Row(p_sales_credit_id =>p_line_scr_id,
603: x_line_scredit_rec =>l_old_line_scr_rec);

Line 636: oe_debug_pub.add( 'GLOBAL LINE_SCR_REC OPERATION' || G_LINE_SCREDIT_TBL ( L_IND ) .OPERATION ) ;

632: END IF;
633: -- End Audit/Versioning changes
634:
635: IF l_debug_level > 0 THEN
636: oe_debug_pub.add( 'GLOBAL LINE_SCR_REC OPERATION' || G_LINE_SCREDIT_TBL ( L_IND ) .OPERATION ) ;
637: END IF;
638: END IF; -- update flag is set
639:
640: /* return the index value */

Line 644: oe_debug_pub.add( 'OLD LINE SCR ID' || G_OLD_LINE_SCREDIT_TBL ( L_IND ) .SALES_CREDIT_ID , 1 ) ;

640: /* return the index value */
641: x_index := l_ind;
642:
643: IF l_debug_level > 0 THEN
644: oe_debug_pub.add( 'OLD LINE SCR ID' || G_OLD_LINE_SCREDIT_TBL ( L_IND ) .SALES_CREDIT_ID , 1 ) ;
645: oe_debug_pub.add( 'NEW LINE SCR ID' || G_LINE_SCREDIT_TBL ( L_IND ) .SALES_CREDIT_ID , 1 ) ;
646: END IF;
647:
648: END IF; -- scr_line_id is not null

Line 645: oe_debug_pub.add( 'NEW LINE SCR ID' || G_LINE_SCREDIT_TBL ( L_IND ) .SALES_CREDIT_ID , 1 ) ;

641: x_index := l_ind;
642:
643: IF l_debug_level > 0 THEN
644: oe_debug_pub.add( 'OLD LINE SCR ID' || G_OLD_LINE_SCREDIT_TBL ( L_IND ) .SALES_CREDIT_ID , 1 ) ;
645: oe_debug_pub.add( 'NEW LINE SCR ID' || G_LINE_SCREDIT_TBL ( L_IND ) .SALES_CREDIT_ID , 1 ) ;
646: END IF;
647:
648: END IF; -- scr_line_id is not null
649:

Line 653: oe_debug_pub.add( 'P_LINE_ADJ_ID=' || P_LINE_ADJ_ID , 1 ) ;

649:
650:
651: IF (p_line_adj_id is not null) THEN
652: IF l_debug_level > 0 THEN
653: oe_debug_pub.add( 'P_LINE_ADJ_ID=' || P_LINE_ADJ_ID , 1 ) ;
654: END IF;
655:
656: /* search the old global line adjustments table */
657: Return_Glb_Ent_Index(

Line 665: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;

661: l_result,
662: l_return_stat);
663:
664: IF l_debug_level > 0 THEN
665: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
666: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
667: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
668: oe_debug_pub.add( 'OPERATION =' || P_LINE_ADJ_REC.OPERATION , 1 ) ;
669: END IF;

Line 666: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;

662: l_return_stat);
663:
664: IF l_debug_level > 0 THEN
665: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
666: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
667: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
668: oe_debug_pub.add( 'OPERATION =' || P_LINE_ADJ_REC.OPERATION , 1 ) ;
669: END IF;
670:

Line 667: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;

663:
664: IF l_debug_level > 0 THEN
665: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
666: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
667: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
668: oe_debug_pub.add( 'OPERATION =' || P_LINE_ADJ_REC.OPERATION , 1 ) ;
669: END IF;
670:
671: IF l_result = FND_API.G_FALSE then

Line 668: oe_debug_pub.add( 'OPERATION =' || P_LINE_ADJ_REC.OPERATION , 1 ) ;

664: IF l_debug_level > 0 THEN
665: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
666: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
667: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
668: oe_debug_pub.add( 'OPERATION =' || P_LINE_ADJ_REC.OPERATION , 1 ) ;
669: END IF;
670:
671: IF l_result = FND_API.G_FALSE then
672: IF p_old_line_adj_rec.price_adjustment_id = FND_API.G_MISS_NUM OR

Line 679: oe_debug_pub.add( 'JPN: OLD LINE ADJ GLOBAL PIC UPDATED' ) ;

675: IF p_line_adj_rec.price_adjustment_id is not null and
676: p_line_adj_rec.operation = oe_globals.g_opr_create THEN
677: g_old_line_adj_tbl(l_ind):= p_line_adj_rec;
678: IF l_debug_level > 0 THEN
679: oe_debug_pub.add( 'JPN: OLD LINE ADJ GLOBAL PIC UPDATED' ) ;
680: END IF;
681: ELSE
682: OE_LINE_ADJ_UTIL.Query_Row(p_price_adjustment_id =>p_line_adj_id,
683: x_line_adj_rec =>l_old_line_adj_rec);

Line 715: oe_debug_pub.add( 'GLOBAL LINE_ADJ_REC OPERATION' || G_LINE_ADJ_TBL ( L_IND ) .OPERATION ) ;

711: END IF;
712: -- End Audit/Versioning changes
713:
714: IF l_debug_level > 0 THEN
715: oe_debug_pub.add( 'GLOBAL LINE_ADJ_REC OPERATION' || G_LINE_ADJ_TBL ( L_IND ) .OPERATION ) ;
716: END IF;
717: END IF; -- update flag is set
718:
719: /* return the index value */

Line 723: oe_debug_pub.add( 'OLD LINE ADJ ID' || G_OLD_LINE_ADJ_TBL ( L_IND ) .PRICE_ADJUSTMENT_ID , 1 ) ;

719: /* return the index value */
720: x_index := l_ind;
721:
722: IF l_debug_level > 0 THEN
723: oe_debug_pub.add( 'OLD LINE ADJ ID' || G_OLD_LINE_ADJ_TBL ( L_IND ) .PRICE_ADJUSTMENT_ID , 1 ) ;
724: -- do not uncomment the line below...it will give no-data found error
725: -- oe_debug_pub.add( 'NEW LINE ADJ ID' || G_LINE_ADJ_TBL ( L_IND ) .PRICE_ADJUSTMENT_ID , 1 ) ;
726: END IF;
727:

Line 725: -- oe_debug_pub.add( 'NEW LINE ADJ ID' || G_LINE_ADJ_TBL ( L_IND ) .PRICE_ADJUSTMENT_ID , 1 ) ;

721:
722: IF l_debug_level > 0 THEN
723: oe_debug_pub.add( 'OLD LINE ADJ ID' || G_OLD_LINE_ADJ_TBL ( L_IND ) .PRICE_ADJUSTMENT_ID , 1 ) ;
724: -- do not uncomment the line below...it will give no-data found error
725: -- oe_debug_pub.add( 'NEW LINE ADJ ID' || G_LINE_ADJ_TBL ( L_IND ) .PRICE_ADJUSTMENT_ID , 1 ) ;
726: END IF;
727:
728: END IF; -- adj_line_id is not null
729:

Line 733: oe_debug_pub.add( 'P_LOT_SERIAL_ID=' || P_LOT_SERIAL_ID , 1 ) ;

729:
730:
731: IF (p_lot_serial_id is not null) THEN
732: IF l_debug_level > 0 THEN
733: oe_debug_pub.add( 'P_LOT_SERIAL_ID=' || P_LOT_SERIAL_ID , 1 ) ;
734: END IF;
735:
736: /* search the old global lot serial table */
737: Return_Glb_Ent_Index(

Line 745: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;

741: l_result,
742: l_return_stat);
743:
744: IF l_debug_level > 0 THEN
745: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
746: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
747: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
748: END IF;
749:

Line 746: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;

742: l_return_stat);
743:
744: IF l_debug_level > 0 THEN
745: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
746: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
747: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
748: END IF;
749:
750: IF l_result = FND_API.G_FALSE then

Line 747: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;

743:
744: IF l_debug_level > 0 THEN
745: oe_debug_pub.add( 'INDEX=' || L_IND , 1 ) ;
746: oe_debug_pub.add( 'L_RETURN_STATUS =' || L_RETURN_STAT , 1 ) ;
747: oe_debug_pub.add( 'L_RESULT =' || L_RESULT , 1 ) ;
748: END IF;
749:
750: IF l_result = FND_API.G_FALSE then
751: IF p_old_lot_serial_rec.lot_serial_id = FND_API.G_MISS_NUM OR

Line 758: oe_debug_pub.add( 'JPN: OLD LOT SERIAL GLOBAL PIC UPDATED' ) ;

754: IF p_lot_serial_rec.lot_serial_id is not null and
755: p_lot_serial_rec.operation = oe_globals.g_opr_create THEN
756: g_old_lot_serial_tbl(l_ind):= p_lot_serial_rec;
757: IF l_debug_level > 0 THEN
758: oe_debug_pub.add( 'JPN: OLD LOT SERIAL GLOBAL PIC UPDATED' ) ;
759: END IF;
760: ELSE
761: OE_LOT_SERIAL_UTIL.Query_Row(p_lot_serial_id =>p_lot_serial_id,
762: x_lot_serial_rec =>l_old_lot_serial_rec);

Line 774: oe_debug_pub.add( 'GLOBAL LOT_SERIAL_REC OPERATION' || G_LOT_SERIAL_TBL ( L_IND ) .OPERATION ) ;

770: IF p_upd_new_rec_If_Exists THEN
771: /* Update the record in the new global table */
772: g_lot_serial_tbl(l_ind) := p_lot_serial_rec;
773: IF l_debug_level > 0 THEN
774: oe_debug_pub.add( 'GLOBAL LOT_SERIAL_REC OPERATION' || G_LOT_SERIAL_TBL ( L_IND ) .OPERATION ) ;
775: END IF;
776: END IF; -- update flag is set
777:
778: /* return the index value */

Line 782: oe_debug_pub.add( ' OLD LOT SERIAL ID' || G_OLD_LOT_SERIAL_TBL ( L_IND ) .LOT_SERIAL_ID , 1 ) ;

778: /* return the index value */
779: x_index := l_ind;
780:
781: IF l_debug_level > 0 THEN
782: oe_debug_pub.add( ' OLD LOT SERIAL ID' || G_OLD_LOT_SERIAL_TBL ( L_IND ) .LOT_SERIAL_ID , 1 ) ;
783: oe_debug_pub.add( 'NEW LOT SERIAL ID' || G_LOT_SERIAL_TBL ( L_IND ) .LOT_SERIAL_ID , 1 ) ;
784: END IF;
785:
786: END IF; -- lot_serial_id is not null

Line 783: oe_debug_pub.add( 'NEW LOT SERIAL ID' || G_LOT_SERIAL_TBL ( L_IND ) .LOT_SERIAL_ID , 1 ) ;

779: x_index := l_ind;
780:
781: IF l_debug_level > 0 THEN
782: oe_debug_pub.add( ' OLD LOT SERIAL ID' || G_OLD_LOT_SERIAL_TBL ( L_IND ) .LOT_SERIAL_ID , 1 ) ;
783: oe_debug_pub.add( 'NEW LOT SERIAL ID' || G_LOT_SERIAL_TBL ( L_IND ) .LOT_SERIAL_ID , 1 ) ;
784: END IF;
785:
786: END IF; -- lot_serial_id is not null
787:

Line 789: oe_debug_pub.add( 'EXITING OE_ORDER_UTIL.UPDATE_GLOBAL_PICTURE' , 1 ) ;

785:
786: END IF; -- lot_serial_id is not null
787:
788: IF l_debug_level > 0 THEN
789: oe_debug_pub.add( 'EXITING OE_ORDER_UTIL.UPDATE_GLOBAL_PICTURE' , 1 ) ;
790: END IF;
791:
792: END IF; /* check for booked flag or g_ui_flag */
793: END IF; /* check for code set level*/

Line 830: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

826: l_ind PLS_INTEGER;
827: l_max_ind PLS_INTEGER;
828:
829: --
830: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
831: --
832: BEGIN
833:
834: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 841: oe_debug_pub.add( 'ENTERING OE_ORDER_UTIL.RETURN_GLB_ENT_INDEX' , 1 ) ;

837: l_ind := (mod(p_entity_id,100000) * G_MAX_REQUESTS)+1;
838: l_max_ind := l_ind + G_MAX_REQUESTS - 1;
839:
840: IF l_debug_level > 0 THEN
841: oe_debug_pub.add( 'ENTERING OE_ORDER_UTIL.RETURN_GLB_ENT_INDEX' , 1 ) ;
842: END IF;
843:
844: IF p_entity_code = OE_GLOBALS.G_ENTITY_LINE THEN
845:

Line 1006: oe_debug_pub.add( 'EXITING OE_ORDER_UTIL.RETURN_GLB_ENT_INDEX' , 1 ) ;

1002: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1003: END IF;
1004:
1005: IF l_debug_level > 0 THEN
1006: oe_debug_pub.add( 'EXITING OE_ORDER_UTIL.RETURN_GLB_ENT_INDEX' , 1 ) ;
1007: END IF;
1008:
1009: EXCEPTION
1010:

Line 1028: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1024:
1025: IS
1026:
1027: --
1028: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1029: --
1030: BEGIN
1031:
1032: IF l_debug_level > 0 THEN

Line 1033: oe_debug_pub.add( 'ENTERING PROCEDURE CLEAR_GLOBAL_STRUCTURE' ) ;

1029: --
1030: BEGIN
1031:
1032: IF l_debug_level > 0 THEN
1033: oe_debug_pub.add( 'ENTERING PROCEDURE CLEAR_GLOBAL_STRUCTURE' ) ;
1034: END IF;
1035: G_Header_Rec := NULL;
1036: G_Old_Header_Rec := NULL;
1037: G_line_tbl.DELETE;

Line 1071: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1067:
1068: PROCEDURE Initialize_Access_List
1069: IS
1070: --
1071: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1072: --
1073: l_is_xdo_licensed varchar2(1);
1074:
1075: BEGIN

Line 1077: oe_debug_pub.add( 'ENTERING OE_ORDER_UTIL.INITIALIZE_ACCESS_LIST' , 1 ) ;

1073: l_is_xdo_licensed varchar2(1);
1074:
1075: BEGIN
1076: IF l_debug_level > 0 THEN
1077: oe_debug_pub.add( 'ENTERING OE_ORDER_UTIL.INITIALIZE_ACCESS_LIST' , 1 ) ;
1078: END IF;
1079: IF FND_FUNCTION.TEST('ONT_OEXOEORD_APPLY_HOLDS') THEN
1080: Add_Access('APPLY_HOLDS');
1081: END IF;

Line 1175: oe_debug_pub.add( 'NO PERMISSION TO VIEW MARGIN' ) ;

1171: IF FND_FUNCTION.TEST('ONT_OEXOEORD_VIEW_MARGIN') THEN
1172: Add_Access('VIEW_MARGIN');
1173: ELSE
1174: IF l_debug_level > 0 THEN
1175: oe_debug_pub.add( 'NO PERMISSION TO VIEW MARGIN' ) ;
1176: END IF;
1177: END IF;
1178: --MRG END
1179: --END IF;

Line 1186: --oe_debug_pub.add('Freight RATE :-(');

1182: /*IF OE_FREIGHT_RATING_UTIL.IS_FREIGHT_RATING_AVAILABLE THEN
1183: Add_Access('GET_FREIGHT_RATES');
1184: END IF;*/
1185: --Freight Rating End
1186: --oe_debug_pub.add('Freight RATE :-(');
1187: IF FND_FUNCTION.TEST('ONT_OEXOEORD_FRTCOSTS') THEN
1188: Add_Access('VIEW_FREIGHT_COSTS');
1189: END IF;
1190:

Line 1231: oe_debug_pub.add( 'EXITING OE_ORDER_UTIL.INITIALIZE_ACCESS_LIST' , 1 ) ;

1227:
1228:
1229: OE_ORDER_UTIL.G_Access_List_Initialized:='Y';
1230: IF l_debug_level > 0 THEN
1231: oe_debug_pub.add( 'EXITING OE_ORDER_UTIL.INITIALIZE_ACCESS_LIST' , 1 ) ;
1232: END IF;
1233:
1234: END Initialize_Access_List;
1235:

Line 1240: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1236: PROCEDURE Add_Access(Function_Name VARCHAR2)
1237: IS
1238: i number:=0;
1239: --
1240: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1241: --
1242: BEGIN
1243: IF l_debug_level > 0 THEN
1244: oe_debug_pub.add( 'ENTERING OE_ORDER_UTIL.ADD_ACCESS' , 1 ) ;

Line 1244: oe_debug_pub.add( 'ENTERING OE_ORDER_UTIL.ADD_ACCESS' , 1 ) ;

1240: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1241: --
1242: BEGIN
1243: IF l_debug_level > 0 THEN
1244: oe_debug_pub.add( 'ENTERING OE_ORDER_UTIL.ADD_ACCESS' , 1 ) ;
1245: END IF;
1246: IF OE_GLOBALS.G_ACCESS_List.Count=0 THEN
1247: OE_GLOBALS.G_Access_List(1):=Function_Name;
1248: ELSIF OE_GLOBALS.G_ACCESS_List.Count>0 THEN

Line 1253: oe_debug_pub.add( 'EXITING OE_ORDER_UTIL.ADD_ACCESS' , 1 ) ;

1249: i:=OE_GLOBALS.G_ACCESS_List.Last+1;
1250: OE_GLOBALS.G_ACCESS_List(i):=Function_Name;
1251: END IF;
1252: IF l_debug_level > 0 THEN
1253: oe_debug_pub.add( 'EXITING OE_ORDER_UTIL.ADD_ACCESS' , 1 ) ;
1254: END IF;
1255: EXCEPTION
1256: When Others Then
1257: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

Line 1276: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1272: exit_function exception;
1273:
1274:
1275: --
1276: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1277: --
1278: BEGIN
1279: IF l_debug_level > 0 THEN
1280: oe_debug_pub.add( 'ENTERING OE_ORDER_UTIL.IS_ACTION_IN_ACCESS_LIST' , 1 ) ;

Line 1280: oe_debug_pub.add( 'ENTERING OE_ORDER_UTIL.IS_ACTION_IN_ACCESS_LIST' , 1 ) ;

1276: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1277: --
1278: BEGIN
1279: IF l_debug_level > 0 THEN
1280: oe_debug_pub.add( 'ENTERING OE_ORDER_UTIL.IS_ACTION_IN_ACCESS_LIST' , 1 ) ;
1281: END IF;
1282: IF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >='110508' THEN
1283: IF OE_ORDER_UTIL.G_Access_List_Initialized IS NULL THEN
1284: Initialize_Access_List;

Line 1302: oe_debug_pub.add( 'EXITING OE_ORDER_UTIL.IS_ACTION_IN_ACCESS_LIST' , 1 ) ;

1298: ELSE
1299: Return(True);
1300: END IF;
1301: IF l_debug_level > 0 THEN
1302: oe_debug_pub.add( 'EXITING OE_ORDER_UTIL.IS_ACTION_IN_ACCESS_LIST' , 1 ) ;
1303: END IF;
1304: RAISE Exit_Function;
1305: EXCEPTION
1306: When Exit_Function Then

Line 1343: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1339: l_precision NUMBER;
1340: l_ext_precision NUMBER;
1341: l_min_acct_unit NUMBER;
1342: --
1343: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1344: --
1345: BEGIN
1346:
1347: IF p_currency_code IS NULL AND p_header_id IS NOT NULL THEN

Line 1363: OE_DEBUG_PUB.add('Currency Code : '||l_currency_code,5);

1359: l_currency_code:=p_currency_code;
1360: END IF;
1361:
1362: IF l_debug_level > 0 THEN
1363: OE_DEBUG_PUB.add('Currency Code : '||l_currency_code,5);
1364: END IF;
1365:
1366: IF l_currency_code IS NOT NULL THEN
1367: FND_CURRENCY.GET_INFO(l_currency_code,