[Home] [Help]
PACKAGE BODY: APPS.IGS_FI_GL_PERIODS_PKG
Source
1 PACKAGE BODY igs_fi_gl_periods_pkg AS
2 /* $Header: IGSSIC7B.pls 120.1 2005/09/23 03:34:36 agairola noship $ */
3
4 l_rowid VARCHAR2(25);
5 old_references gl_period_statuses%ROWTYPE;
6 new_references gl_period_statuses%ROWTYPE;
7
8 PROCEDURE insert_row (
9 x_rowid IN OUT NOCOPY VARCHAR2,
10 x_application_id IN NUMBER,
11 x_set_of_books_id IN NUMBER,
12 x_period_name IN VARCHAR2,
13 x_closing_status IN VARCHAR2,
14 x_start_date IN DATE,
15 x_end_date IN DATE,
16 x_year_start_date IN DATE,
17 x_quarter_num IN NUMBER,
18 x_quarter_start_date IN DATE,
19 x_period_type IN VARCHAR2,
20 x_period_year IN NUMBER,
21 x_effective_period_num IN NUMBER,
22 x_period_num IN NUMBER,
23 x_adjustment_period_flag IN VARCHAR2,
24 x_elimination_confirmed_flag IN VARCHAR2,
25 x_attribute1 IN VARCHAR2,
26 x_attribute2 IN VARCHAR2,
27 x_attribute3 IN VARCHAR2,
28 x_attribute4 IN VARCHAR2,
29 x_attribute5 IN VARCHAR2,
30 x_context IN VARCHAR2,
31 x_mode IN VARCHAR2
32 ) AS
33 /*
34 || Created By : [email protected]
35 || Created On : 05-NOV-2002
36 || Purpose : Handles the INSERT DML logic for the table. Invokes the gl_period_statuses_pkg.insert_row
37 || Known limitations, enhancements or remarks :
38 || Change History :
39 || Who When What
40 || (reverse chronological order - newest change first)
41 */
42
43 x_last_update_date DATE;
44 x_last_updated_by NUMBER;
45 x_last_update_login NUMBER;
46
47 BEGIN
48
49 x_last_update_date := SYSDATE;
50 IF (x_mode = 'I') THEN
51 x_last_updated_by := 1;
52 x_last_update_login := 0;
53 ELSIF (x_mode = 'R') THEN
54 x_last_updated_by := fnd_global.user_id;
55 IF (x_last_updated_by IS NULL) THEN
56 x_last_updated_by := -1;
57 END IF;
58 x_last_update_login := fnd_global.login_id;
59 IF (x_last_update_login IS NULL) THEN
60 x_last_update_login := -1;
61 END IF;
62 ELSE
63 fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
64 fnd_message.set_token('ROUTINE','IGS_FI_GL_PERIODS_PKG.INSERT_ROW');
65 igs_ge_msg_stack.add;
66 app_exception.raise_exception;
67 END IF;
68
69 /*
70 gl_period_statuses_pkg.insert_row(X_Rowid => x_rowid ,
71 X_Application_Id => x_application_id ,
72 X_Set_Of_Books_Id => x_set_of_books_id ,
73 X_Period_Name => x_period_name ,
74 X_Last_Update_Date => x_last_update_date ,
75 X_Last_Updated_By => x_last_updated_by ,
76 X_Closing_Status => x_closing_status ,
77 X_Start_Date => x_start_date ,
78 X_End_Date => x_end_date ,
79 X_Period_Type => x_period_type ,
80 X_Period_Year => x_period_year ,
81 X_Period_Num => x_period_num ,
82 X_Quarter_Num => x_quarter_num ,
83 X_Adjustment_Period_Flag => x_adjustment_period_flag ,
84 X_Creation_Date => x_last_update_date ,
85 X_Created_By => x_last_updated_by ,
86 X_Last_Update_Login => x_last_update_login ,
87 X_Attribute1 => x_attribute1 ,
88 X_Attribute2 => x_attribute2 ,
89 X_Attribute3 => x_attribute3 ,
90 X_Attribute4 => x_attribute4 ,
91 X_Attribute5 => x_attribute5 ,
92 X_Context => x_context
93 );
94 */
95 END insert_row;
96
97
98 PROCEDURE lock_row (
99 x_rowid IN VARCHAR2,
100 x_application_id IN NUMBER,
101 x_set_of_books_id IN NUMBER,
102 x_period_name IN VARCHAR2,
103 x_closing_status IN VARCHAR2,
104 x_start_date IN DATE,
105 x_end_date IN DATE,
106 x_year_start_date IN DATE,
107 x_quarter_num IN NUMBER,
108 x_quarter_start_date IN DATE,
109 x_period_type IN VARCHAR2,
110 x_period_year IN NUMBER,
111 x_effective_period_num IN NUMBER,
112 x_period_num IN NUMBER,
113 x_adjustment_period_flag IN VARCHAR2,
114 x_elimination_confirmed_flag IN VARCHAR2,
115 x_attribute1 IN VARCHAR2,
116 x_attribute2 IN VARCHAR2,
117 x_attribute3 IN VARCHAR2,
118 x_attribute4 IN VARCHAR2,
119 x_attribute5 IN VARCHAR2,
120 x_context IN VARCHAR2
121 ) AS
122 /*
123 || Created By : [email protected]
124 || Created On : 05-NOV-2002
125 || Purpose : Handles the LOCK mechanism for the table. Invokes the gl_period_statuses_pkg.lock_row
126 || Known limitations, enhancements or remarks :
127 || Change History :
128 || Who When What
129 || (reverse chronological order - newest change first)
130 */
131
132 BEGIN
133 /*
134 gl_period_statuses_pkg.lock_row(X_Rowid => x_rowid ,
135 X_Application_Id => x_application_id ,
136 X_Set_Of_Books_Id => x_set_of_books_id ,
137 X_Period_Name => x_period_name ,
138 X_Closing_Status => x_closing_status ,
139 X_Start_Date => x_start_date ,
140 X_End_Date => x_end_date ,
141 X_Period_Type => x_period_type ,
142 X_Period_Year => x_period_year ,
143 X_Period_Num => x_period_num ,
144 X_Quarter_Num => x_quarter_num ,
145 X_Adjustment_Period_Flag => x_adjustment_period_flag ,
146 X_Attribute1 => x_attribute1 ,
147 X_Attribute2 => x_attribute2 ,
148 X_Attribute3 => x_attribute3 ,
149 X_Attribute4 => x_attribute4 ,
150 X_Attribute5 => x_attribute5 ,
151 X_Context => x_context
152 ); */
153 null;
154
155 END lock_row;
156
157
158 PROCEDURE update_row (
159 x_rowid IN VARCHAR2,
160 x_application_id IN NUMBER,
161 x_set_of_books_id IN NUMBER,
162 x_period_name IN VARCHAR2,
163 x_closing_status IN VARCHAR2,
164 x_start_date IN DATE,
165 x_end_date IN DATE,
166 x_year_start_date IN DATE,
167 x_quarter_num IN NUMBER,
168 x_quarter_start_date IN DATE,
169 x_period_type IN VARCHAR2,
170 x_period_year IN NUMBER,
171 x_effective_period_num IN NUMBER,
172 x_period_num IN NUMBER,
173 x_adjustment_period_flag IN VARCHAR2,
174 x_elimination_confirmed_flag IN VARCHAR2,
175 x_attribute1 IN VARCHAR2,
176 x_attribute2 IN VARCHAR2,
177 x_attribute3 IN VARCHAR2,
178 x_attribute4 IN VARCHAR2,
179 x_attribute5 IN VARCHAR2,
180 x_context IN VARCHAR2,
181 x_mode IN VARCHAR2
182 ) AS
183 /*
184 || Created By : [email protected]
185 || Created On : 05-NOV-2002
186 || Purpose : Handles the UPDATE DML logic for the table. Invokes the gl_period_statuses_pkg.update_row
187 || Known limitations, enhancements or remarks :
188 || Change History :
189 || Who When What
190 || (reverse chronological order - newest change first)
191 */
192 x_last_update_date DATE ;
193 x_last_updated_by NUMBER;
194 x_last_update_login NUMBER;
195
196 BEGIN
197
198 x_last_update_date := SYSDATE;
199 IF (X_MODE = 'I') THEN
200 x_last_updated_by := 1;
201 x_last_update_login := 0;
202 ELSIF (x_mode = 'R') THEN
203 x_last_updated_by := fnd_global.user_id;
204 IF x_last_updated_by IS NULL THEN
205 x_last_updated_by := -1;
206 END IF;
207 x_last_update_login := fnd_global.login_id;
208 IF (x_last_update_login IS NULL) THEN
209 x_last_update_login := -1;
210 END IF;
211 ELSE
212 fnd_message.set_name( 'FND', 'SYSTEM-INVALID ARGS');
213 fnd_message.set_token('ROUTINE','IGS_FI_GL_PERIODS_PKG.UPDATE_ROW');
214 igs_ge_msg_stack.add;
215 app_exception.raise_exception;
216 END IF;
217
218 /*
219 gl_period_statuses_pkg.update_row(X_Rowid => x_rowid ,
220 X_Application_Id => x_application_id ,
221 X_Ledger_Id => x_set_of_books_id,
222 X_Set_Of_Books_Id => x_set_of_books_id ,
223 X_Period_Name => x_period_name ,
224 X_Last_Update_Date => x_last_update_date ,
225 X_Last_Updated_By => x_last_updated_by ,
226 X_Closing_Status => x_closing_status ,
227 X_Start_Date => x_start_date ,
228 X_End_Date => x_end_date ,
229 X_Period_Type => x_period_type ,
230 X_Period_Year => x_period_year ,
231 X_Period_Num => x_period_num ,
232 X_Quarter_Num => x_quarter_num ,
233 X_Adjustment_Period_Flag => x_adjustment_period_flag ,
234 X_Last_Update_Login => x_last_update_login,
235 X_Attribute1 => x_attribute1 ,
236 X_Attribute2 => x_attribute2 ,
237 X_Attribute3 => x_attribute3 ,
238 X_Attribute4 => x_attribute4 ,
239 X_Attribute5 => x_attribute5 ,
240 X_Context => x_context
241 );
242 */
243
244 END update_row;
245
246 PROCEDURE delete_row (
247 x_rowid IN VARCHAR2
248 ) AS
249 /*
250 || Created By : [email protected]
251 || Created On : 05-NOV-2002
252 || Purpose : Handles the DELETE DML logic for the table. Invokes the gl_period_statuses_pkg.delete_row
253 || Known limitations, enhancements or remarks :
254 || Change History :
255 || Who When What
256 || (reverse chronological order - newest change first)
257 */
258 BEGIN
259 /*
260 gl_period_statuses_pkg.Delete_Row(X_Rowid => x_rowid);
261 */
262 null;
263 END delete_row;
264
265
266 END igs_fi_gl_periods_pkg;