DBA Data[Home] [Help]

APPS.PA_BUDGET_ACCOUNT_PKG dependencies on PA_FCK_UTIL

Line 56: PA_FCK_UTIL.debug_msg('Entering Gen_Account ..........');

52: PRAGMA AUTONOMOUS_TRANSACTION;
53:
54: BEGIN
55:
56: PA_FCK_UTIL.debug_msg('Entering Gen_Account ..........');
57: PA_FCK_UTIL.debug_msg('p_calling_mode ..........'||p_calling_mode);
58: l_Return_Status := FND_API.G_RET_STS_SUCCESS;
59:
60: -----------------------------------------------------------------+

Line 57: PA_FCK_UTIL.debug_msg('p_calling_mode ..........'||p_calling_mode);

53:
54: BEGIN
55:
56: PA_FCK_UTIL.debug_msg('Entering Gen_Account ..........');
57: PA_FCK_UTIL.debug_msg('p_calling_mode ..........'||p_calling_mode);
58: l_Return_Status := FND_API.G_RET_STS_SUCCESS;
59:
60: -----------------------------------------------------------------+
61: -- Fetch the values of Budget_type_Code and Project_ID and

Line 64: PA_FCK_UTIL.debug_msg('Before executing bc controls select statement ..........');

60: -----------------------------------------------------------------+
61: -- Fetch the values of Budget_type_Code and Project_ID and
62: -- Also check If Budgetry Control is implemented
63: -----------------------------------------------------------------+
64: PA_FCK_UTIL.debug_msg('Before executing bc controls select statement ..........');
65: BEGIN
66: SELECT
67: BVER.Budget_Type_Code BUDGET_TYPE_CODE,
68: BVER.Project_ID PROJECT_ID,

Line 85: PA_FCK_UTIL.debug_msg(' '||to_char(SQL%ROWCOUNT)||' Rows selected/update/deleted/inserted ..........');

81: AND BCO.Budget_Type_Code = BVER.Budget_Type_Code
82: AND BCO.Project_ID = BVER.Project_ID
83: AND BCO.External_Budget_Code IS NOT NULL ;
84: END;
85: PA_FCK_UTIL.debug_msg(' '||to_char(SQL%ROWCOUNT)||' Rows selected/update/deleted/inserted ..........');
86:
87: -----------------------------------------------------------------+
88: -- If found then call API Gen_Acct_All_Lines() to generate CCID
89: -- for all its Budget Lines

Line 108: PA_FCK_UTIL.debug_msg('Exiting Gen_Account ..........');

104: X_Msg_Data := l_Msg_Data ;
105:
106: COMMIT;
107:
108: PA_FCK_UTIL.debug_msg('Exiting Gen_Account ..........');
109: RETURN;
110:
111: EXCEPTION
112: WHEN OTHERS THEN

Line 239: PA_FCK_UTIL.debug_msg('Entering Gen_Acct_All_Lines ..........');

235: l_txn_exists_against_project varchar2(1);
236: l_prev_ccid pa_budget_lines.code_combination_id%type;
237: BEGIN
238:
239: PA_FCK_UTIL.debug_msg('Entering Gen_Acct_All_Lines ..........');
240: l_Return_Status := FND_API.G_RET_STS_SUCCESS;
241:
242: PA_FCK_UTIL.debug_msg('p_calling_mode ..........'||p_calling_mode);
243: -----------------------------------------------+

Line 242: PA_FCK_UTIL.debug_msg('p_calling_mode ..........'||p_calling_mode);

238:
239: PA_FCK_UTIL.debug_msg('Entering Gen_Acct_All_Lines ..........');
240: l_Return_Status := FND_API.G_RET_STS_SUCCESS;
241:
242: PA_FCK_UTIL.debug_msg('p_calling_mode ..........'||p_calling_mode);
243: -----------------------------------------------+
244: -- Get the budgetary control options
245: -----------------------------------------------+
246: pa_fck_util.debug_msg('Opening budget_funds cursor') ;

Line 246: pa_fck_util.debug_msg('Opening budget_funds cursor') ;

242: PA_FCK_UTIL.debug_msg('p_calling_mode ..........'||p_calling_mode);
243: -----------------------------------------------+
244: -- Get the budgetary control options
245: -----------------------------------------------+
246: pa_fck_util.debug_msg('Opening budget_funds cursor') ;
247: pa_fck_util.debug_msg('proj_id '||to_char(p_project_id)||'bver_id '
248: ||to_char(p_budget_version_id ));
249:
250: OPEN c_Budget_funds ;

