1 Package Pa_Rbs_Versions_Pub AS
2 --$Header: PARBSVPS.pls 120.0 2005/05/30 16:42:04 appldev noship $
3
4 --Package constant used for package version validation
5 G_API_VERSION_NUMBER CONSTANT Number := 1;
6 G_PKG_NAME CONSTANT Varchar2(30) := 'PA_RBS_VERSIONS_PUB';
7
8
9 -- =======================================================================
10 -- Start of Comments
11 -- API Name : Update_Working_Version
12 -- Type : Public
13 -- Pre-Reqs : None
14 -- Type : Procedure
15 -- Function : This procedure allows for the update of the current working version for a rbs header.
16 --
17 -- Parameters:
18 --
19 -- IN
20 -- P_Commit - Varchar2 Default Fnd_Api.G_False
21 -- P_Init_Msg_List - Varchar2 Default Fnd_Api.G_True
22 -- P_Api_Version_Number - Number
23 -- P_RBS_Version_Id - Number
24 -- P_Name - Varchar2(240)
25 -- P_Description - Varchar2(2000)
26 -- P_Version_Start_Date - Date
27 -- P_Job_Group_Id - Number
28 -- P_Record_Version_Number - Number
29 -- P_Init_Debugging_Flag - Varchar2 Default 'Y'
30 -- OUT
31 -- X_Record_Version_Number - Number
32 -- X_Return_Status - Varchar2(1)
33 -- X_Msg_Count - Number
34 -- X_Error_Msg_Data - Varchar2(30)
35 /*-------------------------------------------------------------------------*/
36
37 Procedure Update_Working_Version(
38 P_Commit IN Varchar2 Default Fnd_Api.G_False,
39 P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
40 P_API_Version_Number IN Number,
41 P_RBS_Version_Id IN Number,
42 P_Name IN Varchar2,
43 P_Description IN Varchar2,
44 P_Version_Start_Date IN Date,
45 P_Job_Group_Id IN Number,
46 P_Record_Version_Number IN Number,
47 P_Init_Debugging_Flag IN Varchar2 Default 'Y',
48 X_Record_Version_Number OUT NOCOPY Number,
49 X_Return_Status OUT NOCOPY Varchar2,
50 X_Msg_Count OUT NOCOPY Number,
51 X_Error_Msg_Data OUT NOCOPY Varchar2);
52
53 -- =======================================================================
54 -- Start of Comments
55 -- API Name : Delete_Working_Version
56 -- Type : Public
57 -- Pre-Reqs : None
58 -- Type : Procedure
59 -- Function : This procedure deletes the working rbs version as well as it elements/nodes.
60 --
61 -- Parameters:
62 --
63 -- IN
64 -- P_Commit - Varchar2 Default Fnd_Api.G_False
65 -- P_Init_Msg_List - Varchar2 Default Fnd_Api.G_True
66 -- P_Api_Version_Number - Number
67 -- P_RBS_Version_Id - Number(15)
68 -- P_Record_Version_Number - Number(15)
69 -- OUT
70 -- X_Return_Status - Varchar2(1)
71 -- X_Msg_Count - Number
72 -- X_Error_Msg_Data - Varchar2(30)
73 --
74 /*-------------------------------------------------------------------------*/
75
76 Procedure Delete_Working_Version(
77 P_Commit IN Varchar2 Default Fnd_Api.G_False,
78 P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
79 P_Api_Version_Number IN Number,
80 P_RBS_Version_Id IN Number,
81 P_Record_Version_Number IN Number,
82 X_Return_Status OUT NOCOPY Varchar2,
83 X_Msg_Count OUT NOCOPY Number,
84 X_Error_Msg_Data OUT NOCOPY Varchar2);
85
86
87 -- =======================================================================
88 -- Start of Comments
89 -- API Name : Create_Working_Version
90 -- Type : Public
91 -- Pre-Reqs : None
92 -- Type : Procedure
93 -- Function : This procedure create a new working rbs version based on a previously frozen rbs version.
94 --
95 -- Parameters:
96 --
97 -- IN
98 -- P_Commit - Varchar2 Default Fnd_Api.G_False,
99 -- P_Init_Msg_List - Varchar2 Default Fnd_Api.G_True,
100 -- P_Api_Version_Number - Number
101 -- P_RBS_Version_Id - Number(15) is the frozen version id to copy from(should not be null copying)
102 -- P_Rbs_Header_Id - Number(15) is Header for the frozen and the working version
103 -- P_Rec_Version_Number - Number(15) is from the current working version
104 -- OUT
105 -- X_Return_Status - Varchar2(1)
106 -- X_Msg_Count - Number
107 -- X_Error_Msg_Data - Varchar2(30)
108 --
109 /*-------------------------------------------------------------------------*/
110
111 Procedure Create_Working_Version (
112 P_Commit IN Varchar2 Default Fnd_Api.G_False,
113 P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
114 P_Api_Version_Number IN Number,
115 P_RBS_Version_Id IN Number Default Null,
116 P_Rbs_Header_Id IN Number,
117 P_Rec_Version_Number IN Number Default Null,
118 P_Init_Debugging_Flag IN Varchar2 Default 'Y',
119 X_Return_Status OUT NOCOPY Varchar2,
120 X_Msg_Count OUT NOCOPY Number,
121 X_Error_Msg_Data OUT NOCOPY Varchar2 );
122
123
124 -- =======================================================================
125 -- Start of Comments
126 -- API Name : Freeze_Working_Version
127 -- Type : Public
128 -- Pre-Reqs : None
129 -- Type : Procedure
130 -- Function : This procedure freezes the working version and inturn creates a new working rbs version based on a this version.
131 --
132 -- Parameters:
133 --
134 -- IN
135 -- P_Commit - Varchar2 Default Fnd_Api.G_False,
136 -- P_Init_Msg_List - Varchar2 Default Fnd_Api.G_True,
137 -- P_rbs_Version_Id - Number(15) is the version id of the version to be freezed
138 -- P_rbs_version_record_ver_num - Number(15) is the record version number of the version to be freezed
139 -- P_Init_Debugging_Flag - Vachar2(1)
140 -- OUT
141 -- X_Return_Status - Varchar2(1)
142 -- X_Msg_Count - Number
143 -- X_Error_Msg_Data - Varchar2(30)
144 --
145 /*-------------------------------------------------------------------------*/
146 Procedure Freeze_Working_Version(
147 P_Commit IN Varchar2 Default Fnd_Api.G_False,
148 P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
149 P_Rbs_Version_Id IN Number,
150 P_Rbs_Version_Record_Ver_Num IN Number Default Null,
151 P_Init_Debugging_Flag IN Varchar2 Default 'Y',
152 X_Return_Status OUT NOCOPY Varchar2,
153 X_Msg_Count OUT NOCOPY Number,
154 X_Error_Msg_Data OUT NOCOPY Varchar2);
155
156 End Pa_Rbs_Versions_Pub;