DBA Data[Home] [Help]

APPS.PA_FUNDS_CONTROL_UTILS2 dependencies on PA_FUNDS_CONTROL_UTILS2

Line 1: package body PA_FUNDS_CONTROL_UTILS2 as

1: package body PA_FUNDS_CONTROL_UTILS2 as
2: -- $Header: PAFUTL2B.pls 120.3 2012/02/20 12:12:47 mokukuma ship $
3:
4: PROCEDURE PRINT_MSG (p_debug_flag varchar2 default 'N'
5: ,p_msg varchar2) IS

Line 38: If pa_funds_control_utils2.g_cwk_implemented_flag is NULL Then

34:
35: l_debug_stage := 'Inside is_CWK_PO';
36: print_msg(l_debug_mode,l_debug_stage);
37:
38: If pa_funds_control_utils2.g_cwk_implemented_flag is NULL Then
39: Open check_cwk_implemented;
40: Fetch check_cwk_implemented INTO l_check_cwk_implemented;
41: Close check_cwk_implemented;
42: pa_funds_control_utils2.g_cwk_implemented_flag := l_check_cwk_implemented;

Line 42: pa_funds_control_utils2.g_cwk_implemented_flag := l_check_cwk_implemented;

38: If pa_funds_control_utils2.g_cwk_implemented_flag is NULL Then
39: Open check_cwk_implemented;
40: Fetch check_cwk_implemented INTO l_check_cwk_implemented;
41: Close check_cwk_implemented;
42: pa_funds_control_utils2.g_cwk_implemented_flag := l_check_cwk_implemented;
43: Else
44: l_check_cwk_implemented := pa_funds_control_utils2.g_cwk_implemented_flag ;
45: End If;
46:

Line 44: l_check_cwk_implemented := pa_funds_control_utils2.g_cwk_implemented_flag ;

40: Fetch check_cwk_implemented INTO l_check_cwk_implemented;
41: Close check_cwk_implemented;
42: pa_funds_control_utils2.g_cwk_implemented_flag := l_check_cwk_implemented;
43: Else
44: l_check_cwk_implemented := pa_funds_control_utils2.g_cwk_implemented_flag ;
45: End If;
46:
47: If l_check_cwk_implemented = 'Y' Then
48:

Line 198: PA_DEBUG.set_curr_function('PA_FUNDS_CONTROL_UTILS2.get_CWK_RLMI');

194: l_debug_mode varchar2(100) := 'N';
195:
196: BEGIN
197: --Initialize the error stack
198: PA_DEBUG.set_curr_function('PA_FUNDS_CONTROL_UTILS2.get_CWK_RLMI');
199:
200: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
201: l_debug_mode := NVL(l_debug_mode, 'N');
202:

Line 377: PA_DEBUG.set_curr_function('PA_FUNDS_CONTROL_UTILS2.checkCWKbdCostCodes');

373: AND NVL(pt.burden_amt_display_method,'N') = 'D';
374:
375: BEGIN
376:
377: PA_DEBUG.set_curr_function('PA_FUNDS_CONTROL_UTILS2.checkCWKbdCostCodes');
378:
379: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
380: l_debug_mode := NVL(l_debug_mode, 'N');
381:

Line 396: IF (p_project_id <> NVL(pa_funds_control_utils2.g_bd_cache_proj_id,0) OR

392: l_debug_stage := 'Inside checkCWKbdCostCodes api';
393: print_msg(l_debug_mode,l_debug_stage);
394:
395: -- Check the summary record burden components count
396: IF (p_project_id <> NVL(pa_funds_control_utils2.g_bd_cache_proj_id,0) OR
397: p_task_id <> nvl(pa_funds_control_utils2.g_bd_cache_task_id,0) OR
398: p_doc_line_id <> nvl(pa_funds_control_utils2.g_bd_cache_doc_line_id,0) OR
399: p_exp_type <> nvl(pa_funds_control_utils2.g_bd_cache_exp_type,'') OR
400: p_exp_item_date <> nvl(pa_funds_control_utils2.g_bd_cache_Ei_date,'') ) THEN

Line 397: p_task_id <> nvl(pa_funds_control_utils2.g_bd_cache_task_id,0) OR

393: print_msg(l_debug_mode,l_debug_stage);
394:
395: -- Check the summary record burden components count
396: IF (p_project_id <> NVL(pa_funds_control_utils2.g_bd_cache_proj_id,0) OR
397: p_task_id <> nvl(pa_funds_control_utils2.g_bd_cache_task_id,0) OR
398: p_doc_line_id <> nvl(pa_funds_control_utils2.g_bd_cache_doc_line_id,0) OR
399: p_exp_type <> nvl(pa_funds_control_utils2.g_bd_cache_exp_type,'') OR
400: p_exp_item_date <> nvl(pa_funds_control_utils2.g_bd_cache_Ei_date,'') ) THEN
401: l_debug_stage := 'Excuting cursor to fetch the values';

Line 398: p_doc_line_id <> nvl(pa_funds_control_utils2.g_bd_cache_doc_line_id,0) OR

394:
395: -- Check the summary record burden components count
396: IF (p_project_id <> NVL(pa_funds_control_utils2.g_bd_cache_proj_id,0) OR
397: p_task_id <> nvl(pa_funds_control_utils2.g_bd_cache_task_id,0) OR
398: p_doc_line_id <> nvl(pa_funds_control_utils2.g_bd_cache_doc_line_id,0) OR
399: p_exp_type <> nvl(pa_funds_control_utils2.g_bd_cache_exp_type,'') OR
400: p_exp_item_date <> nvl(pa_funds_control_utils2.g_bd_cache_Ei_date,'') ) THEN
401: l_debug_stage := 'Excuting cursor to fetch the values';
402: print_msg(l_debug_mode,l_debug_stage);

Line 399: p_exp_type <> nvl(pa_funds_control_utils2.g_bd_cache_exp_type,'') OR

395: -- Check the summary record burden components count
396: IF (p_project_id <> NVL(pa_funds_control_utils2.g_bd_cache_proj_id,0) OR
397: p_task_id <> nvl(pa_funds_control_utils2.g_bd_cache_task_id,0) OR
398: p_doc_line_id <> nvl(pa_funds_control_utils2.g_bd_cache_doc_line_id,0) OR
399: p_exp_type <> nvl(pa_funds_control_utils2.g_bd_cache_exp_type,'') OR
400: p_exp_item_date <> nvl(pa_funds_control_utils2.g_bd_cache_Ei_date,'') ) THEN
401: l_debug_stage := 'Excuting cursor to fetch the values';
402: print_msg(l_debug_mode,l_debug_stage);
403: l_exp_string:= null;

Line 400: p_exp_item_date <> nvl(pa_funds_control_utils2.g_bd_cache_Ei_date,'') ) THEN

396: IF (p_project_id <> NVL(pa_funds_control_utils2.g_bd_cache_proj_id,0) OR
397: p_task_id <> nvl(pa_funds_control_utils2.g_bd_cache_task_id,0) OR
398: p_doc_line_id <> nvl(pa_funds_control_utils2.g_bd_cache_doc_line_id,0) OR
399: p_exp_type <> nvl(pa_funds_control_utils2.g_bd_cache_exp_type,'') OR
400: p_exp_item_date <> nvl(pa_funds_control_utils2.g_bd_cache_Ei_date,'') ) THEN
401: l_debug_stage := 'Excuting cursor to fetch the values';
402: print_msg(l_debug_mode,l_debug_stage);
403: l_exp_string:= null;
404: l_expCostCodeCount := 0;

Line 419: pa_funds_control_utils2.g_bd_cache_exp_string := l_exp_string;

415: End If;
416: l_exp_string:= substr(l_exp_string,1,length(l_exp_string)-1);
417: l_debug_stage := 'Summary Record CostCodes['||l_exp_string||']CostCodeCount['||l_expCostCodeCount||']' ;
418: print_msg(l_debug_mode,l_debug_stage);
419: pa_funds_control_utils2.g_bd_cache_exp_string := l_exp_string;
420: pa_funds_control_utils2.g_bd_cache_proj_id := p_project_id;
421: pa_funds_control_utils2.g_bd_cache_task_id := p_task_id;
422: pa_funds_control_utils2.g_bd_cache_doc_line_id := p_doc_line_id;
423: pa_funds_control_utils2.g_bd_cache_exp_type := p_exp_type;