Line 247: pa_fck_util.debug_msg('proj_id '||to_char(p_project_id)||'bver_id '

243: -----------------------------------------------+
244: -- Get the budgetary control options
245: -----------------------------------------------+
246: pa_fck_util.debug_msg('Opening budget_funds cursor') ;
247: pa_fck_util.debug_msg('proj_id '||to_char(p_project_id)||'bver_id '
248: ||to_char(p_budget_version_id ));
249:
250: OPEN c_Budget_funds ;
251: FETCH c_Budget_funds

Line 286: PA_FCK_UTIL.debug_msg('after selecting proj org details ..........');

282: PROJ.Project_ID = P_Project_ID
283: AND ORG.Organization_ID = PROJ.Carrying_Out_Organization_ID ;
284: END;
285:
286: PA_FCK_UTIL.debug_msg('after selecting proj org details ..........');
287:
288: /* Code addition for bug 2914197 starts */
289: ---------------------------------------------------------+
290: -- Get class code from Project ID parameter

Line 307: PA_FCK_UTIL.debug_msg('after selecting class code ..........');

303: EXCEPTION
304: WHEN NO_DATA_FOUND THEN
305: l_Project_Class_Code := null;
306: END;
307: PA_FCK_UTIL.debug_msg('after selecting class code ..........');
308:
309: /* Code addition for bug 2914197 ends */
310:
311: ----------------------------------------------------+

Line 348: PA_FCK_UTIL.debug_msg('after selecting max version number ..........'||to_char(l_max_version_number));

344: ELSE
345: l_Prev_Budget_Version_ID := NULL;
346: END IF;
347:
348: PA_FCK_UTIL.debug_msg('after selecting max version number ..........'||to_char(l_max_version_number));
349: PA_FCK_UTIL.debug_msg('after selecting prev_budget_version_id ..........'||to_char(l_prev_budget_version_id));
350: PA_FCK_UTIL.debug_msg('p_calling_mode ......'||p_calling_mode);
351: PA_FCK_UTIL.debug_msg('P_Budget_Version_ID ......'||P_Budget_Version_ID);
352: PA_FCK_UTIL.debug_msg('l_Project_Start_Date ......'||l_Project_Start_Date);

Line 349: PA_FCK_UTIL.debug_msg('after selecting prev_budget_version_id ..........'||to_char(l_prev_budget_version_id));

345: l_Prev_Budget_Version_ID := NULL;
346: END IF;
347:
348: PA_FCK_UTIL.debug_msg('after selecting max version number ..........'||to_char(l_max_version_number));
349: PA_FCK_UTIL.debug_msg('after selecting prev_budget_version_id ..........'||to_char(l_prev_budget_version_id));
350: PA_FCK_UTIL.debug_msg('p_calling_mode ......'||p_calling_mode);
351: PA_FCK_UTIL.debug_msg('P_Budget_Version_ID ......'||P_Budget_Version_ID);
352: PA_FCK_UTIL.debug_msg('l_Project_Start_Date ......'||l_Project_Start_Date);
353: PA_FCK_UTIL.debug_msg('l_Project_End_Date ......'||l_Project_End_Date);

Line 350: PA_FCK_UTIL.debug_msg('p_calling_mode ......'||p_calling_mode);

346: END IF;
347:
348: PA_FCK_UTIL.debug_msg('after selecting max version number ..........'||to_char(l_max_version_number));
349: PA_FCK_UTIL.debug_msg('after selecting prev_budget_version_id ..........'||to_char(l_prev_budget_version_id));
350: PA_FCK_UTIL.debug_msg('p_calling_mode ......'||p_calling_mode);
351: PA_FCK_UTIL.debug_msg('P_Budget_Version_ID ......'||P_Budget_Version_ID);
352: PA_FCK_UTIL.debug_msg('l_Project_Start_Date ......'||l_Project_Start_Date);
353: PA_FCK_UTIL.debug_msg('l_Project_End_Date ......'||l_Project_End_Date);
354:

Line 351: PA_FCK_UTIL.debug_msg('P_Budget_Version_ID ......'||P_Budget_Version_ID);

347:
348: PA_FCK_UTIL.debug_msg('after selecting max version number ..........'||to_char(l_max_version_number));
349: PA_FCK_UTIL.debug_msg('after selecting prev_budget_version_id ..........'||to_char(l_prev_budget_version_id));
350: PA_FCK_UTIL.debug_msg('p_calling_mode ......'||p_calling_mode);
351: PA_FCK_UTIL.debug_msg('P_Budget_Version_ID ......'||P_Budget_Version_ID);
352: PA_FCK_UTIL.debug_msg('l_Project_Start_Date ......'||l_Project_Start_Date);
353: PA_FCK_UTIL.debug_msg('l_Project_End_Date ......'||l_Project_End_Date);
354:
355: IF P_Calling_Mode = 'BASELINE'

Line 352: PA_FCK_UTIL.debug_msg('l_Project_Start_Date ......'||l_Project_Start_Date);

348: PA_FCK_UTIL.debug_msg('after selecting max version number ..........'||to_char(l_max_version_number));
349: PA_FCK_UTIL.debug_msg('after selecting prev_budget_version_id ..........'||to_char(l_prev_budget_version_id));
350: PA_FCK_UTIL.debug_msg('p_calling_mode ......'||p_calling_mode);
351: PA_FCK_UTIL.debug_msg('P_Budget_Version_ID ......'||P_Budget_Version_ID);
352: PA_FCK_UTIL.debug_msg('l_Project_Start_Date ......'||l_Project_Start_Date);
353: PA_FCK_UTIL.debug_msg('l_Project_End_Date ......'||l_Project_End_Date);
354:
355: IF P_Calling_Mode = 'BASELINE'
356: THEN

Line 353: PA_FCK_UTIL.debug_msg('l_Project_End_Date ......'||l_Project_End_Date);

349: PA_FCK_UTIL.debug_msg('after selecting prev_budget_version_id ..........'||to_char(l_prev_budget_version_id));
350: PA_FCK_UTIL.debug_msg('p_calling_mode ......'||p_calling_mode);
351: PA_FCK_UTIL.debug_msg('P_Budget_Version_ID ......'||P_Budget_Version_ID);
352: PA_FCK_UTIL.debug_msg('l_Project_Start_Date ......'||l_Project_Start_Date);
353: PA_FCK_UTIL.debug_msg('l_Project_End_Date ......'||l_Project_End_Date);
354:
355: IF P_Calling_Mode = 'BASELINE'
356: THEN
357: --------------------------------------------------+

Line 362: PA_FCK_UTIL.debug_msg(' before calling .... Insert_Into_Budget_Lines ');

358: -- Create Budget Line records in PA_BUDGET_LINES
359: -- whose GL Periods are not existing ...
360: -- NOT REQUIRED TO GENERATE : 04/23/01
361: --------------------------------------------------+
362: PA_FCK_UTIL.debug_msg(' before calling .... Insert_Into_Budget_Lines ');
363: PA_BUDGET_ACCOUNT_PKG.Insert_Into_Budget_Lines (
364: P_Budget_Version_ID,
365: P_Project_ID,
366: l_Project_Start_Date,

Line 373: PA_FCK_UTIL.debug_msg('after calling insert into budget lines ..........');

369: l_Msg_Count,
370: l_Msg_Data );
371: END IF;
372:
373: PA_FCK_UTIL.debug_msg('after calling insert into budget lines ..........');
374: ------------------------------------------------------------+
375: -- Delete all account lines from PA_BUDGET_ACCT_LINES
376: -- pertaining to a given Current Budget Version ID
377: ------------------------------------------------------------+

Line 383: PA_FCK_UTIL.debug_msg('after deleting from budget acct lines ..........');

379: DELETE FROM PA_BUDGET_ACCT_LINES
380: WHERE Budget_Version_ID = p_Budget_Version_ID;
381: END IF;
382:
383: PA_FCK_UTIL.debug_msg('after deleting from budget acct lines ..........');
384: l_Error_Flag := 'N' ;
385: PA_FCK_UTIL.debug_msg('budget version id '||to_char(p_budget_version_id) );
386:
387:

Line 385: PA_FCK_UTIL.debug_msg('budget version id '||to_char(p_budget_version_id) );

381: END IF;
382:
383: PA_FCK_UTIL.debug_msg('after deleting from budget acct lines ..........');
384: l_Error_Flag := 'N' ;
385: PA_FCK_UTIL.debug_msg('budget version id '||to_char(p_budget_version_id) );
386:
387:
388: -- Following code has been added to take care of the scenario where
389: -- 'Account generator' is called to change the accounts

Line 401: PA_FCK_UTIL.debug_msg('Check if txns. exists ..');

397: nvl(l_Budget_Amount_Code,'R') = 'C' and
398: l_Prev_Budget_Version_ID is not null
399: ) then -- I
400:
401: PA_FCK_UTIL.debug_msg('Check if txns. exists ..');
402: -- Check if txn. exists against the project
403: -- This needs to be done only if its a re-baseline
404:
405: Begin -- II

Line 429: PA_FCK_UTIL.debug_msg('l_txn_exists_against_project:['||l_txn_exists_against_project||']');

425: End; -- III
426: End; -- II
427: End If; -- I
428:
429: PA_FCK_UTIL.debug_msg('l_txn_exists_against_project:['||l_txn_exists_against_project||']');
430: PA_FCK_UTIL.debug_msg('P_Budget_Entry_Level_Code:'||P_Budget_Entry_Level_Code);
431:
432:
433: FOR bl IN cur_All_Budget_Lines -- Loop thru every Budget Line

