DBA Data[Home] [Help]

APPS.GMS_BUDGET_UTILS dependencies on GMS_BUDGET_UTILS

Line 1: package body gms_budget_utils as

1: package body gms_budget_utils as
2: /* $Header: gmsbubub.pls 120.5 2006/04/11 23:00:34 cmishra ship $ */
3:
4: NO_DATA_FOUND_ERR number := 100;
5:

Line 69: gms_error_pkg.gms_debug('*** Start of GMS_BUDGET_UTILS.GET_BASELINED_VERSION_ID ***','C');

65: old_stack varchar2(630);
66: begin
67:
68: IF L_DEBUG = 'Y' THEN
69: gms_error_pkg.gms_debug('*** Start of GMS_BUDGET_UTILS.GET_BASELINED_VERSION_ID ***','C');
70: END IF;
71:
72: x_err_code := 0;
73: old_stack := x_err_stack;

Line 76: x_err_stage := 'GMS_BUDGET_UTILS.GET_BASELINED_VERSION_ID- get baselined budget id <' || to_char(x_project_id)

72: x_err_code := 0;
73: old_stack := x_err_stack;
74: x_err_stack := x_err_stack || '->get_baselined_version_id';
75:
76: x_err_stage := 'GMS_BUDGET_UTILS.GET_BASELINED_VERSION_ID- get baselined budget id <' || to_char(x_project_id)
77: || '><' || x_budget_type_code || '>' ;
78:
79: select budget_version_id
80: into x_budget_version_id

Line 90: gms_error_pkg.gms_debug('*** End of GMS_BUDGET_UTILS.GET_BASELINED_VERSION_ID ***','C');

86:
87: x_err_stack := old_stack;
88:
89: IF L_DEBUG = 'Y' THEN
90: gms_error_pkg.gms_debug('*** End of GMS_BUDGET_UTILS.GET_BASELINED_VERSION_ID ***','C');
91: END IF;
92:
93: exception
94: when NO_DATA_FOUND then

Line 95: x_err_stage:= 'GMS_BUDGET_UTILS.GET_BASELINED_VERSION_ID- In NO_DATA_FOUND exception';

91: END IF;
92:
93: exception
94: when NO_DATA_FOUND then
95: x_err_stage:= 'GMS_BUDGET_UTILS.GET_BASELINED_VERSION_ID- In NO_DATA_FOUND exception';
96: gms_error_pkg.gms_message(x_err_name => 'GMS_BU_CORE_NO_VERSION_ID',
97: x_err_code => x_err_code,
98: x_err_buff => x_err_stage);
99:

Line 101: x_err_stage:= 'GMS_BUDGET_UTILS.GET_BASELINED_VERSION_ID- In others exception';