Line 420: pa_funds_control_utils2.g_bd_cache_proj_id := p_project_id;

416: l_exp_string:= substr(l_exp_string,1,length(l_exp_string)-1);
417: l_debug_stage := 'Summary Record CostCodes['||l_exp_string||']CostCodeCount['||l_expCostCodeCount||']' ;
418: print_msg(l_debug_mode,l_debug_stage);
419: pa_funds_control_utils2.g_bd_cache_exp_string := l_exp_string;
420: pa_funds_control_utils2.g_bd_cache_proj_id := p_project_id;
421: pa_funds_control_utils2.g_bd_cache_task_id := p_task_id;
422: pa_funds_control_utils2.g_bd_cache_doc_line_id := p_doc_line_id;
423: pa_funds_control_utils2.g_bd_cache_exp_type := p_exp_type;
424: pa_funds_control_utils2.g_bd_cache_Ei_date := p_exp_item_date;

Line 421: pa_funds_control_utils2.g_bd_cache_task_id := p_task_id;

417: l_debug_stage := 'Summary Record CostCodes['||l_exp_string||']CostCodeCount['||l_expCostCodeCount||']' ;
418: print_msg(l_debug_mode,l_debug_stage);
419: pa_funds_control_utils2.g_bd_cache_exp_string := l_exp_string;
420: pa_funds_control_utils2.g_bd_cache_proj_id := p_project_id;
421: pa_funds_control_utils2.g_bd_cache_task_id := p_task_id;
422: pa_funds_control_utils2.g_bd_cache_doc_line_id := p_doc_line_id;
423: pa_funds_control_utils2.g_bd_cache_exp_type := p_exp_type;
424: pa_funds_control_utils2.g_bd_cache_Ei_date := p_exp_item_date;
425: If l_exp_string is NULL Then

Line 422: pa_funds_control_utils2.g_bd_cache_doc_line_id := p_doc_line_id;

418: print_msg(l_debug_mode,l_debug_stage);
419: pa_funds_control_utils2.g_bd_cache_exp_string := l_exp_string;
420: pa_funds_control_utils2.g_bd_cache_proj_id := p_project_id;
421: pa_funds_control_utils2.g_bd_cache_task_id := p_task_id;
422: pa_funds_control_utils2.g_bd_cache_doc_line_id := p_doc_line_id;
423: pa_funds_control_utils2.g_bd_cache_exp_type := p_exp_type;
424: pa_funds_control_utils2.g_bd_cache_Ei_date := p_exp_item_date;
425: If l_exp_string is NULL Then
426: l_error_flag := 'N';

Line 423: pa_funds_control_utils2.g_bd_cache_exp_type := p_exp_type;

419: pa_funds_control_utils2.g_bd_cache_exp_string := l_exp_string;
420: pa_funds_control_utils2.g_bd_cache_proj_id := p_project_id;
421: pa_funds_control_utils2.g_bd_cache_task_id := p_task_id;
422: pa_funds_control_utils2.g_bd_cache_doc_line_id := p_doc_line_id;
423: pa_funds_control_utils2.g_bd_cache_exp_type := p_exp_type;
424: pa_funds_control_utils2.g_bd_cache_Ei_date := p_exp_item_date;
425: If l_exp_string is NULL Then
426: l_error_flag := 'N';
427:

Line 424: pa_funds_control_utils2.g_bd_cache_Ei_date := p_exp_item_date;

420: pa_funds_control_utils2.g_bd_cache_proj_id := p_project_id;
421: pa_funds_control_utils2.g_bd_cache_task_id := p_task_id;
422: pa_funds_control_utils2.g_bd_cache_doc_line_id := p_doc_line_id;
423: pa_funds_control_utils2.g_bd_cache_exp_type := p_exp_type;
424: pa_funds_control_utils2.g_bd_cache_Ei_date := p_exp_item_date;
425: If l_exp_string is NULL Then
426: l_error_flag := 'N';
427:
428: Elsif l_exp_string is NOT NULL Then

Line 508: pa_funds_control_utils2.g_bd_cache_result_code := l_result_code;

504: l_result_code := NULL;
505: l_status_code := 'P';
506: l_return_status := 'S';
507: End If;
508: pa_funds_control_utils2.g_bd_cache_result_code := l_result_code;
509: pa_funds_control_utils2.g_bd_cache_status_code := l_status_code;
510:
511: ELSE
512: l_exp_string := pa_funds_control_utils2.g_bd_cache_exp_string;

Line 509: pa_funds_control_utils2.g_bd_cache_status_code := l_status_code;

505: l_status_code := 'P';
506: l_return_status := 'S';
507: End If;
508: pa_funds_control_utils2.g_bd_cache_result_code := l_result_code;
509: pa_funds_control_utils2.g_bd_cache_status_code := l_status_code;
510:
511: ELSE
512: l_exp_string := pa_funds_control_utils2.g_bd_cache_exp_string;
513: l_status_code := pa_funds_control_utils2.g_bd_cache_status_code;

Line 512: l_exp_string := pa_funds_control_utils2.g_bd_cache_exp_string;

508: pa_funds_control_utils2.g_bd_cache_result_code := l_result_code;
509: pa_funds_control_utils2.g_bd_cache_status_code := l_status_code;
510:
511: ELSE
512: l_exp_string := pa_funds_control_utils2.g_bd_cache_exp_string;
513: l_status_code := pa_funds_control_utils2.g_bd_cache_status_code;
514: l_result_code := pa_funds_control_utils2.g_bd_cache_result_code;
515:
516: END If;

Line 513: l_status_code := pa_funds_control_utils2.g_bd_cache_status_code;

509: pa_funds_control_utils2.g_bd_cache_status_code := l_status_code;
510:
511: ELSE
512: l_exp_string := pa_funds_control_utils2.g_bd_cache_exp_string;
513: l_status_code := pa_funds_control_utils2.g_bd_cache_status_code;
514: l_result_code := pa_funds_control_utils2.g_bd_cache_result_code;
515:
516: END If;
517: l_debug_stage := 'End Of checkCWKbdCostCodes Statuscode['||l_status_code||']Rescode['||l_result_code||']';

Line 514: l_result_code := pa_funds_control_utils2.g_bd_cache_result_code;

510:
511: ELSE
512: l_exp_string := pa_funds_control_utils2.g_bd_cache_exp_string;
513: l_status_code := pa_funds_control_utils2.g_bd_cache_status_code;
514: l_result_code := pa_funds_control_utils2.g_bd_cache_result_code;
515:
516: END If;
517: l_debug_stage := 'End Of checkCWKbdCostCodes Statuscode['||l_status_code||']Rescode['||l_result_code||']';
518: print_msg(l_debug_mode,l_debug_stage);

Line 543: pa_funds_control_utils2.g_bd_cache_status_code := NULL;

539: when others then
540: x_return_status := 'U';
541: x_status_code := 'T';
542: x_result_code := 'F100';
543: pa_funds_control_utils2.g_bd_cache_status_code := NULL;
544: pa_funds_control_utils2.g_bd_cache_result_code := NULL;
545: pa_funds_control_utils2.g_bd_cache_exp_string := NULL;
546: pa_debug.reset_err_stack;
547: RAISE;

Line 544: pa_funds_control_utils2.g_bd_cache_result_code := NULL;

540: x_return_status := 'U';
541: x_status_code := 'T';
542: x_result_code := 'F100';
543: pa_funds_control_utils2.g_bd_cache_status_code := NULL;
544: pa_funds_control_utils2.g_bd_cache_result_code := NULL;
545: pa_funds_control_utils2.g_bd_cache_exp_string := NULL;
546: pa_debug.reset_err_stack;
547: RAISE;
548:

Line 545: pa_funds_control_utils2.g_bd_cache_exp_string := NULL;

541: x_status_code := 'T';
542: x_result_code := 'F100';
543: pa_funds_control_utils2.g_bd_cache_status_code := NULL;
544: pa_funds_control_utils2.g_bd_cache_result_code := NULL;
545: pa_funds_control_utils2.g_bd_cache_exp_string := NULL;
546: pa_debug.reset_err_stack;
547: RAISE;
548:
549: END checkCWKbdCostCodes;