Line 430: PA_FCK_UTIL.debug_msg('P_Budget_Entry_Level_Code:'||P_Budget_Entry_Level_Code);

426: End; -- II
427: End If; -- I
428:
429: PA_FCK_UTIL.debug_msg('l_txn_exists_against_project:['||l_txn_exists_against_project||']');
430: PA_FCK_UTIL.debug_msg('P_Budget_Entry_Level_Code:'||P_Budget_Entry_Level_Code);
431:
432:
433: FOR bl IN cur_All_Budget_Lines -- Loop thru every Budget Line
434: LOOP

Line 445: PA_FCK_UTIL.debug_msg('before calling gen_acct_line ..........');

441: IF (p_Calling_Mode IN ('BASELINE','SUBMIT') AND bl.CCID_old IS NULL ) OR
442: (P_Calling_Mode = 'GENERATE_ACCOUNT')
443: THEN
444:
445: PA_FCK_UTIL.debug_msg('before calling gen_acct_line ..........');
446: PA_BUDGET_ACCOUNT_PKG.Gen_Acct_Line (
447: P_Budget_Entry_Level_Code,
448: P_Budget_Type_Code,
449: P_Budget_Version_ID,

Line 483: PA_FCK_UTIL.debug_msg(to_char(l_ccid)||' l_ccid ..........(after calling gen_acct_line )');

479: l_Concat_Descrs,
480: l_Error_Message
481: );
482:
483: PA_FCK_UTIL.debug_msg(to_char(l_ccid)||' l_ccid ..........(after calling gen_acct_line )');
484: PA_FCK_UTIL.debug_msg((l_error_message)||' l_error_message ..........(after calling gen_acct_line )');
485: PA_FCK_UTIL.debug_msg((l_return_status)||' l_return_status ..........(after calling gen_acct_line )');
486:
487:

Line 484: PA_FCK_UTIL.debug_msg((l_error_message)||' l_error_message ..........(after calling gen_acct_line )');

480: l_Error_Message
481: );
482:
483: PA_FCK_UTIL.debug_msg(to_char(l_ccid)||' l_ccid ..........(after calling gen_acct_line )');
484: PA_FCK_UTIL.debug_msg((l_error_message)||' l_error_message ..........(after calling gen_acct_line )');
485: PA_FCK_UTIL.debug_msg((l_return_status)||' l_return_status ..........(after calling gen_acct_line )');
486:
487:
488: -- Following code added to validate the accounts that are being generated ..

Line 485: PA_FCK_UTIL.debug_msg((l_return_status)||' l_return_status ..........(after calling gen_acct_line )');

481: );
482:
483: PA_FCK_UTIL.debug_msg(to_char(l_ccid)||' l_ccid ..........(after calling gen_acct_line )');
484: PA_FCK_UTIL.debug_msg((l_error_message)||' l_error_message ..........(after calling gen_acct_line )');
485: PA_FCK_UTIL.debug_msg((l_return_status)||' l_return_status ..........(after calling gen_acct_line )');
486:
487:
488: -- Following code added to validate the accounts that are being generated ..
489: -- If txn. exists against the budget line then account change is not allowed ..

Line 499: PA_FCK_UTIL.debug_msg('Retrieve ccid from latest budget version');

495:
496: --IF P_Calling_Mode = 'GENERATE_ACCOUNT' then ----------------------------------------------------+
497: Begin
498:
499: PA_FCK_UTIL.debug_msg('Retrieve ccid from latest budget version');
500:
501: select code_combination_id
502: into l_prev_ccid
503: from pa_budget_lines pbl,

Line 514: PA_FCK_UTIL.debug_msg('Retrieved ccid from latest budget version:'||l_prev_ccid);

510: and pbl.resource_assignment_id = pra.resource_assignment_id
511: and pbl.start_date = bl.start_date
512: and pbl.txn_currency_code = bl.txn_currency_code;
513:
514: PA_FCK_UTIL.debug_msg('Retrieved ccid from latest budget version:'||l_prev_ccid);
515:
516: Exception
517: when no_data_found then
518: PA_FCK_UTIL.debug_msg('Retrieve ccid from latest budget version .. failed');

Line 518: PA_FCK_UTIL.debug_msg('Retrieve ccid from latest budget version .. failed');

514: PA_FCK_UTIL.debug_msg('Retrieved ccid from latest budget version:'||l_prev_ccid);
515:
516: Exception
517: when no_data_found then
518: PA_FCK_UTIL.debug_msg('Retrieve ccid from latest budget version .. failed');
519:
520: -- this can happen if the old budget version did not have data
521: l_prev_ccid := -99;
522:

Line 528: PA_FCK_UTIL.debug_msg('Calling pa_funds_control_utils.is_Account_change_allowed2 ..');

524: --END IF; ---------------------------------------------------------------------------+
525:
526: If nvl(l_prev_ccid,-99) <> l_ccid then -- II
527:
528: PA_FCK_UTIL.debug_msg('Calling pa_funds_control_utils.is_Account_change_allowed2 ..');
529: PA_FCK_UTIL.debug_msg('Period_name ['||bl.period_name||'] Task_id ['||bl.task_id||'] RLMI ['
530: ||bl.resource_list_member_id||']');
531:
532: IF pa_funds_control_utils.is_Account_change_allowed2

