32: --
33: PROCEDURE Start_Process
34: (
35: p_api_version IN NUMBER ,
36: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
37: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
38: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
39: p_return_status OUT NOCOPY VARCHAR2 ,
40: p_msg_count OUT NOCOPY NUMBER ,
33: PROCEDURE Start_Process
34: (
35: p_api_version IN NUMBER ,
36: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
37: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
38: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
39: p_return_status OUT NOCOPY VARCHAR2 ,
40: p_msg_count OUT NOCOPY NUMBER ,
41: p_msg_data OUT NOCOPY VARCHAR2 ,
34: (
35: p_api_version IN NUMBER ,
36: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
37: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
38: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
39: p_return_status OUT NOCOPY VARCHAR2 ,
40: p_msg_count OUT NOCOPY NUMBER ,
41: p_msg_data OUT NOCOPY VARCHAR2 ,
42: --
71: /* Bug 2576222 Start */
72: g_user_name := fnd_global.user_name;
73: /* Bug 2576222 End */
74:
75: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
76: FND_MSG_PUB.initialize ;
77: END IF;
78: --
79: p_return_status := FND_API.G_RET_STS_SUCCESS ;
75: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
76: FND_MSG_PUB.initialize ;
77: END IF;
78: --
79: p_return_status := FND_API.G_RET_STS_SUCCESS ;
80:
81: --
82: -- Get p_item_key related information.
83: --
192: EXCEPTION
193: --
194: WHEN OTHERS THEN
195: --
196: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
197: --
198: RAISE ;
199:
200: END Start_Process ;
309: l_operation_type VARCHAR2(20) ;
310: --
311: BEGIN
312:
313: l_return_status := FND_API.G_RET_STS_SUCCESS ;
314:
315: IF ( funcmode = 'RUN' ) THEN
316: --
317: -- Get operation_type item_attribute.
330: --
331: PSB_WS_Ops_Pvt.Check_WS_Ops_Concurrency
332: (
333: p_api_version => 1.0,
334: p_init_msg_list => FND_API.G_FALSE ,
335: p_commit => FND_API.G_FALSE ,
336: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
337: p_return_status => l_return_status,
338: p_msg_count => l_msg_count,
331: PSB_WS_Ops_Pvt.Check_WS_Ops_Concurrency
332: (
333: p_api_version => 1.0,
334: p_init_msg_list => FND_API.G_FALSE ,
335: p_commit => FND_API.G_FALSE ,
336: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
337: p_return_status => l_return_status,
338: p_msg_count => l_msg_count,
339: p_msg_data => l_msg_data,
332: (
333: p_api_version => 1.0,
334: p_init_msg_list => FND_API.G_FALSE ,
335: p_commit => FND_API.G_FALSE ,
336: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
337: p_return_status => l_return_status,
338: p_msg_count => l_msg_count,
339: p_msg_data => l_msg_data,
340: --
341: p_worksheet_id => l_worksheet_id ,
342: p_operation_type => l_operation_type
343: );
344: --
345: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
346: -- (TBD) Need to specify why it failed (?).
347: result := 'COMPLETE:NO' ;
348: ELSE
349: result := 'COMPLETE:YES' ;
499: --
500: PSB_Worksheet_Pvt.Apply_Constraints
501: (
502: p_api_version => 1.0 ,
503: p_init_msg_list => FND_API.G_FALSE ,
504: p_commit => FND_API.G_FALSE ,
505: p_validation_level => FND_API.G_VALID_LEVEL_FULL ,
506: p_return_status => l_return_status ,
507: p_validation_status => l_validation_status ,
500: PSB_Worksheet_Pvt.Apply_Constraints
501: (
502: p_api_version => 1.0 ,
503: p_init_msg_list => FND_API.G_FALSE ,
504: p_commit => FND_API.G_FALSE ,
505: p_validation_level => FND_API.G_VALID_LEVEL_FULL ,
506: p_return_status => l_return_status ,
507: p_validation_status => l_validation_status ,
508: p_msg_count => l_msg_count ,
501: (
502: p_api_version => 1.0 ,
503: p_init_msg_list => FND_API.G_FALSE ,
504: p_commit => FND_API.G_FALSE ,
505: p_validation_level => FND_API.G_VALID_LEVEL_FULL ,
506: p_return_status => l_return_status ,
507: p_validation_status => l_validation_status ,
508: p_msg_count => l_msg_count ,
509: p_msg_data => l_msg_data ,
692: --
693: PSB_WS_Ops_Pvt.Copy_Worksheet
694: (
695: p_api_version => 1.0 ,
696: p_init_msg_list => FND_API.G_TRUE,
697: p_commit => FND_API.G_FALSE,
698: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
699: p_return_status => l_return_status,
700: p_msg_count => l_msg_count,
693: PSB_WS_Ops_Pvt.Copy_Worksheet
694: (
695: p_api_version => 1.0 ,
696: p_init_msg_list => FND_API.G_TRUE,
697: p_commit => FND_API.G_FALSE,
698: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
699: p_return_status => l_return_status,
700: p_msg_count => l_msg_count,
701: p_msg_data => l_msg_data,
694: (
695: p_api_version => 1.0 ,
696: p_init_msg_list => FND_API.G_TRUE,
697: p_commit => FND_API.G_FALSE,
698: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
699: p_return_status => l_return_status,
700: p_msg_count => l_msg_count,
701: p_msg_data => l_msg_data,
702: --
703: p_worksheet_id => l_worksheet_id,
704: p_worksheet_id_OUT => l_new_worksheet_id
705: );
706: --
707: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
708: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
709: END IF ;
710: --
711:
704: p_worksheet_id_OUT => l_new_worksheet_id
705: );
706: --
707: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
708: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
709: END IF ;
710: --
711:
712: --
805: --
806: PSB_WS_Ops_Pvt.Merge_Worksheets
807: (
808: p_api_version => 1.0 ,
809: p_init_msg_list => FND_API.G_TRUE,
810: p_commit => FND_API.G_FALSE,
811: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
812: p_return_status => l_return_status,
813: p_msg_count => l_msg_count,
806: PSB_WS_Ops_Pvt.Merge_Worksheets
807: (
808: p_api_version => 1.0 ,
809: p_init_msg_list => FND_API.G_TRUE,
810: p_commit => FND_API.G_FALSE,
811: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
812: p_return_status => l_return_status,
813: p_msg_count => l_msg_count,
814: p_msg_data => l_msg_data,
807: (
808: p_api_version => 1.0 ,
809: p_init_msg_list => FND_API.G_TRUE,
810: p_commit => FND_API.G_FALSE,
811: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
812: p_return_status => l_return_status,
813: p_msg_count => l_msg_count,
814: p_msg_data => l_msg_data,
815: --
816: p_source_worksheet_id => l_worksheet_id,
817: p_target_worksheet_id => l_merge_to_worksheet_id
818: );
819: --
820: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
821: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
822: END IF ;
823: --
824:
817: p_target_worksheet_id => l_merge_to_worksheet_id
818: );
819: --
820: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
821: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
822: END IF ;
823: --
824:
825: result := 'COMPLETE' ;
925: --
926: PSB_WS_Ops_Pvt.Freeze_Worksheet
927: (
928: p_api_version => 1.0 ,
929: p_init_msg_list => FND_API.G_FALSE,
930: p_commit => FND_API.G_FALSE,
931: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
932: p_return_status => l_return_status,
933: p_msg_count => l_msg_count,
926: PSB_WS_Ops_Pvt.Freeze_Worksheet
927: (
928: p_api_version => 1.0 ,
929: p_init_msg_list => FND_API.G_FALSE,
930: p_commit => FND_API.G_FALSE,
931: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
932: p_return_status => l_return_status,
933: p_msg_count => l_msg_count,
934: p_msg_data => l_msg_data,
927: (
928: p_api_version => 1.0 ,
929: p_init_msg_list => FND_API.G_FALSE,
930: p_commit => FND_API.G_FALSE,
931: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
932: p_return_status => l_return_status,
933: p_msg_count => l_msg_count,
934: p_msg_data => l_msg_data,
935: --
936: p_worksheet_id => l_worksheet_id ,
937: p_freeze_flag => 'Y'
938: );
939: --
940: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
942: END IF ;
943:
944: --
937: p_freeze_flag => 'Y'
938: );
939: --
940: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
942: END IF ;
943:
944: --
945: -- Send 'NOTIFY_OF_FREEZE_COMPLETION' notification to the top level budget
962: --
963: PSB_WS_Ops_Pvt.Find_Child_Worksheets
964: (
965: p_api_version => 1.0 ,
966: p_init_msg_list => FND_API.G_FALSE,
967: p_commit => FND_API.G_FALSE,
968: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
969: p_return_status => l_return_status,
970: p_msg_count => l_msg_count,
963: PSB_WS_Ops_Pvt.Find_Child_Worksheets
964: (
965: p_api_version => 1.0 ,
966: p_init_msg_list => FND_API.G_FALSE,
967: p_commit => FND_API.G_FALSE,
968: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
969: p_return_status => l_return_status,
970: p_msg_count => l_msg_count,
971: p_msg_data => l_msg_data,
964: (
965: p_api_version => 1.0 ,
966: p_init_msg_list => FND_API.G_FALSE,
967: p_commit => FND_API.G_FALSE,
968: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
969: p_return_status => l_return_status,
970: p_msg_count => l_msg_count,
971: p_msg_data => l_msg_data,
972: --
973: p_worksheet_id => l_worksheet_id,
974: p_worksheet_tbl => l_worksheets_tab
975: );
976: --
977: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
978: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
979: END IF ;
980: --
981:
974: p_worksheet_tbl => l_worksheets_tab
975: );
976: --
977: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
978: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
979: END IF ;
980: --
981:
982: --
996: --
997: PSB_WS_Ops_Pvt.Freeze_Worksheet
998: (
999: p_api_version => 1.0 ,
1000: p_init_msg_list => FND_API.G_FALSE,
1001: p_commit => FND_API.G_FALSE,
1002: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1003: p_return_status => l_return_status,
1004: p_msg_count => l_msg_count,
997: PSB_WS_Ops_Pvt.Freeze_Worksheet
998: (
999: p_api_version => 1.0 ,
1000: p_init_msg_list => FND_API.G_FALSE,
1001: p_commit => FND_API.G_FALSE,
1002: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1003: p_return_status => l_return_status,
1004: p_msg_count => l_msg_count,
1005: p_msg_data => l_msg_data,
998: (
999: p_api_version => 1.0 ,
1000: p_init_msg_list => FND_API.G_FALSE,
1001: p_commit => FND_API.G_FALSE,
1002: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1003: p_return_status => l_return_status,
1004: p_msg_count => l_msg_count,
1005: p_msg_data => l_msg_data,
1006: --
1007: p_worksheet_id => l_worksheets_tab(i) ,
1008: p_freeze_flag => 'Y'
1009: );
1010: --
1011: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1012: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1013: END IF ;
1014: --
1015:
1008: p_freeze_flag => 'Y'
1009: );
1010: --
1011: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1012: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1013: END IF ;
1014: --
1015:
1016: --
1147: -- Get all parent worksheets for the selected worksheet.
1148: PSB_WS_Ops_Pvt.Find_Parent_Worksheets
1149: (
1150: p_api_version => 1.0 ,
1151: p_init_msg_list => FND_API.G_FALSE,
1152: p_commit => FND_API.G_FALSE,
1153: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1154: p_return_status => l_return_status,
1155: p_msg_count => l_msg_count,
1148: PSB_WS_Ops_Pvt.Find_Parent_Worksheets
1149: (
1150: p_api_version => 1.0 ,
1151: p_init_msg_list => FND_API.G_FALSE,
1152: p_commit => FND_API.G_FALSE,
1153: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1154: p_return_status => l_return_status,
1155: p_msg_count => l_msg_count,
1156: p_msg_data => l_msg_data,
1149: (
1150: p_api_version => 1.0 ,
1151: p_init_msg_list => FND_API.G_FALSE,
1152: p_commit => FND_API.G_FALSE,
1153: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1154: p_return_status => l_return_status,
1155: p_msg_count => l_msg_count,
1156: p_msg_data => l_msg_data,
1157: --
1158: p_worksheet_id => l_worksheet_id,
1159: p_worksheet_tbl => l_worksheets_tab
1160: );
1161: --
1162: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1163: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1164: END IF ;
1165:
1166: --
1159: p_worksheet_tbl => l_worksheets_tab
1160: );
1161: --
1162: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1163: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1164: END IF ;
1165:
1166: --
1167: -- Update view_line_flag for all parent worksheets.
1401: --
1402: PSB_WS_Ops_Pvt.Change_Worksheet_Stage
1403: (
1404: p_api_version => 1.0 ,
1405: p_init_msg_list => FND_API.G_FALSE,
1406: p_commit => FND_API.G_FALSE,
1407: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1408: p_return_status => l_return_status,
1409: p_msg_count => l_msg_count,
1402: PSB_WS_Ops_Pvt.Change_Worksheet_Stage
1403: (
1404: p_api_version => 1.0 ,
1405: p_init_msg_list => FND_API.G_FALSE,
1406: p_commit => FND_API.G_FALSE,
1407: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1408: p_return_status => l_return_status,
1409: p_msg_count => l_msg_count,
1410: p_msg_data => l_msg_data,
1403: (
1404: p_api_version => 1.0 ,
1405: p_init_msg_list => FND_API.G_FALSE,
1406: p_commit => FND_API.G_FALSE,
1407: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1408: p_return_status => l_return_status,
1409: p_msg_count => l_msg_count,
1410: p_msg_data => l_msg_data,
1411: --
1413: p_stage_seq => l_target_stage_seq ,
1414: p_operation_id => l_operation_id
1415: );
1416: --
1417: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1418: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1419: END IF ;
1420: --
1421:
1414: p_operation_id => l_operation_id
1415: );
1416: --
1417: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1418: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1419: END IF ;
1420: --
1421:
1422: --
1425: --
1426: PSB_WS_Ops_Pvt.Find_Child_Worksheets
1427: (
1428: p_api_version => 1.0 ,
1429: p_init_msg_list => FND_API.G_FALSE,
1430: p_commit => FND_API.G_FALSE,
1431: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1432: p_return_status => l_return_status,
1433: p_msg_count => l_msg_count,
1426: PSB_WS_Ops_Pvt.Find_Child_Worksheets
1427: (
1428: p_api_version => 1.0 ,
1429: p_init_msg_list => FND_API.G_FALSE,
1430: p_commit => FND_API.G_FALSE,
1431: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1432: p_return_status => l_return_status,
1433: p_msg_count => l_msg_count,
1434: p_msg_data => l_msg_data,
1427: (
1428: p_api_version => 1.0 ,
1429: p_init_msg_list => FND_API.G_FALSE,
1430: p_commit => FND_API.G_FALSE,
1431: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1432: p_return_status => l_return_status,
1433: p_msg_count => l_msg_count,
1434: p_msg_data => l_msg_data,
1435: --
1436: p_worksheet_id => l_worksheet_id,
1437: p_worksheet_tbl => l_worksheets_tab
1438: );
1439: --
1440: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1441: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1442: END IF ;
1443: --
1444:
1437: p_worksheet_tbl => l_worksheets_tab
1438: );
1439: --
1440: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1441: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1442: END IF ;
1443: --
1444:
1445: --
1462: --
1463: PSB_Worksheet_Pvt.Update_Worksheet
1464: (
1465: p_api_version => 1.0 ,
1466: p_init_msg_list => FND_API.G_FALSE,
1467: p_commit => FND_API.G_FALSE,
1468: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
1469: p_return_status => l_return_status,
1470: p_msg_count => l_msg_count,
1463: PSB_Worksheet_Pvt.Update_Worksheet
1464: (
1465: p_api_version => 1.0 ,
1466: p_init_msg_list => FND_API.G_FALSE,
1467: p_commit => FND_API.G_FALSE,
1468: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
1469: p_return_status => l_return_status,
1470: p_msg_count => l_msg_count,
1471: p_msg_data => l_msg_data,
1464: (
1465: p_api_version => 1.0 ,
1466: p_init_msg_list => FND_API.G_FALSE,
1467: p_commit => FND_API.G_FALSE,
1468: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
1469: p_return_status => l_return_status,
1470: p_msg_count => l_msg_count,
1471: p_msg_data => l_msg_data,
1472: --
1473: p_worksheet_id => l_worksheets_tab(i) ,
1474: p_current_stage_seq => l_target_stage_seq
1475: ) ;
1476: --
1477: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1478: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1479: END IF ;
1480: --
1481:
1474: p_current_stage_seq => l_target_stage_seq
1475: ) ;
1476: --
1477: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1478: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1479: END IF ;
1480: --
1481:
1482: --
1677: p_return_status => l_return_status ,
1678: p_budget_calendar_id => l_budget_calendar_id
1679: );
1680: --
1681: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1682: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1683: END IF ;
1684: --
1685: END IF ;
1678: p_budget_calendar_id => l_budget_calendar_id
1679: );
1680: --
1681: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1682: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1683: END IF ;
1684: --
1685: END IF ;
1686:
1957: --
1958: PSB_WS_Ops_Pvt.Create_Worksheet
1959: (
1960: p_api_version => 1.0 ,
1961: p_init_msg_list => FND_API.G_TRUE ,
1962: p_commit => FND_API.G_FALSE ,
1963: p_validation_level => FND_API.G_VALID_LEVEL_FULL ,
1964: p_return_status => l_return_status ,
1965: p_msg_count => l_msg_count ,
1958: PSB_WS_Ops_Pvt.Create_Worksheet
1959: (
1960: p_api_version => 1.0 ,
1961: p_init_msg_list => FND_API.G_TRUE ,
1962: p_commit => FND_API.G_FALSE ,
1963: p_validation_level => FND_API.G_VALID_LEVEL_FULL ,
1964: p_return_status => l_return_status ,
1965: p_msg_count => l_msg_count ,
1966: p_msg_data => l_msg_data ,
1959: (
1960: p_api_version => 1.0 ,
1961: p_init_msg_list => FND_API.G_TRUE ,
1962: p_commit => FND_API.G_FALSE ,
1963: p_validation_level => FND_API.G_VALID_LEVEL_FULL ,
1964: p_return_status => l_return_status ,
1965: p_msg_count => l_msg_count ,
1966: p_msg_data => l_msg_data ,
1967: --
1980: --
1981: PSB_WS_Ops_Pvt.Create_New_Position_Worksheet
1982: (
1983: p_api_version => 1.0 ,
1984: p_init_msg_list => FND_API.G_TRUE ,
1985: p_commit => FND_API.G_FALSE ,
1986: p_validation_level => FND_API.G_VALID_LEVEL_FULL ,
1987: p_return_status => l_return_status ,
1988: p_msg_count => l_msg_count ,
1981: PSB_WS_Ops_Pvt.Create_New_Position_Worksheet
1982: (
1983: p_api_version => 1.0 ,
1984: p_init_msg_list => FND_API.G_TRUE ,
1985: p_commit => FND_API.G_FALSE ,
1986: p_validation_level => FND_API.G_VALID_LEVEL_FULL ,
1987: p_return_status => l_return_status ,
1988: p_msg_count => l_msg_count ,
1989: p_msg_data => l_msg_data ,
1982: (
1983: p_api_version => 1.0 ,
1984: p_init_msg_list => FND_API.G_TRUE ,
1985: p_commit => FND_API.G_FALSE ,
1986: p_validation_level => FND_API.G_VALID_LEVEL_FULL ,
1987: p_return_status => l_return_status ,
1988: p_msg_count => l_msg_count ,
1989: p_msg_data => l_msg_data ,
1990: --
1997:
1998: END IF;
1999:
2000: --
2001: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2002: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2003: END IF ;
2004: --
2005:
1998: END IF;
1999:
2000: --
2001: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2002: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2003: END IF ;
2004: --
2005:
2006: --
2383: --
2384: PSB_WS_Ops_Pvt.Find_Child_Worksheets
2385: (
2386: p_api_version => 1.0 ,
2387: p_init_msg_list => FND_API.G_FALSE,
2388: p_commit => FND_API.G_FALSE,
2389: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2390: p_return_status => l_return_status,
2391: p_msg_count => l_msg_count,
2384: PSB_WS_Ops_Pvt.Find_Child_Worksheets
2385: (
2386: p_api_version => 1.0 ,
2387: p_init_msg_list => FND_API.G_FALSE,
2388: p_commit => FND_API.G_FALSE,
2389: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2390: p_return_status => l_return_status,
2391: p_msg_count => l_msg_count,
2392: p_msg_data => l_msg_data,
2385: (
2386: p_api_version => 1.0 ,
2387: p_init_msg_list => FND_API.G_FALSE,
2388: p_commit => FND_API.G_FALSE,
2389: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2390: p_return_status => l_return_status,
2391: p_msg_count => l_msg_count,
2392: p_msg_data => l_msg_data,
2393: --
2394: p_worksheet_id => l_worksheet_id,
2395: p_worksheet_tbl => l_worksheets_tab
2396: );
2397: --
2398: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2399: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2400: END IF ;
2401: --
2402:
2395: p_worksheet_tbl => l_worksheets_tab
2396: );
2397: --
2398: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2399: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2400: END IF ;
2401: --
2402:
2403: l_worksheets_tab(0) := l_worksheet_id ;
2412: --
2413: PSB_Worksheet_Pvt.Update_Worksheet
2414: (
2415: p_api_version => 1.0 ,
2416: p_init_msg_list => FND_API.G_FALSE,
2417: p_commit => FND_API.G_FALSE,
2418: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
2419: p_return_status => l_return_status,
2420: p_msg_count => l_msg_count,
2413: PSB_Worksheet_Pvt.Update_Worksheet
2414: (
2415: p_api_version => 1.0 ,
2416: p_init_msg_list => FND_API.G_FALSE,
2417: p_commit => FND_API.G_FALSE,
2418: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
2419: p_return_status => l_return_status,
2420: p_msg_count => l_msg_count,
2421: p_msg_data => l_msg_data ,
2414: (
2415: p_api_version => 1.0 ,
2416: p_init_msg_list => FND_API.G_FALSE,
2417: p_commit => FND_API.G_FALSE,
2418: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
2419: p_return_status => l_return_status,
2420: p_msg_count => l_msg_count,
2421: p_msg_data => l_msg_data ,
2422: --
2425: p_submitted_by => l_submitter_id
2426: );
2427:
2428: --
2429: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2431: END IF ;
2432: --
2433: END LOOP ;
2426: );
2427:
2428: --
2429: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2431: END IF ;
2432: --
2433: END LOOP ;
2434:
2615: --
2616: PSB_WS_Ops_Pvt.Freeze_Worksheet
2617: (
2618: p_api_version => 1.0 ,
2619: p_init_msg_list => FND_API.G_FALSE,
2620: p_commit => FND_API.G_FALSE,
2621: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2622: p_return_status => l_return_status,
2623: p_msg_count => l_msg_count,
2616: PSB_WS_Ops_Pvt.Freeze_Worksheet
2617: (
2618: p_api_version => 1.0 ,
2619: p_init_msg_list => FND_API.G_FALSE,
2620: p_commit => FND_API.G_FALSE,
2621: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2622: p_return_status => l_return_status,
2623: p_msg_count => l_msg_count,
2624: p_msg_data => l_msg_data,
2617: (
2618: p_api_version => 1.0 ,
2619: p_init_msg_list => FND_API.G_FALSE,
2620: p_commit => FND_API.G_FALSE,
2621: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2622: p_return_status => l_return_status,
2623: p_msg_count => l_msg_count,
2624: p_msg_data => l_msg_data,
2625: --
2626: p_worksheet_id => l_worksheet_id,
2627: p_freeze_flag => 'N'
2628: );
2629: --
2630: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2631: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2632: END IF ;
2633: --
2634:
2627: p_freeze_flag => 'N'
2628: );
2629: --
2630: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2631: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2632: END IF ;
2633: --
2634:
2635: result := 'COMPLETE' ;
2749: --
2750: PROCEDURE Check_Review_Groups
2751: (
2752: p_api_version IN NUMBER ,
2753: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
2754: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
2755: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
2756: p_return_status OUT NOCOPY VARCHAR2 ,
2757: p_msg_count OUT NOCOPY NUMBER ,
2750: PROCEDURE Check_Review_Groups
2751: (
2752: p_api_version IN NUMBER ,
2753: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
2754: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
2755: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
2756: p_return_status OUT NOCOPY VARCHAR2 ,
2757: p_msg_count OUT NOCOPY NUMBER ,
2758: p_msg_data OUT NOCOPY VARCHAR2 ,
2751: (
2752: p_api_version IN NUMBER ,
2753: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
2754: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
2755: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
2756: p_return_status OUT NOCOPY VARCHAR2 ,
2757: p_msg_count OUT NOCOPY NUMBER ,
2758: p_msg_data OUT NOCOPY VARCHAR2 ,
2759: --
2779: BEGIN
2780: --
2781: SAVEPOINT Check_Review_Groups_Pvt ;
2782: --
2783: IF NOT FND_API.Compatible_API_Call ( l_api_version,
2784: p_api_version,
2785: l_api_name,
2786: G_PKG_NAME )
2787: THEN
2784: p_api_version,
2785: l_api_name,
2786: G_PKG_NAME )
2787: THEN
2788: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2789: END IF;
2790: --
2791:
2792: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
2788: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2789: END IF;
2790: --
2791:
2792: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
2793: FND_MSG_PUB.initialize ;
2794: END IF;
2795: --
2796:
2793: FND_MSG_PUB.initialize ;
2794: END IF;
2795: --
2796:
2797: p_return_status := FND_API.G_RET_STS_SUCCESS ;
2798: p_review_group_exists := FND_API.G_FALSE ;
2799: --
2800:
2801: --
2794: END IF;
2795: --
2796:
2797: p_return_status := FND_API.G_RET_STS_SUCCESS ;
2798: p_review_group_exists := FND_API.G_FALSE ;
2799: --
2800:
2801: --
2802: -- Get budget_group_id for the worksheet
2827: p_return_status => l_return_status ,
2828: p_budget_calendar_id => l_budget_calendar_id
2829: );
2830: --
2831: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2832: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2833: END IF ;
2834: --
2835: END IF ;
2828: p_budget_calendar_id => l_budget_calendar_id
2829: );
2830: --
2831: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2832: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2833: END IF ;
2834: --
2835: END IF ;
2836:
2877: END;
2878:
2879: IF l_exists = 'Exists' THEN
2880:
2881: p_review_group_exists := FND_API.G_TRUE ;
2882:
2883: ELSE
2884:
2885: l_exists := null;
2925: l_exists := null;
2926: END;
2927: --
2928: IF l_exists = 'Exists' THEN
2929: p_review_group_exists := FND_API.G_TRUE ;
2930: ELSE
2931:
2932: /* Bug 3641566 Start */
2933: --p_review_group_exists := FND_API.G_FALSE ;
2929: p_review_group_exists := FND_API.G_TRUE ;
2930: ELSE
2931:
2932: /* Bug 3641566 Start */
2933: --p_review_group_exists := FND_API.G_FALSE ;
2934: l_exists := NULL;
2935: BEGIN
2936: SELECT 'Exists' INTO l_exists
2937: FROM DUAL
2962: WHEN NO_DATA_FOUND THEN
2963: l_exists := NULL;
2964: END;
2965: IF l_exists = 'Exists' THEN
2966: p_review_group_exists := FND_API.G_TRUE;
2967: ELSE
2968: p_review_group_exists := FND_API.G_FALSE ;
2969: END IF ;
2970: /* Bug 3641566 End */
2964: END;
2965: IF l_exists = 'Exists' THEN
2966: p_review_group_exists := FND_API.G_TRUE;
2967: ELSE
2968: p_review_group_exists := FND_API.G_FALSE ;
2969: END IF ;
2970: /* Bug 3641566 End */
2971: END IF ;
2972: --
2972: --
2973: END IF ;
2974:
2975: --
2976: IF FND_API.To_Boolean ( p_commit ) THEN
2977: COMMIT WORK;
2978: END IF;
2979: --
2980: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
2981: p_data => p_msg_data );
2982: --
2983: EXCEPTION
2984: --
2985: WHEN FND_API.G_EXC_ERROR THEN
2986: --
2987: ROLLBACK TO Check_Review_Groups_Pvt ;
2988: p_return_status := FND_API.G_RET_STS_ERROR;
2989: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
2984: --
2985: WHEN FND_API.G_EXC_ERROR THEN
2986: --
2987: ROLLBACK TO Check_Review_Groups_Pvt ;
2988: p_return_status := FND_API.G_RET_STS_ERROR;
2989: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
2990: p_data => p_msg_data );
2991: --
2992: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2988: p_return_status := FND_API.G_RET_STS_ERROR;
2989: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
2990: p_data => p_msg_data );
2991: --
2992: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2993: --
2994: ROLLBACK TO Check_Review_Groups_Pvt ;
2995: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2996: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
2991: --
2992: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2993: --
2994: ROLLBACK TO Check_Review_Groups_Pvt ;
2995: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2996: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
2997: p_data => p_msg_data );
2998: --
2999: WHEN OTHERS THEN
2998: --
2999: WHEN OTHERS THEN
3000: --
3001: ROLLBACK TO Check_Review_Groups_Pvt ;
3002: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3003: --
3004: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3005: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
3006: l_api_name );