eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PA_CC_TRANSFER_PRICE dependencies on PA_DEBUG

Line 47: g1_debug_mode varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

43: G_last_update_date Date;
44: G_sysdate Date := sysdate;
45: -------------------------------------------------------------------------------
46:
47: g1_debug_mode varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
48:
49: PROCEDURE Get_Transfer_Price
50: (
51: p_module_name IN VARCHAR2,

Line 229: pa_debug.set_err_stack ('Get_Transfer_Price_Wrapper');

225: BEGIN
226:
227: -- Convert the data
228:
229: pa_debug.set_err_stack ('Get_Transfer_Price_Wrapper');
230: pa_debug.set_process(
231: x_process => 'PLSQL',
232: x_debug_mode => p_debug_mode);
233:

Line 230: pa_debug.set_process(

226:
227: -- Convert the data
228:
229: pa_debug.set_err_stack ('Get_Transfer_Price_Wrapper');
230: pa_debug.set_process(
231: x_process => 'PLSQL',
232: x_debug_mode => p_debug_mode);
233:
234: pa_debug.G_Err_Stage := 'Starting Get_Transfer_Price wrapper';

Line 234: pa_debug.G_Err_Stage := 'Starting Get_Transfer_Price wrapper';

230: pa_debug.set_process(
231: x_process => 'PLSQL',
232: x_debug_mode => p_debug_mode);
233:
234: pa_debug.G_Err_Stage := 'Starting Get_Transfer_Price wrapper';
235: IF g1_debug_mode = 'Y' THEN
236: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
237: END IF;
238: pa_debug.G_Err_Stage :=

Line 236: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

232: x_debug_mode => p_debug_mode);
233:
234: pa_debug.G_Err_Stage := 'Starting Get_Transfer_Price wrapper';
235: IF g1_debug_mode = 'Y' THEN
236: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
237: END IF;
238: pa_debug.G_Err_Stage :=
239: 'Transfer Price API Start Date and Time is '
240: ||to_char(sysdate,'DD-MON-YYYY:HH24-MI-SS');

Line 238: pa_debug.G_Err_Stage :=

234: pa_debug.G_Err_Stage := 'Starting Get_Transfer_Price wrapper';
235: IF g1_debug_mode = 'Y' THEN
236: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
237: END IF;
238: pa_debug.G_Err_Stage :=
239: 'Transfer Price API Start Date and Time is '
240: ||to_char(sysdate,'DD-MON-YYYY:HH24-MI-SS');
241: IF g1_debug_mode = 'Y' THEN
242: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

Line 242: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

238: pa_debug.G_Err_Stage :=
239: 'Transfer Price API Start Date and Time is '
240: ||to_char(sysdate,'DD-MON-YYYY:HH24-MI-SS');
241: IF g1_debug_mode = 'Y' THEN
242: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
243: END IF;
244: pa_debug.G_Err_Stage :=
245: '--------------------------------------------------------------------------';
246: IF g1_debug_mode = 'Y' THEN

Line 244: pa_debug.G_Err_Stage :=

240: ||to_char(sysdate,'DD-MON-YYYY:HH24-MI-SS');
241: IF g1_debug_mode = 'Y' THEN
242: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
243: END IF;
244: pa_debug.G_Err_Stage :=
245: '--------------------------------------------------------------------------';
246: IF g1_debug_mode = 'Y' THEN
247: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
248: END IF;

Line 247: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

243: END IF;
244: pa_debug.G_Err_Stage :=
245: '--------------------------------------------------------------------------';
246: IF g1_debug_mode = 'Y' THEN
247: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
248: END IF;
249:
250: For i IN 1..p_array_size
251: LOOP

Line 414: pa_debug.write_file('LOG','----------------------------------------------------');

410:
411: -- Log Information :
412:
413: IF g1_debug_mode = 'Y' THEN
414: pa_debug.write_file('LOG','----------------------------------------------------');
415: pa_debug.write_file('LOG','p_expenditure_item_id '||p_expenditure_item_id(i));
416: pa_debug.write_file('LOG','x_proj_tp_rate_type '||x_proj_tp_rate_type(i));
417: pa_debug.write_file('LOG','x_proj_tp_rate_date '||x_proj_tp_rate_date(i));
418: pa_debug.write_file('LOG','x_proj_tp_exchange_rate '||x_proj_tp_exchange_rate(i));

Line 415: pa_debug.write_file('LOG','p_expenditure_item_id '||p_expenditure_item_id(i));

411: -- Log Information :
412:
413: IF g1_debug_mode = 'Y' THEN
414: pa_debug.write_file('LOG','----------------------------------------------------');
415: pa_debug.write_file('LOG','p_expenditure_item_id '||p_expenditure_item_id(i));
416: pa_debug.write_file('LOG','x_proj_tp_rate_type '||x_proj_tp_rate_type(i));
417: pa_debug.write_file('LOG','x_proj_tp_rate_date '||x_proj_tp_rate_date(i));
418: pa_debug.write_file('LOG','x_proj_tp_exchange_rate '||x_proj_tp_exchange_rate(i));
419: pa_debug.write_file('LOG','x_projfunc_tp_rate_type '||x_projfunc_tp_rate_type(i));

Line 416: pa_debug.write_file('LOG','x_proj_tp_rate_type '||x_proj_tp_rate_type(i));

412:
413: IF g1_debug_mode = 'Y' THEN
414: pa_debug.write_file('LOG','----------------------------------------------------');
415: pa_debug.write_file('LOG','p_expenditure_item_id '||p_expenditure_item_id(i));
416: pa_debug.write_file('LOG','x_proj_tp_rate_type '||x_proj_tp_rate_type(i));
417: pa_debug.write_file('LOG','x_proj_tp_rate_date '||x_proj_tp_rate_date(i));
418: pa_debug.write_file('LOG','x_proj_tp_exchange_rate '||x_proj_tp_exchange_rate(i));
419: pa_debug.write_file('LOG','x_projfunc_tp_rate_type '||x_projfunc_tp_rate_type(i));
420: pa_debug.write_file('LOG','x_projfunc_tp_rate_date '||x_projfunc_tp_rate_date(i));

Line 417: pa_debug.write_file('LOG','x_proj_tp_rate_date '||x_proj_tp_rate_date(i));

413: IF g1_debug_mode = 'Y' THEN
414: pa_debug.write_file('LOG','----------------------------------------------------');
415: pa_debug.write_file('LOG','p_expenditure_item_id '||p_expenditure_item_id(i));
416: pa_debug.write_file('LOG','x_proj_tp_rate_type '||x_proj_tp_rate_type(i));
417: pa_debug.write_file('LOG','x_proj_tp_rate_date '||x_proj_tp_rate_date(i));
418: pa_debug.write_file('LOG','x_proj_tp_exchange_rate '||x_proj_tp_exchange_rate(i));
419: pa_debug.write_file('LOG','x_projfunc_tp_rate_type '||x_projfunc_tp_rate_type(i));
420: pa_debug.write_file('LOG','x_projfunc_tp_rate_date '||x_projfunc_tp_rate_date(i));
421: pa_debug.write_file('LOG','x_projfunc_tp_exchange_rate '||x_proj_tp_rate_type(i));

Line 418: pa_debug.write_file('LOG','x_proj_tp_exchange_rate '||x_proj_tp_exchange_rate(i));

414: pa_debug.write_file('LOG','----------------------------------------------------');
415: pa_debug.write_file('LOG','p_expenditure_item_id '||p_expenditure_item_id(i));
416: pa_debug.write_file('LOG','x_proj_tp_rate_type '||x_proj_tp_rate_type(i));
417: pa_debug.write_file('LOG','x_proj_tp_rate_date '||x_proj_tp_rate_date(i));
418: pa_debug.write_file('LOG','x_proj_tp_exchange_rate '||x_proj_tp_exchange_rate(i));
419: pa_debug.write_file('LOG','x_projfunc_tp_rate_type '||x_projfunc_tp_rate_type(i));
420: pa_debug.write_file('LOG','x_projfunc_tp_rate_date '||x_projfunc_tp_rate_date(i));
421: pa_debug.write_file('LOG','x_projfunc_tp_exchange_rate '||x_proj_tp_rate_type(i));
422: pa_debug.write_file('LOG','x_acct_tp_rate_type '||x_acct_tp_rate_type(i));

Line 419: pa_debug.write_file('LOG','x_projfunc_tp_rate_type '||x_projfunc_tp_rate_type(i));

415: pa_debug.write_file('LOG','p_expenditure_item_id '||p_expenditure_item_id(i));
416: pa_debug.write_file('LOG','x_proj_tp_rate_type '||x_proj_tp_rate_type(i));
417: pa_debug.write_file('LOG','x_proj_tp_rate_date '||x_proj_tp_rate_date(i));
418: pa_debug.write_file('LOG','x_proj_tp_exchange_rate '||x_proj_tp_exchange_rate(i));
419: pa_debug.write_file('LOG','x_projfunc_tp_rate_type '||x_projfunc_tp_rate_type(i));
420: pa_debug.write_file('LOG','x_projfunc_tp_rate_date '||x_projfunc_tp_rate_date(i));
421: pa_debug.write_file('LOG','x_projfunc_tp_exchange_rate '||x_proj_tp_rate_type(i));
422: pa_debug.write_file('LOG','x_acct_tp_rate_type '||x_acct_tp_rate_type(i));
423: pa_debug.write_file('LOG','x_acct_tp_rate_date '||x_acct_tp_rate_date(i));

Line 420: pa_debug.write_file('LOG','x_projfunc_tp_rate_date '||x_projfunc_tp_rate_date(i));

416: pa_debug.write_file('LOG','x_proj_tp_rate_type '||x_proj_tp_rate_type(i));
417: pa_debug.write_file('LOG','x_proj_tp_rate_date '||x_proj_tp_rate_date(i));
418: pa_debug.write_file('LOG','x_proj_tp_exchange_rate '||x_proj_tp_exchange_rate(i));
419: pa_debug.write_file('LOG','x_projfunc_tp_rate_type '||x_projfunc_tp_rate_type(i));
420: pa_debug.write_file('LOG','x_projfunc_tp_rate_date '||x_projfunc_tp_rate_date(i));
421: pa_debug.write_file('LOG','x_projfunc_tp_exchange_rate '||x_proj_tp_rate_type(i));
422: pa_debug.write_file('LOG','x_acct_tp_rate_type '||x_acct_tp_rate_type(i));
423: pa_debug.write_file('LOG','x_acct_tp_rate_date '||x_acct_tp_rate_date(i));
424: pa_debug.write_file('LOG','x_acct_tp_exchange_rate '||x_acct_tp_exchange_rate(i));

Line 421: pa_debug.write_file('LOG','x_projfunc_tp_exchange_rate '||x_proj_tp_rate_type(i));

417: pa_debug.write_file('LOG','x_proj_tp_rate_date '||x_proj_tp_rate_date(i));
418: pa_debug.write_file('LOG','x_proj_tp_exchange_rate '||x_proj_tp_exchange_rate(i));
419: pa_debug.write_file('LOG','x_projfunc_tp_rate_type '||x_projfunc_tp_rate_type(i));
420: pa_debug.write_file('LOG','x_projfunc_tp_rate_date '||x_projfunc_tp_rate_date(i));
421: pa_debug.write_file('LOG','x_projfunc_tp_exchange_rate '||x_proj_tp_rate_type(i));
422: pa_debug.write_file('LOG','x_acct_tp_rate_type '||x_acct_tp_rate_type(i));
423: pa_debug.write_file('LOG','x_acct_tp_rate_date '||x_acct_tp_rate_date(i));
424: pa_debug.write_file('LOG','x_acct_tp_exchange_rate '||x_acct_tp_exchange_rate(i));
425:

Line 422: pa_debug.write_file('LOG','x_acct_tp_rate_type '||x_acct_tp_rate_type(i));

418: pa_debug.write_file('LOG','x_proj_tp_exchange_rate '||x_proj_tp_exchange_rate(i));
419: pa_debug.write_file('LOG','x_projfunc_tp_rate_type '||x_projfunc_tp_rate_type(i));
420: pa_debug.write_file('LOG','x_projfunc_tp_rate_date '||x_projfunc_tp_rate_date(i));
421: pa_debug.write_file('LOG','x_projfunc_tp_exchange_rate '||x_proj_tp_rate_type(i));
422: pa_debug.write_file('LOG','x_acct_tp_rate_type '||x_acct_tp_rate_type(i));
423: pa_debug.write_file('LOG','x_acct_tp_rate_date '||x_acct_tp_rate_date(i));
424: pa_debug.write_file('LOG','x_acct_tp_exchange_rate '||x_acct_tp_exchange_rate(i));
425:
426: pa_debug.write_file('LOG','p_project_currency_code '||p_project_currency_code(i));

Line 423: pa_debug.write_file('LOG','x_acct_tp_rate_date '||x_acct_tp_rate_date(i));

419: pa_debug.write_file('LOG','x_projfunc_tp_rate_type '||x_projfunc_tp_rate_type(i));
420: pa_debug.write_file('LOG','x_projfunc_tp_rate_date '||x_projfunc_tp_rate_date(i));
421: pa_debug.write_file('LOG','x_projfunc_tp_exchange_rate '||x_proj_tp_rate_type(i));
422: pa_debug.write_file('LOG','x_acct_tp_rate_type '||x_acct_tp_rate_type(i));
423: pa_debug.write_file('LOG','x_acct_tp_rate_date '||x_acct_tp_rate_date(i));
424: pa_debug.write_file('LOG','x_acct_tp_exchange_rate '||x_acct_tp_exchange_rate(i));
425:
426: pa_debug.write_file('LOG','p_project_currency_code '||p_project_currency_code(i));
427: pa_debug.write_file('LOG','p_projfunc_currency_code '||p_projfunc_currency_code(i));

Line 424: pa_debug.write_file('LOG','x_acct_tp_exchange_rate '||x_acct_tp_exchange_rate(i));

420: pa_debug.write_file('LOG','x_projfunc_tp_rate_date '||x_projfunc_tp_rate_date(i));
421: pa_debug.write_file('LOG','x_projfunc_tp_exchange_rate '||x_proj_tp_rate_type(i));
422: pa_debug.write_file('LOG','x_acct_tp_rate_type '||x_acct_tp_rate_type(i));
423: pa_debug.write_file('LOG','x_acct_tp_rate_date '||x_acct_tp_rate_date(i));
424: pa_debug.write_file('LOG','x_acct_tp_exchange_rate '||x_acct_tp_exchange_rate(i));
425:
426: pa_debug.write_file('LOG','p_project_currency_code '||p_project_currency_code(i));
427: pa_debug.write_file('LOG','p_projfunc_currency_code '||p_projfunc_currency_code(i));
428: pa_debug.write_file('LOG','x_denom_tp_currency_code '||x_denom_tp_currency_code(i));

Line 426: pa_debug.write_file('LOG','p_project_currency_code '||p_project_currency_code(i));

422: pa_debug.write_file('LOG','x_acct_tp_rate_type '||x_acct_tp_rate_type(i));
423: pa_debug.write_file('LOG','x_acct_tp_rate_date '||x_acct_tp_rate_date(i));
424: pa_debug.write_file('LOG','x_acct_tp_exchange_rate '||x_acct_tp_exchange_rate(i));
425:
426: pa_debug.write_file('LOG','p_project_currency_code '||p_project_currency_code(i));
427: pa_debug.write_file('LOG','p_projfunc_currency_code '||p_projfunc_currency_code(i));
428: pa_debug.write_file('LOG','x_denom_tp_currency_code '||x_denom_tp_currency_code(i));
429: END IF;
430:

Line 427: pa_debug.write_file('LOG','p_projfunc_currency_code '||p_projfunc_currency_code(i));

423: pa_debug.write_file('LOG','x_acct_tp_rate_date '||x_acct_tp_rate_date(i));
424: pa_debug.write_file('LOG','x_acct_tp_exchange_rate '||x_acct_tp_exchange_rate(i));
425:
426: pa_debug.write_file('LOG','p_project_currency_code '||p_project_currency_code(i));
427: pa_debug.write_file('LOG','p_projfunc_currency_code '||p_projfunc_currency_code(i));
428: pa_debug.write_file('LOG','x_denom_tp_currency_code '||x_denom_tp_currency_code(i));
429: END IF;
430:
431: --End Added for devdrop2

Line 428: pa_debug.write_file('LOG','x_denom_tp_currency_code '||x_denom_tp_currency_code(i));

424: pa_debug.write_file('LOG','x_acct_tp_exchange_rate '||x_acct_tp_exchange_rate(i));
425:
426: pa_debug.write_file('LOG','p_project_currency_code '||p_project_currency_code(i));
427: pa_debug.write_file('LOG','p_projfunc_currency_code '||p_projfunc_currency_code(i));
428: pa_debug.write_file('LOG','x_denom_tp_currency_code '||x_denom_tp_currency_code(i));
429: END IF;
430:
431: --End Added for devdrop2
432:

Line 435: pa_debug.G_Err_Stage := 'Calling actual Transfer Price API';

431: --End Added for devdrop2
432:
433: END LOOP;
434:
435: pa_debug.G_Err_Stage := 'Calling actual Transfer Price API';
436: IF g1_debug_mode = 'Y' THEN
437: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
438: END IF;
439:

Line 437: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

433: END LOOP;
434:
435: pa_debug.G_Err_Stage := 'Calling actual Transfer Price API';
436: IF g1_debug_mode = 'Y' THEN
437: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
438: END IF;
439:
440: Get_Transfer_Price (
441: p_module_name => p_module_name,

Line 542: pa_debug.G_Err_Stage := 'Doing the data type Conversion ';

538: );
539:
540:
541: -- Convert the number and dates to varchar2
542: pa_debug.G_Err_Stage := 'Doing the data type Conversion ';
543: IF g1_debug_mode = 'Y' THEN
544: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
545: END IF;
546: For i in 1..p_array_size

Line 544: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

540:
541: -- Convert the number and dates to varchar2
542: pa_debug.G_Err_Stage := 'Doing the data type Conversion ';
543: IF g1_debug_mode = 'Y' THEN
544: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
545: END IF;
546: For i in 1..p_array_size
547: LOOP
548: pa_debug.G_Err_Stage := 'Processing EI: '||

Line 548: pa_debug.G_Err_Stage := 'Processing EI: '||

544: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
545: END IF;
546: For i in 1..p_array_size
547: LOOP
548: pa_debug.G_Err_Stage := 'Processing EI: '||
549: p_expenditure_item_id(i);
550: IF g1_debug_mode = 'Y' THEN
551: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
552: END IF;

Line 551: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

547: LOOP
548: pa_debug.G_Err_Stage := 'Processing EI: '||
549: p_expenditure_item_id(i);
550: IF g1_debug_mode = 'Y' THEN
551: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
552: END IF;
553:
554: pa_debug.G_Err_Stage := 'Rejection Code: '|| x_error_code(i);
555: IF g1_debug_mode = 'Y' THEN

Line 554: pa_debug.G_Err_Stage := 'Rejection Code: '|| x_error_code(i);

550: IF g1_debug_mode = 'Y' THEN
551: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
552: END IF;
553:
554: pa_debug.G_Err_Stage := 'Rejection Code: '|| x_error_code(i);
555: IF g1_debug_mode = 'Y' THEN
556: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
557: END IF;
558:

Line 556: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

552: END IF;
553:
554: pa_debug.G_Err_Stage := 'Rejection Code: '|| x_error_code(i);
555: IF g1_debug_mode = 'Y' THEN
556: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
557: END IF;
558:
559: x_acct_tp_rate_date(i) := to_char(l_acct_tp_rate_date(i),'YYYY/MM/DD');/*File.Date.5*/
560:

Line 563: pa_debug.write_file('LOG',

559: x_acct_tp_rate_date(i) := to_char(l_acct_tp_rate_date(i),'YYYY/MM/DD');/*File.Date.5*/
560:
561: x_denom_transfer_price(i) := to_char(l_denom_transfer_price(i));
562: IF g1_debug_mode = 'Y' THEN
563: pa_debug.write_file('LOG',
564: 'Denom TP ='||x_denom_transfer_price(i));
565: END IF;
566:
567: /** Bug# 1063619 : while converting the tp_exchange_rate

Line 576: pa_debug.write_file('LOG','Acct TP ='||x_acct_transfer_price(i));

572: x_acct_tp_exchange_rate(i):=
573: substr(to_char(l_acct_tp_exchange_rate(i)),1,30);
574: x_acct_transfer_price (i) := to_char(l_acct_transfer_price(i));
575: IF g1_debug_mode = 'Y' THEN
576: pa_debug.write_file('LOG','Acct TP ='||x_acct_transfer_price(i));
577: END IF;
578: x_tp_bill_rate (i) := to_char(l_tp_bill_rate (i));
579: x_tp_base_amount (i) := to_char(l_tp_base_amount(i));
580: x_tp_bill_markup_percentage (i) :=

Line 590: pa_debug.write_file('LOG','------END OF THE PROCESS-----------------');

586:
587: --Start Added for devdrop2
588:
589: IF g1_debug_mode = 'Y' THEN
590: pa_debug.write_file('LOG','------END OF THE PROCESS-----------------');
591: pa_debug.write_file('LOG','l_expenditure_item_id '||to_char(p_expenditure_item_id(i)));
592: pa_debug.write_file('LOG','l_expenditure_item_date '||to_char(l_expenditure_item_date(i)));
593: pa_debug.write_file('LOG','x_denom_tp_currency_code '||x_denom_tp_currency_code(i));
594: pa_debug.write_file('LOG','l_proj_tp_rate_date '||to_char(l_proj_tp_rate_date(i)));

Line 591: pa_debug.write_file('LOG','l_expenditure_item_id '||to_char(p_expenditure_item_id(i)));

587: --Start Added for devdrop2
588:
589: IF g1_debug_mode = 'Y' THEN
590: pa_debug.write_file('LOG','------END OF THE PROCESS-----------------');
591: pa_debug.write_file('LOG','l_expenditure_item_id '||to_char(p_expenditure_item_id(i)));
592: pa_debug.write_file('LOG','l_expenditure_item_date '||to_char(l_expenditure_item_date(i)));
593: pa_debug.write_file('LOG','x_denom_tp_currency_code '||x_denom_tp_currency_code(i));
594: pa_debug.write_file('LOG','l_proj_tp_rate_date '||to_char(l_proj_tp_rate_date(i)));
595: pa_debug.write_file('LOG','l_proj_tp_exchange_rate '||to_char(l_proj_tp_exchange_rate(i)));

Line 592: pa_debug.write_file('LOG','l_expenditure_item_date '||to_char(l_expenditure_item_date(i)));

588:
589: IF g1_debug_mode = 'Y' THEN
590: pa_debug.write_file('LOG','------END OF THE PROCESS-----------------');
591: pa_debug.write_file('LOG','l_expenditure_item_id '||to_char(p_expenditure_item_id(i)));
592: pa_debug.write_file('LOG','l_expenditure_item_date '||to_char(l_expenditure_item_date(i)));
593: pa_debug.write_file('LOG','x_denom_tp_currency_code '||x_denom_tp_currency_code(i));
594: pa_debug.write_file('LOG','l_proj_tp_rate_date '||to_char(l_proj_tp_rate_date(i)));
595: pa_debug.write_file('LOG','l_proj_tp_exchange_rate '||to_char(l_proj_tp_exchange_rate(i)));
596: pa_debug.write_file('LOG','l_proj_transfer_price '||to_char(l_proj_transfer_price(i)));

Line 593: pa_debug.write_file('LOG','x_denom_tp_currency_code '||x_denom_tp_currency_code(i));

589: IF g1_debug_mode = 'Y' THEN
590: pa_debug.write_file('LOG','------END OF THE PROCESS-----------------');
591: pa_debug.write_file('LOG','l_expenditure_item_id '||to_char(p_expenditure_item_id(i)));
592: pa_debug.write_file('LOG','l_expenditure_item_date '||to_char(l_expenditure_item_date(i)));
593: pa_debug.write_file('LOG','x_denom_tp_currency_code '||x_denom_tp_currency_code(i));
594: pa_debug.write_file('LOG','l_proj_tp_rate_date '||to_char(l_proj_tp_rate_date(i)));
595: pa_debug.write_file('LOG','l_proj_tp_exchange_rate '||to_char(l_proj_tp_exchange_rate(i)));
596: pa_debug.write_file('LOG','l_proj_transfer_price '||to_char(l_proj_transfer_price(i)));
597: pa_debug.write_file('LOG','l_projfunc_tp_rate_date '||to_char(l_projfunc_tp_rate_date(i)));

Line 594: pa_debug.write_file('LOG','l_proj_tp_rate_date '||to_char(l_proj_tp_rate_date(i)));

590: pa_debug.write_file('LOG','------END OF THE PROCESS-----------------');
591: pa_debug.write_file('LOG','l_expenditure_item_id '||to_char(p_expenditure_item_id(i)));
592: pa_debug.write_file('LOG','l_expenditure_item_date '||to_char(l_expenditure_item_date(i)));
593: pa_debug.write_file('LOG','x_denom_tp_currency_code '||x_denom_tp_currency_code(i));
594: pa_debug.write_file('LOG','l_proj_tp_rate_date '||to_char(l_proj_tp_rate_date(i)));
595: pa_debug.write_file('LOG','l_proj_tp_exchange_rate '||to_char(l_proj_tp_exchange_rate(i)));
596: pa_debug.write_file('LOG','l_proj_transfer_price '||to_char(l_proj_transfer_price(i)));
597: pa_debug.write_file('LOG','l_projfunc_tp_rate_date '||to_char(l_projfunc_tp_rate_date(i)));
598: pa_debug.write_file('LOG','l_projfunc_tp_exchange_rate '||to_char(l_projfunc_tp_exchange_rate(i)));

Line 595: pa_debug.write_file('LOG','l_proj_tp_exchange_rate '||to_char(l_proj_tp_exchange_rate(i)));

591: pa_debug.write_file('LOG','l_expenditure_item_id '||to_char(p_expenditure_item_id(i)));
592: pa_debug.write_file('LOG','l_expenditure_item_date '||to_char(l_expenditure_item_date(i)));
593: pa_debug.write_file('LOG','x_denom_tp_currency_code '||x_denom_tp_currency_code(i));
594: pa_debug.write_file('LOG','l_proj_tp_rate_date '||to_char(l_proj_tp_rate_date(i)));
595: pa_debug.write_file('LOG','l_proj_tp_exchange_rate '||to_char(l_proj_tp_exchange_rate(i)));
596: pa_debug.write_file('LOG','l_proj_transfer_price '||to_char(l_proj_transfer_price(i)));
597: pa_debug.write_file('LOG','l_projfunc_tp_rate_date '||to_char(l_projfunc_tp_rate_date(i)));
598: pa_debug.write_file('LOG','l_projfunc_tp_exchange_rate '||to_char(l_projfunc_tp_exchange_rate(i)));
599: pa_debug.write_file('LOG','l_projfunc_transfer_price '||to_char(l_projfunc_transfer_price(i)));

Line 596: pa_debug.write_file('LOG','l_proj_transfer_price '||to_char(l_proj_transfer_price(i)));

592: pa_debug.write_file('LOG','l_expenditure_item_date '||to_char(l_expenditure_item_date(i)));
593: pa_debug.write_file('LOG','x_denom_tp_currency_code '||x_denom_tp_currency_code(i));
594: pa_debug.write_file('LOG','l_proj_tp_rate_date '||to_char(l_proj_tp_rate_date(i)));
595: pa_debug.write_file('LOG','l_proj_tp_exchange_rate '||to_char(l_proj_tp_exchange_rate(i)));
596: pa_debug.write_file('LOG','l_proj_transfer_price '||to_char(l_proj_transfer_price(i)));
597: pa_debug.write_file('LOG','l_projfunc_tp_rate_date '||to_char(l_projfunc_tp_rate_date(i)));
598: pa_debug.write_file('LOG','l_projfunc_tp_exchange_rate '||to_char(l_projfunc_tp_exchange_rate(i)));
599: pa_debug.write_file('LOG','l_projfunc_transfer_price '||to_char(l_projfunc_transfer_price(i)));
600: pa_debug.write_file('LOG','-----------------------------------------');

Line 597: pa_debug.write_file('LOG','l_projfunc_tp_rate_date '||to_char(l_projfunc_tp_rate_date(i)));

593: pa_debug.write_file('LOG','x_denom_tp_currency_code '||x_denom_tp_currency_code(i));
594: pa_debug.write_file('LOG','l_proj_tp_rate_date '||to_char(l_proj_tp_rate_date(i)));
595: pa_debug.write_file('LOG','l_proj_tp_exchange_rate '||to_char(l_proj_tp_exchange_rate(i)));
596: pa_debug.write_file('LOG','l_proj_transfer_price '||to_char(l_proj_transfer_price(i)));
597: pa_debug.write_file('LOG','l_projfunc_tp_rate_date '||to_char(l_projfunc_tp_rate_date(i)));
598: pa_debug.write_file('LOG','l_projfunc_tp_exchange_rate '||to_char(l_projfunc_tp_exchange_rate(i)));
599: pa_debug.write_file('LOG','l_projfunc_transfer_price '||to_char(l_projfunc_transfer_price(i)));
600: pa_debug.write_file('LOG','-----------------------------------------');
601: END IF;

Line 598: pa_debug.write_file('LOG','l_projfunc_tp_exchange_rate '||to_char(l_projfunc_tp_exchange_rate(i)));

594: pa_debug.write_file('LOG','l_proj_tp_rate_date '||to_char(l_proj_tp_rate_date(i)));
595: pa_debug.write_file('LOG','l_proj_tp_exchange_rate '||to_char(l_proj_tp_exchange_rate(i)));
596: pa_debug.write_file('LOG','l_proj_transfer_price '||to_char(l_proj_transfer_price(i)));
597: pa_debug.write_file('LOG','l_projfunc_tp_rate_date '||to_char(l_projfunc_tp_rate_date(i)));
598: pa_debug.write_file('LOG','l_projfunc_tp_exchange_rate '||to_char(l_projfunc_tp_exchange_rate(i)));
599: pa_debug.write_file('LOG','l_projfunc_transfer_price '||to_char(l_projfunc_transfer_price(i)));
600: pa_debug.write_file('LOG','-----------------------------------------');
601: END IF;
602:

Line 599: pa_debug.write_file('LOG','l_projfunc_transfer_price '||to_char(l_projfunc_transfer_price(i)));

595: pa_debug.write_file('LOG','l_proj_tp_exchange_rate '||to_char(l_proj_tp_exchange_rate(i)));
596: pa_debug.write_file('LOG','l_proj_transfer_price '||to_char(l_proj_transfer_price(i)));
597: pa_debug.write_file('LOG','l_projfunc_tp_rate_date '||to_char(l_projfunc_tp_rate_date(i)));
598: pa_debug.write_file('LOG','l_projfunc_tp_exchange_rate '||to_char(l_projfunc_tp_exchange_rate(i)));
599: pa_debug.write_file('LOG','l_projfunc_transfer_price '||to_char(l_projfunc_transfer_price(i)));
600: pa_debug.write_file('LOG','-----------------------------------------');
601: END IF;
602:
603: x_proj_tp_rate_date(i) := to_char(l_proj_tp_rate_date(i),'YYYY/MM/DD');

Line 600: pa_debug.write_file('LOG','-----------------------------------------');

596: pa_debug.write_file('LOG','l_proj_transfer_price '||to_char(l_proj_transfer_price(i)));
597: pa_debug.write_file('LOG','l_projfunc_tp_rate_date '||to_char(l_projfunc_tp_rate_date(i)));
598: pa_debug.write_file('LOG','l_projfunc_tp_exchange_rate '||to_char(l_projfunc_tp_exchange_rate(i)));
599: pa_debug.write_file('LOG','l_projfunc_transfer_price '||to_char(l_projfunc_transfer_price(i)));
600: pa_debug.write_file('LOG','-----------------------------------------');
601: END IF;
602:
603: x_proj_tp_rate_date(i) := to_char(l_proj_tp_rate_date(i),'YYYY/MM/DD');
604: x_proj_tp_exchange_rate(i) := substr(to_char(l_proj_tp_exchange_rate(i)),1,30);

Line 613: pa_debug.G_Err_Stage := 'Completing the loop';

609: x_projfunc_transfer_price(i) := to_char(l_projfunc_transfer_price(i));
610:
611: --End Added for devdrop2
612:
613: pa_debug.G_Err_Stage := 'Completing the loop';
614: IF g1_debug_mode = 'Y' THEN
615: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
616: END IF;
617: END LOOP;

Line 615: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

611: --End Added for devdrop2
612:
613: pa_debug.G_Err_Stage := 'Completing the loop';
614: IF g1_debug_mode = 'Y' THEN
615: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
616: END IF;
617: END LOOP;
618:
619: x_return_status := l_return_status;

Line 621: pa_debug.G_Err_Stage :=

617: END LOOP;
618:
619: x_return_status := l_return_status;
620:
621: pa_debug.G_Err_Stage :=
622: 'Transfer Price API End Date and Time is '
623: ||to_char(sysdate,'DD-MON-YYYY:HH24-MI-SS');
624: IF g1_debug_mode = 'Y' THEN
625: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

Line 625: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

621: pa_debug.G_Err_Stage :=
622: 'Transfer Price API End Date and Time is '
623: ||to_char(sysdate,'DD-MON-YYYY:HH24-MI-SS');
624: IF g1_debug_mode = 'Y' THEN
625: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
626: END IF;
627:
628: END Get_Transfer_Price;
629:

Line 853: pa_debug.Set_err_stack ('Get_Transfer_Price');

849:
850: unexpected_result exception;
851:
852: BEGIN
853: pa_debug.Set_err_stack ('Get_Transfer_Price');
854:
855: pa_debug.G_Err_Stage := 'Starting Get_Transfer_Price';
856: IF g1_debug_mode = 'Y' THEN
857: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

Line 855: pa_debug.G_Err_Stage := 'Starting Get_Transfer_Price';

851:
852: BEGIN
853: pa_debug.Set_err_stack ('Get_Transfer_Price');
854:
855: pa_debug.G_Err_Stage := 'Starting Get_Transfer_Price';
856: IF g1_debug_mode = 'Y' THEN
857: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
858: END IF;
859:

Line 857: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

853: pa_debug.Set_err_stack ('Get_Transfer_Price');
854:
855: pa_debug.G_Err_Stage := 'Starting Get_Transfer_Price';
856: IF g1_debug_mode = 'Y' THEN
857: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
858: END IF;
859:
860: /** Added for Org Forecasting **/
861:

Line 892: pa_debug.write_file('LOG',' Array Size = '||to_char(G_array_size));

888: End If;
889:
890: -- Print all the global variables
891: IF g1_debug_mode = 'Y' THEN
892: pa_debug.write_file('LOG',' Array Size = '||to_char(G_array_size));
893: pa_debug.write_file('LOG',' Processed thru date = '
894: ||to_char(G_processed_thru_date));
895: pa_debug.write_file('LOG',' Provider Org ID = '
896: ||to_char(G_prvdr_org_id));

Line 893: pa_debug.write_file('LOG',' Processed thru date = '

889:
890: -- Print all the global variables
891: IF g1_debug_mode = 'Y' THEN
892: pa_debug.write_file('LOG',' Array Size = '||to_char(G_array_size));
893: pa_debug.write_file('LOG',' Processed thru date = '
894: ||to_char(G_processed_thru_date));
895: pa_debug.write_file('LOG',' Provider Org ID = '
896: ||to_char(G_prvdr_org_id));
897: pa_debug.write_file('LOG',' Provider"s Legal Entity ID = '

Line 895: pa_debug.write_file('LOG',' Provider Org ID = '

891: IF g1_debug_mode = 'Y' THEN
892: pa_debug.write_file('LOG',' Array Size = '||to_char(G_array_size));
893: pa_debug.write_file('LOG',' Processed thru date = '
894: ||to_char(G_processed_thru_date));
895: pa_debug.write_file('LOG',' Provider Org ID = '
896: ||to_char(G_prvdr_org_id));
897: pa_debug.write_file('LOG',' Provider"s Legal Entity ID = '
898: ||to_char(G_prvdr_legal_entity_id));
899: pa_debug.write_file('LOG',' Buiseness Group ID = '

Line 897: pa_debug.write_file('LOG',' Provider"s Legal Entity ID = '

893: pa_debug.write_file('LOG',' Processed thru date = '
894: ||to_char(G_processed_thru_date));
895: pa_debug.write_file('LOG',' Provider Org ID = '
896: ||to_char(G_prvdr_org_id));
897: pa_debug.write_file('LOG',' Provider"s Legal Entity ID = '
898: ||to_char(G_prvdr_legal_entity_id));
899: pa_debug.write_file('LOG',' Buiseness Group ID = '
900: ||to_char(G_bg_id));
901: pa_debug.write_file('LOG',' Default Curr Conversion Rate Type = '

Line 899: pa_debug.write_file('LOG',' Buiseness Group ID = '

895: pa_debug.write_file('LOG',' Provider Org ID = '
896: ||to_char(G_prvdr_org_id));
897: pa_debug.write_file('LOG',' Provider"s Legal Entity ID = '
898: ||to_char(G_prvdr_legal_entity_id));
899: pa_debug.write_file('LOG',' Buiseness Group ID = '
900: ||to_char(G_bg_id));
901: pa_debug.write_file('LOG',' Default Curr Conversion Rate Type = '
902: ||G_cc_default_rate_type);
903: pa_debug.write_file('LOG',' Default Curr Conversion Rate Date Code = '

Line 901: pa_debug.write_file('LOG',' Default Curr Conversion Rate Type = '

897: pa_debug.write_file('LOG',' Provider"s Legal Entity ID = '
898: ||to_char(G_prvdr_legal_entity_id));
899: pa_debug.write_file('LOG',' Buiseness Group ID = '
900: ||to_char(G_bg_id));
901: pa_debug.write_file('LOG',' Default Curr Conversion Rate Type = '
902: ||G_cc_default_rate_type);
903: pa_debug.write_file('LOG',' Default Curr Conversion Rate Date Code = '
904: ||G_cc_default_rate_date_code);
905: pa_debug.write_file('LOG',' Default Currency Code = '

Line 903: pa_debug.write_file('LOG',' Default Curr Conversion Rate Date Code = '

899: pa_debug.write_file('LOG',' Buiseness Group ID = '
900: ||to_char(G_bg_id));
901: pa_debug.write_file('LOG',' Default Curr Conversion Rate Type = '
902: ||G_cc_default_rate_type);
903: pa_debug.write_file('LOG',' Default Curr Conversion Rate Date Code = '
904: ||G_cc_default_rate_date_code);
905: pa_debug.write_file('LOG',' Default Currency Code = '
906: ||G_acct_currency_code );
907: END IF;

Line 905: pa_debug.write_file('LOG',' Default Currency Code = '

901: pa_debug.write_file('LOG',' Default Curr Conversion Rate Type = '
902: ||G_cc_default_rate_type);
903: pa_debug.write_file('LOG',' Default Curr Conversion Rate Date Code = '
904: ||G_cc_default_rate_date_code);
905: pa_debug.write_file('LOG',' Default Currency Code = '
906: ||G_acct_currency_code );
907: END IF;
908:
909: -- Validate input parameters and identify transactions passes for only

Line 927: pa_debug.G_Err_Stage := 'Calling Pre-Client Extension............';

923: x_error_code
924: );
925:
926: -- Call Pre Client extension to calculate transfer price
927: pa_debug.G_Err_Stage := 'Calling Pre-Client Extension............';
928: IF g1_debug_mode = 'Y' THEN
929: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
930: END IF;
931: For i in 1 .. G_Array_Size

Line 929: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

925:
926: -- Call Pre Client extension to calculate transfer price
927: pa_debug.G_Err_Stage := 'Calling Pre-Client Extension............';
928: IF g1_debug_mode = 'Y' THEN
929: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
930: END IF;
931: For i in 1 .. G_Array_Size
932: LOOP
933:

Line 939: pa_debug.G_Err_Stage := 'Processing Expenditure ID: '||

935: Set_Global_Variables (p_prvdr_operating_unit(i));
936: End If;
937:
938: IF (l_compute_flag (i) = 'Y' and x_error_code(i) is null ) THEN
939: pa_debug.G_Err_Stage := 'Processing Expenditure ID: '||
940: to_char(p_expenditure_item_id(i));
941: IF g1_debug_mode = 'Y' THEN
942: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
943: END IF;

Line 942: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

938: IF (l_compute_flag (i) = 'Y' and x_error_code(i) is null ) THEN
939: pa_debug.G_Err_Stage := 'Processing Expenditure ID: '||
940: to_char(p_expenditure_item_id(i));
941: IF g1_debug_mode = 'Y' THEN
942: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
943: END IF;
944:
945: PA_CC_TP_CLIENT_EXTN.Determine_Transfer_Price
946: (

Line 975: pa_debug.write_file('LOG','Pre-client Bill Rate = '

971: IF (l_status = 0) THEN
972:
973: IF (l_denom_transfer_price IS NOT NULL) THEN
974: IF g1_debug_mode = 'Y' THEN
975: pa_debug.write_file('LOG','Pre-client Bill Rate = '
976: ||to_char(l_tp_bill_rate));
977: pa_debug.write_file('LOG','Pre-client markup = '
978: ||to_char(l_tp_bill_markup_percentage));
979: END IF;

Line 977: pa_debug.write_file('LOG','Pre-client markup = '

973: IF (l_denom_transfer_price IS NOT NULL) THEN
974: IF g1_debug_mode = 'Y' THEN
975: pa_debug.write_file('LOG','Pre-client Bill Rate = '
976: ||to_char(l_tp_bill_rate));
977: pa_debug.write_file('LOG','Pre-client markup = '
978: ||to_char(l_tp_bill_markup_percentage));
979: END IF;
980:
981: IF (l_denom_tp_currency_code IS NULL) THEN

Line 1007: pa_debug.write_file('LOG',

1003: x_tp_bill_rate(i) := l_tp_bill_rate;
1004: x_tp_bill_markup_percentage(i) :=
1005: l_tp_bill_markup_percentage;
1006: IF g1_debug_mode = 'Y' THEN
1007: pa_debug.write_file('LOG',
1008: 'Transfer Price calculated by Pre-Client extension');
1009: pa_debug.write_file('LOG','Transfer Price = '||
1010: to_char(x_denom_transfer_price(i)));
1011: pa_debug.write_file('LOG','Transfer Price currency = '||

Line 1009: pa_debug.write_file('LOG','Transfer Price = '||

1005: l_tp_bill_markup_percentage;
1006: IF g1_debug_mode = 'Y' THEN
1007: pa_debug.write_file('LOG',
1008: 'Transfer Price calculated by Pre-Client extension');
1009: pa_debug.write_file('LOG','Transfer Price = '||
1010: to_char(x_denom_transfer_price(i)));
1011: pa_debug.write_file('LOG','Transfer Price currency = '||
1012: x_denom_tp_currency_code(i));
1013: END IF;

Line 1011: pa_debug.write_file('LOG','Transfer Price currency = '||

1007: pa_debug.write_file('LOG',
1008: 'Transfer Price calculated by Pre-Client extension');
1009: pa_debug.write_file('LOG','Transfer Price = '||
1010: to_char(x_denom_transfer_price(i)));
1011: pa_debug.write_file('LOG','Transfer Price currency = '||
1012: x_denom_tp_currency_code(i));
1013: END IF;
1014:
1015: END IF;

Line 1025: pa_debug.G_Err_Stage :=

1021: ELSIF (l_status > 0 ) THEN
1022: -- Application error occurred with client extension
1023: --x_error_code(i) := 'PA_CC_TP_PREC_APPS_ERROR'; -- Commented for 2661949
1024: x_error_code(i) := l_error_message; -- Added for 2661949
1025: pa_debug.G_Err_Stage :=
1026: Substr( 'Application error from Pre-Client extension'||
1027: 'while processing expenditure_item :'||
1028: to_char(p_expenditure_item_id(i))||'Error Message :'
1029: || l_error_message,1,2000);

Line 1031: pa_debug.write_file('LOG',pa_debug.G_Err_Stage,1);

1027: 'while processing expenditure_item :'||
1028: to_char(p_expenditure_item_id(i))||'Error Message :'
1029: || l_error_message,1,2000);
1030: IF g1_debug_mode = 'Y' THEN
1031: pa_debug.write_file('LOG',pa_debug.G_Err_Stage,1);
1032: END IF;
1033:
1034: ELSIF (l_status < 0) THEN
1035: x_error_code(i) := l_error_message; -- Added for 2661949

Line 1036: pa_debug.G_Err_Stage :=

1032: END IF;
1033:
1034: ELSIF (l_status < 0) THEN
1035: x_error_code(i) := l_error_message; -- Added for 2661949
1036: pa_debug.G_Err_Stage :=
1037: Substr( 'Unexpected error from Pre-Client extension'||
1038: 'while processing expenditure_item :'||
1039: to_char(p_expenditure_item_id(i))||'Error Message :'
1040: || l_error_message,1,2000);

Line 1043: pa_debug.write_file('LOG',pa_debug.G_Err_Stage,1);

1039: to_char(p_expenditure_item_id(i))||'Error Message :'
1040: || l_error_message,1,2000);
1041:
1042: IF g1_debug_mode = 'Y' THEN
1043: pa_debug.write_file('LOG',pa_debug.G_Err_Stage,1);
1044: END IF;
1045: raise unexpected_result;
1046:
1047: END IF; /** l_status **/

Line 1103: pa_debug.write_file('LOG','in assignment override within Assignment_Rev_Amt');

1099: ClOSE PROJ_VALUES;
1100: /* Added for bill rate disount and transfer price revenue*/
1101: IF (p_system_linkage_function(i) in ('ST','OT')) then
1102: IF g1_debug_mode = 'Y' THEN
1103: pa_debug.write_file('LOG','in assignment override within Assignment_Rev_Amt');
1104: END IF;
1105: pa_revenue.Assignment_Rev_Amt(
1106: p_project_id => P_project_id(i)
1107: ,p_task_id => P_task_id(i)

Line 1152: pa_debug.write_file('LOG','in assignment override completed Assignment_Rev_Amt');

1148: ,p_project_raw_cost => l_project_raw_cost
1149: ,p_project_currency_code => l_project_currency_code
1150: ,x_adjusted_bill_rate => l_adjust_bill_rate); --4038485
1151: IF g1_debug_mode = 'Y' THEN
1152: pa_debug.write_file('LOG','in assignment override completed Assignment_Rev_Amt');
1153: END IF;
1154:
1155: end if; /* end of system linkage */
1156: IF g1_debug_mode = 'Y' THEN

Line 1157: pa_debug.write_file('LOG','x_base revenue amount' || x_tp_base_amount(i) ||'code : ' ||l_tp_base_curr_code1);

1153: END IF;
1154:
1155: end if; /* end of system linkage */
1156: IF g1_debug_mode = 'Y' THEN
1157: pa_debug.write_file('LOG','x_base revenue amount' || x_tp_base_amount(i) ||'code : ' ||l_tp_base_curr_code1);
1158: END IF;
1159: IF l_msg_data is NULL then
1160: IF x_tp_base_amount(i) is NULL THEN
1161: l_error_code := 'PA_CC_TP_REV_AMT_NULL';

Line 1203: pa_debug.G_Err_Stage := 'Completed Processing Expenditure ID: '||

1199: end if; /* l_compute_flag(i) = 'Y' */
1200:
1201: --End Added for devdrop2
1202:
1203: pa_debug.G_Err_Stage := 'Completed Processing Expenditure ID: '||
1204: to_char(p_expenditure_item_id(i));
1205: IF g1_debug_mode = 'Y' THEN
1206: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1207: END IF;

Line 1206: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

1202:
1203: pa_debug.G_Err_Stage := 'Completed Processing Expenditure ID: '||
1204: to_char(p_expenditure_item_id(i));
1205: IF g1_debug_mode = 'Y' THEN
1206: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1207: END IF;
1208:
1209: END IF; /**l_compute_flag (i) = 'Y' and x_error_code(i) IS NULL**/
1210:

Line 1214: pa_debug.G_Err_Stage := 'Completes Pre-Client Extension............';

1210:
1211: END LOOP;
1212:
1213:
1214: pa_debug.G_Err_Stage := 'Completes Pre-Client Extension............';
1215: IF g1_debug_mode = 'Y' THEN
1216: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1217: END IF;
1218:

Line 1216: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

1212:
1213:
1214: pa_debug.G_Err_Stage := 'Completes Pre-Client Extension............';
1215: IF g1_debug_mode = 'Y' THEN
1216: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1217: END IF;
1218:
1219: -- Get the schedule_line_id and the right rule_id associated with it.
1220:

Line 1328: pa_debug.G_Err_Stage := 'Calling Post-client extension';

1324: End If;
1325:
1326: -- Don't consider transactions identified for adjustment and
1327: -- also transfer price already calculated by Pre-client extension.
1328: pa_debug.G_Err_Stage := 'Calling Post-client extension';
1329: IF g1_debug_mode = 'Y' THEN
1330: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1331: END IF;
1332:

Line 1330: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

1326: -- Don't consider transactions identified for adjustment and
1327: -- also transfer price already calculated by Pre-client extension.
1328: pa_debug.G_Err_Stage := 'Calling Post-client extension';
1329: IF g1_debug_mode = 'Y' THEN
1330: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1331: END IF;
1332:
1333: PA_CC_TP_CLIENT_EXTN.Override_Transfer_Price
1334: (

Line 1359: pa_debug.G_Err_Stage := 'After Call to Post-client extension';

1355: l_tp_bill_markup_percentage,
1356: l_error_message,
1357: l_status
1358: );
1359: pa_debug.G_Err_Stage := 'After Call to Post-client extension';
1360: IF g1_debug_mode = 'Y' THEN
1361: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1362: END IF;
1363:

Line 1361: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

1357: l_status
1358: );
1359: pa_debug.G_Err_Stage := 'After Call to Post-client extension';
1360: IF g1_debug_mode = 'Y' THEN
1361: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1362: END IF;
1363:
1364: -- Validate if the amount is calculated by extension
1365: -- Also, mark the transactions where transfer price is calculated by

Line 1422: pa_debug.G_Err_Stage :=

1418: ELSIF (l_status > 0 ) THEN
1419: -- Application error occurred with client extension
1420: --x_error_code(i) := 'PA_CC_TP_POSC_APPS_ERROR';-- Commented for 2661949
1421: x_error_code(i) := l_error_message;-- Added for 2661949
1422: pa_debug.G_Err_Stage :=
1423: Substr( 'Application error from Post-Client extension'||
1424: 'while processing expenditure_item :'||
1425: to_char(p_expenditure_item_id(i))||'Error Message :'
1426: || l_error_message,1,2000);

Line 1428: pa_debug.write_file('LOG',pa_debug.G_Err_Stage,1); -- Changed for 2661949

1424: 'while processing expenditure_item :'||
1425: to_char(p_expenditure_item_id(i))||'Error Message :'
1426: || l_error_message,1,2000);
1427: IF g1_debug_mode = 'Y' THEN
1428: pa_debug.write_file('LOG',pa_debug.G_Err_Stage,1); -- Changed for 2661949
1429: END IF;
1430:
1431: ELSIF (l_status < 0) THEN
1432: x_error_code(i) := l_error_message; -- Added for 2661949

Line 1433: pa_debug.G_Err_Stage :=

1429: END IF;
1430:
1431: ELSIF (l_status < 0) THEN
1432: x_error_code(i) := l_error_message; -- Added for 2661949
1433: pa_debug.G_Err_Stage :=
1434: Substr( 'Unexpected error from Post-Client extension'||
1435: 'while processing expenditure_item :'||
1436: to_char(p_expenditure_item_id(i))||'Error Message :'
1437: || l_error_message,1,2000);

Line 1439: pa_debug.write_file('LOG',pa_debug.G_Err_Stage,1);

1435: 'while processing expenditure_item :'||
1436: to_char(p_expenditure_item_id(i))||'Error Message :'
1437: || l_error_message,1,2000);
1438: IF g1_debug_mode = 'Y' THEN
1439: pa_debug.write_file('LOG',pa_debug.G_Err_Stage,1);
1440: END IF;
1441: raise unexpected_result;
1442:
1443: END IF; /** l_status **/

Line 1451: pa_debug.G_Err_Stage := 'Do Currency Conversion';

1447: END LOOP;
1448:
1449:
1450: -- Currency Conversion
1451: pa_debug.G_Err_Stage := 'Do Currency Conversion';
1452: IF g1_debug_mode = 'Y' THEN
1453: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1454: END IF;
1455:

Line 1453: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

1449:
1450: -- Currency Conversion
1451: pa_debug.G_Err_Stage := 'Do Currency Conversion';
1452: IF g1_debug_mode = 'Y' THEN
1453: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1454: END IF;
1455:
1456: --Start devdrops2 change
1457:

Line 1478: pa_debug.G_Err_Stage := 'Converting adjustment cases';

1474: IF (x_denom_transfer_price(i) IS NOT NULL) THEN
1475: IF (x_denom_tp_currency_code(i) IS NOT NULL) THEN
1476:
1477: IF (l_compute_flag(i) = 'C') THEN
1478: pa_debug.G_Err_Stage := 'Converting adjustment cases';
1479: IF g1_debug_mode = 'Y' THEN
1480: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1481: END IF;
1482: -- Convert the adjustment cases

Line 1480: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

1476:
1477: IF (l_compute_flag(i) = 'C') THEN
1478: pa_debug.G_Err_Stage := 'Converting adjustment cases';
1479: IF g1_debug_mode = 'Y' THEN
1480: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1481: END IF;
1482: -- Convert the adjustment cases
1483: IF (x_acct_tp_rate_type(i) = 'User' AND
1484: x_acct_tp_exchange_rate(i) IS NOT NULL) THEN

Line 1496: pa_debug.write_file('LOG', '1:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||G_acct_currency_code);

1492: AND x_acct_tp_rate_date(i) IS NOT NULL) THEN
1493:
1494: begin -- Bug 7423839
1495: IF g1_debug_mode = 'Y' THEN
1496: pa_debug.write_file('LOG', '1:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||G_acct_currency_code);
1497: pa_debug.write_file('LOG', 'r_date '||x_acct_tp_rate_date(i)|| ' r_type '||x_acct_tp_rate_type(i)||' amt '||x_denom_transfer_price(i));
1498: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1499: pa_debug.write_file('LOG', 'rate '||x_acct_tp_exchange_rate(i));
1500: END IF;

Line 1497: pa_debug.write_file('LOG', 'r_date '||x_acct_tp_rate_date(i)|| ' r_type '||x_acct_tp_rate_type(i)||' amt '||x_denom_transfer_price(i));

1493:
1494: begin -- Bug 7423839
1495: IF g1_debug_mode = 'Y' THEN
1496: pa_debug.write_file('LOG', '1:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||G_acct_currency_code);
1497: pa_debug.write_file('LOG', 'r_date '||x_acct_tp_rate_date(i)|| ' r_type '||x_acct_tp_rate_type(i)||' amt '||x_denom_transfer_price(i));
1498: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1499: pa_debug.write_file('LOG', 'rate '||x_acct_tp_exchange_rate(i));
1500: END IF;
1501: -- Use type and date to convert

Line 1498: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);

1494: begin -- Bug 7423839
1495: IF g1_debug_mode = 'Y' THEN
1496: pa_debug.write_file('LOG', '1:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||G_acct_currency_code);
1497: pa_debug.write_file('LOG', 'r_date '||x_acct_tp_rate_date(i)|| ' r_type '||x_acct_tp_rate_type(i)||' amt '||x_denom_transfer_price(i));
1498: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1499: pa_debug.write_file('LOG', 'rate '||x_acct_tp_exchange_rate(i));
1500: END IF;
1501: -- Use type and date to convert
1502: PA_MULTI_CURRENCY.Convert_Amount(

Line 1499: pa_debug.write_file('LOG', 'rate '||x_acct_tp_exchange_rate(i));

1495: IF g1_debug_mode = 'Y' THEN
1496: pa_debug.write_file('LOG', '1:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||G_acct_currency_code);
1497: pa_debug.write_file('LOG', 'r_date '||x_acct_tp_rate_date(i)|| ' r_type '||x_acct_tp_rate_type(i)||' amt '||x_denom_transfer_price(i));
1498: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1499: pa_debug.write_file('LOG', 'rate '||x_acct_tp_exchange_rate(i));
1500: END IF;
1501: -- Use type and date to convert
1502: PA_MULTI_CURRENCY.Convert_Amount(
1503: p_from_currency => x_denom_tp_currency_code(i),

Line 1519: pa_debug.write_file('LOG', 'r_date '||x_acct_tp_rate_date(i)|| ' r_type '||x_acct_tp_rate_type(i));

1515: );
1516: exception
1517: when others then
1518: IF g1_debug_mode = 'Y' THEN
1519: pa_debug.write_file('LOG', 'r_date '||x_acct_tp_rate_date(i)|| ' r_type '||x_acct_tp_rate_type(i));
1520: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1521: pa_debug.write_file('LOG', 'rate '||x_acct_tp_exchange_rate(i)|| ' err msg '||substr(l_error_message,1,300));
1522: END IF;
1523: if l_error_message IS NULL THEN

Line 1520: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);

1516: exception
1517: when others then
1518: IF g1_debug_mode = 'Y' THEN
1519: pa_debug.write_file('LOG', 'r_date '||x_acct_tp_rate_date(i)|| ' r_type '||x_acct_tp_rate_type(i));
1520: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1521: pa_debug.write_file('LOG', 'rate '||x_acct_tp_exchange_rate(i)|| ' err msg '||substr(l_error_message,1,300));
1522: END IF;
1523: if l_error_message IS NULL THEN
1524: l_error_message := 'OTHERS';

Line 1521: pa_debug.write_file('LOG', 'rate '||x_acct_tp_exchange_rate(i)|| ' err msg '||substr(l_error_message,1,300));

1517: when others then
1518: IF g1_debug_mode = 'Y' THEN
1519: pa_debug.write_file('LOG', 'r_date '||x_acct_tp_rate_date(i)|| ' r_type '||x_acct_tp_rate_type(i));
1520: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1521: pa_debug.write_file('LOG', 'rate '||x_acct_tp_exchange_rate(i)|| ' err msg '||substr(l_error_message,1,300));
1522: END IF;
1523: if l_error_message IS NULL THEN
1524: l_error_message := 'OTHERS';
1525: end if;

Line 1621: pa_debug.write_file('LOG', '2:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||G_acct_currency_code);

1617: -- Use type and date to convert
1618: l_rate_date := l_new_rate_date;
1619: begin --Bug 7423839
1620: IF g1_debug_mode = 'Y' THEN
1621: pa_debug.write_file('LOG', '2:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||G_acct_currency_code);
1622: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type||' amt '||x_denom_transfer_price(i));
1623: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1624: pa_debug.write_file('LOG', 'rate '||l_exchange_rate);
1625: END IF;

Line 1622: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type||' amt '||x_denom_transfer_price(i));

1618: l_rate_date := l_new_rate_date;
1619: begin --Bug 7423839
1620: IF g1_debug_mode = 'Y' THEN
1621: pa_debug.write_file('LOG', '2:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||G_acct_currency_code);
1622: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type||' amt '||x_denom_transfer_price(i));
1623: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1624: pa_debug.write_file('LOG', 'rate '||l_exchange_rate);
1625: END IF;
1626: PA_MULTI_CURRENCY.Convert_Amount(

Line 1623: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);

1619: begin --Bug 7423839
1620: IF g1_debug_mode = 'Y' THEN
1621: pa_debug.write_file('LOG', '2:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||G_acct_currency_code);
1622: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type||' amt '||x_denom_transfer_price(i));
1623: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1624: pa_debug.write_file('LOG', 'rate '||l_exchange_rate);
1625: END IF;
1626: PA_MULTI_CURRENCY.Convert_Amount(
1627: p_from_currency => x_denom_tp_currency_code(i),

Line 1624: pa_debug.write_file('LOG', 'rate '||l_exchange_rate);

1620: IF g1_debug_mode = 'Y' THEN
1621: pa_debug.write_file('LOG', '2:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||G_acct_currency_code);
1622: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type||' amt '||x_denom_transfer_price(i));
1623: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1624: pa_debug.write_file('LOG', 'rate '||l_exchange_rate);
1625: END IF;
1626: PA_MULTI_CURRENCY.Convert_Amount(
1627: p_from_currency => x_denom_tp_currency_code(i),
1628: p_to_currency => G_acct_currency_code ,

Line 1643: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type);

1639: );
1640: exception
1641: when others then
1642: IF g1_debug_mode = 'Y' THEN
1643: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type);
1644: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1645: pa_debug.write_file('LOG', 'rate '||l_exchange_rate|| ' err msg '||substr(l_error_message,1,300));
1646: END IF;
1647: if l_error_message IS NULL THEN

Line 1644: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);

1640: exception
1641: when others then
1642: IF g1_debug_mode = 'Y' THEN
1643: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type);
1644: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1645: pa_debug.write_file('LOG', 'rate '||l_exchange_rate|| ' err msg '||substr(l_error_message,1,300));
1646: END IF;
1647: if l_error_message IS NULL THEN
1648: l_error_message := 'OTHERS';

Line 1645: pa_debug.write_file('LOG', 'rate '||l_exchange_rate|| ' err msg '||substr(l_error_message,1,300));

1641: when others then
1642: IF g1_debug_mode = 'Y' THEN
1643: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type);
1644: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1645: pa_debug.write_file('LOG', 'rate '||l_exchange_rate|| ' err msg '||substr(l_error_message,1,300));
1646: END IF;
1647: if l_error_message IS NULL THEN
1648: l_error_message := 'OTHERS';
1649: end if;

Line 1654: pa_debug.G_Err_Stage := 'Using default rate type';

1650: end;
1651: ELSIF (l_error_message IS NULL) THEN
1652: -- Added the condition of l_error_message for Bug 5276842
1653: -- Use default rate_type and rate_date to convert
1654: pa_debug.G_Err_Stage := 'Using default rate type';
1655: IF g1_debug_mode = 'Y' THEN
1656: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1657: END IF;
1658: l_rate_type := G_cc_default_rate_type;

Line 1656: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

1652: -- Added the condition of l_error_message for Bug 5276842
1653: -- Use default rate_type and rate_date to convert
1654: pa_debug.G_Err_Stage := 'Using default rate type';
1655: IF g1_debug_mode = 'Y' THEN
1656: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1657: END IF;
1658: l_rate_type := G_cc_default_rate_type;
1659:
1660: begin --Bug 7423839

Line 1662: pa_debug.write_file('LOG', '3:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||G_acct_currency_code);

1658: l_rate_type := G_cc_default_rate_type;
1659:
1660: begin --Bug 7423839
1661: IF g1_debug_mode = 'Y' THEN
1662: pa_debug.write_file('LOG', '3:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||G_acct_currency_code);
1663: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type||' amt '||x_denom_transfer_price(i));
1664: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1665: pa_debug.write_file('LOG', 'rate '||l_exchange_rate);
1666: END IF;

Line 1663: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type||' amt '||x_denom_transfer_price(i));

1659:
1660: begin --Bug 7423839
1661: IF g1_debug_mode = 'Y' THEN
1662: pa_debug.write_file('LOG', '3:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||G_acct_currency_code);
1663: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type||' amt '||x_denom_transfer_price(i));
1664: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1665: pa_debug.write_file('LOG', 'rate '||l_exchange_rate);
1666: END IF;
1667: PA_MULTI_CURRENCY.Convert_Amount(

Line 1664: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);

1660: begin --Bug 7423839
1661: IF g1_debug_mode = 'Y' THEN
1662: pa_debug.write_file('LOG', '3:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||G_acct_currency_code);
1663: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type||' amt '||x_denom_transfer_price(i));
1664: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1665: pa_debug.write_file('LOG', 'rate '||l_exchange_rate);
1666: END IF;
1667: PA_MULTI_CURRENCY.Convert_Amount(
1668: p_from_currency => x_denom_tp_currency_code(i),

Line 1665: pa_debug.write_file('LOG', 'rate '||l_exchange_rate);

1661: IF g1_debug_mode = 'Y' THEN
1662: pa_debug.write_file('LOG', '3:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||G_acct_currency_code);
1663: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type||' amt '||x_denom_transfer_price(i));
1664: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1665: pa_debug.write_file('LOG', 'rate '||l_exchange_rate);
1666: END IF;
1667: PA_MULTI_CURRENCY.Convert_Amount(
1668: p_from_currency => x_denom_tp_currency_code(i),
1669: p_to_currency => G_acct_currency_code ,

Line 1684: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type);

1680: );
1681: exception
1682: when others then
1683: IF g1_debug_mode = 'Y' THEN
1684: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type);
1685: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1686: pa_debug.write_file('LOG', 'rate '||l_exchange_rate|| ' err msg '||substr(l_error_message,1,300));
1687: END IF;
1688: if l_error_message IS NULL THEN

Line 1685: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);

1681: exception
1682: when others then
1683: IF g1_debug_mode = 'Y' THEN
1684: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type);
1685: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1686: pa_debug.write_file('LOG', 'rate '||l_exchange_rate|| ' err msg '||substr(l_error_message,1,300));
1687: END IF;
1688: if l_error_message IS NULL THEN
1689: l_error_message := 'OTHERS';

Line 1686: pa_debug.write_file('LOG', 'rate '||l_exchange_rate|| ' err msg '||substr(l_error_message,1,300));

1682: when others then
1683: IF g1_debug_mode = 'Y' THEN
1684: pa_debug.write_file('LOG', 'r_date '||l_rate_date|| ' r_type '||l_rate_type);
1685: pa_debug.write_file('LOG', 'xfer_price '||l_acct_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1686: pa_debug.write_file('LOG', 'rate '||l_exchange_rate|| ' err msg '||substr(l_error_message,1,300));
1687: END IF;
1688: if l_error_message IS NULL THEN
1689: l_error_message := 'OTHERS';
1690: end if;

Line 1699: pa_debug.write_file('LOG',

1695: IF l_error_message IS NOT NULL THEN
1696:
1697: x_error_code(i) := 'PA_CC_TP_CONVERT_AMT';
1698: IF g1_debug_mode = 'Y' THEN
1699: pa_debug.write_file('LOG',
1700: Substr (l_error_message,1,2000),1);
1701: END IF;
1702: ELSE
1703: x_acct_transfer_price (i) := l_acct_transfer_price;

Line 1714: pa_debug.G_Err_Stage := 'Rate Type ='||l_rate_type;

1710: x_proj_tp_rate_date(i) := l_rate_date;
1711: x_projfunc_tp_rate_type(i) := l_rate_type;
1712: x_projfunc_tp_rate_date(i) := l_rate_date;
1713:
1714: pa_debug.G_Err_Stage := 'Rate Type ='||l_rate_type;
1715: IF g1_debug_mode = 'Y' THEN
1716: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1717: END IF;
1718: END IF;

Line 1716: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

1712: x_projfunc_tp_rate_date(i) := l_rate_date;
1713:
1714: pa_debug.G_Err_Stage := 'Rate Type ='||l_rate_type;
1715: IF g1_debug_mode = 'Y' THEN
1716: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1717: END IF;
1718: END IF;
1719:
1720: ELSIF (l_status > 0) THEN

Line 1725: pa_debug.G_Err_Stage :=

1721: -- Application error occurred in extension to override
1722: -- currency conversion attributes
1723: -- x_error_code(i) := 'PA_CC_TP_OVERIDE_APP_ERROR';
1724: x_error_code(i) := l_error_message; -- Added for 2661949
1725: pa_debug.G_Err_Stage :=
1726: Substr( 'Application error from Currency conversion
1727: override extension'||
1728: 'while processing expenditure_item :'||
1729: to_char(p_expenditure_item_id(i))||'Error Message :'

Line 1732: pa_debug.write_file('LOG',pa_debug.G_Err_Stage,1);

1728: 'while processing expenditure_item :'||
1729: to_char(p_expenditure_item_id(i))||'Error Message :'
1730: || l_error_message,1,2000);
1731: IF g1_debug_mode = 'Y' THEN
1732: pa_debug.write_file('LOG',pa_debug.G_Err_Stage,1);
1733: END IF;
1734: ELSIF (l_status < 0) THEN
1735:
1736: -- Unexpected error occurred in extension to override

Line 1740: pa_debug.G_Err_Stage :=

1736: -- Unexpected error occurred in extension to override
1737: -- currency conversion attributes
1738: --x_error_code(i) := 'PA_CC_TP_OVERIDE_ORA_ERROR';
1739: x_error_code(i) := l_error_message; -- Added for 2661949
1740: pa_debug.G_Err_Stage :=
1741: Substr( 'Unexpected error from Currency conversion
1742: override extension'||
1743: 'while processing expenditure_item :'||
1744: to_char(p_expenditure_item_id(i))||'Error Message :'

Line 1747: pa_debug.write_file('LOG',pa_debug.G_Err_Stage,1);

1743: 'while processing expenditure_item :'||
1744: to_char(p_expenditure_item_id(i))||'Error Message :'
1745: || l_error_message,1,2000);
1746: IF g1_debug_mode = 'Y' THEN
1747: pa_debug.write_file('LOG',pa_debug.G_Err_Stage,1);
1748: END IF;
1749: raise unexpected_result;
1750: ELSE
1751: x_error_code (i) := 'PA_CC_TP_INVALID_OVERIDE_STATUS';

Line 1786: pa_debug.write_file('LOG','l_project_bil_rate_date_code: '||l_project_bil_rate_date_code);

1782: if p_tp_amt_type_code(i) = 'REVENUE_TRANSFER' THEN /*bug6389559*/
1783: IF ( l_multi_currency_billing_flag = 'Y' ) THEN
1784:
1785: IF g1_debug_mode = 'Y' THEN
1786: pa_debug.write_file('LOG','l_project_bil_rate_date_code: '||l_project_bil_rate_date_code);
1787: pa_debug.write_file('LOG','l_project_bil_rate_type: '||l_project_bil_rate_type);
1788: pa_debug.write_file('LOG','l_project_bil_rate_date: '||l_project_bil_rate_date);
1789: pa_debug.write_file('LOG','l_project_bil_exchange_rate: '||l_project_bil_exchange_rate);
1790:

Line 1787: pa_debug.write_file('LOG','l_project_bil_rate_type: '||l_project_bil_rate_type);

1783: IF ( l_multi_currency_billing_flag = 'Y' ) THEN
1784:
1785: IF g1_debug_mode = 'Y' THEN
1786: pa_debug.write_file('LOG','l_project_bil_rate_date_code: '||l_project_bil_rate_date_code);
1787: pa_debug.write_file('LOG','l_project_bil_rate_type: '||l_project_bil_rate_type);
1788: pa_debug.write_file('LOG','l_project_bil_rate_date: '||l_project_bil_rate_date);
1789: pa_debug.write_file('LOG','l_project_bil_exchange_rate: '||l_project_bil_exchange_rate);
1790:
1791: pa_debug.write_file('LOG','l_projfunc_bil_rate_date_code: '||l_projfunc_bil_rate_date_code);

Line 1788: pa_debug.write_file('LOG','l_project_bil_rate_date: '||l_project_bil_rate_date);

1784:
1785: IF g1_debug_mode = 'Y' THEN
1786: pa_debug.write_file('LOG','l_project_bil_rate_date_code: '||l_project_bil_rate_date_code);
1787: pa_debug.write_file('LOG','l_project_bil_rate_type: '||l_project_bil_rate_type);
1788: pa_debug.write_file('LOG','l_project_bil_rate_date: '||l_project_bil_rate_date);
1789: pa_debug.write_file('LOG','l_project_bil_exchange_rate: '||l_project_bil_exchange_rate);
1790:
1791: pa_debug.write_file('LOG','l_projfunc_bil_rate_date_code: '||l_projfunc_bil_rate_date_code);
1792: pa_debug.write_file('LOG','l_projfunc_bil_rate_type: '||l_projfunc_bil_rate_type);

Line 1789: pa_debug.write_file('LOG','l_project_bil_exchange_rate: '||l_project_bil_exchange_rate);

1785: IF g1_debug_mode = 'Y' THEN
1786: pa_debug.write_file('LOG','l_project_bil_rate_date_code: '||l_project_bil_rate_date_code);
1787: pa_debug.write_file('LOG','l_project_bil_rate_type: '||l_project_bil_rate_type);
1788: pa_debug.write_file('LOG','l_project_bil_rate_date: '||l_project_bil_rate_date);
1789: pa_debug.write_file('LOG','l_project_bil_exchange_rate: '||l_project_bil_exchange_rate);
1790:
1791: pa_debug.write_file('LOG','l_projfunc_bil_rate_date_code: '||l_projfunc_bil_rate_date_code);
1792: pa_debug.write_file('LOG','l_projfunc_bil_rate_type: '||l_projfunc_bil_rate_type);
1793: pa_debug.write_file('LOG','l_projfunc_bil_rate_date: '||l_projfunc_bil_rate_date);

Line 1791: pa_debug.write_file('LOG','l_projfunc_bil_rate_date_code: '||l_projfunc_bil_rate_date_code);

1787: pa_debug.write_file('LOG','l_project_bil_rate_type: '||l_project_bil_rate_type);
1788: pa_debug.write_file('LOG','l_project_bil_rate_date: '||l_project_bil_rate_date);
1789: pa_debug.write_file('LOG','l_project_bil_exchange_rate: '||l_project_bil_exchange_rate);
1790:
1791: pa_debug.write_file('LOG','l_projfunc_bil_rate_date_code: '||l_projfunc_bil_rate_date_code);
1792: pa_debug.write_file('LOG','l_projfunc_bil_rate_type: '||l_projfunc_bil_rate_type);
1793: pa_debug.write_file('LOG','l_projfunc_bil_rate_date: '||l_projfunc_bil_rate_date);
1794: pa_debug.write_file('LOG','l_projfunc_bil_exchange_rate: '||l_projfunc_bil_exchange_rate);
1795:

Line 1792: pa_debug.write_file('LOG','l_projfunc_bil_rate_type: '||l_projfunc_bil_rate_type);

1788: pa_debug.write_file('LOG','l_project_bil_rate_date: '||l_project_bil_rate_date);
1789: pa_debug.write_file('LOG','l_project_bil_exchange_rate: '||l_project_bil_exchange_rate);
1790:
1791: pa_debug.write_file('LOG','l_projfunc_bil_rate_date_code: '||l_projfunc_bil_rate_date_code);
1792: pa_debug.write_file('LOG','l_projfunc_bil_rate_type: '||l_projfunc_bil_rate_type);
1793: pa_debug.write_file('LOG','l_projfunc_bil_rate_date: '||l_projfunc_bil_rate_date);
1794: pa_debug.write_file('LOG','l_projfunc_bil_exchange_rate: '||l_projfunc_bil_exchange_rate);
1795:
1796: pa_debug.write_file('LOG','pa_date : '||p_pa_date(i));

Line 1793: pa_debug.write_file('LOG','l_projfunc_bil_rate_date: '||l_projfunc_bil_rate_date);

1789: pa_debug.write_file('LOG','l_project_bil_exchange_rate: '||l_project_bil_exchange_rate);
1790:
1791: pa_debug.write_file('LOG','l_projfunc_bil_rate_date_code: '||l_projfunc_bil_rate_date_code);
1792: pa_debug.write_file('LOG','l_projfunc_bil_rate_type: '||l_projfunc_bil_rate_type);
1793: pa_debug.write_file('LOG','l_projfunc_bil_rate_date: '||l_projfunc_bil_rate_date);
1794: pa_debug.write_file('LOG','l_projfunc_bil_exchange_rate: '||l_projfunc_bil_exchange_rate);
1795:
1796: pa_debug.write_file('LOG','pa_date : '||p_pa_date(i));
1797: pa_debug.write_file('LOG','x_denom_tp_currency_code : '||x_denom_tp_currency_code(i));

Line 1794: pa_debug.write_file('LOG','l_projfunc_bil_exchange_rate: '||l_projfunc_bil_exchange_rate);

1790:
1791: pa_debug.write_file('LOG','l_projfunc_bil_rate_date_code: '||l_projfunc_bil_rate_date_code);
1792: pa_debug.write_file('LOG','l_projfunc_bil_rate_type: '||l_projfunc_bil_rate_type);
1793: pa_debug.write_file('LOG','l_projfunc_bil_rate_date: '||l_projfunc_bil_rate_date);
1794: pa_debug.write_file('LOG','l_projfunc_bil_exchange_rate: '||l_projfunc_bil_exchange_rate);
1795:
1796: pa_debug.write_file('LOG','pa_date : '||p_pa_date(i));
1797: pa_debug.write_file('LOG','x_denom_tp_currency_code : '||x_denom_tp_currency_code(i));
1798: pa_debug.write_file('LOG','p_project_currency_code : '||p_project_currency_code(i));

Line 1796: pa_debug.write_file('LOG','pa_date : '||p_pa_date(i));

1792: pa_debug.write_file('LOG','l_projfunc_bil_rate_type: '||l_projfunc_bil_rate_type);
1793: pa_debug.write_file('LOG','l_projfunc_bil_rate_date: '||l_projfunc_bil_rate_date);
1794: pa_debug.write_file('LOG','l_projfunc_bil_exchange_rate: '||l_projfunc_bil_exchange_rate);
1795:
1796: pa_debug.write_file('LOG','pa_date : '||p_pa_date(i));
1797: pa_debug.write_file('LOG','x_denom_tp_currency_code : '||x_denom_tp_currency_code(i));
1798: pa_debug.write_file('LOG','p_project_currency_code : '||p_project_currency_code(i));
1799: END IF;
1800: --

Line 1797: pa_debug.write_file('LOG','x_denom_tp_currency_code : '||x_denom_tp_currency_code(i));

1793: pa_debug.write_file('LOG','l_projfunc_bil_rate_date: '||l_projfunc_bil_rate_date);
1794: pa_debug.write_file('LOG','l_projfunc_bil_exchange_rate: '||l_projfunc_bil_exchange_rate);
1795:
1796: pa_debug.write_file('LOG','pa_date : '||p_pa_date(i));
1797: pa_debug.write_file('LOG','x_denom_tp_currency_code : '||x_denom_tp_currency_code(i));
1798: pa_debug.write_file('LOG','p_project_currency_code : '||p_project_currency_code(i));
1799: END IF;
1800: --
1801: --Converting into Project currency attributes

Line 1798: pa_debug.write_file('LOG','p_project_currency_code : '||p_project_currency_code(i));

1794: pa_debug.write_file('LOG','l_projfunc_bil_exchange_rate: '||l_projfunc_bil_exchange_rate);
1795:
1796: pa_debug.write_file('LOG','pa_date : '||p_pa_date(i));
1797: pa_debug.write_file('LOG','x_denom_tp_currency_code : '||x_denom_tp_currency_code(i));
1798: pa_debug.write_file('LOG','p_project_currency_code : '||p_project_currency_code(i));
1799: END IF;
1800: --
1801: --Converting into Project currency attributes
1802: -- for tp_amt_type_code = 'REVENUE_TRANSFER'

Line 1815: pa_debug.write_file('LOG','ERROR NO USER RATE ');

1811: p_project_currency_code(i));
1812: ELSE
1813: x_error_code(i) := 'PA_CC_TP_CONVERT_AMT';
1814: IF g1_debug_mode = 'Y' THEN
1815: pa_debug.write_file('LOG','ERROR NO USER RATE ');
1816: END IF;
1817:
1818: END IF;
1819: else

Line 1826: pa_debug.write_file('LOG','BEFORE CONVERT: l_project_bil_rate_type: '||l_project_bil_rate_type);

1822: l_project_bil_rate_date := G_processed_thru_date;
1823: END IF;
1824:
1825: IF g1_debug_mode = 'Y' THEN
1826: pa_debug.write_file('LOG','BEFORE CONVERT: l_project_bil_rate_type: '||l_project_bil_rate_type);
1827: pa_debug.write_file('LOG','BEFORE CONVERT: l_project_bil_rate_date: '||l_project_bil_rate_date);
1828: END IF;
1829: begin --Bug 7423839
1830: IF g1_debug_mode = 'Y' THEN

Line 1827: pa_debug.write_file('LOG','BEFORE CONVERT: l_project_bil_rate_date: '||l_project_bil_rate_date);

1823: END IF;
1824:
1825: IF g1_debug_mode = 'Y' THEN
1826: pa_debug.write_file('LOG','BEFORE CONVERT: l_project_bil_rate_type: '||l_project_bil_rate_type);
1827: pa_debug.write_file('LOG','BEFORE CONVERT: l_project_bil_rate_date: '||l_project_bil_rate_date);
1828: END IF;
1829: begin --Bug 7423839
1830: IF g1_debug_mode = 'Y' THEN
1831: pa_debug.write_file('LOG', '4:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||p_project_currency_code(i));

Line 1831: pa_debug.write_file('LOG', '4:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||p_project_currency_code(i));

1827: pa_debug.write_file('LOG','BEFORE CONVERT: l_project_bil_rate_date: '||l_project_bil_rate_date);
1828: END IF;
1829: begin --Bug 7423839
1830: IF g1_debug_mode = 'Y' THEN
1831: pa_debug.write_file('LOG', '4:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||p_project_currency_code(i));
1832: pa_debug.write_file('LOG', 'r_date '||l_project_bil_rate_date|| ' r_type '||l_project_bil_rate_type||' amt '||x_denom_transfer_price(i));
1833: pa_debug.write_file('LOG', 'xfer_price '||l_project_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1834: pa_debug.write_file('LOG', 'rate '||l_project_bil_exchange_rate);
1835: END IF;

Line 1832: pa_debug.write_file('LOG', 'r_date '||l_project_bil_rate_date|| ' r_type '||l_project_bil_rate_type||' amt '||x_denom_transfer_price(i));

1828: END IF;
1829: begin --Bug 7423839
1830: IF g1_debug_mode = 'Y' THEN
1831: pa_debug.write_file('LOG', '4:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||p_project_currency_code(i));
1832: pa_debug.write_file('LOG', 'r_date '||l_project_bil_rate_date|| ' r_type '||l_project_bil_rate_type||' amt '||x_denom_transfer_price(i));
1833: pa_debug.write_file('LOG', 'xfer_price '||l_project_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1834: pa_debug.write_file('LOG', 'rate '||l_project_bil_exchange_rate);
1835: END IF;
1836: PA_MULTI_CURRENCY.Convert_Amount(

Line 1833: pa_debug.write_file('LOG', 'xfer_price '||l_project_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);

1829: begin --Bug 7423839
1830: IF g1_debug_mode = 'Y' THEN
1831: pa_debug.write_file('LOG', '4:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||p_project_currency_code(i));
1832: pa_debug.write_file('LOG', 'r_date '||l_project_bil_rate_date|| ' r_type '||l_project_bil_rate_type||' amt '||x_denom_transfer_price(i));
1833: pa_debug.write_file('LOG', 'xfer_price '||l_project_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1834: pa_debug.write_file('LOG', 'rate '||l_project_bil_exchange_rate);
1835: END IF;
1836: PA_MULTI_CURRENCY.Convert_Amount(
1837: p_from_currency => x_denom_tp_currency_code(i),

Line 1834: pa_debug.write_file('LOG', 'rate '||l_project_bil_exchange_rate);

1830: IF g1_debug_mode = 'Y' THEN
1831: pa_debug.write_file('LOG', '4:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||p_project_currency_code(i));
1832: pa_debug.write_file('LOG', 'r_date '||l_project_bil_rate_date|| ' r_type '||l_project_bil_rate_type||' amt '||x_denom_transfer_price(i));
1833: pa_debug.write_file('LOG', 'xfer_price '||l_project_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1834: pa_debug.write_file('LOG', 'rate '||l_project_bil_exchange_rate);
1835: END IF;
1836: PA_MULTI_CURRENCY.Convert_Amount(
1837: p_from_currency => x_denom_tp_currency_code(i),
1838: p_to_currency => p_project_currency_code(i),

Line 1853: pa_debug.write_file('LOG', 'r_date '||l_project_bil_rate_date|| ' r_type '||l_project_bil_rate_type);

1849: );
1850: exception
1851: when others then
1852: IF g1_debug_mode = 'Y' THEN
1853: pa_debug.write_file('LOG', 'r_date '||l_project_bil_rate_date|| ' r_type '||l_project_bil_rate_type);
1854: pa_debug.write_file('LOG', 'xfer_price '||l_project_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1855: pa_debug.write_file('LOG', 'rate '||l_project_bil_exchange_rate|| ' err msg '||substr(l_error_message,1,300));
1856: END IF;
1857: if l_error_message IS NULL THEN

Line 1854: pa_debug.write_file('LOG', 'xfer_price '||l_project_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);

1850: exception
1851: when others then
1852: IF g1_debug_mode = 'Y' THEN
1853: pa_debug.write_file('LOG', 'r_date '||l_project_bil_rate_date|| ' r_type '||l_project_bil_rate_type);
1854: pa_debug.write_file('LOG', 'xfer_price '||l_project_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1855: pa_debug.write_file('LOG', 'rate '||l_project_bil_exchange_rate|| ' err msg '||substr(l_error_message,1,300));
1856: END IF;
1857: if l_error_message IS NULL THEN
1858: l_error_message := 'OTHERS';

Line 1855: pa_debug.write_file('LOG', 'rate '||l_project_bil_exchange_rate|| ' err msg '||substr(l_error_message,1,300));

1851: when others then
1852: IF g1_debug_mode = 'Y' THEN
1853: pa_debug.write_file('LOG', 'r_date '||l_project_bil_rate_date|| ' r_type '||l_project_bil_rate_type);
1854: pa_debug.write_file('LOG', 'xfer_price '||l_project_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1855: pa_debug.write_file('LOG', 'rate '||l_project_bil_exchange_rate|| ' err msg '||substr(l_error_message,1,300));
1856: END IF;
1857: if l_error_message IS NULL THEN
1858: l_error_message := 'OTHERS';
1859: end if;

Line 1864: pa_debug.write_file('LOG','l_error_message : '||l_error_message);

1860: end;
1861:
1862:
1863: IF g1_debug_mode = 'Y' THEN
1864: pa_debug.write_file('LOG','l_error_message : '||l_error_message);
1865: pa_debug.write_file('LOG','AFTER CONVERT: l_project_bil_rate_type: '||l_project_bil_rate_type);
1866: pa_debug.write_file('LOG','AFTER CONVERT: l_project_bil_rate_date: '||l_project_bil_rate_date);
1867: END IF;
1868:

Line 1865: pa_debug.write_file('LOG','AFTER CONVERT: l_project_bil_rate_type: '||l_project_bil_rate_type);

1861:
1862:
1863: IF g1_debug_mode = 'Y' THEN
1864: pa_debug.write_file('LOG','l_error_message : '||l_error_message);
1865: pa_debug.write_file('LOG','AFTER CONVERT: l_project_bil_rate_type: '||l_project_bil_rate_type);
1866: pa_debug.write_file('LOG','AFTER CONVERT: l_project_bil_rate_date: '||l_project_bil_rate_date);
1867: END IF;
1868:
1869: IF l_error_message IS NOT NULL THEN

Line 1866: pa_debug.write_file('LOG','AFTER CONVERT: l_project_bil_rate_date: '||l_project_bil_rate_date);

1862:
1863: IF g1_debug_mode = 'Y' THEN
1864: pa_debug.write_file('LOG','l_error_message : '||l_error_message);
1865: pa_debug.write_file('LOG','AFTER CONVERT: l_project_bil_rate_type: '||l_project_bil_rate_type);
1866: pa_debug.write_file('LOG','AFTER CONVERT: l_project_bil_rate_date: '||l_project_bil_rate_date);
1867: END IF;
1868:
1869: IF l_error_message IS NOT NULL THEN
1870:

Line 1873: pa_debug.write_file('LOG',

1869: IF l_error_message IS NOT NULL THEN
1870:
1871: x_error_code(i) := 'PA_CC_TP_CONVERT_AMT';
1872: IF g1_debug_mode = 'Y' THEN
1873: pa_debug.write_file('LOG',
1874: Substr (l_error_message,1,2000));
1875: END IF;
1876: ELSE
1877: x_proj_transfer_price (i) := l_project_transfer_price;

Line 1881: pa_debug.G_Err_Stage := 'Rate Type ='||l_project_bil_rate_type;

1877: x_proj_transfer_price (i) := l_project_transfer_price;
1878: x_proj_tp_rate_type(i) := l_project_bil_rate_type;
1879: x_proj_tp_rate_date(i) := l_project_bil_rate_date;
1880: x_proj_tp_exchange_rate(i) := l_project_bil_exchange_rate;
1881: pa_debug.G_Err_Stage := 'Rate Type ='||l_project_bil_rate_type;
1882: IF g1_debug_mode = 'Y' THEN
1883: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1884: END IF;
1885: END IF;

Line 1883: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

1879: x_proj_tp_rate_date(i) := l_project_bil_rate_date;
1880: x_proj_tp_exchange_rate(i) := l_project_bil_exchange_rate;
1881: pa_debug.G_Err_Stage := 'Rate Type ='||l_project_bil_rate_type;
1882: IF g1_debug_mode = 'Y' THEN
1883: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1884: END IF;
1885: END IF;
1886:
1887:

Line 1911: pa_debug.write_file('LOG', '5:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||p_projfunc_currency_code(i));

1907: END IF;
1908:
1909: begin -- Bug 7423839
1910: IF g1_debug_mode = 'Y' THEN
1911: pa_debug.write_file('LOG', '5:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||p_projfunc_currency_code(i));
1912: pa_debug.write_file('LOG', 'r_date '||l_projfunc_bil_rate_date|| ' r_type '||l_projfunc_bil_rate_type||' amt '||x_denom_transfer_price(i));
1913: pa_debug.write_file('LOG', 'xfer_price '||l_projfunc_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1914: pa_debug.write_file('LOG', 'rate '||l_projfunc_bil_exchange_rate);
1915: END IF;

Line 1912: pa_debug.write_file('LOG', 'r_date '||l_projfunc_bil_rate_date|| ' r_type '||l_projfunc_bil_rate_type||' amt '||x_denom_transfer_price(i));

1908:
1909: begin -- Bug 7423839
1910: IF g1_debug_mode = 'Y' THEN
1911: pa_debug.write_file('LOG', '5:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||p_projfunc_currency_code(i));
1912: pa_debug.write_file('LOG', 'r_date '||l_projfunc_bil_rate_date|| ' r_type '||l_projfunc_bil_rate_type||' amt '||x_denom_transfer_price(i));
1913: pa_debug.write_file('LOG', 'xfer_price '||l_projfunc_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1914: pa_debug.write_file('LOG', 'rate '||l_projfunc_bil_exchange_rate);
1915: END IF;
1916: PA_MULTI_CURRENCY.Convert_Amount(

Line 1913: pa_debug.write_file('LOG', 'xfer_price '||l_projfunc_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);

1909: begin -- Bug 7423839
1910: IF g1_debug_mode = 'Y' THEN
1911: pa_debug.write_file('LOG', '5:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||p_projfunc_currency_code(i));
1912: pa_debug.write_file('LOG', 'r_date '||l_projfunc_bil_rate_date|| ' r_type '||l_projfunc_bil_rate_type||' amt '||x_denom_transfer_price(i));
1913: pa_debug.write_file('LOG', 'xfer_price '||l_projfunc_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1914: pa_debug.write_file('LOG', 'rate '||l_projfunc_bil_exchange_rate);
1915: END IF;
1916: PA_MULTI_CURRENCY.Convert_Amount(
1917: p_from_currency => x_denom_tp_currency_code(i),

Line 1914: pa_debug.write_file('LOG', 'rate '||l_projfunc_bil_exchange_rate);

1910: IF g1_debug_mode = 'Y' THEN
1911: pa_debug.write_file('LOG', '5:i= '||i|| ' f_curr '||x_denom_tp_currency_code(i)||' t_curr '||p_projfunc_currency_code(i));
1912: pa_debug.write_file('LOG', 'r_date '||l_projfunc_bil_rate_date|| ' r_type '||l_projfunc_bil_rate_type||' amt '||x_denom_transfer_price(i));
1913: pa_debug.write_file('LOG', 'xfer_price '||l_projfunc_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1914: pa_debug.write_file('LOG', 'rate '||l_projfunc_bil_exchange_rate);
1915: END IF;
1916: PA_MULTI_CURRENCY.Convert_Amount(
1917: p_from_currency => x_denom_tp_currency_code(i),
1918: p_to_currency => p_projfunc_currency_code(i),

Line 1933: pa_debug.write_file('LOG', 'r_date '||l_projfunc_bil_rate_date|| ' r_type '||l_projfunc_bil_rate_type);

1929: );
1930: exception
1931: when others then
1932: IF g1_debug_mode = 'Y' THEN
1933: pa_debug.write_file('LOG', 'r_date '||l_projfunc_bil_rate_date|| ' r_type '||l_projfunc_bil_rate_type);
1934: pa_debug.write_file('LOG', 'xfer_price '||l_projfunc_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1935: pa_debug.write_file('LOG', 'rate '||l_projfunc_bil_exchange_rate|| ' err msg '||substr(l_error_message,1,300));
1936: END IF;
1937: if l_error_message IS NULL THEN

Line 1934: pa_debug.write_file('LOG', 'xfer_price '||l_projfunc_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);

1930: exception
1931: when others then
1932: IF g1_debug_mode = 'Y' THEN
1933: pa_debug.write_file('LOG', 'r_date '||l_projfunc_bil_rate_date|| ' r_type '||l_projfunc_bil_rate_type);
1934: pa_debug.write_file('LOG', 'xfer_price '||l_projfunc_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1935: pa_debug.write_file('LOG', 'rate '||l_projfunc_bil_exchange_rate|| ' err msg '||substr(l_error_message,1,300));
1936: END IF;
1937: if l_error_message IS NULL THEN
1938: l_error_message := 'OTHERS';

Line 1935: pa_debug.write_file('LOG', 'rate '||l_projfunc_bil_exchange_rate|| ' err msg '||substr(l_error_message,1,300));

1931: when others then
1932: IF g1_debug_mode = 'Y' THEN
1933: pa_debug.write_file('LOG', 'r_date '||l_projfunc_bil_rate_date|| ' r_type '||l_projfunc_bil_rate_type);
1934: pa_debug.write_file('LOG', 'xfer_price '||l_projfunc_transfer_price|| ' denom '||l_denominator||' num '||l_numerator);
1935: pa_debug.write_file('LOG', 'rate '||l_projfunc_bil_exchange_rate|| ' err msg '||substr(l_error_message,1,300));
1936: END IF;
1937: if l_error_message IS NULL THEN
1938: l_error_message := 'OTHERS';
1939: end if;

Line 1946: pa_debug.write_file('LOG',

1942: IF l_error_message IS NOT NULL THEN
1943:
1944: x_error_code(i) := 'PA_CC_TP_CONVERT_AMT';
1945: IF g1_debug_mode = 'Y' THEN
1946: pa_debug.write_file('LOG',
1947: Substr (l_error_message,1,2000));
1948: END IF;
1949: ELSE
1950: x_projfunc_transfer_price (i) := l_projfunc_transfer_price;

Line 1954: pa_debug.G_Err_Stage := 'Rate Type ='||l_projfunc_bil_rate_type;

1950: x_projfunc_transfer_price (i) := l_projfunc_transfer_price;
1951: x_projfunc_tp_rate_type(i) := l_projfunc_bil_rate_type;
1952: x_projfunc_tp_rate_date(i) := l_projfunc_bil_rate_date;
1953: x_projfunc_tp_exchange_rate(i) := l_projfunc_bil_exchange_rate;
1954: pa_debug.G_Err_Stage := 'Rate Type ='||l_projfunc_bil_rate_type;
1955: IF g1_debug_mode = 'Y' THEN
1956: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1957: END IF;
1958: END IF;

Line 1956: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

1952: x_projfunc_tp_rate_date(i) := l_projfunc_bil_rate_date;
1953: x_projfunc_tp_exchange_rate(i) := l_projfunc_bil_exchange_rate;
1954: pa_debug.G_Err_Stage := 'Rate Type ='||l_projfunc_bil_rate_type;
1955: IF g1_debug_mode = 'Y' THEN
1956: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
1957: END IF;
1958: END IF;
1959:
1960:

Line 1964: pa_debug.write_file('LOG','AFTER CONVERSION');

1960:
1961: END IF; /* esle l_projfunc_bil_rate_type = 'User'*/
1962:
1963: IF g1_debug_mode = 'Y' THEN
1964: pa_debug.write_file('LOG','AFTER CONVERSION');
1965: pa_debug.write_file('LOG','l_project_bil_rate_date_code: '||l_project_bil_rate_date_code);
1966: pa_debug.write_file('LOG','l_project_bil_rate_type: '||l_project_bil_rate_type);
1967: pa_debug.write_file('LOG','l_project_bil_rate_date: '||l_project_bil_rate_date);
1968: pa_debug.write_file('LOG','l_project_bil_exchange_rate: '||l_project_bil_exchange_rate);

Line 1965: pa_debug.write_file('LOG','l_project_bil_rate_date_code: '||l_project_bil_rate_date_code);

1961: END IF; /* esle l_projfunc_bil_rate_type = 'User'*/
1962:
1963: IF g1_debug_mode = 'Y' THEN
1964: pa_debug.write_file('LOG','AFTER CONVERSION');
1965: pa_debug.write_file('LOG','l_project_bil_rate_date_code: '||l_project_bil_rate_date_code);
1966: pa_debug.write_file('LOG','l_project_bil_rate_type: '||l_project_bil_rate_type);
1967: pa_debug.write_file('LOG','l_project_bil_rate_date: '||l_project_bil_rate_date);
1968: pa_debug.write_file('LOG','l_project_bil_exchange_rate: '||l_project_bil_exchange_rate);
1969:

Line 1966: pa_debug.write_file('LOG','l_project_bil_rate_type: '||l_project_bil_rate_type);

1962:
1963: IF g1_debug_mode = 'Y' THEN
1964: pa_debug.write_file('LOG','AFTER CONVERSION');
1965: pa_debug.write_file('LOG','l_project_bil_rate_date_code: '||l_project_bil_rate_date_code);
1966: pa_debug.write_file('LOG','l_project_bil_rate_type: '||l_project_bil_rate_type);
1967: pa_debug.write_file('LOG','l_project_bil_rate_date: '||l_project_bil_rate_date);
1968: pa_debug.write_file('LOG','l_project_bil_exchange_rate: '||l_project_bil_exchange_rate);
1969:
1970: pa_debug.write_file('LOG','l_projfunc_bil_rate_date_code: '||l_projfunc_bil_rate_date_code);

Line 1967: pa_debug.write_file('LOG','l_project_bil_rate_date: '||l_project_bil_rate_date);

1963: IF g1_debug_mode = 'Y' THEN
1964: pa_debug.write_file('LOG','AFTER CONVERSION');
1965: pa_debug.write_file('LOG','l_project_bil_rate_date_code: '||l_project_bil_rate_date_code);
1966: pa_debug.write_file('LOG','l_project_bil_rate_type: '||l_project_bil_rate_type);
1967: pa_debug.write_file('LOG','l_project_bil_rate_date: '||l_project_bil_rate_date);
1968: pa_debug.write_file('LOG','l_project_bil_exchange_rate: '||l_project_bil_exchange_rate);
1969:
1970: pa_debug.write_file('LOG','l_projfunc_bil_rate_date_code: '||l_projfunc_bil_rate_date_code);
1971: pa_debug.write_file('LOG','l_projfunc_bil_rate_type: '||l_projfunc_bil_rate_type);

Line 1968: pa_debug.write_file('LOG','l_project_bil_exchange_rate: '||l_project_bil_exchange_rate);

1964: pa_debug.write_file('LOG','AFTER CONVERSION');
1965: pa_debug.write_file('LOG','l_project_bil_rate_date_code: '||l_project_bil_rate_date_code);
1966: pa_debug.write_file('LOG','l_project_bil_rate_type: '||l_project_bil_rate_type);
1967: pa_debug.write_file('LOG','l_project_bil_rate_date: '||l_project_bil_rate_date);
1968: pa_debug.write_file('LOG','l_project_bil_exchange_rate: '||l_project_bil_exchange_rate);
1969:
1970: pa_debug.write_file('LOG','l_projfunc_bil_rate_date_code: '||l_projfunc_bil_rate_date_code);
1971: pa_debug.write_file('LOG','l_projfunc_bil_rate_type: '||l_projfunc_bil_rate_type);
1972: pa_debug.write_file('LOG','l_projfunc_bil_rate_date: '||l_projfunc_bil_rate_date);

Line 1970: pa_debug.write_file('LOG','l_projfunc_bil_rate_date_code: '||l_projfunc_bil_rate_date_code);

1966: pa_debug.write_file('LOG','l_project_bil_rate_type: '||l_project_bil_rate_type);
1967: pa_debug.write_file('LOG','l_project_bil_rate_date: '||l_project_bil_rate_date);
1968: pa_debug.write_file('LOG','l_project_bil_exchange_rate: '||l_project_bil_exchange_rate);
1969:
1970: pa_debug.write_file('LOG','l_projfunc_bil_rate_date_code: '||l_projfunc_bil_rate_date_code);
1971: pa_debug.write_file('LOG','l_projfunc_bil_rate_type: '||l_projfunc_bil_rate_type);
1972: pa_debug.write_file('LOG','l_projfunc_bil_rate_date: '||l_projfunc_bil_rate_date);
1973: pa_debug.write_file('LOG','l_projfunc_bil_exchange_rate: '||l_projfunc_bil_exchange_rate);
1974: END IF;

Line 1971: pa_debug.write_file('LOG','l_projfunc_bil_rate_type: '||l_projfunc_bil_rate_type);

1967: pa_debug.write_file('LOG','l_project_bil_rate_date: '||l_project_bil_rate_date);
1968: pa_debug.write_file('LOG','l_project_bil_exchange_rate: '||l_project_bil_exchange_rate);
1969:
1970: pa_debug.write_file('LOG','l_projfunc_bil_rate_date_code: '||l_projfunc_bil_rate_date_code);
1971: pa_debug.write_file('LOG','l_projfunc_bil_rate_type: '||l_projfunc_bil_rate_type);
1972: pa_debug.write_file('LOG','l_projfunc_bil_rate_date: '||l_projfunc_bil_rate_date);
1973: pa_debug.write_file('LOG','l_projfunc_bil_exchange_rate: '||l_projfunc_bil_exchange_rate);
1974: END IF;
1975:

Line 1972: pa_debug.write_file('LOG','l_projfunc_bil_rate_date: '||l_projfunc_bil_rate_date);

1968: pa_debug.write_file('LOG','l_project_bil_exchange_rate: '||l_project_bil_exchange_rate);
1969:
1970: pa_debug.write_file('LOG','l_projfunc_bil_rate_date_code: '||l_projfunc_bil_rate_date_code);
1971: pa_debug.write_file('LOG','l_projfunc_bil_rate_type: '||l_projfunc_bil_rate_type);
1972: pa_debug.write_file('LOG','l_projfunc_bil_rate_date: '||l_projfunc_bil_rate_date);
1973: pa_debug.write_file('LOG','l_projfunc_bil_exchange_rate: '||l_projfunc_bil_exchange_rate);
1974: END IF;
1975:
1976: END IF ; /** l_multi_currency_billing_flag = 'Y' **/

Line 1973: pa_debug.write_file('LOG','l_projfunc_bil_exchange_rate: '||l_projfunc_bil_exchange_rate);

1969:
1970: pa_debug.write_file('LOG','l_projfunc_bil_rate_date_code: '||l_projfunc_bil_rate_date_code);
1971: pa_debug.write_file('LOG','l_projfunc_bil_rate_type: '||l_projfunc_bil_rate_type);
1972: pa_debug.write_file('LOG','l_projfunc_bil_rate_date: '||l_projfunc_bil_rate_date);
1973: pa_debug.write_file('LOG','l_projfunc_bil_exchange_rate: '||l_projfunc_bil_exchange_rate);
1974: END IF;
1975:
1976: END IF ; /** l_multi_currency_billing_flag = 'Y' **/
1977: END IF; /** p_tp_amt_type_code(i) = 'REVENUE_TRANSFER' **/

Line 2036: pa_debug.G_Err_Stage := 'Completed Get_Transfer_Price with success';

2032: END IF; /** x_error_code(i) IS NULL **/
2033:
2034: END LOOP;
2035:
2036: pa_debug.G_Err_Stage := 'Completed Get_Transfer_Price with success';
2037: IF g1_debug_mode = 'Y' THEN
2038: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2039: END IF;
2040: x_return_status := 0;

Line 2038: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2034: END LOOP;
2035:
2036: pa_debug.G_Err_Stage := 'Completed Get_Transfer_Price with success';
2037: IF g1_debug_mode = 'Y' THEN
2038: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2039: END IF;
2040: x_return_status := 0;
2041: pa_debug.Reset_err_stack;
2042:

Line 2041: pa_debug.Reset_err_stack;

2037: IF g1_debug_mode = 'Y' THEN
2038: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2039: END IF;
2040: x_return_status := 0;
2041: pa_debug.Reset_err_stack;
2042:
2043: EXCEPTION
2044: when unexpected_result THEN
2045: IF g1_debug_mode = 'Y' THEN

Line 2046: pa_debug.write_file('LOG','Unexpected Error in Transfer Price API' );

2042:
2043: EXCEPTION
2044: when unexpected_result THEN
2045: IF g1_debug_mode = 'Y' THEN
2046: pa_debug.write_file('LOG','Unexpected Error in Transfer Price API' );
2047: pa_debug.write_file('LOG',pa_debug.G_Err_Stack);
2048: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2049: END IF;
2050:

Line 2047: pa_debug.write_file('LOG',pa_debug.G_Err_Stack);

2043: EXCEPTION
2044: when unexpected_result THEN
2045: IF g1_debug_mode = 'Y' THEN
2046: pa_debug.write_file('LOG','Unexpected Error in Transfer Price API' );
2047: pa_debug.write_file('LOG',pa_debug.G_Err_Stack);
2048: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2049: END IF;
2050:
2051: when others then

Line 2048: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2044: when unexpected_result THEN
2045: IF g1_debug_mode = 'Y' THEN
2046: pa_debug.write_file('LOG','Unexpected Error in Transfer Price API' );
2047: pa_debug.write_file('LOG',pa_debug.G_Err_Stack);
2048: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2049: END IF;
2050:
2051: when others then
2052:

Line 2054: pa_debug.write_file('LOG','Unexpected Error in Transfer Price API' );

2050:
2051: when others then
2052:
2053: IF g1_debug_mode = 'Y' THEN
2054: pa_debug.write_file('LOG','Unexpected Error in Transfer Price API' );
2055: pa_debug.write_file('LOG',pa_debug.G_Err_Stack);
2056: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2057: END IF;
2058:

Line 2055: pa_debug.write_file('LOG',pa_debug.G_Err_Stack);

2051: when others then
2052:
2053: IF g1_debug_mode = 'Y' THEN
2054: pa_debug.write_file('LOG','Unexpected Error in Transfer Price API' );
2055: pa_debug.write_file('LOG',pa_debug.G_Err_Stack);
2056: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2057: END IF;
2058:
2059: raise;

Line 2056: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2052:
2053: IF g1_debug_mode = 'Y' THEN
2054: pa_debug.write_file('LOG','Unexpected Error in Transfer Price API' );
2055: pa_debug.write_file('LOG',pa_debug.G_Err_Stack);
2056: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2057: END IF;
2058:
2059: raise;
2060:

Line 2068: pa_debug.Set_err_stack ('Init_who_cols');

2064: PROCEDURE Init_who_cols
2065: IS
2066: BEGIN
2067:
2068: pa_debug.Set_err_stack ('Init_who_cols');
2069: pa_debug.G_Err_Stage := 'Inside Init_who_cols';
2070: IF g1_debug_mode = 'Y' THEN
2071: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2072: END IF;

Line 2069: pa_debug.G_Err_Stage := 'Inside Init_who_cols';

2065: IS
2066: BEGIN
2067:
2068: pa_debug.Set_err_stack ('Init_who_cols');
2069: pa_debug.G_Err_Stage := 'Inside Init_who_cols';
2070: IF g1_debug_mode = 'Y' THEN
2071: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2072: END IF;
2073:

Line 2071: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2067:
2068: pa_debug.Set_err_stack ('Init_who_cols');
2069: pa_debug.G_Err_Stage := 'Inside Init_who_cols';
2070: IF g1_debug_mode = 'Y' THEN
2071: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2072: END IF;
2073:
2074: G_created_by := nvl(TO_NUMBER(FND_PROFILE.VALUE('USER_ID')),-1);
2075: G_last_update_login := nvl(TO_NUMBER(FND_PROFILE.VALUE('LOGIN_ID')), -1);

Line 2080: pa_debug.Reset_err_stack;

2076: G_last_updated_by := G_created_by;
2077: G_creation_date := G_sysdate;
2078: G_last_update_date := G_sysdate ;
2079:
2080: pa_debug.Reset_err_stack;
2081:
2082: END Init_who_cols ;
2083:
2084: -------------------------------------------------------------------------------

Line 2110: pa_debug.Set_err_stack ('Get_Legal_Entity');

2106: l_legal_entity hr_organization_information.org_information2%TYPE;
2107:
2108: BEGIN
2109:
2110: pa_debug.Set_err_stack ('Get_Legal_Entity');
2111: pa_debug.G_Err_Stage := 'Get Legal Entity of Org'||to_char(p_org_id);
2112: IF g1_debug_mode = 'Y' THEN
2113: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2114: END IF;

Line 2111: pa_debug.G_Err_Stage := 'Get Legal Entity of Org'||to_char(p_org_id);

2107:
2108: BEGIN
2109:
2110: pa_debug.Set_err_stack ('Get_Legal_Entity');
2111: pa_debug.G_Err_Stage := 'Get Legal Entity of Org'||to_char(p_org_id);
2112: IF g1_debug_mode = 'Y' THEN
2113: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2114: END IF;
2115:

Line 2113: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2109:
2110: pa_debug.Set_err_stack ('Get_Legal_Entity');
2111: pa_debug.G_Err_Stage := 'Get Legal Entity of Org'||to_char(p_org_id);
2112: IF g1_debug_mode = 'Y' THEN
2113: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2114: END IF;
2115:
2116: open c_legal_entity;
2117: fetch c_legal_entity into l_legal_entity;

Line 2126: pa_debug.Reset_err_stack;

2122: -- conversion required as legal_entity_id is stored as varchar2
2123: -- in hr_operating_units
2124: END IF;
2125:
2126: pa_debug.Reset_err_stack;
2127:
2128: EXCEPTION
2129:
2130: WHEN OTHERS THEN

Line 2146: pa_debug.Set_err_stack ('Set_Global_Variables ');

2142: --Added nvl to G_prvdr_org_id
2143:
2144: IF nvl(G_prvdr_org_id,-1) <> p_org_id and g_Calling_Module = 'FORECAST' Then
2145:
2146: pa_debug.Set_err_stack ('Set_Global_Variables ');
2147: pa_debug.G_Err_Stage := 'Set_Global_Variables '||to_char(p_org_id);
2148: IF g1_debug_mode = 'Y' THEN
2149: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2150: END IF;

Line 2147: pa_debug.G_Err_Stage := 'Set_Global_Variables '||to_char(p_org_id);

2143:
2144: IF nvl(G_prvdr_org_id,-1) <> p_org_id and g_Calling_Module = 'FORECAST' Then
2145:
2146: pa_debug.Set_err_stack ('Set_Global_Variables ');
2147: pa_debug.G_Err_Stage := 'Set_Global_Variables '||to_char(p_org_id);
2148: IF g1_debug_mode = 'Y' THEN
2149: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2150: END IF;
2151:

Line 2149: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2145:
2146: pa_debug.Set_err_stack ('Set_Global_Variables ');
2147: pa_debug.G_Err_Stage := 'Set_Global_Variables '||to_char(p_org_id);
2148: IF g1_debug_mode = 'Y' THEN
2149: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2150: END IF;
2151:
2152: G_prvdr_org_id := G_prvdr_org_id_Tab(p_org_id);
2153: G_bg_id := G_bg_id_Tab(p_org_id);

Line 2183: pa_debug.Set_err_stack ('Get_Business_group');

2179:
2180: l_business_group hr_operating_units.business_group_id%TYPE;
2181:
2182: BEGIN
2183: pa_debug.Set_err_stack ('Get_Business_group');
2184: pa_debug.G_Err_Stage := 'Get bisiness_group of Org'||to_char(p_org_id);
2185: IF g1_debug_mode = 'Y' THEN
2186: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2187: END IF;

Line 2184: pa_debug.G_Err_Stage := 'Get bisiness_group of Org'||to_char(p_org_id);

2180: l_business_group hr_operating_units.business_group_id%TYPE;
2181:
2182: BEGIN
2183: pa_debug.Set_err_stack ('Get_Business_group');
2184: pa_debug.G_Err_Stage := 'Get bisiness_group of Org'||to_char(p_org_id);
2185: IF g1_debug_mode = 'Y' THEN
2186: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2187: END IF;
2188:

Line 2186: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2182: BEGIN
2183: pa_debug.Set_err_stack ('Get_Business_group');
2184: pa_debug.G_Err_Stage := 'Get bisiness_group of Org'||to_char(p_org_id);
2185: IF g1_debug_mode = 'Y' THEN
2186: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2187: END IF;
2188:
2189: open c_business_group;
2190: fetch c_business_group into l_business_group;

Line 2197: pa_debug.Reset_err_stack;

2193: IF l_business_group IS NOT NULL THEN
2194: x_business_group_id := l_business_group;
2195: END IF;
2196:
2197: pa_debug.Reset_err_stack;
2198:
2199: EXCEPTION
2200:
2201: WHEN OTHERS THEN

Line 2238: pa_debug.Set_err_stack ('Get_Provider_Attributes');

2234:
2235: l_provider_org_id pa_implementations.org_id%type;
2236:
2237: BEGIN
2238: pa_debug.Set_err_stack ('Get_Provider_Attributes');
2239: pa_debug.G_Err_Stage := 'Inside Get_Provider_Attributes';
2240: IF g1_debug_mode = 'Y' THEN
2241: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2242: END IF;

Line 2239: pa_debug.G_Err_Stage := 'Inside Get_Provider_Attributes';

2235: l_provider_org_id pa_implementations.org_id%type;
2236:
2237: BEGIN
2238: pa_debug.Set_err_stack ('Get_Provider_Attributes');
2239: pa_debug.G_Err_Stage := 'Inside Get_Provider_Attributes';
2240: IF g1_debug_mode = 'Y' THEN
2241: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2242: END IF;
2243:

Line 2241: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2237: BEGIN
2238: pa_debug.Set_err_stack ('Get_Provider_Attributes');
2239: pa_debug.G_Err_Stage := 'Inside Get_Provider_Attributes';
2240: IF g1_debug_mode = 'Y' THEN
2241: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2242: END IF;
2243:
2244: If G_Calling_module = 'FORECAST' Then
2245: Begin

Line 2247: pa_debug.G_Err_Stage := 'i: '||to_char(i)||' error code : '||x_error_code(i);

2243:
2244: If G_Calling_module = 'FORECAST' Then
2245: Begin
2246: For i in 1 .. G_array_size Loop
2247: pa_debug.G_Err_Stage := 'i: '||to_char(i)||' error code : '||x_error_code(i);
2248: IF g1_debug_mode = 'Y' THEN
2249: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2250: END IF;
2251:

Line 2249: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2245: Begin
2246: For i in 1 .. G_array_size Loop
2247: pa_debug.G_Err_Stage := 'i: '||to_char(i)||' error code : '||x_error_code(i);
2248: IF g1_debug_mode = 'Y' THEN
2249: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2250: END IF;
2251:
2252:
2253: l_provider_org_id := nvl(p_prvdr_operating_unit(i),-1);

Line 2257: pa_debug.write_file('LOG','i :'||to_char(i)||' Exist ');

2253: l_provider_org_id := nvl(p_prvdr_operating_unit(i),-1);
2254: If G_prvdr_org_id_tab.Exists(l_provider_org_id)
2255: Then Null;
2256: IF g1_debug_mode = 'Y' THEN
2257: pa_debug.write_file('LOG','i :'||to_char(i)||' Exist ');
2258: END IF;
2259: Else
2260: open c_ou_attributes_fcst (l_provider_org_id);
2261: fetch c_ou_attributes_fcst

Line 2278: pa_debug.G_Err_Stage := 'I : '||to_char(i)||' p_prvdr_operating_unit(i) '||to_char(l_provider_org_id)||

2274:
2275:
2276: End If; /** G_prvdr_org_id_tab.Exists **/
2277:
2278: pa_debug.G_Err_Stage := 'I : '||to_char(i)||' p_prvdr_operating_unit(i) '||to_char(l_provider_org_id)||
2279: ' G_prvdr_org_id_tab(l_provider_org_id): '||to_char(G_prvdr_org_id_tab(l_provider_org_id));
2280:
2281: IF g1_debug_mode = 'Y' THEN
2282: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

Line 2282: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2278: pa_debug.G_Err_Stage := 'I : '||to_char(i)||' p_prvdr_operating_unit(i) '||to_char(l_provider_org_id)||
2279: ' G_prvdr_org_id_tab(l_provider_org_id): '||to_char(G_prvdr_org_id_tab(l_provider_org_id));
2280:
2281: IF g1_debug_mode = 'Y' THEN
2282: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2283: END IF;
2284:
2285: End loop;
2286: End;

Line 2303: pa_debug.Reset_err_stack;

2299:
2300: -- Get accounting currency code of the provider
2301: G_acct_currency_code := PA_MULTI_CURRENCY.Get_Acct_Currency_Code;
2302: End If; /** End p_module_name = 'FORECAST' **/
2303: pa_debug.Reset_err_stack;
2304:
2305: EXCEPTION
2306: when others then
2307: raise;

Line 2329: pa_debug.Set_err_stack ('Validate_Array');

2325: )
2326: IS
2327: l_acct_currency_code FND_CURRENCIES.CURRENCY_CODE%TYPE ; /** Added for Org Forecasting **/
2328: BEGIN
2329: pa_debug.Set_err_stack ('Validate_Array');
2330: pa_debug.G_Err_Stage := 'Starting Validate_Array';
2331: IF g1_debug_mode = 'Y' THEN
2332: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2333: END IF;

Line 2330: pa_debug.G_Err_Stage := 'Starting Validate_Array';

2326: IS
2327: l_acct_currency_code FND_CURRENCIES.CURRENCY_CODE%TYPE ; /** Added for Org Forecasting **/
2328: BEGIN
2329: pa_debug.Set_err_stack ('Validate_Array');
2330: pa_debug.G_Err_Stage := 'Starting Validate_Array';
2331: IF g1_debug_mode = 'Y' THEN
2332: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2333: END IF;
2334:

Line 2332: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2328: BEGIN
2329: pa_debug.Set_err_stack ('Validate_Array');
2330: pa_debug.G_Err_Stage := 'Starting Validate_Array';
2331: IF g1_debug_mode = 'Y' THEN
2332: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2333: END IF;
2334:
2335: l_acct_currency_code := p_acct_currency_code; /** Added for Org Forecasting **/
2336:

Line 2339: pa_debug.G_Err_Stage := 'Start Loop';

2335: l_acct_currency_code := p_acct_currency_code; /** Added for Org Forecasting **/
2336:
2337: For i in 1 .. G_array_Size
2338: Loop
2339: pa_debug.G_Err_Stage := 'Start Loop';
2340: -- Consider records with error_code is null and compute_flag = 'Y'
2341: IF (x_compute_flag(i) = 'Y' ) THEN
2342: IF ( x_error_code(i) IS NULL ) THEN
2343: -- Check if transfer price is already available -

Line 2344: pa_debug.G_Err_Stage := 'Flagged as error-free';

2340: -- Consider records with error_code is null and compute_flag = 'Y'
2341: IF (x_compute_flag(i) = 'Y' ) THEN
2342: IF ( x_error_code(i) IS NULL ) THEN
2343: -- Check if transfer price is already available -
2344: pa_debug.G_Err_Stage := 'Flagged as error-free';
2345: IF g1_debug_mode = 'Y' THEN
2346: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2347: END IF;
2348:

Line 2346: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2342: IF ( x_error_code(i) IS NULL ) THEN
2343: -- Check if transfer price is already available -
2344: pa_debug.G_Err_Stage := 'Flagged as error-free';
2345: IF g1_debug_mode = 'Y' THEN
2346: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2347: END IF;
2348:
2349: IF G_Calling_Module = 'FORECAST' Then /** Added for Org Forecasting **/
2350: l_acct_currency_code := G_acct_currency_code_Tab(p_prvdr_operating_unit(i));

Line 2356: pa_debug.G_Err_Stage := 'Reconversion Case';

2352:
2353: IF (p_denom_transfer_price(i) IS NOT NULL
2354: and nvl(p_denom_tp_currency_code(i),'-1') <> nvl(l_acct_currency_code,'-1')) THEN
2355: /** Changed p_acct_currency_code to l_acct_currency_code for Org Forecasting **/
2356: pa_debug.G_Err_Stage := 'Reconversion Case';
2357: IF g1_debug_mode = 'Y' THEN
2358: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2359: END IF;
2360: -- Check if all conversion attributes are provided

Line 2358: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2354: and nvl(p_denom_tp_currency_code(i),'-1') <> nvl(l_acct_currency_code,'-1')) THEN
2355: /** Changed p_acct_currency_code to l_acct_currency_code for Org Forecasting **/
2356: pa_debug.G_Err_Stage := 'Reconversion Case';
2357: IF g1_debug_mode = 'Y' THEN
2358: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2359: END IF;
2360: -- Check if all conversion attributes are provided
2361:
2362: IF( ( (p_acct_tp_rate_type(i) IS NOT NULL) AND

Line 2378: pa_debug.G_Err_Stage := 'Calculate Transfer Price';

2374: x_error_code(i) := 'PA_CC_TP_CURR_CONVERSION_ATTR';
2375: END IF;
2376:
2377: ELSE
2378: pa_debug.G_Err_Stage := 'Calculate Transfer Price';
2379: -- Need to calculate transfer price
2380:
2381: -- Check if schedule_id is provided
2382: IF p_tp_schedule_id(i) IS NULL THEN

Line 2393: pa_debug.Reset_err_stack;

2389: END IF; /**x_compute_flag(i) = 'Y' AND x_error_code(i) IS NULL **/
2390:
2391: END Loop;
2392:
2393: pa_debug.Reset_err_stack;
2394: pa_debug.G_Err_Stage := 'Exitting Validate_Array ';
2395: IF g1_debug_mode = 'Y' THEN
2396: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2397: END IF;

Line 2394: pa_debug.G_Err_Stage := 'Exitting Validate_Array ';

2390:
2391: END Loop;
2392:
2393: pa_debug.Reset_err_stack;
2394: pa_debug.G_Err_Stage := 'Exitting Validate_Array ';
2395: IF g1_debug_mode = 'Y' THEN
2396: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2397: END IF;
2398:

Line 2396: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2392:
2393: pa_debug.Reset_err_stack;
2394: pa_debug.G_Err_Stage := 'Exitting Validate_Array ';
2395: IF g1_debug_mode = 'Y' THEN
2396: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2397: END IF;
2398:
2399: EXCEPTION
2400: when others then

Line 2437: pa_debug.Set_err_stack ('Get_Schedule_Line');

2433: p_sort_order Number; -- Added for bug 5753774
2434:
2435: BEGIN
2436:
2437: pa_debug.Set_err_stack ('Get_Schedule_Line');
2438: pa_debug.G_Err_Stage := 'Starting Get_Schedule_Line';
2439: IF g1_debug_mode = 'Y' THEN
2440: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2441: END IF;

Line 2438: pa_debug.G_Err_Stage := 'Starting Get_Schedule_Line';

2434:
2435: BEGIN
2436:
2437: pa_debug.Set_err_stack ('Get_Schedule_Line');
2438: pa_debug.G_Err_Stage := 'Starting Get_Schedule_Line';
2439: IF g1_debug_mode = 'Y' THEN
2440: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2441: END IF;
2442:

Line 2440: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2436:
2437: pa_debug.Set_err_stack ('Get_Schedule_Line');
2438: pa_debug.G_Err_Stage := 'Starting Get_Schedule_Line';
2439: IF g1_debug_mode = 'Y' THEN
2440: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2441: END IF;
2442:
2443: For i in 1 ..G_array_Size
2444: Loop

Line 2447: pa_debug.G_Err_Stage := 'p_prvdr_operating_unit: '||

2443: For i in 1 ..G_array_Size
2444: Loop
2445: If G_Calling_module = 'FORECAST' Then /** Added for Org Forecasting **/
2446:
2447: pa_debug.G_Err_Stage := 'p_prvdr_operating_unit: '||
2448: to_char(p_prvdr_operating_unit(i));
2449: IF g1_debug_mode = 'Y' THEN
2450: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2451: END IF;

Line 2450: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2446:
2447: pa_debug.G_Err_Stage := 'p_prvdr_operating_unit: '||
2448: to_char(p_prvdr_operating_unit(i));
2449: IF g1_debug_mode = 'Y' THEN
2450: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2451: END IF;
2452:
2453: Set_Global_Variables (p_prvdr_operating_unit(i));
2454: Get_legal_entity (G_prvdr_org_id,G_prvdr_legal_entity_id);

Line 2458: pa_debug.G_Err_Stage := 'Processing Expenditure ID: '||

2454: Get_legal_entity (G_prvdr_org_id,G_prvdr_legal_entity_id);
2455: End If;
2456:
2457:
2458: pa_debug.G_Err_Stage := 'Processing Expenditure ID: '||
2459: to_char(p_expenditure_item_id(i));
2460: IF g1_debug_mode = 'Y' THEN
2461: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2462: END IF;

Line 2461: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2457:
2458: pa_debug.G_Err_Stage := 'Processing Expenditure ID: '||
2459: to_char(p_expenditure_item_id(i));
2460: IF g1_debug_mode = 'Y' THEN
2461: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2462: END IF;
2463:
2464: pa_debug.G_Err_Stage := 'p_compute_flag: '||p_compute_flag(i);
2465: IF g1_debug_mode = 'Y' THEN

Line 2464: pa_debug.G_Err_Stage := 'p_compute_flag: '||p_compute_flag(i);

2460: IF g1_debug_mode = 'Y' THEN
2461: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2462: END IF;
2463:
2464: pa_debug.G_Err_Stage := 'p_compute_flag: '||p_compute_flag(i);
2465: IF g1_debug_mode = 'Y' THEN
2466: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2467: END IF;
2468:

Line 2466: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2462: END IF;
2463:
2464: pa_debug.G_Err_Stage := 'p_compute_flag: '||p_compute_flag(i);
2465: IF g1_debug_mode = 'Y' THEN
2466: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2467: END IF;
2468:
2469: pa_debug.G_Err_Stage := 'x_error_code: '||x_error_code(i);
2470: IF g1_debug_mode = 'Y' THEN

Line 2469: pa_debug.G_Err_Stage := 'x_error_code: '||x_error_code(i);

2465: IF g1_debug_mode = 'Y' THEN
2466: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2467: END IF;
2468:
2469: pa_debug.G_Err_Stage := 'x_error_code: '||x_error_code(i);
2470: IF g1_debug_mode = 'Y' THEN
2471: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2472: END IF;
2473:

Line 2471: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2467: END IF;
2468:
2469: pa_debug.G_Err_Stage := 'x_error_code: '||x_error_code(i);
2470: IF g1_debug_mode = 'Y' THEN
2471: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2472: END IF;
2473:
2474: IF (p_compute_flag(i) = 'Y' AND
2475: x_error_code(i) is null ) THEN

Line 2496: pa_debug.G_Err_Stage := 'Find out Schedule_Line_ID';

2492:
2493: IF x_tp_schedule_line_id(i) IS NULL THEN
2494: -- Find out schedule_line_id
2495:
2496: pa_debug.G_Err_Stage := 'Find out Schedule_Line_ID';
2497: Determine_Schedule_Line(
2498: p_prvdr_organization_id(i),
2499: p_recvr_org_id(i),
2500: p_recvr_organization_id(i),

Line 2518: pa_debug.write_file('LOG','Error Code'||x_error_code(i));

2514: p_sort_order, -- added for bug 5753774
2515: x_error_code(i) );
2516:
2517: IF g1_debug_mode = 'Y' THEN
2518: pa_debug.write_file('LOG','Error Code'||x_error_code(i));
2519: END IF;
2520:
2521: l_tp_schedule_line_id := x_tp_schedule_line_id(i);
2522:

Line 2526: pa_debug.G_Err_Stage := 'Insert Schedule Line into Lookup';

2522:
2523: IF ( x_error_code(i) IS NULL ) THEN
2524: -- No error from Determine_Schedule_Line
2525:
2526: pa_debug.G_Err_Stage := 'Insert Schedule Line into Lookup';
2527: -- pa_debug.G_Err_Stage := 'Sort order is :'||x_sort_order ;/*bug 5753774*/
2528:
2529: Insert_Schedule_Line_Into_Lkp(
2530: p_prvdr_organization_id(i),

Line 2527: -- pa_debug.G_Err_Stage := 'Sort order is :'||x_sort_order ;/bug 5753774/

2523: IF ( x_error_code(i) IS NULL ) THEN
2524: -- No error from Determine_Schedule_Line
2525:
2526: pa_debug.G_Err_Stage := 'Insert Schedule Line into Lookup';
2527: -- pa_debug.G_Err_Stage := 'Sort order is :'||x_sort_order ;/*bug 5753774*/
2528:
2529: Insert_Schedule_Line_Into_Lkp(
2530: p_prvdr_organization_id(i),
2531: p_recvr_org_id (i),

Line 2550: pa_debug.G_Err_Stage := 'Get Schedule Line Attributes';

2546: ELSE
2547:
2548: l_tp_schedule_line_id := x_tp_schedule_line_id(i);
2549: -- Get Schedule Line attributes
2550: pa_debug.G_Err_Stage := 'Get Schedule Line Attributes';
2551:
2552: Get_Schedule_Line_Attributes(
2553: l_tp_schedule_line_id,
2554: p_labor_non_labor_flag(i),

Line 2563: pa_debug.G_Err_Stage := 'Rule ID is '||to_char(x_tp_rule_id(i));

2559: -- Set the OUT variables
2560: x_tp_schedule_line_id(i) := l_tp_schedule_line_id;
2561: x_tp_schedule_line_percentage(i) := l_percentage_applied;
2562: x_tp_rule_id (i) := l_tp_rule_id;
2563: pa_debug.G_Err_Stage := 'Rule ID is '||to_char(x_tp_rule_id(i));
2564: IF g1_debug_mode = 'Y' THEN
2565: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2566: END IF;
2567:

Line 2565: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2561: x_tp_schedule_line_percentage(i) := l_percentage_applied;
2562: x_tp_rule_id (i) := l_tp_rule_id;
2563: pa_debug.G_Err_Stage := 'Rule ID is '||to_char(x_tp_rule_id(i));
2564: IF g1_debug_mode = 'Y' THEN
2565: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2566: END IF;
2567:
2568:
2569: END IF; /** p_compute_flag = 'Y' and x_error_code is null **/

Line 2571: pa_debug.G_Err_Stage := 'Completed Processing the item';

2567:
2568:
2569: END IF; /** p_compute_flag = 'Y' and x_error_code is null **/
2570:
2571: pa_debug.G_Err_Stage := 'Completed Processing the item';
2572: IF g1_debug_mode = 'Y' THEN
2573: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2574: END IF;
2575: pa_debug.G_Err_Stage := '..................................................';

Line 2573: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2569: END IF; /** p_compute_flag = 'Y' and x_error_code is null **/
2570:
2571: pa_debug.G_Err_Stage := 'Completed Processing the item';
2572: IF g1_debug_mode = 'Y' THEN
2573: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2574: END IF;
2575: pa_debug.G_Err_Stage := '..................................................';
2576: IF g1_debug_mode = 'Y' THEN
2577: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

Line 2575: pa_debug.G_Err_Stage := '..................................................';

2571: pa_debug.G_Err_Stage := 'Completed Processing the item';
2572: IF g1_debug_mode = 'Y' THEN
2573: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2574: END IF;
2575: pa_debug.G_Err_Stage := '..................................................';
2576: IF g1_debug_mode = 'Y' THEN
2577: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2578: END IF;
2579:

Line 2577: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2573: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2574: END IF;
2575: pa_debug.G_Err_Stage := '..................................................';
2576: IF g1_debug_mode = 'Y' THEN
2577: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2578: END IF;
2579:
2580: End Loop;
2581:

Line 2582: pa_debug.Reset_err_stack;

2578: END IF;
2579:
2580: End Loop;
2581:
2582: pa_debug.Reset_err_stack;
2583: pa_debug.G_Err_Stage := 'Exitting Get_Schedule_Line';
2584: IF g1_debug_mode = 'Y' THEN
2585: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2586: END IF;

Line 2583: pa_debug.G_Err_Stage := 'Exitting Get_Schedule_Line';

2579:
2580: End Loop;
2581:
2582: pa_debug.Reset_err_stack;
2583: pa_debug.G_Err_Stage := 'Exitting Get_Schedule_Line';
2584: IF g1_debug_mode = 'Y' THEN
2585: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2586: END IF;
2587:

Line 2585: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2581:
2582: pa_debug.Reset_err_stack;
2583: pa_debug.G_Err_Stage := 'Exitting Get_Schedule_Line';
2584: IF g1_debug_mode = 'Y' THEN
2585: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2586: END IF;
2587:
2588: EXCEPTION
2589: WHEN OTHERS THEN

Line 2632: pa_debug.Set_err_stack ('Get_Schedule_Line_From_Lookup');

2628: trunc(NVL(end_date_active,p_expenditure_item_date)) /* Added for 3118101 */
2629: ORDER BY sort_order; /*Bug 5753774*/
2630:
2631: BEGIN
2632: pa_debug.Set_err_stack ('Get_Schedule_Line_From_Lookup');
2633: pa_debug.G_Err_Stage := 'Starting Get_Schedule_Line_From_Lookup';
2634: IF g1_debug_mode = 'Y' THEN
2635: Pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2636:

Line 2633: pa_debug.G_Err_Stage := 'Starting Get_Schedule_Line_From_Lookup';

2629: ORDER BY sort_order; /*Bug 5753774*/
2630:
2631: BEGIN
2632: pa_debug.Set_err_stack ('Get_Schedule_Line_From_Lookup');
2633: pa_debug.G_Err_Stage := 'Starting Get_Schedule_Line_From_Lookup';
2634: IF g1_debug_mode = 'Y' THEN
2635: Pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2636:
2637: Pa_debug.write_file('LOG','prvdr_oranz_id '||p_prvdr_organization_id||

Line 2635: Pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2631: BEGIN
2632: pa_debug.Set_err_stack ('Get_Schedule_Line_From_Lookup');
2633: pa_debug.G_Err_Stage := 'Starting Get_Schedule_Line_From_Lookup';
2634: IF g1_debug_mode = 'Y' THEN
2635: Pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2636:
2637: Pa_debug.write_file('LOG','prvdr_oranz_id '||p_prvdr_organization_id||
2638: ' recv_organz_id '||p_recvr_organization_id||
2639: 'prvdr_org_id '||G_prvdr_org_id||

Line 2637: Pa_debug.write_file('LOG','prvdr_oranz_id '||p_prvdr_organization_id||

2633: pa_debug.G_Err_Stage := 'Starting Get_Schedule_Line_From_Lookup';
2634: IF g1_debug_mode = 'Y' THEN
2635: Pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2636:
2637: Pa_debug.write_file('LOG','prvdr_oranz_id '||p_prvdr_organization_id||
2638: ' recv_organz_id '||p_recvr_organization_id||
2639: 'prvdr_org_id '||G_prvdr_org_id||
2640: 'p_recvr_org_id '||p_recvr_org_id||
2641: ' sch_id '||p_tp_schedule_id);

Line 2642: Pa_debug.write_file('LOG','p_labor_flag '||p_labor_flag||

2638: ' recv_organz_id '||p_recvr_organization_id||
2639: 'prvdr_org_id '||G_prvdr_org_id||
2640: 'p_recvr_org_id '||p_recvr_org_id||
2641: ' sch_id '||p_tp_schedule_id);
2642: Pa_debug.write_file('LOG','p_labor_flag '||p_labor_flag||
2643: ' tp_amt_type_code '||p_tp_amt_type_code||
2644: ' p_expenditure_item_date '||to_char(p_expenditure_item_date)); /* Added for 3118101 */
2645: END IF;
2646:

Line 2655: pa_debug.Reset_err_stack;

2651:
2652: close c_schedule_line;
2653:
2654:
2655: pa_debug.Reset_err_stack;
2656: pa_debug.G_Err_Stage := 'Exitting Get_Schedule_Line_From_Lookup';
2657: IF g1_debug_mode = 'Y' THEN
2658: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2659: END IF;

Line 2656: pa_debug.G_Err_Stage := 'Exitting Get_Schedule_Line_From_Lookup';

2652: close c_schedule_line;
2653:
2654:
2655: pa_debug.Reset_err_stack;
2656: pa_debug.G_Err_Stage := 'Exitting Get_Schedule_Line_From_Lookup';
2657: IF g1_debug_mode = 'Y' THEN
2658: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2659: END IF;
2660:

Line 2658: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2654:
2655: pa_debug.Reset_err_stack;
2656: pa_debug.G_Err_Stage := 'Exitting Get_Schedule_Line_From_Lookup';
2657: IF g1_debug_mode = 'Y' THEN
2658: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2659: END IF;
2660:
2661: EXCEPTION
2662: WHEN OTHERS THEN

Line 2835: pa_debug.Set_err_stack ('Determine_Schedule_Line');

2831: l_recvr_legal_entity_id Number;
2832: l_recvr_business_group_id number;
2833:
2834: BEGIN
2835: pa_debug.Set_err_stack ('Determine_Schedule_Line');
2836: pa_debug.G_Err_Stage := 'Starting Determine_Schedule_Line';
2837: IF g1_debug_mode = 'Y' THEN
2838: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2839:

Line 2836: pa_debug.G_Err_Stage := 'Starting Determine_Schedule_Line';

2832: l_recvr_business_group_id number;
2833:
2834: BEGIN
2835: pa_debug.Set_err_stack ('Determine_Schedule_Line');
2836: pa_debug.G_Err_Stage := 'Starting Determine_Schedule_Line';
2837: IF g1_debug_mode = 'Y' THEN
2838: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2839:
2840:

Line 2838: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2834: BEGIN
2835: pa_debug.Set_err_stack ('Determine_Schedule_Line');
2836: pa_debug.G_Err_Stage := 'Starting Determine_Schedule_Line';
2837: IF g1_debug_mode = 'Y' THEN
2838: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2839:
2840:
2841: pa_debug.write_file('LOG',
2842: 'p_prvdr_organization_id '||p_prvdr_organization_id);

Line 2841: pa_debug.write_file('LOG',

2837: IF g1_debug_mode = 'Y' THEN
2838: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2839:
2840:
2841: pa_debug.write_file('LOG',
2842: 'p_prvdr_organization_id '||p_prvdr_organization_id);
2843: pa_debug.write_file('LOG',
2844: 'p_recvr_org_id '||p_recvr_org_id);
2845: pa_debug.write_file('LOG',

Line 2843: pa_debug.write_file('LOG',

2839:
2840:
2841: pa_debug.write_file('LOG',
2842: 'p_prvdr_organization_id '||p_prvdr_organization_id);
2843: pa_debug.write_file('LOG',
2844: 'p_recvr_org_id '||p_recvr_org_id);
2845: pa_debug.write_file('LOG',
2846: 'p_recvr_organization_id '||p_recvr_organization_id);
2847: pa_debug.write_file('LOG',

Line 2845: pa_debug.write_file('LOG',

2841: pa_debug.write_file('LOG',
2842: 'p_prvdr_organization_id '||p_prvdr_organization_id);
2843: pa_debug.write_file('LOG',
2844: 'p_recvr_org_id '||p_recvr_org_id);
2845: pa_debug.write_file('LOG',
2846: 'p_recvr_organization_id '||p_recvr_organization_id);
2847: pa_debug.write_file('LOG',
2848: 'p_recvr_org_id '||p_recvr_org_id);
2849: pa_debug.write_file('LOG',

Line 2847: pa_debug.write_file('LOG',

2843: pa_debug.write_file('LOG',
2844: 'p_recvr_org_id '||p_recvr_org_id);
2845: pa_debug.write_file('LOG',
2846: 'p_recvr_organization_id '||p_recvr_organization_id);
2847: pa_debug.write_file('LOG',
2848: 'p_recvr_org_id '||p_recvr_org_id);
2849: pa_debug.write_file('LOG',
2850: 'p_tp_schedule_id '||p_tp_schedule_id);
2851: pa_debug.write_file('LOG',

Line 2849: pa_debug.write_file('LOG',

2845: pa_debug.write_file('LOG',
2846: 'p_recvr_organization_id '||p_recvr_organization_id);
2847: pa_debug.write_file('LOG',
2848: 'p_recvr_org_id '||p_recvr_org_id);
2849: pa_debug.write_file('LOG',
2850: 'p_tp_schedule_id '||p_tp_schedule_id);
2851: pa_debug.write_file('LOG',
2852: 'p_labor_non_labor_flag '||p_labor_non_labor_flag);
2853: pa_debug.write_file('LOG',

Line 2851: pa_debug.write_file('LOG',

2847: pa_debug.write_file('LOG',
2848: 'p_recvr_org_id '||p_recvr_org_id);
2849: pa_debug.write_file('LOG',
2850: 'p_tp_schedule_id '||p_tp_schedule_id);
2851: pa_debug.write_file('LOG',
2852: 'p_labor_non_labor_flag '||p_labor_non_labor_flag);
2853: pa_debug.write_file('LOG',
2854: 'p_tp_amt_type_code '||p_tp_amt_type_code);
2855: pa_debug.write_file('LOG',

Line 2853: pa_debug.write_file('LOG',

2849: pa_debug.write_file('LOG',
2850: 'p_tp_schedule_id '||p_tp_schedule_id);
2851: pa_debug.write_file('LOG',
2852: 'p_labor_non_labor_flag '||p_labor_non_labor_flag);
2853: pa_debug.write_file('LOG',
2854: 'p_tp_amt_type_code '||p_tp_amt_type_code);
2855: pa_debug.write_file('LOG',
2856: 'G_exp_org_struct_ver_id '||G_exp_org_struct_ver_id);
2857: pa_debug.write_file('LOG',

Line 2855: pa_debug.write_file('LOG',

2851: pa_debug.write_file('LOG',
2852: 'p_labor_non_labor_flag '||p_labor_non_labor_flag);
2853: pa_debug.write_file('LOG',
2854: 'p_tp_amt_type_code '||p_tp_amt_type_code);
2855: pa_debug.write_file('LOG',
2856: 'G_exp_org_struct_ver_id '||G_exp_org_struct_ver_id);
2857: pa_debug.write_file('LOG',
2858: 'G_prj_org_struct_ver_id '||G_prj_org_struct_ver_id);
2859: END IF;

Line 2857: pa_debug.write_file('LOG',

2853: pa_debug.write_file('LOG',
2854: 'p_tp_amt_type_code '||p_tp_amt_type_code);
2855: pa_debug.write_file('LOG',
2856: 'G_exp_org_struct_ver_id '||G_exp_org_struct_ver_id);
2857: pa_debug.write_file('LOG',
2858: 'G_prj_org_struct_ver_id '||G_prj_org_struct_ver_id);
2859: END IF;
2860:
2861: -- Use Rule1

Line 2865: pa_debug.write_file('LOG','Testing Rule 1');

2861: -- Use Rule1
2862:
2863:
2864: IF g1_debug_mode = 'Y' THEN
2865: pa_debug.write_file('LOG','Testing Rule 1');
2866: END IF;
2867:
2868: open c_rule (p_prvdr_organization_id,p_recvr_organization_id);
2869: fetch c_rule

Line 2876: pa_debug.Reset_err_stack;

2872:
2873: IF c_rule%FOUND THEN
2874: IF (x_tp_rule_id IS NOT NULL) THEN
2875: close c_rule;
2876: pa_debug.Reset_err_stack;
2877: pa_debug.G_Err_Stage := 'Schedule Line found using Rule1';
2878: IF g1_debug_mode = 'Y' THEN
2879: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2880: pa_debug.write_file('LOG','x_tp_schedule_line_id='||x_tp_schedule_line_id); -- Added for bug 5753774

Line 2877: pa_debug.G_Err_Stage := 'Schedule Line found using Rule1';

2873: IF c_rule%FOUND THEN
2874: IF (x_tp_rule_id IS NOT NULL) THEN
2875: close c_rule;
2876: pa_debug.Reset_err_stack;
2877: pa_debug.G_Err_Stage := 'Schedule Line found using Rule1';
2878: IF g1_debug_mode = 'Y' THEN
2879: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2880: pa_debug.write_file('LOG','x_tp_schedule_line_id='||x_tp_schedule_line_id); -- Added for bug 5753774
2881: pa_debug.write_file('LOG','x_sort_order='||x_sort_order);

Line 2879: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2875: close c_rule;
2876: pa_debug.Reset_err_stack;
2877: pa_debug.G_Err_Stage := 'Schedule Line found using Rule1';
2878: IF g1_debug_mode = 'Y' THEN
2879: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2880: pa_debug.write_file('LOG','x_tp_schedule_line_id='||x_tp_schedule_line_id); -- Added for bug 5753774
2881: pa_debug.write_file('LOG','x_sort_order='||x_sort_order);
2882:
2883: END IF;

Line 2880: pa_debug.write_file('LOG','x_tp_schedule_line_id='||x_tp_schedule_line_id); -- Added for bug 5753774

2876: pa_debug.Reset_err_stack;
2877: pa_debug.G_Err_Stage := 'Schedule Line found using Rule1';
2878: IF g1_debug_mode = 'Y' THEN
2879: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2880: pa_debug.write_file('LOG','x_tp_schedule_line_id='||x_tp_schedule_line_id); -- Added for bug 5753774
2881: pa_debug.write_file('LOG','x_sort_order='||x_sort_order);
2882:
2883: END IF;
2884: Return;

Line 2881: pa_debug.write_file('LOG','x_sort_order='||x_sort_order);

2877: pa_debug.G_Err_Stage := 'Schedule Line found using Rule1';
2878: IF g1_debug_mode = 'Y' THEN
2879: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2880: pa_debug.write_file('LOG','x_tp_schedule_line_id='||x_tp_schedule_line_id); -- Added for bug 5753774
2881: pa_debug.write_file('LOG','x_sort_order='||x_sort_order);
2882:
2883: END IF;
2884: Return;
2885: END IF;

Line 2893: pa_debug.write_file('LOG','Testing Parent Rule ');

2889:
2890: --DevDrop2 Changes Start
2891:
2892: IF g1_debug_mode = 'Y' THEN
2893: pa_debug.write_file('LOG','Testing Parent Rule ');
2894: END IF;
2895:
2896: if ( nvl(G_prev_rcvr_org_id,-1) <> nvl(p_recvr_org_id,-1) ) then
2897: G_prev_rcvr_org_id := p_recvr_org_id;

Line 2912: pa_debug.Reset_err_stack;

2908:
2909: IF c_parent_rule%FOUND THEN
2910: IF (x_tp_rule_id IS NOT NULL) THEN
2911: close c_parent_rule;
2912: pa_debug.Reset_err_stack;
2913: pa_debug.G_Err_Stage := 'Schedule Line found using Parent Rule';
2914: IF g1_debug_mode = 'Y' THEN
2915: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2916: pa_debug.write_file('LOG','x_tp_schedule_line_id='||x_tp_schedule_line_id); -- Added for bug 5753774

Line 2913: pa_debug.G_Err_Stage := 'Schedule Line found using Parent Rule';

2909: IF c_parent_rule%FOUND THEN
2910: IF (x_tp_rule_id IS NOT NULL) THEN
2911: close c_parent_rule;
2912: pa_debug.Reset_err_stack;
2913: pa_debug.G_Err_Stage := 'Schedule Line found using Parent Rule';
2914: IF g1_debug_mode = 'Y' THEN
2915: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2916: pa_debug.write_file('LOG','x_tp_schedule_line_id='||x_tp_schedule_line_id); -- Added for bug 5753774
2917: pa_debug.write_file('LOG','x_sort_order='||x_sort_order);

Line 2915: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2911: close c_parent_rule;
2912: pa_debug.Reset_err_stack;
2913: pa_debug.G_Err_Stage := 'Schedule Line found using Parent Rule';
2914: IF g1_debug_mode = 'Y' THEN
2915: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2916: pa_debug.write_file('LOG','x_tp_schedule_line_id='||x_tp_schedule_line_id); -- Added for bug 5753774
2917: pa_debug.write_file('LOG','x_sort_order='||x_sort_order);
2918: END IF;
2919: Return;

Line 2916: pa_debug.write_file('LOG','x_tp_schedule_line_id='||x_tp_schedule_line_id); -- Added for bug 5753774

2912: pa_debug.Reset_err_stack;
2913: pa_debug.G_Err_Stage := 'Schedule Line found using Parent Rule';
2914: IF g1_debug_mode = 'Y' THEN
2915: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2916: pa_debug.write_file('LOG','x_tp_schedule_line_id='||x_tp_schedule_line_id); -- Added for bug 5753774
2917: pa_debug.write_file('LOG','x_sort_order='||x_sort_order);
2918: END IF;
2919: Return;
2920: END IF;

Line 2917: pa_debug.write_file('LOG','x_sort_order='||x_sort_order);

2913: pa_debug.G_Err_Stage := 'Schedule Line found using Parent Rule';
2914: IF g1_debug_mode = 'Y' THEN
2915: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2916: pa_debug.write_file('LOG','x_tp_schedule_line_id='||x_tp_schedule_line_id); -- Added for bug 5753774
2917: pa_debug.write_file('LOG','x_sort_order='||x_sort_order);
2918: END IF;
2919: Return;
2920: END IF;
2921: END IF;

Line 2929: pa_debug.write_file('LOG','Testing Rule 2');

2925:
2926: --Devdrop2 Changes Changed c_rule cursor to c_prvdr_organz_rule
2927:
2928: IF g1_debug_mode = 'Y' THEN
2929: pa_debug.write_file('LOG','Testing Rule 2');
2930: END IF;
2931:
2932: /* **************************************************************
2933: COMMENTED FOR LEGAL ENTITY TRANSFER PRICE SCHEDULE. aFTER 12.0 THERE

Line 2947: pa_debug.Reset_err_stack;

2943:
2944: IF c_prvdr_organz_rule%FOUND THEN
2945: IF (x_tp_rule_id IS NOT NULL) THEN
2946: close c_prvdr_organz_rule;
2947: pa_debug.Reset_err_stack;
2948: pa_debug.G_Err_Stage := 'Schedule Line found using Rule2';
2949: IF g1_debug_mode = 'Y' THEN
2950: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2951: END IF;

Line 2948: pa_debug.G_Err_Stage := 'Schedule Line found using Rule2';

2944: IF c_prvdr_organz_rule%FOUND THEN
2945: IF (x_tp_rule_id IS NOT NULL) THEN
2946: close c_prvdr_organz_rule;
2947: pa_debug.Reset_err_stack;
2948: pa_debug.G_Err_Stage := 'Schedule Line found using Rule2';
2949: IF g1_debug_mode = 'Y' THEN
2950: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2951: END IF;
2952: Return;

Line 2950: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2946: close c_prvdr_organz_rule;
2947: pa_debug.Reset_err_stack;
2948: pa_debug.G_Err_Stage := 'Schedule Line found using Rule2';
2949: IF g1_debug_mode = 'Y' THEN
2950: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2951: END IF;
2952: Return;
2953: END IF;
2954: END IF;

Line 2970: pa_debug.write_file('LOG','Testing Rule 3');

2966: into x_tp_schedule_line_id,x_sort_order,x_tp_rule_id,x_percentage_applied --Added for bug 5753774
2967: ,x_start_date_active,x_end_date_active;
2968:
2969: IF g1_debug_mode = 'Y' THEN
2970: pa_debug.write_file('LOG','Testing Rule 3');
2971: END IF;
2972: IF c_prvdr_organz_rule%FOUND THEN
2973: IF (x_tp_rule_id IS NOT NULL) THEN
2974: close c_prvdr_organz_rule;

Line 2975: pa_debug.Reset_err_stack;

2971: END IF;
2972: IF c_prvdr_organz_rule%FOUND THEN
2973: IF (x_tp_rule_id IS NOT NULL) THEN
2974: close c_prvdr_organz_rule;
2975: pa_debug.Reset_err_stack;
2976: pa_debug.G_Err_Stage := 'Schedule Line found using Rule3';
2977: IF g1_debug_mode = 'Y' THEN
2978: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2979: END IF;

Line 2976: pa_debug.G_Err_Stage := 'Schedule Line found using Rule3';

2972: IF c_prvdr_organz_rule%FOUND THEN
2973: IF (x_tp_rule_id IS NOT NULL) THEN
2974: close c_prvdr_organz_rule;
2975: pa_debug.Reset_err_stack;
2976: pa_debug.G_Err_Stage := 'Schedule Line found using Rule3';
2977: IF g1_debug_mode = 'Y' THEN
2978: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2979: END IF;
2980: Return;

Line 2978: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

2974: close c_prvdr_organz_rule;
2975: pa_debug.Reset_err_stack;
2976: pa_debug.G_Err_Stage := 'Schedule Line found using Rule3';
2977: IF g1_debug_mode = 'Y' THEN
2978: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
2979: END IF;
2980: Return;
2981: END IF;
2982: END IF;

Line 2997: pa_debug.write_file('LOG','Testing Rule 4');

2993: fetch c_prvdr_organz_rule
2994: into x_tp_schedule_line_id,x_sort_order,x_tp_rule_id,x_percentage_applied --Added for bug 5753774
2995: ,x_start_date_active,x_end_date_active;
2996: IF g1_debug_mode = 'Y' THEN
2997: pa_debug.write_file('LOG','Testing Rule 4');
2998: END IF;
2999: IF c_prvdr_organz_rule%FOUND THEN
3000: IF (x_tp_rule_id IS NOT NULL) THEN
3001: close c_prvdr_organz_rule;

Line 3002: pa_debug.Reset_err_stack;

2998: END IF;
2999: IF c_prvdr_organz_rule%FOUND THEN
3000: IF (x_tp_rule_id IS NOT NULL) THEN
3001: close c_prvdr_organz_rule;
3002: pa_debug.Reset_err_stack;
3003: pa_debug.G_Err_Stage := 'Schedule Line found using Rule4';
3004: IF g1_debug_mode = 'Y' THEN
3005: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3006: END IF;

Line 3003: pa_debug.G_Err_Stage := 'Schedule Line found using Rule4';

2999: IF c_prvdr_organz_rule%FOUND THEN
3000: IF (x_tp_rule_id IS NOT NULL) THEN
3001: close c_prvdr_organz_rule;
3002: pa_debug.Reset_err_stack;
3003: pa_debug.G_Err_Stage := 'Schedule Line found using Rule4';
3004: IF g1_debug_mode = 'Y' THEN
3005: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3006: END IF;
3007: Return;

Line 3005: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3001: close c_prvdr_organz_rule;
3002: pa_debug.Reset_err_stack;
3003: pa_debug.G_Err_Stage := 'Schedule Line found using Rule4';
3004: IF g1_debug_mode = 'Y' THEN
3005: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3006: END IF;
3007: Return;
3008: END IF;
3009: END IF;

Line 3018: pa_debug.write_file('LOG','Testing Rule 2');

3014:
3015:
3016: -- Use Rule2
3017: IF g1_debug_mode = 'Y' THEN
3018: pa_debug.write_file('LOG','Testing Rule 2');
3019: END IF;
3020: open c_other_rule (p_prvdr_organization_id);
3021: fetch c_other_rule
3022: into x_tp_schedule_line_id,x_sort_order,x_tp_rule_id,x_percentage_applied -- Added for bug 5753774

Line 3028: pa_debug.Reset_err_stack;

3024:
3025: IF c_other_rule%FOUND THEN
3026: IF (x_tp_rule_id IS NOT NULL) THEN
3027: close c_other_rule;
3028: pa_debug.Reset_err_stack;
3029: pa_debug.G_Err_Stage := 'Schedule Line found using Rule5';
3030: IF g1_debug_mode = 'Y' THEN
3031: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3032: END IF;

Line 3029: pa_debug.G_Err_Stage := 'Schedule Line found using Rule5';

3025: IF c_other_rule%FOUND THEN
3026: IF (x_tp_rule_id IS NOT NULL) THEN
3027: close c_other_rule;
3028: pa_debug.Reset_err_stack;
3029: pa_debug.G_Err_Stage := 'Schedule Line found using Rule5';
3030: IF g1_debug_mode = 'Y' THEN
3031: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3032: END IF;
3033: Return;

Line 3031: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3027: close c_other_rule;
3028: pa_debug.Reset_err_stack;
3029: pa_debug.G_Err_Stage := 'Schedule Line found using Rule5';
3030: IF g1_debug_mode = 'Y' THEN
3031: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3032: END IF;
3033: Return;
3034: END IF;
3035: END IF;

Line 3045: pa_debug.write_file('LOG','Testing Rule 6');

3041: IS NO CONCEPT OF OU,LE AND BG check every thing should be maintained
3042: in org hierarchy
3043: -- Use Rule6
3044: IF g1_debug_mode = 'Y' THEN
3045: pa_debug.write_file('LOG','Testing Rule 6');
3046: END IF;
3047: open c_rule (G_Prvdr_Org_id,p_recvr_org_id);
3048: fetch c_rule
3049: into x_tp_schedule_line_id,x_sort_order,x_tp_rule_id,x_percentage_applied -- Added for bug 5753774

Line 3055: pa_debug.Reset_err_stack;

3051:
3052: IF c_rule%FOUND THEN
3053: IF (x_tp_rule_id IS NOT NULL) THEN
3054: close c_rule;
3055: pa_debug.Reset_err_stack;
3056: pa_debug.G_Err_Stage := 'Schedule Line found using Rule6';
3057: IF g1_debug_mode = 'Y' THEN
3058: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3059: END IF;

Line 3056: pa_debug.G_Err_Stage := 'Schedule Line found using Rule6';

3052: IF c_rule%FOUND THEN
3053: IF (x_tp_rule_id IS NOT NULL) THEN
3054: close c_rule;
3055: pa_debug.Reset_err_stack;
3056: pa_debug.G_Err_Stage := 'Schedule Line found using Rule6';
3057: IF g1_debug_mode = 'Y' THEN
3058: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3059: END IF;
3060: Return;

Line 3058: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3054: close c_rule;
3055: pa_debug.Reset_err_stack;
3056: pa_debug.G_Err_Stage := 'Schedule Line found using Rule6';
3057: IF g1_debug_mode = 'Y' THEN
3058: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3059: END IF;
3060: Return;
3061: END IF;
3062: END IF;

Line 3068: pa_debug.write_file('LOG','Testing Rule 7');

3064: close c_rule;
3065:
3066: -- Use Rule7
3067: IF g1_debug_mode = 'Y' THEN
3068: pa_debug.write_file('LOG','Testing Rule 7');
3069: END IF;
3070: open c_rule (G_prvdr_org_id,l_recvr_legal_entity_id);
3071: fetch c_rule
3072: into x_tp_schedule_line_id,x_sort_order,x_tp_rule_id,x_percentage_applied -- Added for bug 5753774

Line 3078: pa_debug.Reset_err_stack;

3074:
3075: IF c_rule%FOUND THEN
3076: IF (x_tp_rule_id IS NOT NULL) THEN
3077: close c_rule;
3078: pa_debug.Reset_err_stack;
3079: pa_debug.G_Err_Stage := 'Schedule Line found using Rule7';
3080: IF g1_debug_mode = 'Y' THEN
3081: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3082: END IF;

Line 3079: pa_debug.G_Err_Stage := 'Schedule Line found using Rule7';

3075: IF c_rule%FOUND THEN
3076: IF (x_tp_rule_id IS NOT NULL) THEN
3077: close c_rule;
3078: pa_debug.Reset_err_stack;
3079: pa_debug.G_Err_Stage := 'Schedule Line found using Rule7';
3080: IF g1_debug_mode = 'Y' THEN
3081: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3082: END IF;
3083: Return;

Line 3081: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3077: close c_rule;
3078: pa_debug.Reset_err_stack;
3079: pa_debug.G_Err_Stage := 'Schedule Line found using Rule7';
3080: IF g1_debug_mode = 'Y' THEN
3081: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3082: END IF;
3083: Return;
3084: END IF;
3085: END IF;

Line 3092: pa_debug.write_file('LOG','Testing Rule 8');

3088:
3089: --Use Rule 8
3090: if G_global_access='Y' then
3091: IF g1_debug_mode = 'Y' THEN
3092: pa_debug.write_file('LOG','Testing Rule 8');
3093: END IF;
3094: open c_rule(G_prvdr_org_id,l_recvr_business_group_id);
3095: fetch c_rule
3096: into x_tp_schedule_line_id,x_sort_order,x_tp_rule_id,x_percentage_applied -- Added for bug 5753774

Line 3101: pa_debug.Reset_err_stack;

3097: , x_start_date_active,x_end_date_active;
3098: IF c_rule%FOUND THEN
3099: IF (x_tp_rule_id IS NOT NULL) THEN
3100: close c_rule;
3101: pa_debug.Reset_err_stack;
3102: pa_debug.G_Err_Stage := 'Schedule Line found using Rule8';
3103: IF g1_debug_mode = 'Y' THEN
3104: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3105: END IF;

Line 3102: pa_debug.G_Err_Stage := 'Schedule Line found using Rule8';

3098: IF c_rule%FOUND THEN
3099: IF (x_tp_rule_id IS NOT NULL) THEN
3100: close c_rule;
3101: pa_debug.Reset_err_stack;
3102: pa_debug.G_Err_Stage := 'Schedule Line found using Rule8';
3103: IF g1_debug_mode = 'Y' THEN
3104: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3105: END IF;
3106: Return;

Line 3104: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3100: close c_rule;
3101: pa_debug.Reset_err_stack;
3102: pa_debug.G_Err_Stage := 'Schedule Line found using Rule8';
3103: IF g1_debug_mode = 'Y' THEN
3104: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3105: END IF;
3106: Return;
3107: END IF;
3108: END IF;

Line 3115: pa_debug.write_file('LOG','Testing Rule 9 '|| to_char(G_prvdr_org_id));

3111: end if;
3112:
3113: -- Use Rule9
3114: IF g1_debug_mode = 'Y' THEN
3115: pa_debug.write_file('LOG','Testing Rule 9 '|| to_char(G_prvdr_org_id));
3116: END IF;
3117: open c_other_rule (G_prvdr_org_id);
3118: fetch c_other_rule
3119: into x_tp_schedule_line_id,x_sort_order,x_tp_rule_id,x_percentage_applied -- Added for bug 5753774

Line 3123: pa_debug.G_Err_Stage := 'Cursor matched Rule9';

3119: into x_tp_schedule_line_id,x_sort_order,x_tp_rule_id,x_percentage_applied -- Added for bug 5753774
3120: ,x_start_date_active,x_end_date_active;
3121:
3122: IF c_other_rule%FOUND THEN
3123: pa_debug.G_Err_Stage := 'Cursor matched Rule9';
3124: IF g1_debug_mode = 'Y' THEN
3125: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3126: END IF;
3127:

Line 3125: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3121:
3122: IF c_other_rule%FOUND THEN
3123: pa_debug.G_Err_Stage := 'Cursor matched Rule9';
3124: IF g1_debug_mode = 'Y' THEN
3125: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3126: END IF;
3127:
3128: IF (x_tp_rule_id IS NOT NULL) THEN
3129: close c_other_rule;

Line 3130: pa_debug.Reset_err_stack;

3126: END IF;
3127:
3128: IF (x_tp_rule_id IS NOT NULL) THEN
3129: close c_other_rule;
3130: pa_debug.Reset_err_stack;
3131: pa_debug.G_Err_Stage := 'Schedule Line found using Rule9';
3132: IF g1_debug_mode = 'Y' THEN
3133: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3134: END IF;

Line 3131: pa_debug.G_Err_Stage := 'Schedule Line found using Rule9';

3127:
3128: IF (x_tp_rule_id IS NOT NULL) THEN
3129: close c_other_rule;
3130: pa_debug.Reset_err_stack;
3131: pa_debug.G_Err_Stage := 'Schedule Line found using Rule9';
3132: IF g1_debug_mode = 'Y' THEN
3133: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3134: END IF;
3135: Return;

Line 3133: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3129: close c_other_rule;
3130: pa_debug.Reset_err_stack;
3131: pa_debug.G_Err_Stage := 'Schedule Line found using Rule9';
3132: IF g1_debug_mode = 'Y' THEN
3133: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3134: END IF;
3135: Return;
3136: END IF;
3137: END IF;

Line 3144: pa_debug.write_file('LOG','Testing Rule 10');

3140:
3141:
3142: -- Use Rule10
3143: IF g1_debug_mode = 'Y' THEN
3144: pa_debug.write_file('LOG','Testing Rule 10');
3145: END IF;
3146: open c_rule (G_prvdr_legal_entity_id,l_recvr_legal_entity_id);
3147: fetch c_rule
3148: into x_tp_schedule_line_id,x_sort_order,x_tp_rule_id,x_percentage_applied -- Added for bug 5753774

Line 3154: pa_debug.Reset_err_stack;

3150:
3151: IF c_rule%FOUND THEN
3152: IF (x_tp_rule_id IS NOT NULL) THEN
3153: close c_rule;
3154: pa_debug.Reset_err_stack;
3155: pa_debug.G_Err_Stage := 'Schedule Line found using Rule10';
3156: IF g1_debug_mode = 'Y' THEN
3157: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3158: END IF;

Line 3155: pa_debug.G_Err_Stage := 'Schedule Line found using Rule10';

3151: IF c_rule%FOUND THEN
3152: IF (x_tp_rule_id IS NOT NULL) THEN
3153: close c_rule;
3154: pa_debug.Reset_err_stack;
3155: pa_debug.G_Err_Stage := 'Schedule Line found using Rule10';
3156: IF g1_debug_mode = 'Y' THEN
3157: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3158: END IF;
3159: Return;

Line 3157: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3153: close c_rule;
3154: pa_debug.Reset_err_stack;
3155: pa_debug.G_Err_Stage := 'Schedule Line found using Rule10';
3156: IF g1_debug_mode = 'Y' THEN
3157: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3158: END IF;
3159: Return;
3160: END IF;
3161: END IF;

Line 3168: pa_debug.write_file('LOG','Testing Rule 11');

3164:
3165: --Use Rule 11
3166: if G_global_access ='Y' then
3167: IF g1_debug_mode = 'Y' THEN
3168: pa_debug.write_file('LOG','Testing Rule 11');
3169: END IF;
3170: open c_rule (G_prvdr_legal_entity_id,l_recvr_business_group_id);
3171: fetch c_rule
3172: into x_tp_schedule_line_id,x_sort_order,x_tp_rule_id,x_percentage_applied -- Added for 5753774

Line 3177: pa_debug.Reset_err_stack;

3173: ,x_start_date_active,x_end_date_active;
3174: IF c_rule%FOUND THEN
3175: IF (x_tp_rule_id IS NOT NULL) THEN
3176: close c_rule;
3177: pa_debug.Reset_err_stack;
3178: pa_debug.G_Err_Stage := 'Schedule Line found using Rule11';
3179: IF g1_debug_mode = 'Y' THEN
3180: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3181: END IF;

Line 3178: pa_debug.G_Err_Stage := 'Schedule Line found using Rule11';

3174: IF c_rule%FOUND THEN
3175: IF (x_tp_rule_id IS NOT NULL) THEN
3176: close c_rule;
3177: pa_debug.Reset_err_stack;
3178: pa_debug.G_Err_Stage := 'Schedule Line found using Rule11';
3179: IF g1_debug_mode = 'Y' THEN
3180: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3181: END IF;
3182: Return;

Line 3180: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3176: close c_rule;
3177: pa_debug.Reset_err_stack;
3178: pa_debug.G_Err_Stage := 'Schedule Line found using Rule11';
3179: IF g1_debug_mode = 'Y' THEN
3180: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3181: END IF;
3182: Return;
3183: END IF;
3184: END IF;

Line 3191: pa_debug.write_file('LOG','Testing Rule 12');

3187: end if;
3188:
3189: -- Use Rule12
3190: IF g1_debug_mode = 'Y' THEN
3191: pa_debug.write_file('LOG','Testing Rule 12');
3192: END IF;
3193: open c_other_rule (G_prvdr_legal_entity_id);
3194: fetch c_other_rule
3195: into x_tp_schedule_line_id,x_sort_order,x_tp_rule_id,x_percentage_applied -- added for bug 5753774

Line 3201: pa_debug.Reset_err_stack;

3197:
3198: IF c_other_rule%FOUND THEN
3199: IF (x_tp_rule_id IS NOT NULL) THEN
3200: close c_other_rule;
3201: pa_debug.Reset_err_stack;
3202: pa_debug.G_Err_Stage := 'Schedule Line found using Rule12';
3203: IF g1_debug_mode = 'Y' THEN
3204: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3205: END IF;

Line 3202: pa_debug.G_Err_Stage := 'Schedule Line found using Rule12';

3198: IF c_other_rule%FOUND THEN
3199: IF (x_tp_rule_id IS NOT NULL) THEN
3200: close c_other_rule;
3201: pa_debug.Reset_err_stack;
3202: pa_debug.G_Err_Stage := 'Schedule Line found using Rule12';
3203: IF g1_debug_mode = 'Y' THEN
3204: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3205: END IF;
3206: Return;

Line 3204: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3200: close c_other_rule;
3201: pa_debug.Reset_err_stack;
3202: pa_debug.G_Err_Stage := 'Schedule Line found using Rule12';
3203: IF g1_debug_mode = 'Y' THEN
3204: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3205: END IF;
3206: Return;
3207: END IF;
3208: END IF;

Line 3214: pa_debug.write_file('LOG','Testing Rule 13');

3210:
3211: --Use Rule 13
3212: if G_global_access='Y' then
3213: IF g1_debug_mode = 'Y' THEN
3214: pa_debug.write_file('LOG','Testing Rule 13');
3215: END IF;
3216: open c_rule(G_bg_id,l_recvr_business_group_id);
3217: fetch c_rule
3218: into x_tp_schedule_line_id,x_sort_order,x_tp_rule_id,x_percentage_applied -- Added for bug 5753774

Line 3223: pa_debug.Reset_err_stack;

3219: ,x_start_date_active,x_end_date_active;
3220: IF c_rule%FOUND THEN
3221: IF (x_tp_rule_id IS NOT NULL) THEN
3222: close c_rule;
3223: pa_debug.Reset_err_stack;
3224: pa_debug.G_Err_Stage := 'Schedule Line found using Rule13';
3225: IF g1_debug_mode = 'Y' THEN
3226: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3227: END IF;

Line 3224: pa_debug.G_Err_Stage := 'Schedule Line found using Rule13';

3220: IF c_rule%FOUND THEN
3221: IF (x_tp_rule_id IS NOT NULL) THEN
3222: close c_rule;
3223: pa_debug.Reset_err_stack;
3224: pa_debug.G_Err_Stage := 'Schedule Line found using Rule13';
3225: IF g1_debug_mode = 'Y' THEN
3226: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3227: END IF;
3228: Return;

Line 3226: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3222: close c_rule;
3223: pa_debug.Reset_err_stack;
3224: pa_debug.G_Err_Stage := 'Schedule Line found using Rule13';
3225: IF g1_debug_mode = 'Y' THEN
3226: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3227: END IF;
3228: Return;
3229: END IF;
3230: END IF;

Line 3243: pa_debug.Reset_err_stack;

3239:
3240: IF c_other_rule%FOUND THEN
3241: IF (x_tp_rule_id IS NOT NULL) THEN
3242: close c_other_rule;
3243: pa_debug.Reset_err_stack;
3244: pa_debug.G_Err_Stage := 'Schedule Line found using Rule14';
3245: IF g1_debug_mode = 'Y' THEN
3246: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3247: END IF;

Line 3244: pa_debug.G_Err_Stage := 'Schedule Line found using Rule14';

3240: IF c_other_rule%FOUND THEN
3241: IF (x_tp_rule_id IS NOT NULL) THEN
3242: close c_other_rule;
3243: pa_debug.Reset_err_stack;
3244: pa_debug.G_Err_Stage := 'Schedule Line found using Rule14';
3245: IF g1_debug_mode = 'Y' THEN
3246: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3247: END IF;
3248: Return;

Line 3246: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3242: close c_other_rule;
3243: pa_debug.Reset_err_stack;
3244: pa_debug.G_Err_Stage := 'Schedule Line found using Rule14';
3245: IF g1_debug_mode = 'Y' THEN
3246: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3247: END IF;
3248: Return;
3249: END IF;
3250: END IF;

Line 3263: pa_debug.Reset_err_stack;

3259: ,x_start_date_active,x_end_date_active;
3260: if c_default_rule%found then
3261: IF (x_tp_rule_id IS NOT NULL) THEN
3262: close c_default_rule;
3263: pa_debug.Reset_err_stack;
3264: pa_debug.G_Err_Stage := 'Schedule Line found using default rule';
3265: IF g1_debug_mode = 'Y' THEN
3266: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3267: END IF;

Line 3264: pa_debug.G_Err_Stage := 'Schedule Line found using default rule';

3260: if c_default_rule%found then
3261: IF (x_tp_rule_id IS NOT NULL) THEN
3262: close c_default_rule;
3263: pa_debug.Reset_err_stack;
3264: pa_debug.G_Err_Stage := 'Schedule Line found using default rule';
3265: IF g1_debug_mode = 'Y' THEN
3266: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3267: END IF;
3268: Return;

Line 3266: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3262: close c_default_rule;
3263: pa_debug.Reset_err_stack;
3264: pa_debug.G_Err_Stage := 'Schedule Line found using default rule';
3265: IF g1_debug_mode = 'Y' THEN
3266: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3267: END IF;
3268: Return;
3269: END IF;
3270: END IF;

Line 3273: pa_debug.Reset_err_stack;

3269: END IF;
3270: END IF;
3271:
3272: x_error_code := 'PA_CC_TP_NO_SCHEDULE_LINE';
3273: pa_debug.Reset_err_stack;
3274: pa_debug.G_Err_Stage := 'Exitting Determine_Schedule_Line';
3275: IF g1_debug_mode = 'Y' THEN
3276: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3277: END IF;

Line 3274: pa_debug.G_Err_Stage := 'Exitting Determine_Schedule_Line';

3270: END IF;
3271:
3272: x_error_code := 'PA_CC_TP_NO_SCHEDULE_LINE';
3273: pa_debug.Reset_err_stack;
3274: pa_debug.G_Err_Stage := 'Exitting Determine_Schedule_Line';
3275: IF g1_debug_mode = 'Y' THEN
3276: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3277: END IF;
3278:

Line 3276: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3272: x_error_code := 'PA_CC_TP_NO_SCHEDULE_LINE';
3273: pa_debug.Reset_err_stack;
3274: pa_debug.G_Err_Stage := 'Exitting Determine_Schedule_Line';
3275: IF g1_debug_mode = 'Y' THEN
3276: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3277: END IF;
3278:
3279: EXCEPTION
3280: WHEN OTHERS THEN

Line 3305: pa_debug.Set_err_stack ('Insert_Schedule_Line_Into_Lkp');

3301:
3302: PRAGMA AUTONOMOUS_TRANSACTION;
3303:
3304: BEGIN
3305: pa_debug.Set_err_stack ('Insert_Schedule_Line_Into_Lkp');
3306: pa_debug.G_Err_Stage := 'Starting Insert_Schedule_Line_Into_Lkp';
3307: IF g1_debug_mode = 'Y' THEN
3308: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3309: END IF;

Line 3306: pa_debug.G_Err_Stage := 'Starting Insert_Schedule_Line_Into_Lkp';

3302: PRAGMA AUTONOMOUS_TRANSACTION;
3303:
3304: BEGIN
3305: pa_debug.Set_err_stack ('Insert_Schedule_Line_Into_Lkp');
3306: pa_debug.G_Err_Stage := 'Starting Insert_Schedule_Line_Into_Lkp';
3307: IF g1_debug_mode = 'Y' THEN
3308: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3309: END IF;
3310:

Line 3308: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3304: BEGIN
3305: pa_debug.Set_err_stack ('Insert_Schedule_Line_Into_Lkp');
3306: pa_debug.G_Err_Stage := 'Starting Insert_Schedule_Line_Into_Lkp';
3307: IF g1_debug_mode = 'Y' THEN
3308: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3309: END IF;
3310:
3311: INSERT INTO
3312: PA_CC_TP_SCHEDULE_LINE_LKP

Line 3350: pa_debug.Reset_err_stack;

3346:
3347: -- commit the autonomous transaction
3348: commit;
3349:
3350: pa_debug.Reset_err_stack;
3351: pa_debug.G_Err_Stage := 'Exitting Insert_Schedule_Line_Into_Lkp';
3352: IF g1_debug_mode = 'Y' THEN
3353: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3354: END IF;

Line 3351: pa_debug.G_Err_Stage := 'Exitting Insert_Schedule_Line_Into_Lkp';

3347: -- commit the autonomous transaction
3348: commit;
3349:
3350: pa_debug.Reset_err_stack;
3351: pa_debug.G_Err_Stage := 'Exitting Insert_Schedule_Line_Into_Lkp';
3352: IF g1_debug_mode = 'Y' THEN
3353: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3354: END IF;
3355:

Line 3353: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3349:
3350: pa_debug.Reset_err_stack;
3351: pa_debug.G_Err_Stage := 'Exitting Insert_Schedule_Line_Into_Lkp';
3352: IF g1_debug_mode = 'Y' THEN
3353: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3354: END IF;
3355:
3356: EXCEPTION
3357: WHEN Dup_val_on_index THEN

Line 3358: pa_debug.Reset_err_stack;

3354: END IF;
3355:
3356: EXCEPTION
3357: WHEN Dup_val_on_index THEN
3358: pa_debug.Reset_err_stack;
3359: null;
3360: WHEN OTHERS THEN
3361: raise;
3362:

Line 3383: pa_debug.Set_err_stack ('Get_Schedule_Line_Attributes');

3379: from pa_cc_tp_schedule_lines
3380: where tp_schedule_line_id = p_tp_schedule_line_id;
3381:
3382: BEGIN
3383: pa_debug.Set_err_stack ('Get_Schedule_Line_Attributes');
3384: pa_debug.G_Err_Stage := 'Starting Get_Schedule_Line_Attributes';
3385: IF g1_debug_mode = 'Y' THEN
3386: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3387: END IF;

Line 3384: pa_debug.G_Err_Stage := 'Starting Get_Schedule_Line_Attributes';

3380: where tp_schedule_line_id = p_tp_schedule_line_id;
3381:
3382: BEGIN
3383: pa_debug.Set_err_stack ('Get_Schedule_Line_Attributes');
3384: pa_debug.G_Err_Stage := 'Starting Get_Schedule_Line_Attributes';
3385: IF g1_debug_mode = 'Y' THEN
3386: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3387: END IF;
3388:

Line 3386: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3382: BEGIN
3383: pa_debug.Set_err_stack ('Get_Schedule_Line_Attributes');
3384: pa_debug.G_Err_Stage := 'Starting Get_Schedule_Line_Attributes';
3385: IF g1_debug_mode = 'Y' THEN
3386: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3387: END IF;
3388:
3389: open c_schedule_line_attr;
3390: fetch c_schedule_line_attr

Line 3399: pa_debug.Reset_err_stack;

3395: END IF;
3396:
3397: close c_schedule_line_attr;
3398:
3399: pa_debug.Reset_err_stack;
3400: pa_debug.G_Err_Stage := 'Exitting Get_Schedule_Line_Attributes';
3401: IF g1_debug_mode = 'Y' THEN
3402: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3403: END IF;

Line 3400: pa_debug.G_Err_Stage := 'Exitting Get_Schedule_Line_Attributes';

3396:
3397: close c_schedule_line_attr;
3398:
3399: pa_debug.Reset_err_stack;
3400: pa_debug.G_Err_Stage := 'Exitting Get_Schedule_Line_Attributes';
3401: IF g1_debug_mode = 'Y' THEN
3402: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3403: END IF;
3404:

Line 3402: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3398:
3399: pa_debug.Reset_err_stack;
3400: pa_debug.G_Err_Stage := 'Exitting Get_Schedule_Line_Attributes';
3401: IF g1_debug_mode = 'Y' THEN
3402: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3403: END IF;
3404:
3405: EXCEPTION
3406: WHEN OTHERS THEN

Line 3496: pa_debug.Set_err_stack ('Get_Transfer_Price_Amount');

3492: l_bill_rate_compute_flag PA_PLSQL_DATATYPES.Char1TabTyp;
3493: l_burden_rate_compute_flag PA_PLSQL_DATATYPES.Char1TabTyp;
3494:
3495: BEGIN
3496: pa_debug.Set_err_stack ('Get_Transfer_Price_Amount');
3497: pa_debug.G_Err_Stage := 'Starting Get_Transfer_Price_Amount';
3498: IF g1_debug_mode = 'Y' THEN
3499: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3500: END IF;

Line 3497: pa_debug.G_Err_Stage := 'Starting Get_Transfer_Price_Amount';

3493: l_burden_rate_compute_flag PA_PLSQL_DATATYPES.Char1TabTyp;
3494:
3495: BEGIN
3496: pa_debug.Set_err_stack ('Get_Transfer_Price_Amount');
3497: pa_debug.G_Err_Stage := 'Starting Get_Transfer_Price_Amount';
3498: IF g1_debug_mode = 'Y' THEN
3499: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3500: END IF;
3501:

Line 3499: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3495: BEGIN
3496: pa_debug.Set_err_stack ('Get_Transfer_Price_Amount');
3497: pa_debug.G_Err_Stage := 'Starting Get_Transfer_Price_Amount';
3498: IF g1_debug_mode = 'Y' THEN
3499: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3500: END IF;
3501:
3502:
3503: l_calc_method_code := l_empty_calc_method_code;

Line 3618: pa_debug.Reset_err_stack;

3614: x_error_code
3615: );
3616:
3617:
3618: pa_debug.Reset_err_stack;
3619: pa_debug.G_Err_Stage := 'Exitting Get_Transfer_Price_Amount';
3620: IF g1_debug_mode = 'Y' THEN
3621: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3622: END IF;

Line 3619: pa_debug.G_Err_Stage := 'Exitting Get_Transfer_Price_Amount';

3615: );
3616:
3617:
3618: pa_debug.Reset_err_stack;
3619: pa_debug.G_Err_Stage := 'Exitting Get_Transfer_Price_Amount';
3620: IF g1_debug_mode = 'Y' THEN
3621: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3622: END IF;
3623: EXCEPTION

Line 3621: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3617:
3618: pa_debug.Reset_err_stack;
3619: pa_debug.G_Err_Stage := 'Exitting Get_Transfer_Price_Amount';
3620: IF g1_debug_mode = 'Y' THEN
3621: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3622: END IF;
3623: EXCEPTION
3624: WHEN OTHERS THEN
3625: raise;

Line 3652: pa_debug.Set_err_stack ('Get_Rule_Attributes');

3648: l_schedule_id PA_PLSQL_DATATYPES.IdTabTyp;
3649:
3650: BEGIN
3651: x_schedule_id := l_schedule_id;
3652: pa_debug.Set_err_stack ('Get_Rule_Attributes');
3653: pa_debug.G_Err_Stage := 'Starting Get_Rule_Attributes';
3654: IF g1_debug_mode = 'Y' THEN
3655: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3656: END IF;

Line 3653: pa_debug.G_Err_Stage := 'Starting Get_Rule_Attributes';

3649:
3650: BEGIN
3651: x_schedule_id := l_schedule_id;
3652: pa_debug.Set_err_stack ('Get_Rule_Attributes');
3653: pa_debug.G_Err_Stage := 'Starting Get_Rule_Attributes';
3654: IF g1_debug_mode = 'Y' THEN
3655: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3656: END IF;
3657:

Line 3655: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3651: x_schedule_id := l_schedule_id;
3652: pa_debug.Set_err_stack ('Get_Rule_Attributes');
3653: pa_debug.G_Err_Stage := 'Starting Get_Rule_Attributes';
3654: IF g1_debug_mode = 'Y' THEN
3655: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3656: END IF;
3657:
3658: For i in 1 .. G_Array_Size
3659: Loop

Line 3661: pa_debug.G_Err_Stage := 'Fetching Get_Rule_Attributes';

3657:
3658: For i in 1 .. G_Array_Size
3659: Loop
3660: IF (p_compute_flag(i) = 'Y' and x_error_code(i) is null) THEN
3661: pa_debug.G_Err_Stage := 'Fetching Get_Rule_Attributes';
3662: pa_debug.G_Err_Stage := 'Rule ID is '|| to_char(p_tp_rule_id(i));
3663:
3664: open c_rule_attributes (p_tp_rule_id(i));
3665: --open c_rule_attributes (3342);

Line 3662: pa_debug.G_Err_Stage := 'Rule ID is '|| to_char(p_tp_rule_id(i));

3658: For i in 1 .. G_Array_Size
3659: Loop
3660: IF (p_compute_flag(i) = 'Y' and x_error_code(i) is null) THEN
3661: pa_debug.G_Err_Stage := 'Fetching Get_Rule_Attributes';
3662: pa_debug.G_Err_Stage := 'Rule ID is '|| to_char(p_tp_rule_id(i));
3663:
3664: open c_rule_attributes (p_tp_rule_id(i));
3665: --open c_rule_attributes (3342);
3666: fetch c_rule_attributes

Line 3675: pa_debug.Reset_err_stack;

3671:
3672: END Loop;
3673:
3674:
3675: pa_debug.Reset_err_stack;
3676: pa_debug.G_Err_Stage := 'Exitting Get_Rule_Attributes';
3677: IF g1_debug_mode = 'Y' THEN
3678: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3679: END IF;

Line 3676: pa_debug.G_Err_Stage := 'Exitting Get_Rule_Attributes';

3672: END Loop;
3673:
3674:
3675: pa_debug.Reset_err_stack;
3676: pa_debug.G_Err_Stage := 'Exitting Get_Rule_Attributes';
3677: IF g1_debug_mode = 'Y' THEN
3678: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3679: END IF;
3680:

Line 3678: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3674:
3675: pa_debug.Reset_err_stack;
3676: pa_debug.G_Err_Stage := 'Exitting Get_Rule_Attributes';
3677: IF g1_debug_mode = 'Y' THEN
3678: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3679: END IF;
3680:
3681: EXCEPTION
3682:

Line 3823: pa_debug.Set_err_stack ('Set_Base_Amount_And_Flag');

3819: l_nl_bill_rate NUMBER;
3820: l_nl_adjusted_bill_rate NUMBER;--4038485
3821: l_nl_markup_percentage NUMBER;
3822: BEGIN
3823: pa_debug.Set_err_stack ('Set_Base_Amount_And_Flag');
3824: pa_debug.G_Err_Stage := 'Starting Set_Base_Amount_And_Flag';
3825: IF g1_debug_mode = 'Y' THEN
3826: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3827: END IF;

Line 3824: pa_debug.G_Err_Stage := 'Starting Set_Base_Amount_And_Flag';

3820: l_nl_adjusted_bill_rate NUMBER;--4038485
3821: l_nl_markup_percentage NUMBER;
3822: BEGIN
3823: pa_debug.Set_err_stack ('Set_Base_Amount_And_Flag');
3824: pa_debug.G_Err_Stage := 'Starting Set_Base_Amount_And_Flag';
3825: IF g1_debug_mode = 'Y' THEN
3826: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3827: END IF;
3828:

Line 3826: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3822: BEGIN
3823: pa_debug.Set_err_stack ('Set_Base_Amount_And_Flag');
3824: pa_debug.G_Err_Stage := 'Starting Set_Base_Amount_And_Flag';
3825: IF g1_debug_mode = 'Y' THEN
3826: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3827: END IF;
3828:
3829: For i in 1 .. G_Array_Size
3830: Loop

Line 3877: pa_debug.write_file('LOG','No Data Found for the Expenditure Item Id :'||p_expenditure_item_id(i));

3873: /* Added for bug 2697945 */
3874:
3875: IF(PROJ_VALUES%NOTFOUND) THEN
3876: IF g1_debug_mode = 'Y' THEN
3877: pa_debug.write_file('LOG','No Data Found for the Expenditure Item Id :'||p_expenditure_item_id(i));
3878: END IF;
3879:
3880: if PROJ_VALUES%ISOPEN THEN
3881: CLOSE PROJ_VALUES;

Line 3915: pa_debug.G_Err_Stage :=

3911: IF (p_compute_flag(i) = 'Y' and x_error_code(i) IS NULL) THEN
3912: l_error_code := null; /** Fixed Bug: 1063455 **/
3913: l_burden_error_code := x_error_code; /* 2215942 */
3914:
3915: pa_debug.G_Err_Stage :=
3916: 'Processing EI: '||to_char(p_expenditure_item_id(i));
3917: IF g1_debug_mode = 'Y' THEN
3918: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3919: END IF;

Line 3918: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

3914:
3915: pa_debug.G_Err_Stage :=
3916: 'Processing EI: '||to_char(p_expenditure_item_id(i));
3917: IF g1_debug_mode = 'Y' THEN
3918: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
3919: END IF;
3920: IF p_cc_markup_base_code(i) = 'C' THEN
3921: -- Raw Cost
3922:

Line 3928: pa_debug.write_file('LOG','Base is raw cost');

3924: IF p_denom_raw_cost_amount(i) is not null THEN
3925: x_tp_base_amount(i) := p_denom_raw_cost_amount(i);
3926: x_tp_base_curr_code(i) := p_denom_currency_code(i);
3927: IF g1_debug_mode = 'Y' THEN
3928: pa_debug.write_file('LOG','Base is raw cost');
3929: END IF;
3930: ELSE
3931: l_error_code := 'PA_CC_TP_RAW_COST_NULL';
3932: END IF;

Line 3937: pa_debug.write_file('LOG','Base is raw rev');

3933:
3934: ELSIF p_cc_markup_base_code(i) = 'R' THEN
3935: -- Raw Revenue
3936: IF g1_debug_mode = 'Y' THEN
3937: pa_debug.write_file('LOG','Base is raw rev');
3938: END IF;
3939: /*The below block is added for bug 2863550 */
3940: IF(p_dist_rule.exists(i)) THEN
3941: IF (substr(p_dist_rule(i),1,4) = 'WORK') THEN

Line 3993: pa_debug.write_file('LOG',

3989: END IF; /* Revenue amount is not null */
3990: /* Code Added for Bug#2469987 -- End */
3991: ELSE
3992: IF g1_debug_mode = 'Y' THEN
3993: pa_debug.write_file('LOG',
3994: 'Rev flag is '||p_revenue_distributed_flag(i));
3995: END IF;
3996: /* Added for bill rate disount and transfer price revenue*/
3997: IF (p_sys_linkage_function(i) in ('ST','OT')) then

Line 3999: pa_debug.write_file('LOG','within Assignment_Rev_Amt');

3995: END IF;
3996: /* Added for bill rate disount and transfer price revenue*/
3997: IF (p_sys_linkage_function(i) in ('ST','OT')) then
3998: IF g1_debug_mode = 'Y' THEN
3999: pa_debug.write_file('LOG','within Assignment_Rev_Amt');
4000: END IF;
4001: pa_revenue.Assignment_Rev_Amt(
4002: p_project_id => P_project_id(i)
4003: ,p_task_id => P_task_id(i)

Line 4049: pa_debug.write_file('LOG','completed Assignment_Rev_Amt');

4045: ,p_project_raw_cost => l_project_raw_cost
4046: ,p_project_currency_code => l_project_currency_code
4047: ,x_adjusted_bill_rate => l_adjusted_bill_rate);--4038485
4048: IF g1_debug_mode = 'Y' THEN
4049: pa_debug.write_file('LOG','completed Assignment_Rev_Amt');
4050: END IF;
4051:
4052: ELSE
4053: IF g1_debug_mode = 'Y' THEN

Line 4054: pa_debug.write_file('LOG','Non Labor Revenue Amount');

4050: END IF;
4051:
4052: ELSE
4053: IF g1_debug_mode = 'Y' THEN
4054: pa_debug.write_file('LOG','Non Labor Revenue Amount');
4055: END IF;
4056: l_exp_func_curr_code := p_exp_func_curr_code(i);
4057: select decode(p_sys_linkage_function(i),'BTC',6,2)
4058: into l_sl_function

Line 4120: pa_debug.write_file('LOG','Completed Non Labor Revenue Amount');

4116: x_adjusted_bill_rate => l_nl_adjusted_bill_rate,--4038485
4117: p_uom_flag => p_uom_flag(i));
4118:
4119: IF g1_debug_mode = 'Y' THEN
4120: pa_debug.write_file('LOG','Completed Non Labor Revenue Amount');
4121: END IF;
4122: END IF;
4123: IF g1_debug_mode = 'Y' THEN
4124: pa_debug.write_file('LOG','x_base revenue amount' || x_tp_base_amount(i) || 'code : ' ||x_tp_base_curr_code(i));

Line 4124: pa_debug.write_file('LOG','x_base revenue amount' || x_tp_base_amount(i) || 'code : ' ||x_tp_base_curr_code(i));

4120: pa_debug.write_file('LOG','Completed Non Labor Revenue Amount');
4121: END IF;
4122: END IF;
4123: IF g1_debug_mode = 'Y' THEN
4124: pa_debug.write_file('LOG','x_base revenue amount' || x_tp_base_amount(i) || 'code : ' ||x_tp_base_curr_code(i));
4125: END IF;
4126: IF l_msg_data is NULL then
4127: IF x_tp_base_amount(i) is NULL THEN
4128: l_error_code := 'PA_CC_TP_REV_AMT_NULL';

Line 4152: pa_debug.write_file('LOG','Project_id is: '

4148: l_burden_amt_display_method
4149: );
4150:
4151: IF g1_debug_mode = 'Y' THEN
4152: pa_debug.write_file('LOG','Project_id is: '
4153: ||to_char(p_project_id(i)));
4154:
4155: pa_debug.write_file('LOG','Burdening flag is : '
4156: ||l_burdening_allowed);

Line 4155: pa_debug.write_file('LOG','Burdening flag is : '

4151: IF g1_debug_mode = 'Y' THEN
4152: pa_debug.write_file('LOG','Project_id is: '
4153: ||to_char(p_project_id(i)));
4154:
4155: pa_debug.write_file('LOG','Burdening flag is : '
4156: ||l_burdening_allowed);
4157:
4158: pa_debug.write_file('LOG','burden amount allowed flag is: '
4159: ||l_burden_amt_display_method);

Line 4158: pa_debug.write_file('LOG','burden amount allowed flag is: '

4154:
4155: pa_debug.write_file('LOG','Burdening flag is : '
4156: ||l_burdening_allowed);
4157:
4158: pa_debug.write_file('LOG','burden amount allowed flag is: '
4159: ||l_burden_amt_display_method);
4160: END IF;
4161:
4162: -- Check if project allows burdening

Line 4327: pa_debug.write_file('LOG','Base Amount is: '

4323: END IF; /** p_cc_markup_base_code **/
4324:
4325: IF (l_error_code IS NULL) THEN
4326: IF g1_debug_mode = 'Y' THEN
4327: pa_debug.write_file('LOG','Base Amount is: '
4328: ||to_char(x_tp_base_amount(i)));
4329: pa_debug.write_file('LOG','Base currency is: '
4330: ||x_tp_base_curr_code(i));
4331: END IF;

Line 4329: pa_debug.write_file('LOG','Base currency is: '

4325: IF (l_error_code IS NULL) THEN
4326: IF g1_debug_mode = 'Y' THEN
4327: pa_debug.write_file('LOG','Base Amount is: '
4328: ||to_char(x_tp_base_amount(i)));
4329: pa_debug.write_file('LOG','Base currency is: '
4330: ||x_tp_base_curr_code(i));
4331: END IF;
4332: -- No error encountered yet
4333: IF p_calc_method_code(i) = 'A' THEN

Line 4357: pa_debug.Reset_err_stack;

4353: END IF;/** p_compute_flag(i) = 'Y' and x_error_code(i) IS NULL **/
4354:
4355: END LOOP;
4356:
4357: pa_debug.Reset_err_stack;
4358: pa_debug.G_Err_Stage := 'Exitting Set_Base_Amount_And_Flag';
4359: IF g1_debug_mode = 'Y' THEN
4360: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4361: END IF;

Line 4358: pa_debug.G_Err_Stage := 'Exitting Set_Base_Amount_And_Flag';

4354:
4355: END LOOP;
4356:
4357: pa_debug.Reset_err_stack;
4358: pa_debug.G_Err_Stage := 'Exitting Set_Base_Amount_And_Flag';
4359: IF g1_debug_mode = 'Y' THEN
4360: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4361: END IF;
4362:

Line 4360: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

4356:
4357: pa_debug.Reset_err_stack;
4358: pa_debug.G_Err_Stage := 'Exitting Set_Base_Amount_And_Flag';
4359: IF g1_debug_mode = 'Y' THEN
4360: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4361: END IF;
4362:
4363: EXCEPTION
4364:

Line 4385: pa_debug.Set_err_stack ('Get_Burdening_Details');

4381: where proj.project_id = p_project_id
4382: and proj.project_type = type.project_type
4383: and proj.org_id = type.org_id; /** Added this condition while making changes for Org Forecasting **/
4384: BEGIN
4385: pa_debug.Set_err_stack ('Get_Burdening_Details');
4386: pa_debug.G_Err_Stage := 'Starting Get_Burdening_Details';
4387: IF g1_debug_mode = 'Y' THEN
4388: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4389: END IF;

Line 4386: pa_debug.G_Err_Stage := 'Starting Get_Burdening_Details';

4382: and proj.project_type = type.project_type
4383: and proj.org_id = type.org_id; /** Added this condition while making changes for Org Forecasting **/
4384: BEGIN
4385: pa_debug.Set_err_stack ('Get_Burdening_Details');
4386: pa_debug.G_Err_Stage := 'Starting Get_Burdening_Details';
4387: IF g1_debug_mode = 'Y' THEN
4388: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4389: END IF;
4390:

Line 4388: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

4384: BEGIN
4385: pa_debug.Set_err_stack ('Get_Burdening_Details');
4386: pa_debug.G_Err_Stage := 'Starting Get_Burdening_Details';
4387: IF g1_debug_mode = 'Y' THEN
4388: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4389: END IF;
4390:
4391: open c_burdening_details;
4392: fetch c_burdening_details

Line 4396: pa_debug.Reset_err_stack;

4392: fetch c_burdening_details
4393: into x_burdening_allowed,x_burden_amt_display_method;
4394: close c_burdening_details;
4395:
4396: pa_debug.Reset_err_stack;
4397: pa_debug.G_Err_Stage := 'Exitting Get_Burdening_Details';
4398: IF g1_debug_mode = 'Y' THEN
4399: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4400: END IF;

Line 4397: pa_debug.G_Err_Stage := 'Exitting Get_Burdening_Details';

4393: into x_burdening_allowed,x_burden_amt_display_method;
4394: close c_burdening_details;
4395:
4396: pa_debug.Reset_err_stack;
4397: pa_debug.G_Err_Stage := 'Exitting Get_Burdening_Details';
4398: IF g1_debug_mode = 'Y' THEN
4399: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4400: END IF;
4401:

Line 4399: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

4395:
4396: pa_debug.Reset_err_stack;
4397: pa_debug.G_Err_Stage := 'Exitting Get_Burdening_Details';
4398: IF g1_debug_mode = 'Y' THEN
4399: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4400: END IF;
4401:
4402: EXCEPTION
4403:

Line 4463: pa_debug.Set_err_stack ('Determine_Transfer_Price');

4459: l_temp_transfer_price NUMBER;
4460:
4461:
4462: BEGIN
4463: pa_debug.Set_err_stack ('Determine_Transfer_Price');
4464: pa_debug.G_Err_Stage := 'Starting Determine_Transfer_Price';
4465: IF g1_debug_mode = 'Y' THEN
4466: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4467: END IF;

Line 4464: pa_debug.G_Err_Stage := 'Starting Determine_Transfer_Price';

4460:
4461:
4462: BEGIN
4463: pa_debug.Set_err_stack ('Determine_Transfer_Price');
4464: pa_debug.G_Err_Stage := 'Starting Determine_Transfer_Price';
4465: IF g1_debug_mode = 'Y' THEN
4466: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4467: END IF;
4468: l_bill_rate_compute_flag := p_bill_rate_compute_flag;

Line 4466: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

4462: BEGIN
4463: pa_debug.Set_err_stack ('Determine_Transfer_Price');
4464: pa_debug.G_Err_Stage := 'Starting Determine_Transfer_Price';
4465: IF g1_debug_mode = 'Y' THEN
4466: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4467: END IF;
4468: l_bill_rate_compute_flag := p_bill_rate_compute_flag;
4469:
4470: l_basis_error_code := x_error_code;

Line 4476: pa_debug.write_file('LOG','Using Basis');

4472: l_bill_error_code := x_error_code;
4473:
4474: IF G_Basis_Exists THEN
4475: IF g1_debug_mode = 'Y' THEN
4476: pa_debug.write_file('LOG','Using Basis');
4477: END IF;
4478: Get_Basis_Amount(
4479: p_tp_base_curr_code => p_tp_base_curr_code,
4480: p_tp_base_amount => p_tp_base_amount,

Line 4492: pa_debug.write_file('LOG','Using Bill Rate');

4488:
4489: IF G_Bill_Rate_Exists THEN
4490: -- Call Bill rate API
4491: IF g1_debug_mode = 'Y' THEN
4492: pa_debug.write_file('LOG','Using Bill Rate');
4493: END IF;
4494:
4495: pa_bill_schedule.get_computed_bill_rate(
4496: p_array_size => G_Array_Size,

Line 4525: pa_debug.write_file('LOG','Using Burden schedule');

4521:
4522: IF G_Burden_Rate_Exists THEN
4523: -- Call Burden rate API
4524: IF g1_debug_mode = 'Y' THEN
4525: pa_debug.write_file('LOG','Using Burden schedule');
4526: END IF;
4527: get_burden_amount(
4528: p_array_size => G_array_size,
4529: p_burden_schedule_id => p_rate_schedule_id,

Line 4603: pa_debug.Reset_err_stack;

4599: END IF; /** p_compute_flag(i) = 'Y' and x_error_code(i) is null **/
4600:
4601: END Loop;
4602:
4603: pa_debug.Reset_err_stack;
4604: pa_debug.G_Err_Stage := 'Exitting Determine_transfer_price';
4605: IF g1_debug_mode = 'Y' THEN
4606: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4607: END IF;

Line 4604: pa_debug.G_Err_Stage := 'Exitting Determine_transfer_price';

4600:
4601: END Loop;
4602:
4603: pa_debug.Reset_err_stack;
4604: pa_debug.G_Err_Stage := 'Exitting Determine_transfer_price';
4605: IF g1_debug_mode = 'Y' THEN
4606: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4607: END IF;
4608: EXCEPTION

Line 4606: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

4602:
4603: pa_debug.Reset_err_stack;
4604: pa_debug.G_Err_Stage := 'Exitting Determine_transfer_price';
4605: IF g1_debug_mode = 'Y' THEN
4606: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4607: END IF;
4608: EXCEPTION
4609:
4610: WHEN OTHERS THEN

Line 4625: pa_debug.Set_err_stack ('Get_Basis_Amount');

4621: x_error_code IN OUT NOCOPY PA_PLSQL_DATATYPES.Char30TabTyp
4622: )
4623: IS
4624: BEGIN
4625: pa_debug.Set_err_stack ('Get_Basis_Amount');
4626: pa_debug.G_Err_Stage := 'Starting Get_Basis_Amount';
4627: IF g1_debug_mode = 'Y' THEN
4628: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4629: END IF;

Line 4626: pa_debug.G_Err_Stage := 'Starting Get_Basis_Amount';

4622: )
4623: IS
4624: BEGIN
4625: pa_debug.Set_err_stack ('Get_Basis_Amount');
4626: pa_debug.G_Err_Stage := 'Starting Get_Basis_Amount';
4627: IF g1_debug_mode = 'Y' THEN
4628: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4629: END IF;
4630: For i in 1 .. p_Array_Size

Line 4628: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

4624: BEGIN
4625: pa_debug.Set_err_stack ('Get_Basis_Amount');
4626: pa_debug.G_Err_Stage := 'Starting Get_Basis_Amount';
4627: IF g1_debug_mode = 'Y' THEN
4628: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4629: END IF;
4630: For i in 1 .. p_Array_Size
4631: Loop
4632: IF (p_compute_flag(i) = 'Y' AND x_error_code(i) IS NULL) THEN

Line 4633: pa_debug.G_Err_Stage := 'Processing Get_Basis_Amount';

4629: END IF;
4630: For i in 1 .. p_Array_Size
4631: Loop
4632: IF (p_compute_flag(i) = 'Y' AND x_error_code(i) IS NULL) THEN
4633: pa_debug.G_Err_Stage := 'Processing Get_Basis_Amount';
4634: IF g1_debug_mode = 'Y' THEN
4635: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4636: END IF;
4637: IF (p_tp_base_curr_code(i) IS NOT NULL

Line 4635: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

4631: Loop
4632: IF (p_compute_flag(i) = 'Y' AND x_error_code(i) IS NULL) THEN
4633: pa_debug.G_Err_Stage := 'Processing Get_Basis_Amount';
4634: IF g1_debug_mode = 'Y' THEN
4635: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4636: END IF;
4637: IF (p_tp_base_curr_code(i) IS NOT NULL
4638: and p_tp_base_amount(i) IS NOT NULL) THEN
4639: pa_debug.G_Err_Stage:='Setting currency,amount in Get_Basis_Amount';

Line 4639: pa_debug.G_Err_Stage:='Setting currency,amount in Get_Basis_Amount';

4635: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4636: END IF;
4637: IF (p_tp_base_curr_code(i) IS NOT NULL
4638: and p_tp_base_amount(i) IS NOT NULL) THEN
4639: pa_debug.G_Err_Stage:='Setting currency,amount in Get_Basis_Amount';
4640: IF g1_debug_mode = 'Y' THEN
4641: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4642: END IF;
4643: x_denom_tp_curr_code(i) := p_tp_base_curr_code(i);

Line 4641: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

4637: IF (p_tp_base_curr_code(i) IS NOT NULL
4638: and p_tp_base_amount(i) IS NOT NULL) THEN
4639: pa_debug.G_Err_Stage:='Setting currency,amount in Get_Basis_Amount';
4640: IF g1_debug_mode = 'Y' THEN
4641: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4642: END IF;
4643: x_denom_tp_curr_code(i) := p_tp_base_curr_code(i);
4644: x_amount(i) := p_tp_base_amount(i);
4645: ELSE

Line 4651: pa_debug.Reset_err_stack;

4647: END IF;
4648: END IF;
4649: End Loop;
4650:
4651: pa_debug.Reset_err_stack;
4652: pa_debug.G_Err_Stage := 'Exitting Get_Basis_Amount';
4653: IF g1_debug_mode = 'Y' THEN
4654: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4655: END IF;

Line 4652: pa_debug.G_Err_Stage := 'Exitting Get_Basis_Amount';

4648: END IF;
4649: End Loop;
4650:
4651: pa_debug.Reset_err_stack;
4652: pa_debug.G_Err_Stage := 'Exitting Get_Basis_Amount';
4653: IF g1_debug_mode = 'Y' THEN
4654: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4655: END IF;
4656:

Line 4654: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

4650:
4651: pa_debug.Reset_err_stack;
4652: pa_debug.G_Err_Stage := 'Exitting Get_Basis_Amount';
4653: IF g1_debug_mode = 'Y' THEN
4654: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4655: END IF;
4656:
4657: EXCEPTION
4658:

Line 4690: pa_debug.Set_err_stack ('Get_Burden_Amount');

4686: unexpected_result exception;
4687:
4688: BEGIN
4689:
4690: pa_debug.Set_err_stack ('Get_Burden_Amount');
4691: pa_debug.G_Err_Stage := 'Starting Get_Burden_Amount';
4692: IF g1_debug_mode = 'Y' THEN
4693: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4694: END IF;

Line 4691: pa_debug.G_Err_Stage := 'Starting Get_Burden_Amount';

4687:
4688: BEGIN
4689:
4690: pa_debug.Set_err_stack ('Get_Burden_Amount');
4691: pa_debug.G_Err_Stage := 'Starting Get_Burden_Amount';
4692: IF g1_debug_mode = 'Y' THEN
4693: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4694: END IF;
4695:

Line 4693: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

4689:
4690: pa_debug.Set_err_stack ('Get_Burden_Amount');
4691: pa_debug.G_Err_Stage := 'Starting Get_Burden_Amount';
4692: IF g1_debug_mode = 'Y' THEN
4693: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4694: END IF;
4695:
4696: For i in 1 .. p_array_size
4697: LOOP

Line 4708: pa_debug.write_file('LOG','Burden Schedule ID: '

4704: l_effective_date := p_fixed_date(i);
4705: END IF;
4706:
4707: IF g1_debug_mode = 'Y' THEN
4708: pa_debug.write_file('LOG','Burden Schedule ID: '
4709: ||to_char(p_burden_schedule_id(i)));
4710: pa_debug.write_file('LOG','Effective Date: '
4711: ||to_char(l_effective_date));
4712: pa_debug.write_file('LOG','Expenditure Type: '

Line 4710: pa_debug.write_file('LOG','Effective Date: '

4706:
4707: IF g1_debug_mode = 'Y' THEN
4708: pa_debug.write_file('LOG','Burden Schedule ID: '
4709: ||to_char(p_burden_schedule_id(i)));
4710: pa_debug.write_file('LOG','Effective Date: '
4711: ||to_char(l_effective_date));
4712: pa_debug.write_file('LOG','Expenditure Type: '
4713: ||p_expenditure_type(i));
4714: pa_debug.write_file('LOG','Expenditure Organization ID: '

Line 4712: pa_debug.write_file('LOG','Expenditure Type: '

4708: pa_debug.write_file('LOG','Burden Schedule ID: '
4709: ||to_char(p_burden_schedule_id(i)));
4710: pa_debug.write_file('LOG','Effective Date: '
4711: ||to_char(l_effective_date));
4712: pa_debug.write_file('LOG','Expenditure Type: '
4713: ||p_expenditure_type(i));
4714: pa_debug.write_file('LOG','Expenditure Organization ID: '
4715: ||to_char(p_organization_id(i)));
4716: pa_debug.write_file('LOG','Raw Amount IS : '

Line 4714: pa_debug.write_file('LOG','Expenditure Organization ID: '

4710: pa_debug.write_file('LOG','Effective Date: '
4711: ||to_char(l_effective_date));
4712: pa_debug.write_file('LOG','Expenditure Type: '
4713: ||p_expenditure_type(i));
4714: pa_debug.write_file('LOG','Expenditure Organization ID: '
4715: ||to_char(p_organization_id(i)));
4716: pa_debug.write_file('LOG','Raw Amount IS : '
4717: ||to_char(p_raw_amount(i)));
4718: END IF;

Line 4716: pa_debug.write_file('LOG','Raw Amount IS : '

4712: pa_debug.write_file('LOG','Expenditure Type: '
4713: ||p_expenditure_type(i));
4714: pa_debug.write_file('LOG','Expenditure Organization ID: '
4715: ||to_char(p_organization_id(i)));
4716: pa_debug.write_file('LOG','Raw Amount IS : '
4717: ||to_char(p_raw_amount(i)));
4718: END IF;
4719:
4720: PA_COST_PLUS.Get_Burden_Amount(

Line 4738: pa_debug.write_file('LOG','Burden Amount IS : '

4734: IF l_status = 0 THEN
4735: x_computed_currency(i) := p_raw_amount_curr_code(i);
4736: x_burden_amount(i) := l_burden_amount;
4737: IF g1_debug_mode = 'Y' THEN
4738: pa_debug.write_file('LOG','Burden Amount IS : '
4739: ||to_char(l_burden_amount));
4740: pa_debug.write_file('LOG','Burden Schedule Revision ID : '
4741: ||to_char(l_burden_sch_rev_id));
4742: pa_debug.write_file('LOG','Compilede Set ID : '

Line 4740: pa_debug.write_file('LOG','Burden Schedule Revision ID : '

4736: x_burden_amount(i) := l_burden_amount;
4737: IF g1_debug_mode = 'Y' THEN
4738: pa_debug.write_file('LOG','Burden Amount IS : '
4739: ||to_char(l_burden_amount));
4740: pa_debug.write_file('LOG','Burden Schedule Revision ID : '
4741: ||to_char(l_burden_sch_rev_id));
4742: pa_debug.write_file('LOG','Compilede Set ID : '
4743: ||to_char(x_compiled_set_id(i)));
4744: END IF;

Line 4742: pa_debug.write_file('LOG','Compilede Set ID : '

4738: pa_debug.write_file('LOG','Burden Amount IS : '
4739: ||to_char(l_burden_amount));
4740: pa_debug.write_file('LOG','Burden Schedule Revision ID : '
4741: ||to_char(l_burden_sch_rev_id));
4742: pa_debug.write_file('LOG','Compilede Set ID : '
4743: ||to_char(x_compiled_set_id(i)));
4744: END IF;
4745: ELSIF l_status < 0 THEN
4746: pa_debug.G_Err_Stage := 'Error in PA_COST_PLUS.Get_Burden_Amount';

Line 4746: pa_debug.G_Err_Stage := 'Error in PA_COST_PLUS.Get_Burden_Amount';

4742: pa_debug.write_file('LOG','Compilede Set ID : '
4743: ||to_char(x_compiled_set_id(i)));
4744: END IF;
4745: ELSIF l_status < 0 THEN
4746: pa_debug.G_Err_Stage := 'Error in PA_COST_PLUS.Get_Burden_Amount';
4747: -- unhandled exception
4748: raise unexpected_result;
4749: ELSIF l_status > 0 THEN
4750: x_error_code(i) := 'PA_CC_TP_ERROR_BURDEN_RATE';

Line 4757: pa_debug.Reset_err_stack;

4753: END IF; /** (p_compute_flag = 'Y' and x_error_code IS NULL) **/
4754:
4755: End Loop;
4756:
4757: pa_debug.Reset_err_stack;
4758: pa_debug.G_Err_Stage := 'Exitting Get_Burden_Amount';
4759: IF g1_debug_mode = 'Y' THEN
4760: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4761: END IF;

Line 4758: pa_debug.G_Err_Stage := 'Exitting Get_Burden_Amount';

4754:
4755: End Loop;
4756:
4757: pa_debug.Reset_err_stack;
4758: pa_debug.G_Err_Stage := 'Exitting Get_Burden_Amount';
4759: IF g1_debug_mode = 'Y' THEN
4760: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4761: END IF;
4762:

Line 4760: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);

4756:
4757: pa_debug.Reset_err_stack;
4758: pa_debug.G_Err_Stage := 'Exitting Get_Burden_Amount';
4759: IF g1_debug_mode = 'Y' THEN
4760: pa_debug.write_file('LOG',pa_debug.G_Err_Stage);
4761: END IF;
4762:
4763: EXCEPTION
4764:

Line 5079: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'ENTERING Get_Initial_Transfer_Price', 3);

5075:
5076: BEGIN
5077:
5078: IF p_debug_mode = 'Y' THEN
5079: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'ENTERING Get_Initial_Transfer_Price', 3);
5080: END IF;
5081:
5082: x_return_status := FND_API.G_RET_STS_SUCCESS;
5083:

Line 5086: PA_DEBUG.g_err_stage := 'Fetching Cur_Forecast_Items';

5082: x_return_status := FND_API.G_RET_STS_SUCCESS;
5083:
5084: Open Cur_Forecast_Items(p_assignment_id, p_start_date);
5085:
5086: PA_DEBUG.g_err_stage := 'Fetching Cur_Forecast_Items';
5087: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
5088:
5089: l_fi_id_tab.delete;
5090: l_fi_item_type_tab.delete;

Line 5087: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

5083:
5084: Open Cur_Forecast_Items(p_assignment_id, p_start_date);
5085:
5086: PA_DEBUG.g_err_stage := 'Fetching Cur_Forecast_Items';
5087: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
5088:
5089: l_fi_id_tab.delete;
5090: l_fi_item_type_tab.delete;
5091: l_fi_exp_orgid_tab.delete;

Line 5146: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Cursor cur_forecast_items_fetched', 3);

5142:
5143: CLOSE Cur_Forecast_Items;
5144:
5145: IF p_debug_mode = 'Y' THEN
5146: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Cursor cur_forecast_items_fetched', 3);
5147: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'f id:'||l_fi_id_tab(1)||' org id'||l_fi_exp_orgid_tab(1));
5148: END IF;
5149:
5150:

Line 5147: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'f id:'||l_fi_id_tab(1)||' org id'||l_fi_exp_orgid_tab(1));

5143: CLOSE Cur_Forecast_Items;
5144:
5145: IF p_debug_mode = 'Y' THEN
5146: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Cursor cur_forecast_items_fetched', 3);
5147: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'f id:'||l_fi_id_tab(1)||' org id'||l_fi_exp_orgid_tab(1));
5148: END IF;
5149:
5150:
5151: l_cc_taskid_tab(1) := NULL;

Line 5193: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Procedure PA_CC_IDENTIFY_TXN_FI executed', 3);

5189: X_Error_Code => lx_cc_error_code
5190: );
5191:
5192: IF p_debug_mode = 'Y' THEN
5193: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Procedure PA_CC_IDENTIFY_TXN_FI executed', 3);
5194: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Status :'||lx_cc_status_tab(1), 3);
5195: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'cc code:'||lx_cc_code_tab(1), 3);
5196: END IF;
5197:

Line 5194: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Status :'||lx_cc_status_tab(1), 3);

5190: );
5191:
5192: IF p_debug_mode = 'Y' THEN
5193: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Procedure PA_CC_IDENTIFY_TXN_FI executed', 3);
5194: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Status :'||lx_cc_status_tab(1), 3);
5195: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'cc code:'||lx_cc_code_tab(1), 3);
5196: END IF;
5197:
5198:

Line 5195: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'cc code:'||lx_cc_code_tab(1), 3);

5191:
5192: IF p_debug_mode = 'Y' THEN
5193: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Procedure PA_CC_IDENTIFY_TXN_FI executed', 3);
5194: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Status :'||lx_cc_status_tab(1), 3);
5195: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'cc code:'||lx_cc_code_tab(1), 3);
5196: END IF;
5197:
5198:
5199: If lx_cc_code_tab(1) in ('I', 'B') AND lx_cc_status_tab(1) is NULL THEN

Line 5295: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'No data found in pa_project_role_types', 3);

5291: /* ends here */
5292: EXCEPTION
5293: WHEN NO_DATA_FOUND THEN
5294: IF p_debug_mode = 'Y' THEN
5295: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'No data found in pa_project_role_types', 3);
5296: END IF;
5297: l_asg_fcst_job_id := NULL;
5298: l_asg_fcst_job_group_id := NULL;
5299: WHEN OTHERS THEN

Line 5300: PA_DEBUG.g_err_stage := 'Inside Prj Role others Excep';

5296: END IF;
5297: l_asg_fcst_job_id := NULL;
5298: l_asg_fcst_job_group_id := NULL;
5299: WHEN OTHERS THEN
5300: PA_DEBUG.g_err_stage := 'Inside Prj Role others Excep';
5301: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
5302: END;
5303: END IF;
5304:

Line 5301: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

5297: l_asg_fcst_job_id := NULL;
5298: l_asg_fcst_job_group_id := NULL;
5299: WHEN OTHERS THEN
5300: PA_DEBUG.g_err_stage := 'Inside Prj Role others Excep';
5301: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
5302: END;
5303: END IF;
5304:
5305: Open FI_Attributes(l_fi_proj_orgid_tab(1), l_fi_exptype_tab(1), l_fi_pvdr_papd_tab(1), l_fi_exp_orgid_tab(1));

Line 5313: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Just Calling PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);

5309: l_qty_tab.delete;
5310: l_qty_tab(1) := 1;
5311:
5312: IF p_debug_mode = 'Y' THEN
5313: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Just Calling PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5314: END IF;
5315:
5316: PA_RATE_PVT_PKG.CALC_RATE_AMOUNT(
5317: P_CALLING_MODE => l_calling_mode,

Line 5414: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Done With the PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);

5410: X_MSG_DATA => lx_rt_msg_data
5411: );
5412:
5413: IF p_debug_mode = 'Y' THEN
5414: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Done With the PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5415: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5416: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_rev_rejct_reason_tab COUNT:'||lx_rt_rev_rejct_reason_tab.count, 3);
5417: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_cst_rejct_reason_tab.count :'||lx_rt_cst_rejct_reason_tab.count, 3);
5418: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_bd_rejct_reason_tab.count:'||lx_rt_bd_rejct_reason_tab.count, 3);

Line 5415: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);

5411: );
5412:
5413: IF p_debug_mode = 'Y' THEN
5414: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Done With the PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5415: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5416: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_rev_rejct_reason_tab COUNT:'||lx_rt_rev_rejct_reason_tab.count, 3);
5417: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_cst_rejct_reason_tab.count :'||lx_rt_cst_rejct_reason_tab.count, 3);
5418: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_bd_rejct_reason_tab.count:'||lx_rt_bd_rejct_reason_tab.count, 3);
5419: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_others_rejct_reason_tab.count:'||lx_rt_others_rejct_reason_tab.count, 3);

Line 5416: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_rev_rejct_reason_tab COUNT:'||lx_rt_rev_rejct_reason_tab.count, 3);

5412:
5413: IF p_debug_mode = 'Y' THEN
5414: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Done With the PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5415: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5416: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_rev_rejct_reason_tab COUNT:'||lx_rt_rev_rejct_reason_tab.count, 3);
5417: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_cst_rejct_reason_tab.count :'||lx_rt_cst_rejct_reason_tab.count, 3);
5418: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_bd_rejct_reason_tab.count:'||lx_rt_bd_rejct_reason_tab.count, 3);
5419: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_others_rejct_reason_tab.count:'||lx_rt_others_rejct_reason_tab.count, 3);
5420: END IF;

Line 5417: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_cst_rejct_reason_tab.count :'||lx_rt_cst_rejct_reason_tab.count, 3);

5413: IF p_debug_mode = 'Y' THEN
5414: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Done With the PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5415: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5416: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_rev_rejct_reason_tab COUNT:'||lx_rt_rev_rejct_reason_tab.count, 3);
5417: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_cst_rejct_reason_tab.count :'||lx_rt_cst_rejct_reason_tab.count, 3);
5418: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_bd_rejct_reason_tab.count:'||lx_rt_bd_rejct_reason_tab.count, 3);
5419: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_others_rejct_reason_tab.count:'||lx_rt_others_rejct_reason_tab.count, 3);
5420: END IF;
5421:

Line 5418: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_bd_rejct_reason_tab.count:'||lx_rt_bd_rejct_reason_tab.count, 3);

5414: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Done With the PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5415: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5416: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_rev_rejct_reason_tab COUNT:'||lx_rt_rev_rejct_reason_tab.count, 3);
5417: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_cst_rejct_reason_tab.count :'||lx_rt_cst_rejct_reason_tab.count, 3);
5418: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_bd_rejct_reason_tab.count:'||lx_rt_bd_rejct_reason_tab.count, 3);
5419: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_others_rejct_reason_tab.count:'||lx_rt_others_rejct_reason_tab.count, 3);
5420: END IF;
5421:
5422:

Line 5419: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_others_rejct_reason_tab.count:'||lx_rt_others_rejct_reason_tab.count, 3);

5415: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5416: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_rev_rejct_reason_tab COUNT:'||lx_rt_rev_rejct_reason_tab.count, 3);
5417: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_cst_rejct_reason_tab.count :'||lx_rt_cst_rejct_reason_tab.count, 3);
5418: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_bd_rejct_reason_tab.count:'||lx_rt_bd_rejct_reason_tab.count, 3);
5419: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_others_rejct_reason_tab.count:'||lx_rt_others_rejct_reason_tab.count, 3);
5420: END IF;
5421:
5422:
5423: ERROR_OCCURED := 'N';

Line 5432: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Rev Reject:'||lx_rt_rev_rejct_reason_tab(1), 3);

5428:
5429: If lx_rt_rev_rejct_reason_tab.exists(1) THEN
5430: IF lx_rt_rev_rejct_reason_tab(1) IS NOT NULL THEN
5431: IF p_debug_mode = 'Y' THEN
5432: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Rev Reject:'||lx_rt_rev_rejct_reason_tab(1), 3);
5433: END IF;
5434: ERROR_OCCURED := 'Y';
5435: END IF;
5436: END IF;

Line 5441: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Raw Cost Reject:'||lx_rt_cst_rejct_reason_tab(1), 3);

5437:
5438: IF lx_rt_cst_rejct_reason_tab.exists(1) THEN
5439: IF lx_rt_cst_rejct_reason_tab(1) IS NOT NULL THEN
5440: IF p_debug_mode = 'Y' THEN
5441: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Raw Cost Reject:'||lx_rt_cst_rejct_reason_tab(1), 3);
5442: END IF;
5443: ERROR_OCCURED := 'Y';
5444: END IF;
5445: END IF;

Line 5450: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Burden Cost Reject:'||lx_rt_bd_rejct_reason_tab(1), 3);

5446:
5447: IF lx_rt_bd_rejct_reason_tab.exists(1) THEN
5448: IF lx_rt_bd_rejct_reason_tab(1) IS NOT NULL THEN
5449: IF p_debug_mode = 'Y' THEN
5450: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Burden Cost Reject:'||lx_rt_bd_rejct_reason_tab(1), 3);
5451: END IF;
5452: ERROR_OCCURED := 'Y';
5453: END IF;
5454: END IF;

Line 5459: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Other Reject:'||lx_rt_others_rejct_reason_tab(1), 3);

5455:
5456: IF lx_rt_others_rejct_reason_tab.exists(1) THEN
5457: IF lx_rt_others_rejct_reason_tab(1) IS NOT NULL THEN
5458: IF p_debug_mode = 'Y' THEN
5459: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Other Reject:'||lx_rt_others_rejct_reason_tab(1), 3);
5460: END IF;
5461: ERROR_OCCURED := 'Y';
5462: END IF;
5463: END IF;

Line 5467: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Some Error Occurred, Returning null as Rate', 3);

5463: END IF;
5464:
5465: IF ERROR_OCCURED = 'Y' THEN
5466: IF p_debug_mode = 'Y' THEN
5467: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Some Error Occurred, Returning null as Rate', 3);
5468: END IF;
5469: x_transfer_price_rate := NULL;
5470: x_transfer_pr_rate_curr := NULL;
5471: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 5557: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'PA_CC_TRANSFER_PRICE.GET_TRANSFER_PRICE calling', 3);

5553:
5554: lx_asg_precedes_task_tab(1) := l_asg_precedes_task; -- Added for bug 3255061
5555:
5556: IF p_debug_mode = 'Y' THEN
5557: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'PA_CC_TRANSFER_PRICE.GET_TRANSFER_PRICE calling', 3);
5558: END IF;
5559:
5560: PA_CC_TRANSFER_PRICE.GET_TRANSFER_PRICE(
5561: p_module_name => 'FORECAST',

Line 5623: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'status is : '||lx_tp_return_status, 3);

5619: x_error_code => lx_tp_error_code,
5620: x_return_status => lx_tp_return_status );
5621:
5622: IF p_debug_mode = 'Y' THEN
5623: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'status is : '||lx_tp_return_status, 3);
5624: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'rate is :'||x_transfer_price_rate||' curr :'||x_transfer_pr_rate_curr, 3);
5625: END IF;
5626:
5627: If lx_tp_return_status <> 0 THEN

Line 5624: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'rate is :'||x_transfer_price_rate||' curr :'||x_transfer_pr_rate_curr, 3);

5620: x_return_status => lx_tp_return_status );
5621:
5622: IF p_debug_mode = 'Y' THEN
5623: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'status is : '||lx_tp_return_status, 3);
5624: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'rate is :'||x_transfer_price_rate||' curr :'||x_transfer_pr_rate_curr, 3);
5625: END IF;
5626:
5627: If lx_tp_return_status <> 0 THEN
5628: x_transfer_price_rate := NULL;

Line 5640: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Returning with Null as value', 3);

5636: END IF;
5637: END IF;
5638: ELSE
5639: IF p_debug_mode = 'Y' THEN
5640: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Returning with Null as value', 3);
5641: END IF;
5642: x_transfer_price_rate := NULL;
5643: x_transfer_pr_rate_curr := NULL;
5644: END IF;

Line 5650: pa_debug.write('PA_CC_TRANSFER_PRICE.GET_INITIAL_TRANSFER_PRICE', 'Unhandled Exception occured', 3);

5646: x_return_status := FND_API.G_RET_STS_SUCCESS;
5647: EXCEPTION
5648: WHEN OTHERS THEN
5649: If p_debug_mode = 'Y' THEN
5650: pa_debug.write('PA_CC_TRANSFER_PRICE.GET_INITIAL_TRANSFER_PRICE', 'Unhandled Exception occured', 3);
5651: End if;
5652: /*Added for File.sql.39*/
5653: x_transfer_price_rate := NULL;
5654: x_transfer_pr_rate_curr := NULL;