Line 529: PA_FCK_UTIL.debug_msg('Period_name ['||bl.period_name||'] Task_id ['||bl.task_id||'] RLMI ['

525:
526: If nvl(l_prev_ccid,-99) <> l_ccid then -- II
527:
528: PA_FCK_UTIL.debug_msg('Calling pa_funds_control_utils.is_Account_change_allowed2 ..');
529: PA_FCK_UTIL.debug_msg('Period_name ['||bl.period_name||'] Task_id ['||bl.task_id||'] RLMI ['
530: ||bl.resource_list_member_id||']');
531:
532: IF pa_funds_control_utils.is_Account_change_allowed2
533: (p_budget_version_id => l_Prev_Budget_Version_ID,

Line 545: PA_FCK_UTIL.debug_msg('pa_funds_control_utils.is_Account_change_allowed2 failed');

541: p_entry_level_code => P_Budget_Entry_Level_Code,
542: p_mode => 'FORM') = 'N'
543: THEN -- III
544:
545: PA_FCK_UTIL.debug_msg('pa_funds_control_utils.is_Account_change_allowed2 failed');
546: If nvl(l_prev_ccid,-99) <> -99 then -- IV
547:
548: -- Basically assigning the old value back ....
549: PA_FCK_UTIL.debug_msg('Assigning old value back');

Line 549: PA_FCK_UTIL.debug_msg('Assigning old value back');

545: PA_FCK_UTIL.debug_msg('pa_funds_control_utils.is_Account_change_allowed2 failed');
546: If nvl(l_prev_ccid,-99) <> -99 then -- IV
547:
548: -- Basically assigning the old value back ....
549: PA_FCK_UTIL.debug_msg('Assigning old value back');
550: l_ccid := l_prev_ccid;
551:
552: Else
553: l_Return_Status := FND_API.G_RET_STS_ERROR;

Line 564: PA_FCK_UTIL.debug_msg('F169: ccid['||l_ccid||'] for task['||bl.task_number||'] resource ['||bl.resource_name||'] period ['||bl.period_name||']');

560: and lookup_code = 'F169';
561:
562: l_Error_message := l_Error_message;
563:
564: PA_FCK_UTIL.debug_msg('F169: ccid['||l_ccid||'] for task['||bl.task_number||'] resource ['||bl.resource_name||'] period ['||bl.period_name||']');
565: PA_FCK_UTIL.debug_msg('Failed validation: ccid['||l_ccid||'] for task_id['||bl.task_id||'] top task ['||bl.top_task_id||
566: '] resource ['||bl.resource_list_member_id||'] parent rlmi ['|| bl.parent_resource_id||']');
567:
568: End If; -- IV

Line 565: PA_FCK_UTIL.debug_msg('Failed validation: ccid['||l_ccid||'] for task_id['||bl.task_id||'] top task ['||bl.top_task_id||

561:
562: l_Error_message := l_Error_message;
563:
564: PA_FCK_UTIL.debug_msg('F169: ccid['||l_ccid||'] for task['||bl.task_number||'] resource ['||bl.resource_name||'] period ['||bl.period_name||']');
565: PA_FCK_UTIL.debug_msg('Failed validation: ccid['||l_ccid||'] for task_id['||bl.task_id||'] top task ['||bl.top_task_id||
566: '] resource ['||bl.resource_list_member_id||'] parent rlmi ['|| bl.parent_resource_id||']');
567:
568: End If; -- IV
569:

Line 713: PA_FCK_UTIL.debug_msg('Exiting Gen_Acct_All_Lines ..........');

709: AND BL2.Start_Date = BL1.Start_Date ) ;
710: END IF;
711: END;
712:
713: PA_FCK_UTIL.debug_msg('Exiting Gen_Acct_All_Lines ..........');
714: RETURN;
715:
716: EXCEPTION
717:

Line 823: PA_FCK_UTIL.debug_msg('Entering Gen_Acct_Lines ..........');

819: l_code_combination BOOLEAN;
820:
821: BEGIN
822:
823: PA_FCK_UTIL.debug_msg('Entering Gen_Acct_Lines ..........');
824: l_Return_Status := FND_API.G_RET_STS_SUCCESS;
825:
826: ------------------------------------------------------------------+
827: -- Derive Task Parameters only when Top Task Details are present.

Line 851: PA_FCK_UTIL.debug_msg(l_return_status||' gen before calling Derive_Task_Params ..........');

847: task_Id = p_task_Id
848: AND project_Id = p_project_Id ;
849: END;
850:
851: PA_FCK_UTIL.debug_msg(l_return_status||' gen before calling Derive_Task_Params ..........');
852: ------------------------------------------------+
853: -- Now Derive Task Parameters and their Details
854: ------------------------------------------------+
855: PA_BUDGET_ACCOUNT_PKG.Derive_Task_Params (

Line 868: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling Derive_Task_Params ..........');

864: X_return_status => l_Return_Status,
865: X_Msg_Count => l_Msg_Count,
866: X_Msg_Data => l_Msg_Data
867: );
868: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling Derive_Task_Params ..........');
869: END IF;
870:
871: PA_FCK_UTIL.debug_msg(l_return_status||' gen before calling derive_res_para ..........');
872: ------------------------------------------------+

Line 871: PA_FCK_UTIL.debug_msg(l_return_status||' gen before calling derive_res_para ..........');

867: );
868: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling Derive_Task_Params ..........');
869: END IF;
870:
871: PA_FCK_UTIL.debug_msg(l_return_status||' gen before calling derive_res_para ..........');
872: ------------------------------------------------+
873: -- Derive Resource Parameters and their Details
874: ------------------------------------------------+
875: PA_BUDGET_ACCOUNT_PKG.Derive_Resource_Params (

Line 893: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling derive_res_para ..........');

889: X_Msg_Count => l_Msg_Count,
890: X_Msg_Data => l_Msg_Data
891: );
892:
893: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling derive_res_para ..........');
894: select sob.chart_of_accounts_id
895: into l_chart_of_accounts_id
896: from pa_implementations imp, gl_sets_of_books sob
897: where imp.set_of_books_id = sob.set_of_books_id;

Line 899: PA_FCK_UTIL.debug_msg(l_return_status||' gen after getting chart of account id ..........');

895: into l_chart_of_accounts_id
896: from pa_implementations imp, gl_sets_of_books sob
897: where imp.set_of_books_id = sob.set_of_books_id;
898:
899: PA_FCK_UTIL.debug_msg(l_return_status||' gen after getting chart of account id ..........');
900: -------------------------------------+
901: -- Call API FND initialize function
902: -------------------------------------+
903: l_Itemkey := fnd_Flex_workflow.initialize

Line 910: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling initialize ..........');

906: num => l_Chart_of_Accounts_Id,
907: itemtype => l_Itemtype);
908:
909:
910: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling initialize ..........');
911: ------------------------------------------------------------+
912: -- BEGIN: Initialize / Set ALL the workflow item attributes
913: ------------------------------------------------------------+
914:

Line 920: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling set CHART_OF_ACCOUNTS_ID ..........');

916: itemkey => l_Itemkey,
917: aname => 'CHART_OF_ACCOUNTS_ID',
918: avalue => l_Chart_of_Accounts_Id);
919:
920: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling set CHART_OF_ACCOUNTS_ID ..........');
921: --------------------------------------------------------+
922: -- Set Item Attributes for workflow items BUDGET DETAILS
923: --------------------------------------------------------+
924: wf_Engine.SetItemAttrText( itemtype => l_Itemtype,

Line 929: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling set BUDGET_TYPE ..........');

925: itemkey => l_Itemkey,
926: aname => 'BUDGET_TYPE',
927: avalue => p_Budget_type_Code);
928:
929: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling set BUDGET_TYPE ..........');
930: wf_Engine.SetItemAttrText( itemtype => l_Itemtype,
931: itemkey => l_Itemkey,
932: aname => 'BUDGET_ENTRY_LEVEL',
933: avalue => p_Budget_Entry_Level_Code);

Line 934: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling set BUDGET_ENTRY_LEVEL ..........');