97: x_err_code => x_err_code,
98: x_err_buff => x_err_stage);
99:
100: when others then
101: x_err_stage:= 'GMS_BUDGET_UTILS.GET_BASELINED_VERSION_ID- In others exception';
102: gms_error_pkg.gms_message( x_err_name => 'GMS_UNEXPECTED_ERROR',
103: x_token_name1 => 'SQLCODE',
104: x_token_val1 => sqlcode,
105: x_token_name2 => 'SQLERRM',

Line 188: gms_budget_utils.get_baselined_version_id(x_project_id,

184: -- Get the baselined version
185: x_err_stage := 'get baselined budget id <' || to_char(x_project_id)
186: || '><' || x_award_id || '>';
187:
188: gms_budget_utils.get_baselined_version_id(x_project_id,
189: x_award_id,
190: x_budget_type_code,
191: x_baselined_version_id,
192: x_err_code,

Line 886: -- dbms_output.put_line('GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES - Inside');

882: l_ext_err_msg_count NUMBER := 0;
883:
884:
885: BEGIN
886: -- dbms_output.put_line('GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES - Inside');
887: IF L_DEBUG = 'Y' THEN
888: gms_error_pkg.gms_debug('*** Start of GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES ***','C');
889: gms_error_pkg.gms_debug('GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- p_event : '||p_event,'C');
890: END IF;

Line 888: gms_error_pkg.gms_debug('*** Start of GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES ***','C');

884:
885: BEGIN
886: -- dbms_output.put_line('GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES - Inside');
887: IF L_DEBUG = 'Y' THEN
888: gms_error_pkg.gms_debug('*** Start of GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES ***','C');
889: gms_error_pkg.gms_debug('GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- p_event : '||p_event,'C');
890: END IF;
891:
892: -- Initialize OUT-parameters for multiple error messaging

Line 889: gms_error_pkg.gms_debug('GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- p_event : '||p_event,'C');

885: BEGIN
886: -- dbms_output.put_line('GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES - Inside');
887: IF L_DEBUG = 'Y' THEN
888: gms_error_pkg.gms_debug('*** Start of GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES ***','C');
889: gms_error_pkg.gms_debug('GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- p_event : '||p_event,'C');
890: END IF;
891:
892: -- Initialize OUT-parameters for multiple error messaging
893:

Line 903: p_err_stage := 'GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- Error occurred while validating employee info';

899: l_old_stack := p_err_stack;
900: p_err_stack := p_err_stack || '->check_budget_rules';
901:
902: IF( PA_UTILS.GetEmpIdFromUser(p_created_by ) IS NULL) THEN
903: p_err_stage := 'GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- Error occurred while validating employee info';
904: gms_error_pkg.gms_message( x_err_name => 'GMS_ALL_WARN_NO_EMPL_REC',
905: x_err_code => p_err_code,
906: x_err_buff => p_err_stage);
907:

Line 929: p_err_stage := 'GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- get draft budget info <' || to_char(p_draft_version_id)

925: ELSE
926:
927: -- GMS Standard BASELINE validation.
928:
929: p_err_stage := 'GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- get draft budget info <' || to_char(p_draft_version_id)
930: || '>';
931:
932:
933: -- check if there is at least one project or task draft budget exists

Line 935: p_err_stage := 'GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- check budget exists <' || to_char(p_draft_version_id)

931:
932:
933: -- check if there is at least one project or task draft budget exists
934:
935: p_err_stage := 'GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- check budget exists <' || to_char(p_draft_version_id)
936: || '>';
937:
938: BEGIN
939: select 1

Line 949: p_err_stage := 'GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- In NO_DATA_FOUND exception';

945: where budget_version_id = p_draft_version_id);
946:
947: EXCEPTION
948: WHEN NO_DATA_FOUND THEN
949: p_err_stage := 'GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- In NO_DATA_FOUND exception';
950: gms_error_pkg.gms_message( x_err_name => 'GMS_NO_BUDGET_LINES', -- 'GMS_BU_NO_BUDGET', Bug 2587078
951: x_err_code => p_err_code,
952: x_err_buff => p_err_stage);
953:

Line 965: p_err_stage := 'GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- In OTHERS exception';

961:
962:
963: WHEN OTHERS
964: THEN
965: p_err_stage := 'GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- In OTHERS exception';
966: gms_error_pkg.gms_message( x_err_name => 'GMS_UNEXPECTED_ERROR',
967: x_token_name1 => 'SQLCODE',
968: x_token_val1 => sqlcode,
969: x_token_name2 => 'SQLERRM',

Line 979: ( p_pkg_name => 'GMS_BUDGET_UTILS'

975: p_err_msg_count := FND_MSG_PUB.Count_Msg; -- jjj - ????
976:
977: /* p_err_code := SQLCODE;
978: FND_MSG_PUB.Add_Exc_Msg
979: ( p_pkg_name => 'GMS_BUDGET_UTILS'
980: , p_procedure_name => 'VERIFY_BUDGET_RULES'
981: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
982: );
983: p_err_msg_count := FND_MSG_PUB.Count_Msg;

Line 993: p_err_stage := 'GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- Check Client Extn Verify Budget Rules <' || to_char(p_project_id )

989: END IF; -- OP Standard Validations
990:
991: -- Client Specific Validations --------------------------------------------------
992:
993: p_err_stage := 'GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- Check Client Extn Verify Budget Rules <' || to_char(p_project_id )
994: || '><'|| p_budget_type_code
995: || '>'|| to_char(p_draft_version_id)
996: || '>'|| p_mark_as_original
997: || '>';

Line 1025: gms_error_pkg.gms_debug('GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- GMS_CLIENT_EXTN_BUDGET.Verify_Budget_Rules returned failure status','C');

1021:
1022: IF (l_ext_err_msg_count > 0)
1023: THEN
1024: IF L_DEBUG = 'Y' THEN
1025: gms_error_pkg.gms_debug('GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- GMS_CLIENT_EXTN_BUDGET.Verify_Budget_Rules returned failure status','C');
1026: END IF;
1027:
1028: IF (l_ext_warnings_only_flag = 'N') THEN
1029: p_warnings_only_flag := 'N';

Line 1037: gms_error_pkg.gms_debug('*** End of GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES ***','C');

1033: p_err_msg_count := FND_MSG_PUB.Count_Msg;
1034: p_err_stack := l_old_stack;
1035:
1036: IF L_DEBUG = 'Y' THEN
1037: gms_error_pkg.gms_debug('*** End of GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES ***','C');
1038: END IF;
1039:
1040: EXCEPTION
1041: WHEN OTHERS

Line 1044: p_err_stage := 'GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- In others exception';

1040: EXCEPTION
1041: WHEN OTHERS
1042: THEN
1043:
1044: p_err_stage := 'GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES- In others exception';
1045: gms_error_pkg.gms_message( x_err_name => 'GMS_UNEXPECTED_ERROR',
1046: x_token_name1 => 'SQLCODE',
1047: x_token_val1 => sqlcode,
1048: x_token_name2 => 'SQLERRM',

Line 1058: ( p_pkg_name => 'GMS_BUDGET_UTILS'

1054: p_err_msg_count := FND_MSG_PUB.Count_Msg;
1055:
1056: /* p_err_code := SQLCODE;
1057: FND_MSG_PUB.Add_Exc_Msg
1058: ( p_pkg_name => 'GMS_BUDGET_UTILS'
1059: , p_procedure_name => 'VERIFY_BUDGET_RULES'
1060: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
1061: );
1062: p_warnings_only_flag := 'N';

Line 1170: x_err_stack := x_err_stack || '->GMS_BUDGET_UTILS.get_project_task_totals';

1166:
1167: begin
1168: x_err_code := 0;
1169: old_stack := x_err_stack;
1170: x_err_stack := x_err_stack || '->GMS_BUDGET_UTILS.get_project_task_totals';
1171:
1172: open get_rollup_level;
1173: fetch get_rollup_level into v_rollup_flag;
1174: close get_rollup_level;

Line 1353: gms_error_pkg.gms_debug('*** Start of GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES ***','C');

1349: BEGIN
1350: x_err_code := 0;
1351:
1352: IF L_DEBUG = 'Y' THEN
1353: gms_error_pkg.gms_debug('*** Start of GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES ***','C');
1354: END IF;
1355:
1356: -- Standard begin of API savepoint
1357:

Line 1363: x_err_stage := 'GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- Error occured while validating the dates';

1359:
1360: -- The following IF statement is added for Bug:2362968 (GMS_BUDGET_PUB.ADD_BUDGET_LINE ACCEPTING INVALID DATES)
1361:
1362: IF p_budget_start_date_in > p_budget_end_date_in THEN
1363: x_err_stage := 'GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- Error occured while validating the dates';
1364: gms_error_pkg.gms_message(x_err_name => 'GMS_SU_INVALID_DATES',
1365: x_err_code => x_err_code,
1366: x_err_buff => x_err_stage);
1367:

Line 1391: x_err_stage := 'GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- error occurred while calculating dates for Time phase = PA/GL';

1387: OR p_budget_start_date_in = GMS_BUDGET_PUB.G_PA_MISS_DATE
1388: OR p_budget_end_date_in IS NULL
1389: OR p_budget_end_date_in = GMS_BUDGET_PUB.G_PA_MISS_DATE
1390: THEN
1391: x_err_stage := 'GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- error occurred while calculating dates for Time phase = PA/GL';
1392: gms_error_pkg.gms_message( x_err_name => 'GMS_BUDGET_DATES_MISSING',
1393: x_err_code => x_err_code,
1394: x_err_buff => x_err_stage);
1395:

Line 1412: x_err_stage := 'GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- Error occurred while calculating dates for Time phase = PA/GL';

1408:
1409: IF l_period_name_csr%NOTFOUND
1410: THEN
1411: CLOSE l_period_name_csr;
1412: x_err_stage := 'GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- Error occurred while calculating dates for Time phase = PA/GL';
1413: gms_error_pkg.gms_message( x_err_name => 'GMS_BUDGET_DATES_INVALID',
1414: x_err_code => x_err_code,
1415: x_err_buff => x_err_stage);
1416:

Line 1441: x_err_stage := 'GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- Error occurred while calculating dates for Time phase = PA/GL';

1437:
1438: IF l_budget_periods_csr%NOTFOUND
1439: THEN
1440: CLOSE l_budget_periods_csr;
1441: x_err_stage := 'GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- Error occurred while calculating dates for Time phase = PA/GL';
1442: gms_error_pkg.gms_message( x_err_name => 'GMS_BUDGET_PERIOD_IS_INVALID',
1443: x_err_code => x_err_code,
1444: x_err_buff => x_err_stage);
1445:

Line 1465: x_err_stage := 'GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- Error occurred while calculating dates for Time phase = R';

1461:
1462: IF p_budget_start_date_in = GMS_BUDGET_PUB.G_PA_MISS_DATE
1463: OR p_budget_start_date_in IS NULL
1464: THEN
1465: x_err_stage := 'GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- Error occurred while calculating dates for Time phase = R';
1466: gms_error_pkg.gms_message( x_err_name => 'GMS_BUDGET_DATES_MISSING' ,-- 'GMS_START_DATE_IS_MISSING', Bug 2587078
1467: x_err_code => x_err_code,
1468: x_err_buff => x_err_stage);
1469:

Line 1476: x_err_stage := 'GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- Error occurred while calculating dates for Time phase = R';

1472:
1473: IF p_budget_end_date_in = GMS_BUDGET_PUB.G_PA_MISS_DATE
1474: OR p_budget_end_date_in IS NULL
1475: THEN
1476: x_err_stage := 'GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- Error occurred while calculating dates for Time phase = R';
1477: gms_error_pkg.gms_message( x_err_name => 'GMS_BUDGET_DATES_MISSING', -- 'GMS_END_DATE_IS_MISSING', Bug 2587078
1478: x_err_code => x_err_code,
1479: x_err_buff => x_err_stage);
1480:

Line 1509: x_err_stage := 'GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- Error occurred while calculating dates for Time phase = N and entry level code ='||p_entry_level_code;

1505: CLOSE l_project_dates_csr;
1506:
1507: IF l_project_start_date IS NULL
1508: THEN
1509: x_err_stage := 'GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- Error occurred while calculating dates for Time phase = N and entry level code ='||p_entry_level_code;
1510: gms_error_pkg.gms_message( x_err_name => 'GMS_BU_NO_TASK_PROJ_DATE' , --'GMS_PROJ_START_DATE_MISS1', 2587078
1511: x_err_code => x_err_code,
1512: x_err_buff => x_err_stage);
1513:

Line 1557: x_err_stage := 'GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- Error occurred while calculating dates for Time phase = N and entry level code ='||p_entry_level_code;

1553: THEN
1554:
1555: IF l_project_start_date IS NULL --implies that project end date is null too
1556: THEN
1557: x_err_stage := 'GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- Error occurred while calculating dates for Time phase = N and entry level code ='||p_entry_level_code;
1558: gms_error_pkg.gms_message( x_err_name => 'GMS_BU_NO_TASK_PROJ_DATE' , -- 'GMS_PROJ_START_DATE_MISS2', 2587078
1559: x_err_code => x_err_code,
1560: x_err_buff => x_err_stage);
1561:

Line 1641: gms_error_pkg.gms_debug('GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- In OTHERS exception','C');

1637: EXCEPTION
1638: WHEN OTHERS
1639: THEN
1640: IF L_DEBUG = 'Y' THEN
1641: gms_error_pkg.gms_debug('GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES- In OTHERS exception','C');
1642: END IF;
1643:
1644: ROLLBACK TO get_valid_period_dates_pvt;
1645:

Line 1651: gms_error_pkg.gms_debug('*** End of GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES ***','C');

1647: x_err_stage := 'GMS_GET_PERIOD_DATE_FAIL';
1648: **/
1649:
1650: IF L_DEBUG = 'Y' THEN
1651: gms_error_pkg.gms_debug('*** End of GMS_BUDGET_UTILS.GET_VALID_PERIOD_DATES ***','C');
1652: END IF;
1653:
1654: END get_valid_period_dates;
1655:

Line 1836: ( p_pkg_name => 'GMS_BUDGET_UTILS'

1832: WHEN OTHERS THEN
1833: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1834: x_err_code := SQLCODE;
1835: FND_MSG_PUB.Add_Exc_Msg
1836: ( p_pkg_name => 'GMS_BUDGET_UTILS'
1837: , p_procedure_name => 'SET_AWARD_POLICY_cONTEXT'
1838: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
1839: );
1840: FND_MSG_PUB.Count_And_Get

Line 1871: END gms_budget_utils;

1867:
1868: End GET_TASK_NUMBER;
1869:
1870:
1871: END gms_budget_utils;