DBA Data[Home] [Help]

PACKAGE: APPS.PA_YEAR_END_ROLLOVER_PKG

Source


1 PACKAGE PA_YEAR_END_ROLLOVER_PKG AUTHID CURRENT_USER AS
2 --  $Header: PABRLYRS.pls 120.5 2007/02/06 09:27:01 rshaik ship $
3 
4 --------------------------------------------------------------------------------------
5 --  Package           : PA_BUDGET_ACCOUNT_PKG
6 --  Purpose           : To execute the Year End Budget Rollover process
7 --  Parameters        :
8 --------------------------------------------------------------------------------------
9 
10 
11 --------------------------------------------------------------------------------------
12 --  Procedure         : Year_End_Rollover
13 --  Purpose           : To execute the Year End Budget Rollover process
14 --                      for a giver fiscal year and Project Range
15 --  Parameters        :
16 --------------------------------------------------------------------------------------
17 
18 PROCEDURE Year_End_Rollover (
19   P_Closing_Year        IN   NUMBER, -- PA_Budget_Versions.Closing_Year%TYPE ?
20   P_Organization_ID     IN   PA_Organizations_V.Organization_ID%TYPE,
21   P_From_Project_Number IN   PA_Projects_All.Segment1%TYPE,
22   P_To_Project_Number   IN   PA_Projects_All.Segment1%TYPE,
23   P_Request_ID          IN   FND_Concurrent_Requests.Request_ID%TYPE,
24   X_Return_Status       OUT  NOCOPY VARCHAR2,
25   X_Msg_Count           OUT  NOCOPY NUMBER,
26   X_Msg_Data            OUT  NOCOPY VARCHAR2
27 );
28 
29 --------------------------------------------------------------------------------------
30 --  Procedure         : Get_Period_Details
31 --  Purpose           : To fetch the required period details
32 --  Parameters        :
33 --------------------------------------------------------------------------------------
34 PROCEDURE Get_Period_Details (
35   P_Fiscal_Year                IN   NUMBER,
36   P_Set_Of_Books_ID            IN   GL_Sets_Of_Books.Set_Of_Books_ID%TYPE,
37   P_Accounted_Period_Type      IN   GL_Sets_Of_Books.Accounted_Period_Type%TYPE,
38   X_Cur_Yr_Last_Prd_Name       OUT  NOCOPY GL_Periods.Period_Name%TYPE,
39   X_Cur_Yr_First_Prd_Start_Dt  OUT  NOCOPY GL_Periods.Start_Date%TYPE,
40   X_Cur_Yr_Last_Prd_Start_Dt   OUT  NOCOPY GL_Periods.Start_Date%TYPE,
41   X_Cur_Yr_Last_Prd_End_Dt     OUT  NOCOPY GL_Periods.End_Date%TYPE,
42   X_Next_Yr_First_Prd_Name     OUT  NOCOPY GL_Periods.Period_Name%TYPE,
43   X_Next_Yr_First_Prd_Start_Dt OUT  NOCOPY GL_Periods.Start_Date%TYPE,
44   X_Next_Yr_First_Prd_End_Dt   OUT  NOCOPY GL_Periods.End_Date%TYPE,
45   X_Return_Status              OUT  NOCOPY VARCHAR2,
46   X_Msg_Count                  OUT  NOCOPY NUMBER,
47   X_Msg_Data                   OUT  NOCOPY VARCHAR2
48 );
49 
50 
51 --------------------------------------------------------------------------------------
52 --  Procedure         : Upd_Ins_Budget_Line
53 --  Purpose           : To update/insert budget line data into PA_BUDGET_LINES
54 --  Parameters        :
55 --------------------------------------------------------------------------------------
56 PROCEDURE Upd_Ins_Budget_Line (
57   P_Budget_Version_ID       IN   PA_Budget_Versions.Budget_Version_ID%TYPE,
58   P_Budget_Type_Code        IN   PA_Budget_Types.Budget_Type_Code%TYPE,
59   P_Resource_Assignment_ID  IN out   NOCOPY PA_Resource_Assignments.Resource_Assignment_ID%TYPE,
60   P_Period_Name             IN   GL_Periods.Period_Name%TYPE,
61   P_Period_Start_Date       IN   GL_Periods.Start_Date%TYPE,
62   P_Period_End_Date         IN   GL_Periods.End_Date%TYPE,
63   P_Transfer_Amount         IN   NUMBER,
64   P_Project_ID              IN   PA_Projects_all.Project_ID%TYPE,
65   P_Task_ID                 IN   PA_Tasks.Task_ID%TYPE,
66   P_Resource_List_Member_ID IN   PA_Resource_List_Members.Resource_List_Member_ID%TYPE,
67   P_Raw_Cost_Flag           IN   PA_Budget_Entry_Methods.Raw_Cost_Flag%TYPE,
68   P_Burdened_Cost_Flag      IN   PA_Budget_Entry_Methods.Burdened_Cost_Flag%TYPE,
69   P_CCID                    IN   GL_Code_Combinations.Code_Combination_ID%TYPE,
70   P_Request_ID              IN   FND_Concurrent_Requests.Request_ID%TYPE,
71   P_Period_New_Or_Closing   IN   VARCHAR2,
72   P_New_CCID                OUT  NOCOPY GL_Code_Combinations.Code_Combination_ID%TYPE,
73   X_Return_Status           OUT  NOCOPY VARCHAR2,
74   X_Msg_Count               OUT  NOCOPY NUMBER,
75   X_Msg_Data                OUT  NOCOPY VARCHAR2
76 );
77 
78 --------------------------------------------------------------------------------------
79 --  Procedure         : Create_Working_Budget
80 --  Purpose           : Create a Draft version of a Baselined Budget
81 --  Parameters        :
82 --------------------------------------------------------------------------------------
83 PROCEDURE Create_Working_Budget (
84   P_Project_ID              IN   PA_Projects_all.Project_ID%TYPE,
85   P_Budget_Type_Code        IN   PA_Budget_Types.Budget_Type_Code%TYPE,
86   P_Budget_Version_ID       IN   PA_Budget_Versions.Budget_Version_ID%TYPE,
87   P_Request_ID              IN   FND_Concurrent_Requests.Request_ID%TYPE,
88   X_Work_Budget_Version_ID  OUT  NOCOPY PA_Budget_Versions.Budget_Version_ID%TYPE,
89   X_Return_Status           OUT  NOCOPY VARCHAR2,
90   X_Msg_Count               OUT  NOCOPY NUMBER,
91   X_Msg_Data                OUT  NOCOPY VARCHAR2
92 );
93 
94 --------------------------------------------------------------------------------------
95 --  Procedure         : Year_End_Rollover_Log
96 --  Purpose           : To stamp a log message into PA_BUDGET_VERSIONS
97 --  Parameters        :
98 --------------------------------------------------------------------------------------
99 PROCEDURE Year_End_Rollover_Log (
100   P_Budget_Version_ID       IN   PA_Budget_Versions.Budget_Version_ID%TYPE,
101   P_Message_Name            IN   FND_New_Messages.Message_Name%TYPE,
102   P_Request_ID              IN   FND_Concurrent_Requests.Request_ID%TYPE,
103   P_Lock_Name               IN   VARCHAR2
104 );
105 
106 /* Bug 5726535 - Start */
107 --------------------------------------------------------------------------------------
108 --  Function          : Is_Yr_End_Rollover_Running
109 --  Purpose           : Checks if PA_Budgetary_Control_Options.Yr_End_Rollover_Flag
110 --                      is already set to 'P' for the given Project and Budget Type
111 --                      combination.If yes, the function returns TRUE. Otherwise, the
112 --                      function returns FALSE
113 --  Parameters        :
114 --------------------------------------------------------------------------------------
115 FUNCTION Is_Yr_End_Rollover_Running (
116   P_Project_ID IN PA_Projects_all.Project_ID%TYPE,
117   P_Budget_Type_Code IN PA_Budget_Types.Budget_Type_Code%TYPE
118 ) RETURN BOOLEAN;
119 
120 --------------------------------------------------------------------------------------
121 --  Procedure         : Upd_Yr_End_Rollover_Flag_To_P
122 --  Purpose           : Updates PA_Budgetary_Control_Options.Yr_End_Rollover_Flag to
123 --                      'P' in an autonomous transaction for the given Project and
124 --                      Budget Type combination.
125 --  Parameters        :
126 --------------------------------------------------------------------------------------
127 PROCEDURE Upd_Yr_End_Rollover_Flag_To_P (
128   P_Request_ID IN FND_Concurrent_Requests.Request_ID%TYPE,
129   P_Project_ID IN PA_Projects_all.Project_ID%TYPE,
130   P_Budget_Type_Code IN PA_Budget_Types.Budget_Type_Code%TYPE
131 );
132 
133 --------------------------------------------------------------------------------------
134 --  Procedure         : Upd_Yr_End_Rollover_Flag_To_E
135 --  Purpose           : Updates PA_Budgetary_Control_Options.Yr_End_Rollover_Flag to
136 --                      'E' in an autonomous transaction for the given Request ID
137 --  Parameters        :
138 --------------------------------------------------------------------------------------
139 PROCEDURE Upd_Yr_End_Rollover_Flag_To_E (
140   P_Request_ID IN FND_Concurrent_Requests.Request_ID%TYPE
141 );
142 /* Bug 5726535 - End */
143 
144 END PA_YEAR_END_ROLLOVER_PKG; /* End Package Specifications PA_YEAR_END_ROLLOVER_PKG */