930: wf_Engine.SetItemAttrText( itemtype => l_Itemtype,
931: itemkey => l_Itemkey,
932: aname => 'BUDGET_ENTRY_LEVEL',
933: avalue => p_Budget_Entry_Level_Code);
934: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling set BUDGET_ENTRY_LEVEL ..........');
935:
936: wf_Engine.SetItemAttrText( itemtype => l_Itemtype,
937: itemkey => l_Itemkey,
938: aname => 'BUDGET_VERSION_ID',

Line 941: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling set BUDGET_VERSION_ID ..........');

937: itemkey => l_Itemkey,
938: aname => 'BUDGET_VERSION_ID',
939: avalue => p_Budget_version_Id);
940:
941: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling set BUDGET_VERSION_ID ..........');
942: ---------------------------------------------------------+
943: -- Set Item Attributes for workflow items PROJECT DETAILS
944: ---------------------------------------------------------+
945: wf_Engine.SetItemAttrNumber( itemtype => l_Itemtype,

Line 950: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling set PROJECT_ID ..........');

946: itemkey => l_Itemkey,
947: aname => 'PROJECT_ID',
948: avalue => p_project_Id);
949:
950: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling set PROJECT_ID ..........');
951: wf_Engine.SetItemAttrText( itemtype => l_Itemtype,
952: itemkey => l_Itemkey,
953: aname => 'PROJECT_NUMBER',
954: avalue => p_project_number);

Line 956: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling set PROJECT_NUMBER ..........');

952: itemkey => l_Itemkey,
953: aname => 'PROJECT_NUMBER',
954: avalue => p_project_number);
955:
956: PA_FCK_UTIL.debug_msg(l_return_status||' gen after calling set PROJECT_NUMBER ..........');
957: wf_Engine.SetItemAttrText( itemtype => l_Itemtype,
958: itemkey => l_Itemkey,
959: aname => 'PROJECT_ORG_NAME',
960: avalue => p_project_org_name);

Line 979: PA_FCK_UTIL.debug_msg(l_return_status||' gen after set PROJECT DETAILS ..........');

975: itemkey => l_Itemkey,
976: aname => 'PROJECT_TYPE',
977: avalue => p_project_type);
978:
979: PA_FCK_UTIL.debug_msg(l_return_status||' gen after set PROJECT DETAILS ..........');
980: ----------------------------------------------------------+
981: -- Set Item Attributes for workflow items TOP TASK DETAILS
982: ----------------------------------------------------------+
983: wf_Engine.SetItemAttrNumber( itemtype => l_Itemtype,

Line 1008: PA_FCK_UTIL.debug_msg(l_return_status||' gen after set TOP TASK DETAILS ..........');

1004: itemkey => l_Itemkey,
1005: aname => 'TASK_ORG_NAME',
1006: avalue => l_task_org_name);
1007:
1008: PA_FCK_UTIL.debug_msg(l_return_status||' gen after set TOP TASK DETAILS ..........');
1009: ----------------------------------------------------------+
1010: -- Set Item Attributes for workflow items LOW TASK DETAILS
1011: ----------------------------------------------------------+
1012: PA_FCK_UTIL.debug_msg('low_task_id '||to_char(l_low_task_Id));

Line 1012: PA_FCK_UTIL.debug_msg('low_task_id '||to_char(l_low_task_Id));

1008: PA_FCK_UTIL.debug_msg(l_return_status||' gen after set TOP TASK DETAILS ..........');
1009: ----------------------------------------------------------+
1010: -- Set Item Attributes for workflow items LOW TASK DETAILS
1011: ----------------------------------------------------------+
1012: PA_FCK_UTIL.debug_msg('low_task_id '||to_char(l_low_task_Id));
1013: PA_FCK_UTIL.debug_msg('l_low_task_number *'||l_low_task_number||'*');
1014: wf_Engine.SetItemAttrNumber( itemtype => l_Itemtype,
1015: itemkey => l_Itemkey,
1016: aname => 'LOW_TASK_ID',

Line 1013: PA_FCK_UTIL.debug_msg('l_low_task_number *'||l_low_task_number||'*');

1009: ----------------------------------------------------------+
1010: -- Set Item Attributes for workflow items LOW TASK DETAILS
1011: ----------------------------------------------------------+
1012: PA_FCK_UTIL.debug_msg('low_task_id '||to_char(l_low_task_Id));
1013: PA_FCK_UTIL.debug_msg('l_low_task_number *'||l_low_task_number||'*');
1014: wf_Engine.SetItemAttrNumber( itemtype => l_Itemtype,
1015: itemkey => l_Itemkey,
1016: aname => 'LOW_TASK_ID',
1017: avalue => l_low_task_Id);

Line 1019: PA_FCK_UTIL.debug_msg(l_return_status||' gen after set LOW TASK ID ..........');

1015: itemkey => l_Itemkey,
1016: aname => 'LOW_TASK_ID',
1017: avalue => l_low_task_Id);
1018:
1019: PA_FCK_UTIL.debug_msg(l_return_status||' gen after set LOW TASK ID ..........');
1020: wf_Engine.SetItemAttrText( itemtype => l_Itemtype,
1021: itemkey => l_Itemkey,
1022: aname => 'LOW_TASK_NUMBER',
1023: avalue => l_low_task_number);

Line 1025: PA_FCK_UTIL.debug_msg(l_return_status||' gen after set LOW TASK NUMBER ..........');

1021: itemkey => l_Itemkey,
1022: aname => 'LOW_TASK_NUMBER',
1023: avalue => l_low_task_number);
1024:
1025: PA_FCK_UTIL.debug_msg(l_return_status||' gen after set LOW TASK NUMBER ..........');
1026: --------------------------------------------------------------------------+
1027: -- Set ALL resource related Item Attributes if Resource List Flag is TRUE
1028: --------------------------------------------------------------------------+
1029: IF p_resource_list_Flag = 'Y' THEN

Line 1055: PA_FCK_UTIL.debug_msg(l_return_status||' gen after set RESOURCE LIST DETAILS ..........');

1051: itemkey => l_Itemkey,
1052: aname => 'BUDGET_LINE_START_DATE',
1053: avalue => p_start_Date);
1054:
1055: PA_FCK_UTIL.debug_msg(l_return_status||' gen after set RESOURCE LIST DETAILS ..........');
1056: --------------------------------------------------------------------------+
1057: -- Set Item Attributes for workflow items PERSON/EMPLOYEE DETAILS (Resource Type)
1058: --------------------------------------------------------------------------+
1059: wf_Engine.SetItemAttrNumber( itemtype => l_Itemtype,

Line 1076: PA_FCK_UTIL.debug_msg(l_return_status||' gen after set PERSON/EMPLOYEE LIST DETAILS ..........');

1072: itemkey => l_Itemkey,
1073: aname => 'PERSON_TYPE',
1074: avalue => l_Person_Type);
1075:
1076: PA_FCK_UTIL.debug_msg(l_return_status||' gen after set PERSON/EMPLOYEE LIST DETAILS ..........');
1077: PA_FCK_UTIL.debug_msg(l_return_status||' p_expenditure_type ... '||p_Expenditure_type);
1078: -----------------------------------------------------------------------+
1079: -- Set Item Attributes for workflow items EXPENDITURE CATEGORY DETAILS
1080: -----------------------------------------------------------------------+

Line 1077: PA_FCK_UTIL.debug_msg(l_return_status||' p_expenditure_type ... '||p_Expenditure_type);

1073: aname => 'PERSON_TYPE',
1074: avalue => l_Person_Type);
1075:
1076: PA_FCK_UTIL.debug_msg(l_return_status||' gen after set PERSON/EMPLOYEE LIST DETAILS ..........');
1077: PA_FCK_UTIL.debug_msg(l_return_status||' p_expenditure_type ... '||p_Expenditure_type);
1078: -----------------------------------------------------------------------+
1079: -- Set Item Attributes for workflow items EXPENDITURE CATEGORY DETAILS
1080: -----------------------------------------------------------------------+
1081: wf_Engine.SetItemAttrText( itemtype => l_Itemtype,

Line 1117: PA_FCK_UTIL.debug_msg(l_return_status||' gen after set EXP CAT/DETAIL JOB DETAILS ..........');

1113: itemkey => l_Itemkey,
1114: aname => 'JOB_GROUP_NAME',
1115: avalue => l_Job_Group_name);
1116:
1117: PA_FCK_UTIL.debug_msg(l_return_status||' gen after set EXP CAT/DETAIL JOB DETAILS ..........');
1118: ------------------------------------------------------------------------------+
1119: -- Set Item Attributes for workflow items ORGANIZATION DETAILS (Resource Type)
1120: ------------------------------------------------------------------------------+
1121: wf_Engine.SetItemAttrNumber( itemtype => l_Itemtype,

Line 1154: PA_FCK_UTIL.debug_msg(l_return_status||' gen before calling generate ..........');

1150: ----------------------------------------------------------------------------+
1151: -- END: Initialize / Set ALL the workflow item attributes and Resource Types
1152: ----------------------------------------------------------------------------+
1153:
1154: PA_FCK_UTIL.debug_msg(l_return_status||' gen before calling generate ..........');
1155: --------------------------------------------------------------------------------+
1156: -- Call the workflow Generate function to trigger off the w/f account generation
1157: --------------------------------------------------------------------------------+
1158: /*Modified the call to generate function to resolve bug 2266072.Added

Line 1172: PA_FCK_UTIL.debug_msg(' gen success ..........');

1168: l_Error_message,
1169: l_code_combination);
1170:
1171: if l_result then
1172: PA_FCK_UTIL.debug_msg(' gen success ..........');
1173: else
1174: PA_FCK_UTIL.debug_msg(' gen failure ..........');
1175: end if;
1176: PA_FCK_UTIL.debug_msg(to_char(l_return_ccid)||' gen l_ccid ..........');

Line 1174: PA_FCK_UTIL.debug_msg(' gen failure ..........');

1170:
1171: if l_result then
1172: PA_FCK_UTIL.debug_msg(' gen success ..........');
1173: else
1174: PA_FCK_UTIL.debug_msg(' gen failure ..........');
1175: end if;
1176: PA_FCK_UTIL.debug_msg(to_char(l_return_ccid)||' gen l_ccid ..........');
1177: PA_FCK_UTIL.debug_msg((l_error_message)||' gen l_error_message ..........');
1178: ------------------------------------------------------------------+

Line 1176: PA_FCK_UTIL.debug_msg(to_char(l_return_ccid)||' gen l_ccid ..........');

1172: PA_FCK_UTIL.debug_msg(' gen success ..........');
1173: else
1174: PA_FCK_UTIL.debug_msg(' gen failure ..........');
1175: end if;
1176: PA_FCK_UTIL.debug_msg(to_char(l_return_ccid)||' gen l_ccid ..........');
1177: PA_FCK_UTIL.debug_msg((l_error_message)||' gen l_error_message ..........');
1178: ------------------------------------------------------------------+
1179: -- Copy the return values to the corresponding output parameters
1180: ------------------------------------------------------------------+

Line 1177: PA_FCK_UTIL.debug_msg((l_error_message)||' gen l_error_message ..........');

1173: else
1174: PA_FCK_UTIL.debug_msg(' gen failure ..........');
1175: end if;
1176: PA_FCK_UTIL.debug_msg(to_char(l_return_ccid)||' gen l_ccid ..........');
1177: PA_FCK_UTIL.debug_msg((l_error_message)||' gen l_error_message ..........');
1178: ------------------------------------------------------------------+
1179: -- Copy the return values to the corresponding output parameters
1180: ------------------------------------------------------------------+
1181:

Line 1203: PA_FCK_UTIL.debug_msg('Exiting Gen_Acct_Lines ..........');

1199: ELSE
1200: x_return_status := 'E';
1201: END IF;
1202:
1203: PA_FCK_UTIL.debug_msg('Exiting Gen_Acct_Lines ..........');
1204: RETURN;
1205:
1206: EXCEPTION
1207: WHEN OTHERS THEN

Line 1208: PA_FCK_UTIL.debug_msg(' Unexpected Error ..........');

1204: RETURN;
1205:
1206: EXCEPTION
1207: WHEN OTHERS THEN
1208: PA_FCK_UTIL.debug_msg(' Unexpected Error ..........');
1209: PA_FCK_UTIL.debug_msg(SUBSTR(SQLERRM, 1, 240));
1210: X_Msg_Count := 1;
1211: X_Msg_Data := SUBSTR(SQLERRM, 1, 240);
1212: X_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1209: PA_FCK_UTIL.debug_msg(SUBSTR(SQLERRM, 1, 240));

1205:
1206: EXCEPTION
1207: WHEN OTHERS THEN
1208: PA_FCK_UTIL.debug_msg(' Unexpected Error ..........');
1209: PA_FCK_UTIL.debug_msg(SUBSTR(SQLERRM, 1, 240));
1210: X_Msg_Count := 1;
1211: X_Msg_Data := SUBSTR(SQLERRM, 1, 240);
1212: X_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
1213:

Line 1263: PA_FCK_UTIL.debug_msg('Entering Upd_Budget_Acct_Line ...... ');

1259: BEGIN
1260:
1261: l_Return_Status := FND_API.G_RET_STS_SUCCESS;
1262:
1263: PA_FCK_UTIL.debug_msg('Entering Upd_Budget_Acct_Line ...... ');
1264: -------------------------------------------------------------------------------+
1265: -- Update a record for a combination of ( Budget_Verison, GL_Period and CCID )
1266: -- If No_Data_Found then create a new record
1267: -------------------------------------------------------------------------------+

Line 1269: PA_FCK_UTIL.debug_msg(' bdg_ver, p_start_date, p_ccid .. '||to_char(p_Budget_Version_ID)||' , '||to_char(p_Start_Date,'DD-MON-YYYY')||' , '||to_char(p_CCID));

1265: -- Update a record for a combination of ( Budget_Verison, GL_Period and CCID )
1266: -- If No_Data_Found then create a new record
1267: -------------------------------------------------------------------------------+
1268:
1269: PA_FCK_UTIL.debug_msg(' bdg_ver, p_start_date, p_ccid .. '||to_char(p_Budget_Version_ID)||' , '||to_char(p_Start_Date,'DD-MON-YYYY')||' , '||to_char(p_CCID));
1270: BEGIN
1271: UPDATE
1272: PA_BUDGET_ACCT_LINES
1273: SET

Line 1284: PA_FCK_UTIL.debug_msg('updated pa_budget_acct_line ......row '||to_char(l_update_count));

1280: AND Code_Combination_ID = p_CCID ;
1281:
1282: l_update_count := SQL%ROWCOUNT;
1283:
1284: PA_FCK_UTIL.debug_msg('updated pa_budget_acct_line ......row '||to_char(l_update_count));
1285: PA_FCK_UTIL.debug_msg('previous budget version id ......row '||to_char(p_prev_budget_version_id));
1286:
1287: IF l_update_count = 0 THEN
1288: PA_FCK_UTIL.debug_msg(' record not found ');

Line 1285: PA_FCK_UTIL.debug_msg('previous budget version id ......row '||to_char(p_prev_budget_version_id));

1281:
1282: l_update_count := SQL%ROWCOUNT;
1283:
1284: PA_FCK_UTIL.debug_msg('updated pa_budget_acct_line ......row '||to_char(l_update_count));
1285: PA_FCK_UTIL.debug_msg('previous budget version id ......row '||to_char(p_prev_budget_version_id));
1286:
1287: IF l_update_count = 0 THEN
1288: PA_FCK_UTIL.debug_msg(' record not found ');
1289: -- Check the prev. Baselined budget record in PA_BUDGET_ACCT_LINES table

Line 1288: PA_FCK_UTIL.debug_msg(' record not found ');

1284: PA_FCK_UTIL.debug_msg('updated pa_budget_acct_line ......row '||to_char(l_update_count));
1285: PA_FCK_UTIL.debug_msg('previous budget version id ......row '||to_char(p_prev_budget_version_id));
1286:
1287: IF l_update_count = 0 THEN
1288: PA_FCK_UTIL.debug_msg(' record not found ');
1289: -- Check the prev. Baselined budget record in PA_BUDGET_ACCT_LINES table
1290: IF p_Prev_Budget_Version_ID IS NOT NULL
1291: THEN
1292: BEGIN

Line 1314: PA_FCK_UTIL.debug_msg(' p_b_amt, p_av_amt '||to_char(l_Prev_Ver_Budget_Amount)||','||to_char(l_Prev_Ver_Budget_Amount) );

1310: l_Prev_Ver_Budget_Amount := 0;
1311: l_Prev_Ver_Available_Amount := 0;
1312: END IF;
1313:
1314: PA_FCK_UTIL.debug_msg(' p_b_amt, p_av_amt '||to_char(l_Prev_Ver_Budget_Amount)||','||to_char(l_Prev_Ver_Budget_Amount) );
1315:
1316: INSERT INTO PA_BUDGET_ACCT_LINES (
1317: Budget_Acct_Line_ID,
1318: Budget_Version_ID,

Line 1364: PA_FCK_UTIL.debug_msg(' failed with the error '||SUBSTR(SQLERRM, 1, 240));

1360: RETURN;
1361:
1362: EXCEPTION
1363: WHEN OTHERS THEN
1364: PA_FCK_UTIL.debug_msg(' failed with the error '||SUBSTR(SQLERRM, 1, 240));
1365: X_Msg_Count := 1;
1366: X_Msg_Data := SUBSTR(SQLERRM, 1, 240);
1367: X_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
1368:

Line 1463: PA_FCK_UTIL.debug_msg(' Entering Insert_Into_Budget_Lines ');

1459: AND GLPRD2.Set_Of_Books_ID = IMP2.Set_Of_Books_ID ;
1460:
1461: BEGIN
1462:
1463: PA_FCK_UTIL.debug_msg(' Entering Insert_Into_Budget_Lines ');
1464: l_Return_Status := FND_API.G_RET_STS_SUCCESS;
1465:
1466: PA_FCK_UTIL.debug_msg('P_Budget_Version_ID ......'||P_Budget_Version_ID);
1467: PA_FCK_UTIL.debug_msg('P_Project_Id ......'||P_Project_Id);

Line 1466: PA_FCK_UTIL.debug_msg('P_Budget_Version_ID ......'||P_Budget_Version_ID);

1462:
1463: PA_FCK_UTIL.debug_msg(' Entering Insert_Into_Budget_Lines ');
1464: l_Return_Status := FND_API.G_RET_STS_SUCCESS;
1465:
1466: PA_FCK_UTIL.debug_msg('P_Budget_Version_ID ......'||P_Budget_Version_ID);
1467: PA_FCK_UTIL.debug_msg('P_Project_Id ......'||P_Project_Id);
1468: PA_FCK_UTIL.debug_msg('p_Project_Start_Date ......'||P_Project_Start_Date);
1469: PA_FCK_UTIL.debug_msg('p_Project_End_Date ......'||p_Project_End_Date);
1470:

Line 1467: PA_FCK_UTIL.debug_msg('P_Project_Id ......'||P_Project_Id);

1463: PA_FCK_UTIL.debug_msg(' Entering Insert_Into_Budget_Lines ');
1464: l_Return_Status := FND_API.G_RET_STS_SUCCESS;
1465:
1466: PA_FCK_UTIL.debug_msg('P_Budget_Version_ID ......'||P_Budget_Version_ID);
1467: PA_FCK_UTIL.debug_msg('P_Project_Id ......'||P_Project_Id);
1468: PA_FCK_UTIL.debug_msg('p_Project_Start_Date ......'||P_Project_Start_Date);
1469: PA_FCK_UTIL.debug_msg('p_Project_End_Date ......'||p_Project_End_Date);
1470:
1471: IF P_Project_Start_Date IS NULL OR

Line 1468: PA_FCK_UTIL.debug_msg('p_Project_Start_Date ......'||P_Project_Start_Date);

1464: l_Return_Status := FND_API.G_RET_STS_SUCCESS;
1465:
1466: PA_FCK_UTIL.debug_msg('P_Budget_Version_ID ......'||P_Budget_Version_ID);
1467: PA_FCK_UTIL.debug_msg('P_Project_Id ......'||P_Project_Id);
1468: PA_FCK_UTIL.debug_msg('p_Project_Start_Date ......'||P_Project_Start_Date);
1469: PA_FCK_UTIL.debug_msg('p_Project_End_Date ......'||p_Project_End_Date);
1470:
1471: IF P_Project_Start_Date IS NULL OR
1472: P_Project_End_Date IS NULL

Line 1469: PA_FCK_UTIL.debug_msg('p_Project_End_Date ......'||p_Project_End_Date);

1465:
1466: PA_FCK_UTIL.debug_msg('P_Budget_Version_ID ......'||P_Budget_Version_ID);
1467: PA_FCK_UTIL.debug_msg('P_Project_Id ......'||P_Project_Id);
1468: PA_FCK_UTIL.debug_msg('p_Project_Start_Date ......'||P_Project_Start_Date);
1469: PA_FCK_UTIL.debug_msg('p_Project_End_Date ......'||p_Project_End_Date);
1470:
1471: IF P_Project_Start_Date IS NULL OR
1472: P_Project_End_Date IS NULL
1473: THEN

Line 1486: PA_FCK_UTIL.debug_msg(' Boundary code is Year');

1482: AND PBCO.Budget_Type_Code = PBV.Budget_Type_Code;
1483:
1484:
1485: IF nvl(l_boundary_code,'P') = 'Y' then
1486: PA_FCK_UTIL.debug_msg(' Boundary code is Year');
1487:
1488: SELECT MAX(BL.End_Date)
1489: INTO l_BL_Max_Date
1490: FROM PA_Budget_Lines BL

Line 1493: PA_FCK_UTIL.debug_msg(' Max. end date is:'||l_BL_Max_Date);

1489: INTO l_BL_Max_Date
1490: FROM PA_Budget_Lines BL
1491: WHERE BL.Budget_Version_ID = p_Budget_Version_ID;
1492:
1493: PA_FCK_UTIL.debug_msg(' Max. end date is:'||l_BL_Max_Date);
1494:
1495: Select set_of_books_id into l_set_of_books_id from pa_implementations;
1496:
1497: PA_FCK_UTIL.debug_msg(' SOB ID:' ||l_set_of_books_id);

Line 1497: PA_FCK_UTIL.debug_msg(' SOB ID:' ||l_set_of_books_id);

1493: PA_FCK_UTIL.debug_msg(' Max. end date is:'||l_BL_Max_Date);
1494:
1495: Select set_of_books_id into l_set_of_books_id from pa_implementations;
1496:
1497: PA_FCK_UTIL.debug_msg(' SOB ID:' ||l_set_of_books_id);
1498:
1499: SELECT gps.year_start_date,
1500: ADD_MONTHS (gps.year_start_date, 12 ) - 1
1501: INTO t_GL_Start_Date,

Line 1510: PA_FCK_UTIL.debug_msg(' Boundary code is not Year');

1506: AND l_BL_Max_Date BETWEEN gps.start_date AND gps.end_date
1507: AND gps.adjustment_period_flag = 'N';
1508:
1509: ELSE
1510: PA_FCK_UTIL.debug_msg(' Boundary code is not Year');
1511:
1512: SELECT
1513: MIN(BL.start_Date), -- decode(p_Start_Date, NULL, MIN(BL.start_Date), p_Start_Date)
1514: MAX(BL.End_Date) -- decode(p_End_Date, NULL, MAX(BL.End_Date), p_End_Date)

Line 1527: PA_FCK_UTIL.debug_msg(' selected max bl start and end date ');

1523: AND RA.Resource_Assignment_ID = BL.Resource_Assignment_ID ;
1524:
1525: END IF;
1526:
1527: PA_FCK_UTIL.debug_msg(' selected max bl start and end date ');
1528:
1529: IF p_Project_Start_Date IS NULL
1530: THEN
1531: l_GL_Start_Date := t_GL_Start_Date ;

Line 1546: PA_FCK_UTIL.debug_msg(' start_date '||to_char(l_GL_Start_Date)||' end date '||to_char(l_Gl_End_Date));

1542: l_GL_Start_Date := P_Project_Start_Date;
1543: l_GL_End_Date := P_Project_End_Date;
1544: END IF;
1545:
1546: PA_FCK_UTIL.debug_msg(' start_date '||to_char(l_GL_Start_Date)||' end date '||to_char(l_Gl_End_Date));
1547: FOR GlPrds IN cur_GL_Periods -- For every missed GL Periods
1548: LOOP
1549:
1550: l_Resource_Assignment_ID := GlPrds.Resource_Assignment_ID ;

Line 1556: PA_FCK_UTIL.debug_msg(' res_id '||to_char(l_Resource_Assignment_ID)||' start date '||to_char(GlPrds.Start_Date));

1552: -- Call table handler for inserting into PA_BUDGET_LINES with amount=0
1553: ----------------------------------------------------------------------+
1554: BEGIN
1555:
1556: PA_FCK_UTIL.debug_msg(' res_id '||to_char(l_Resource_Assignment_ID)||' start date '||to_char(GlPrds.Start_Date));
1557: PA_FCK_UTIL.debug_msg(' P_Budget_Version_ID '||P_Budget_Version_ID);
1558: PA_FCK_UTIL.debug_msg(' GlPrds.Period_Name '||GlPrds.Period_Name);
1559:
1560: IF GlPrds.Task_ID = -1 then

Line 1557: PA_FCK_UTIL.debug_msg(' P_Budget_Version_ID '||P_Budget_Version_ID);

1553: ----------------------------------------------------------------------+
1554: BEGIN
1555:
1556: PA_FCK_UTIL.debug_msg(' res_id '||to_char(l_Resource_Assignment_ID)||' start date '||to_char(GlPrds.Start_Date));
1557: PA_FCK_UTIL.debug_msg(' P_Budget_Version_ID '||P_Budget_Version_ID);
1558: PA_FCK_UTIL.debug_msg(' GlPrds.Period_Name '||GlPrds.Period_Name);
1559:
1560: IF GlPrds.Task_ID = -1 then
1561: l_Task_ID := NULL;

Line 1558: PA_FCK_UTIL.debug_msg(' GlPrds.Period_Name '||GlPrds.Period_Name);

1554: BEGIN
1555:
1556: PA_FCK_UTIL.debug_msg(' res_id '||to_char(l_Resource_Assignment_ID)||' start date '||to_char(GlPrds.Start_Date));
1557: PA_FCK_UTIL.debug_msg(' P_Budget_Version_ID '||P_Budget_Version_ID);
1558: PA_FCK_UTIL.debug_msg(' GlPrds.Period_Name '||GlPrds.Period_Name);
1559:
1560: IF GlPrds.Task_ID = -1 then
1561: l_Task_ID := NULL;
1562: ELSE

Line 1630: PA_FCK_UTIL.debug_msg(' after insert res_id '||to_char(l_Resource_Assignment_ID)||' start date '||to_char(GlPrds.Start_Date));

1626: -- Bug Fix: 4569365. Removed MRC code.
1627: -- ,x_mrc_flag => 'Y' /* FPB2 MRC */
1628: -- );
1629:
1630: PA_FCK_UTIL.debug_msg(' after insert res_id '||to_char(l_Resource_Assignment_ID)||' start date '||to_char(GlPrds.Start_Date));
1631: END;
1632:
1633: END LOOP; -- End of cursor Missed GL Periods
1634:

Line 1643: PA_FCK_UTIL.debug_msg(' ERROR INSERT_INTO_BUDGET_LINES '||SQLERRM);

1639: RETURN;
1640:
1641: EXCEPTION
1642: WHEN OTHERS THEN
1643: PA_FCK_UTIL.debug_msg(' ERROR INSERT_INTO_BUDGET_LINES '||SQLERRM);
1644: X_Msg_Count := 1;
1645: X_Msg_Data := SUBSTR(SQLERRM, 1, 240);
1646: X_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
1647: