DBA Data[Home] [Help]

APPS.PSB_CREATE_BR_PVT dependencies on FND_API

Line 73: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

69: --
70: PROCEDURE Enforce_BR_Concurrency
71: (
72: p_api_version IN NUMBER ,
73: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
74: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
75: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
76: p_return_status OUT NOCOPY VARCHAR2 ,
77: p_msg_count OUT NOCOPY NUMBER ,

Line 74: p_commit IN VARCHAR2 := FND_API.G_FALSE ,

70: PROCEDURE Enforce_BR_Concurrency
71: (
72: p_api_version IN NUMBER ,
73: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
74: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
75: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
76: p_return_status OUT NOCOPY VARCHAR2 ,
77: p_msg_count OUT NOCOPY NUMBER ,
78: p_msg_data OUT NOCOPY VARCHAR2 ,

Line 75: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,

71: (
72: p_api_version IN NUMBER ,
73: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
74: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
75: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
76: p_return_status OUT NOCOPY VARCHAR2 ,
77: p_msg_count OUT NOCOPY NUMBER ,
78: p_msg_data OUT NOCOPY VARCHAR2 ,
79: --

Line 99: IF NOT FND_API.Compatible_API_Call ( l_api_version,

95: BEGIN
96: --
97: SAVEPOINT Enforce_BR_Concurrency_Pvt ;
98: --
99: IF NOT FND_API.Compatible_API_Call ( l_api_version,
100: p_api_version,
101: l_api_name,
102: G_PKG_NAME )
103: THEN

Line 104: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

100: p_api_version,
101: l_api_name,
102: G_PKG_NAME )
103: THEN
104: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
105: END IF;
106: --
107:
108: IF FND_API.To_Boolean ( p_init_msg_list ) THEN

Line 108: IF FND_API.To_Boolean ( p_init_msg_list ) THEN

104: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
105: END IF;
106: --
107:
108: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
109: FND_MSG_PUB.initialize ;
110: END IF;
111: --
112: p_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 112: p_return_status := FND_API.G_RET_STS_SUCCESS ;

108: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
109: FND_MSG_PUB.initialize ;
110: END IF;
111: --
112: p_return_status := FND_API.G_RET_STS_SUCCESS ;
113: --
114:
115: --
116: -- First lock the current budget revision p_budget_revision_id

Line 121: p_init_msg_list => FND_API.G_FALSE ,

117: --
118: PSB_Concurrency_Control_Pub.Enforce_Concurrency_Control
119: (
120: p_api_version => 1.0 ,
121: p_init_msg_list => FND_API.G_FALSE ,
122: p_validation_level => FND_API.G_VALID_LEVEL_NONE ,
123: p_return_status => l_return_status ,
124: p_msg_count => l_msg_count ,
125: p_msg_data => l_msg_data ,

Line 122: p_validation_level => FND_API.G_VALID_LEVEL_NONE ,

118: PSB_Concurrency_Control_Pub.Enforce_Concurrency_Control
119: (
120: p_api_version => 1.0 ,
121: p_init_msg_list => FND_API.G_FALSE ,
122: p_validation_level => FND_API.G_VALID_LEVEL_NONE ,
123: p_return_status => l_return_status ,
124: p_msg_count => l_msg_count ,
125: p_msg_data => l_msg_data ,
126: --

Line 132: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

128: p_concurrency_entity_name => 'BUDGET_REVISION',
129: p_concurrency_entity_id => p_budget_revision_id
130: );
131: --
132: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
133: RAISE FND_API.G_EXC_ERROR ;
134: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
135: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
136: END IF;

Line 133: RAISE FND_API.G_EXC_ERROR ;

129: p_concurrency_entity_id => p_budget_revision_id
130: );
131: --
132: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
133: RAISE FND_API.G_EXC_ERROR ;
134: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
135: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
136: END IF;
137:

Line 134: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

130: );
131: --
132: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
133: RAISE FND_API.G_EXC_ERROR ;
134: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
135: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
136: END IF;
137:
138: --

Line 135: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

131: --
132: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
133: RAISE FND_API.G_EXC_ERROR ;
134: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
135: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
136: END IF;
137:
138: --
139: -- Find parent or child budget revisions depending on p_parent_or_child_mode

Line 147: p_init_msg_list => FND_API.G_FALSE,

143: --
144: PSB_Create_BR_Pvt.Find_Parent_Budget_Revisions
145: (
146: p_api_version => 1.0 ,
147: p_init_msg_list => FND_API.G_FALSE,
148: p_commit => FND_API.G_FALSE,
149: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
150: p_return_status => l_return_status,
151: p_msg_count => l_msg_count,

Line 148: p_commit => FND_API.G_FALSE,

144: PSB_Create_BR_Pvt.Find_Parent_Budget_Revisions
145: (
146: p_api_version => 1.0 ,
147: p_init_msg_list => FND_API.G_FALSE,
148: p_commit => FND_API.G_FALSE,
149: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
150: p_return_status => l_return_status,
151: p_msg_count => l_msg_count,
152: p_msg_data => l_msg_data,

Line 149: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

145: (
146: p_api_version => 1.0 ,
147: p_init_msg_list => FND_API.G_FALSE,
148: p_commit => FND_API.G_FALSE,
149: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
150: p_return_status => l_return_status,
151: p_msg_count => l_msg_count,
152: p_msg_data => l_msg_data,
153: --

Line 163: p_init_msg_list => FND_API.G_FALSE,

159: --
160: PSB_Create_BR_Pvt.Find_Child_Budget_Revisions
161: (
162: p_api_version => 1.0 ,
163: p_init_msg_list => FND_API.G_FALSE,
164: p_commit => FND_API.G_FALSE,
165: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
166: p_return_status => l_return_status,
167: p_msg_count => l_msg_count,

Line 164: p_commit => FND_API.G_FALSE,

160: PSB_Create_BR_Pvt.Find_Child_Budget_Revisions
161: (
162: p_api_version => 1.0 ,
163: p_init_msg_list => FND_API.G_FALSE,
164: p_commit => FND_API.G_FALSE,
165: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
166: p_return_status => l_return_status,
167: p_msg_count => l_msg_count,
168: p_msg_data => l_msg_data,

Line 165: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

161: (
162: p_api_version => 1.0 ,
163: p_init_msg_list => FND_API.G_FALSE,
164: p_commit => FND_API.G_FALSE,
165: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
166: p_return_status => l_return_status,
167: p_msg_count => l_msg_count,
168: p_msg_data => l_msg_data,
169: --

Line 176: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

172: );
173: --
174: END IF ;
175:
176: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
177: RAISE FND_API.G_EXC_ERROR ;
178: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
180: END IF;

Line 177: RAISE FND_API.G_EXC_ERROR ;

173: --
174: END IF ;
175:
176: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
177: RAISE FND_API.G_EXC_ERROR ;
178: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
180: END IF;
181:

Line 178: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

174: END IF ;
175:
176: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
177: RAISE FND_API.G_EXC_ERROR ;
178: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
180: END IF;
181:
182: FOR i IN 1..l_budget_revision_tab.COUNT

Line 179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

175:
176: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
177: RAISE FND_API.G_EXC_ERROR ;
178: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
180: END IF;
181:
182: FOR i IN 1..l_budget_revision_tab.COUNT
183: LOOP

Line 190: p_init_msg_list => FND_API.G_FALSE ,

186: --
187: PSB_Concurrency_Control_Pub.Enforce_Concurrency_Control
188: (
189: p_api_version => 1.0 ,
190: p_init_msg_list => FND_API.G_FALSE ,
191: p_validation_level => FND_API.G_VALID_LEVEL_NONE ,
192: p_return_status => l_return_status ,
193: p_msg_count => l_msg_count ,
194: p_msg_data => l_msg_data ,

Line 191: p_validation_level => FND_API.G_VALID_LEVEL_NONE ,

187: PSB_Concurrency_Control_Pub.Enforce_Concurrency_Control
188: (
189: p_api_version => 1.0 ,
190: p_init_msg_list => FND_API.G_FALSE ,
191: p_validation_level => FND_API.G_VALID_LEVEL_NONE ,
192: p_return_status => l_return_status ,
193: p_msg_count => l_msg_count ,
194: p_msg_data => l_msg_data ,
195: --

Line 201: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

197: p_concurrency_entity_name => 'BUDGET_REVISION',
198: p_concurrency_entity_id => l_budget_revision_tab(i)
199: );
200: --
201: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
202: RAISE FND_API.G_EXC_ERROR ;
203: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
204: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
205: END IF;

Line 202: RAISE FND_API.G_EXC_ERROR ;

198: p_concurrency_entity_id => l_budget_revision_tab(i)
199: );
200: --
201: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
202: RAISE FND_API.G_EXC_ERROR ;
203: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
204: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
205: END IF;
206:

Line 203: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

199: );
200: --
201: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
202: RAISE FND_API.G_EXC_ERROR ;
203: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
204: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
205: END IF;
206:
207: --

Line 204: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

200: --
201: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
202: RAISE FND_API.G_EXC_ERROR ;
203: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
204: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
205: END IF;
206:
207: --
208: END LOOP ;

Line 211: IF FND_API.To_Boolean ( p_commit ) THEN

207: --
208: END LOOP ;
209:
210: --
211: IF FND_API.To_Boolean ( p_commit ) THEN
212: COMMIT WORK;
213: END IF;
214: --
215: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 220: WHEN FND_API.G_EXC_ERROR THEN

216: p_data => p_msg_data );
217: --
218: EXCEPTION
219: --
220: WHEN FND_API.G_EXC_ERROR THEN
221: --
222: ROLLBACK TO Enforce_BR_Concurrency_Pvt ;
223: p_return_status := FND_API.G_RET_STS_ERROR;
224: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 223: p_return_status := FND_API.G_RET_STS_ERROR;

219: --
220: WHEN FND_API.G_EXC_ERROR THEN
221: --
222: ROLLBACK TO Enforce_BR_Concurrency_Pvt ;
223: p_return_status := FND_API.G_RET_STS_ERROR;
224: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
225: p_data => p_msg_data );
226: --
227: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 227: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

223: p_return_status := FND_API.G_RET_STS_ERROR;
224: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
225: p_data => p_msg_data );
226: --
227: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
228: --
229: ROLLBACK TO Enforce_BR_Concurrency_Pvt ;
230: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
231: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 230: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

226: --
227: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
228: --
229: ROLLBACK TO Enforce_BR_Concurrency_Pvt ;
230: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
231: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
232: p_data => p_msg_data );
233: --
234: WHEN OTHERS THEN

Line 237: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

233: --
234: WHEN OTHERS THEN
235: --
236: ROLLBACK TO Enforce_BR_Concurrency_Pvt ;
237: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
238: --
239: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
240: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
241: l_api_name);

Line 260: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

256: --
257: PROCEDURE Check_BR_Ops_Concurrency
258: (
259: p_api_version IN NUMBER ,
260: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
261: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
262: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
263: p_return_status OUT NOCOPY VARCHAR2 ,
264: p_msg_count OUT NOCOPY NUMBER ,

Line 261: p_commit IN VARCHAR2 := FND_API.G_FALSE ,

257: PROCEDURE Check_BR_Ops_Concurrency
258: (
259: p_api_version IN NUMBER ,
260: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
261: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
262: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
263: p_return_status OUT NOCOPY VARCHAR2 ,
264: p_msg_count OUT NOCOPY NUMBER ,
265: p_msg_data OUT NOCOPY VARCHAR2 ,

Line 262: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,

258: (
259: p_api_version IN NUMBER ,
260: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
261: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
262: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
263: p_return_status OUT NOCOPY VARCHAR2 ,
264: p_msg_count OUT NOCOPY NUMBER ,
265: p_msg_data OUT NOCOPY VARCHAR2 ,
266: --

Line 283: IF NOT FND_API.Compatible_API_Call ( l_api_version,

279: BEGIN
280: --
281: SAVEPOINT Check_BR_Ops_Concurrency_Pvt ;
282: --
283: IF NOT FND_API.Compatible_API_Call ( l_api_version,
284: p_api_version,
285: l_api_name,
286: G_PKG_NAME )
287: THEN

Line 288: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

284: p_api_version,
285: l_api_name,
286: G_PKG_NAME )
287: THEN
288: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
289: END IF;
290: --
291:
292: IF FND_API.To_Boolean ( p_init_msg_list ) THEN

Line 292: IF FND_API.To_Boolean ( p_init_msg_list ) THEN

288: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
289: END IF;
290: --
291:
292: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
293: FND_MSG_PUB.initialize ;
294: END IF;
295: --
296: p_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 296: p_return_status := FND_API.G_RET_STS_SUCCESS ;

292: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
293: FND_MSG_PUB.initialize ;
294: END IF;
295: --
296: p_return_status := FND_API.G_RET_STS_SUCCESS ;
297: --
298:
299: IF p_operation_type IN ('FREEZE_REVISION', 'SUBMIT_REVISION' ) THEN
300: --

Line 306: p_init_msg_list => FND_API.G_FALSE ,

302: --
303: PSB_Create_BR_PVT.Enforce_BR_Concurrency
304: (
305: p_api_version => 1.0,
306: p_init_msg_list => FND_API.G_FALSE ,
307: p_commit => FND_API.G_FALSE ,
308: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
309: p_return_status => l_return_status,
310: p_msg_count => l_msg_count,

Line 307: p_commit => FND_API.G_FALSE ,

303: PSB_Create_BR_PVT.Enforce_BR_Concurrency
304: (
305: p_api_version => 1.0,
306: p_init_msg_list => FND_API.G_FALSE ,
307: p_commit => FND_API.G_FALSE ,
308: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
309: p_return_status => l_return_status,
310: p_msg_count => l_msg_count,
311: p_msg_data => l_msg_data,

Line 308: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

304: (
305: p_api_version => 1.0,
306: p_init_msg_list => FND_API.G_FALSE ,
307: p_commit => FND_API.G_FALSE ,
308: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
309: p_return_status => l_return_status,
310: p_msg_count => l_msg_count,
311: p_msg_data => l_msg_data,
312: --

Line 318: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

314: p_parent_or_child_mode => 'CHILD' ,
315: p_maintenance_mode => 'MAINTENANCE'
316: );
317: --
318: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
319: RAISE FND_API.G_EXC_ERROR ;
320: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
322: END IF;

Line 319: RAISE FND_API.G_EXC_ERROR ;

315: p_maintenance_mode => 'MAINTENANCE'
316: );
317: --
318: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
319: RAISE FND_API.G_EXC_ERROR ;
320: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
322: END IF;
323: --

Line 320: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

316: );
317: --
318: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
319: RAISE FND_API.G_EXC_ERROR ;
320: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
322: END IF;
323: --
324: ELSIF p_operation_type IN ('UNFREEZE_REVISION' ) THEN

Line 321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

317: --
318: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
319: RAISE FND_API.G_EXC_ERROR ;
320: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
322: END IF;
323: --
324: ELSIF p_operation_type IN ('UNFREEZE_REVISION' ) THEN
325: --

Line 331: p_init_msg_list => FND_API.G_FALSE,

327: --
328: PSB_Concurrency_Control_Pub.Enforce_Concurrency_Control
329: (
330: p_api_version => 1.0,
331: p_init_msg_list => FND_API.G_FALSE,
332: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
333: p_return_status => l_return_status,
334: p_msg_count => l_msg_count,
335: p_msg_data => l_msg_data,

Line 332: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

328: PSB_Concurrency_Control_Pub.Enforce_Concurrency_Control
329: (
330: p_api_version => 1.0,
331: p_init_msg_list => FND_API.G_FALSE,
332: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
333: p_return_status => l_return_status,
334: p_msg_count => l_msg_count,
335: p_msg_data => l_msg_data,
336: --

Line 342: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

338: p_concurrency_entity_name => 'BUDGET_REVISION' ,
339: p_concurrency_entity_id => p_budget_revision_id
340: );
341: --
342: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
343: RAISE FND_API.G_EXC_ERROR ;
344: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
345: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
346: END IF;

Line 343: RAISE FND_API.G_EXC_ERROR ;

339: p_concurrency_entity_id => p_budget_revision_id
340: );
341: --
342: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
343: RAISE FND_API.G_EXC_ERROR ;
344: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
345: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
346: END IF;
347: --

Line 344: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

340: );
341: --
342: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
343: RAISE FND_API.G_EXC_ERROR ;
344: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
345: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
346: END IF;
347: --
348: ELSE

Line 345: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

341: --
342: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
343: RAISE FND_API.G_EXC_ERROR ;
344: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
345: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
346: END IF;
347: --
348: ELSE
349: --

Line 353: RAISE FND_API.G_EXC_ERROR ;

349: --
350: Fnd_Message.Set_Name ('PSB', 'PSB_INVALID_ARGUMENT') ;
351: Fnd_Message.Set_Token('ROUTINE', l_api_name ) ;
352: FND_MSG_PUB.Add;
353: RAISE FND_API.G_EXC_ERROR ;
354: --
355: END IF ;
356:
357: --

Line 358: IF FND_API.To_Boolean ( p_commit ) THEN

354: --
355: END IF ;
356:
357: --
358: IF FND_API.To_Boolean ( p_commit ) THEN
359: COMMIT WORK;
360: END IF;
361: --
362: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 367: WHEN FND_API.G_EXC_ERROR THEN

363: p_data => p_msg_data );
364: --
365: EXCEPTION
366: --
367: WHEN FND_API.G_EXC_ERROR THEN
368: --
369: ROLLBACK TO Check_BR_Ops_Concurrency_Pvt ;
370: p_return_status := FND_API.G_RET_STS_ERROR;
371: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 370: p_return_status := FND_API.G_RET_STS_ERROR;

366: --
367: WHEN FND_API.G_EXC_ERROR THEN
368: --
369: ROLLBACK TO Check_BR_Ops_Concurrency_Pvt ;
370: p_return_status := FND_API.G_RET_STS_ERROR;
371: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
372: p_data => p_msg_data );
373: --
374: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 374: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

370: p_return_status := FND_API.G_RET_STS_ERROR;
371: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
372: p_data => p_msg_data );
373: --
374: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
375: --
376: ROLLBACK TO Check_BR_Ops_Concurrency_Pvt ;
377: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
378: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 377: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

373: --
374: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
375: --
376: ROLLBACK TO Check_BR_Ops_Concurrency_Pvt ;
377: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
378: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
379: p_data => p_msg_data );
380: --
381: WHEN OTHERS THEN

Line 384: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

380: --
381: WHEN OTHERS THEN
382: --
383: ROLLBACK TO Check_BR_Ops_Concurrency_Pvt ;
384: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
385: --
386: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
387: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
388: l_api_name );

Line 405: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

401: --
402: PROCEDURE Create_Budget_Revision
403: (
404: p_api_version IN NUMBER ,
405: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
406: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
407: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
408: p_return_status OUT NOCOPY VARCHAR2 ,
409: p_msg_count OUT NOCOPY NUMBER ,

Line 406: p_commit IN VARCHAR2 := FND_API.G_FALSE ,

402: PROCEDURE Create_Budget_Revision
403: (
404: p_api_version IN NUMBER ,
405: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
406: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
407: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
408: p_return_status OUT NOCOPY VARCHAR2 ,
409: p_msg_count OUT NOCOPY NUMBER ,
410: p_msg_data OUT NOCOPY VARCHAR2 ,

Line 407: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,

403: (
404: p_api_version IN NUMBER ,
405: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
406: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
407: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
408: p_return_status OUT NOCOPY VARCHAR2 ,
409: p_msg_count OUT NOCOPY NUMBER ,
410: p_msg_data OUT NOCOPY VARCHAR2 ,
411: --

Line 458: IF NOT FND_API.Compatible_API_Call ( l_api_version,

454: BEGIN
455: --
456: SAVEPOINT Create_Budget_Revision_Pvt ;
457: --
458: IF NOT FND_API.Compatible_API_Call ( l_api_version,
459: p_api_version,
460: l_api_name,
461: G_PKG_NAME )
462: THEN

Line 463: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

459: p_api_version,
460: l_api_name,
461: G_PKG_NAME )
462: THEN
463: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
464: END IF;
465: --
466:
467: IF FND_API.To_Boolean ( p_init_msg_list ) THEN

Line 467: IF FND_API.To_Boolean ( p_init_msg_list ) THEN

463: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
464: END IF;
465: --
466:
467: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
468: FND_MSG_PUB.initialize ;
469: END IF;
470: --
471: p_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 471: p_return_status := FND_API.G_RET_STS_SUCCESS ;

467: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
468: FND_MSG_PUB.initialize ;
469: END IF;
470: --
471: p_return_status := FND_API.G_RET_STS_SUCCESS ;
472: --
473: --
474: -- Validating p_budget_group_id.
475: --

Line 492: RAISE FND_API.G_EXC_ERROR ;

488: --
489: Fnd_Message.Set_Name ('PSB','PSB_INVALID_BUDGET_REVISION_ID') ;
490: Fnd_Message.Set_Token('ROUTINE', l_api_name ) ;
491: FND_MSG_PUB.Add;
492: RAISE FND_API.G_EXC_ERROR ;
493: END IF ;
494:
495: -- l_budget_by_position defines whether budget revision contains positions
496: -- or not.

Line 538: p_init_msg_list => FND_API.G_FALSE,

534:
535: PSB_Budget_Revisions_Pvt.Create_Budget_Revision
536: (
537: p_api_version => 1.0 ,
538: p_init_msg_list => FND_API.G_FALSE,
539: p_commit => FND_API.G_FALSE,
540: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
541: p_return_status => l_return_status,
542: p_msg_count => l_msg_count,

Line 539: p_commit => FND_API.G_FALSE,

535: PSB_Budget_Revisions_Pvt.Create_Budget_Revision
536: (
537: p_api_version => 1.0 ,
538: p_init_msg_list => FND_API.G_FALSE,
539: p_commit => FND_API.G_FALSE,
540: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
541: p_return_status => l_return_status,
542: p_msg_count => l_msg_count,
543: p_msg_data => l_msg_data ,

Line 540: p_validation_level => FND_API.G_VALID_LEVEL_NONE,

536: (
537: p_api_version => 1.0 ,
538: p_init_msg_list => FND_API.G_FALSE,
539: p_commit => FND_API.G_FALSE,
540: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
541: p_return_status => l_return_status,
542: p_msg_count => l_msg_count,
543: p_msg_data => l_msg_data ,
544: --

Line 606: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

602:
603: --
604: CLOSE l_budget_revisions_csr ;
605: --
606: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
607: RAISE FND_API.G_EXC_ERROR ;
608: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
609: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
610: END IF;

Line 607: RAISE FND_API.G_EXC_ERROR ;

603: --
604: CLOSE l_budget_revisions_csr ;
605: --
606: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
607: RAISE FND_API.G_EXC_ERROR ;
608: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
609: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
610: END IF;
611: --

Line 608: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

604: CLOSE l_budget_revisions_csr ;
605: --
606: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
607: RAISE FND_API.G_EXC_ERROR ;
608: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
609: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
610: END IF;
611: --
612: --

Line 609: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

605: --
606: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
607: RAISE FND_API.G_EXC_ERROR ;
608: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
609: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
610: END IF;
611: --
612: --
613: -- This LOOP gets all the account_line_id for the new budget revision

Line 658: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

654: p_creation_date => g_current_date,
655: p_return_status => l_return_status
656: ) ;
657: --
658: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
659: RAISE FND_API.G_EXC_ERROR ;
660: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
661: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
662: END IF;

Line 659: RAISE FND_API.G_EXC_ERROR ;

655: p_return_status => l_return_status
656: ) ;
657: --
658: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
659: RAISE FND_API.G_EXC_ERROR ;
660: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
661: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
662: END IF;
663: --

Line 660: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

656: ) ;
657: --
658: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
659: RAISE FND_API.G_EXC_ERROR ;
660: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
661: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
662: END IF;
663: --
664: END LOOP;

Line 661: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

657: --
658: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
659: RAISE FND_API.G_EXC_ERROR ;
660: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
661: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
662: END IF;
663: --
664: END LOOP;
665: --

Line 727: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

723: p_creation_date => g_current_date,
724: p_return_status => l_return_status
725: );
726: --
727: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
728: RAISE FND_API.G_EXC_ERROR ;
729: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
730: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
731: END IF;

Line 728: RAISE FND_API.G_EXC_ERROR ;

724: p_return_status => l_return_status
725: );
726: --
727: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
728: RAISE FND_API.G_EXC_ERROR ;
729: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
730: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
731: END IF;
732: --

Line 729: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

725: );
726: --
727: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
728: RAISE FND_API.G_EXC_ERROR ;
729: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
730: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
731: END IF;
732: --
733: --

Line 730: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

726: --
727: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
728: RAISE FND_API.G_EXC_ERROR ;
729: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
730: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
731: END IF;
732: --
733: --
734: --

Line 742: IF FND_API.To_Boolean ( p_commit ) THEN

738:
739: p_budget_revision_id_out := l_new_budget_revision_id;
740:
741: --
742: IF FND_API.To_Boolean ( p_commit ) THEN
743: COMMIT WORK;
744: END IF;
745: --
746: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 751: WHEN FND_API.G_EXC_ERROR THEN

747: p_data => p_msg_data );
748: --
749: EXCEPTION
750: --
751: WHEN FND_API.G_EXC_ERROR THEN
752: --
753: ROLLBACK TO Create_Budget_Revision_Pvt ;
754: p_return_status := FND_API.G_RET_STS_ERROR;
755: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 754: p_return_status := FND_API.G_RET_STS_ERROR;

750: --
751: WHEN FND_API.G_EXC_ERROR THEN
752: --
753: ROLLBACK TO Create_Budget_Revision_Pvt ;
754: p_return_status := FND_API.G_RET_STS_ERROR;
755: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
756: p_data => p_msg_data );
757: --
758: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 758: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

754: p_return_status := FND_API.G_RET_STS_ERROR;
755: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
756: p_data => p_msg_data );
757: --
758: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
759: --
760: ROLLBACK TO Create_Budget_Revision_Pvt ;
761: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
762: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 761: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

757: --
758: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
759: --
760: ROLLBACK TO Create_Budget_Revision_Pvt ;
761: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
762: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
763: p_data => p_msg_data );
764: --
765: WHEN OTHERS THEN

Line 772: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

768: CLOSE l_budget_revisions_csr ;
769: END IF ;
770: --
771: ROLLBACK TO Create_Budget_Revision_Pvt ;
772: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
773: --
774: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
775: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
776: l_api_name);

Line 795: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

791: --
792: PROCEDURE Freeze_Budget_Revision
793: (
794: p_api_version IN NUMBER ,
795: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
796: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
797: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
798: p_return_status OUT NOCOPY VARCHAR2 ,
799: p_msg_count OUT NOCOPY NUMBER ,

Line 796: p_commit IN VARCHAR2 := FND_API.G_FALSE ,

792: PROCEDURE Freeze_Budget_Revision
793: (
794: p_api_version IN NUMBER ,
795: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
796: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
797: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
798: p_return_status OUT NOCOPY VARCHAR2 ,
799: p_msg_count OUT NOCOPY NUMBER ,
800: p_msg_data OUT NOCOPY VARCHAR2 ,

Line 797: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,

793: (
794: p_api_version IN NUMBER ,
795: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
796: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
797: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
798: p_return_status OUT NOCOPY VARCHAR2 ,
799: p_msg_count OUT NOCOPY NUMBER ,
800: p_msg_data OUT NOCOPY VARCHAR2 ,
801: --

Line 822: IF NOT FND_API.Compatible_API_Call ( l_api_version,

818: BEGIN
819: --
820: SAVEPOINT Freeze_Budget_Revision_Pvt ;
821: --
822: IF NOT FND_API.Compatible_API_Call ( l_api_version,
823: p_api_version,
824: l_api_name,
825: G_PKG_NAME )
826: THEN

Line 827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

823: p_api_version,
824: l_api_name,
825: G_PKG_NAME )
826: THEN
827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
828: END IF;
829: --
830:
831: IF FND_API.To_Boolean ( p_init_msg_list ) THEN

Line 831: IF FND_API.To_Boolean ( p_init_msg_list ) THEN

827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
828: END IF;
829: --
830:
831: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
832: FND_MSG_PUB.initialize ;
833: END IF;
834: --
835: p_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 835: p_return_status := FND_API.G_RET_STS_SUCCESS ;

831: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
832: FND_MSG_PUB.initialize ;
833: END IF;
834: --
835: p_return_status := FND_API.G_RET_STS_SUCCESS ;
836: --
837:
838:
839: --

Line 850: p_init_msg_list => FND_API.G_FALSE,

846:
847: Find_Parent_Budget_Revision
848: (
849: p_api_version => 1.0 ,
850: p_init_msg_list => FND_API.G_FALSE,
851: p_commit => FND_API.G_FALSE,
852: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
853: p_return_status => l_return_status,
854: p_msg_count => l_msg_count,

Line 851: p_commit => FND_API.G_FALSE,

847: Find_Parent_Budget_Revision
848: (
849: p_api_version => 1.0 ,
850: p_init_msg_list => FND_API.G_FALSE,
851: p_commit => FND_API.G_FALSE,
852: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
853: p_return_status => l_return_status,
854: p_msg_count => l_msg_count,
855: p_msg_data => l_msg_data ,

Line 852: p_validation_level => FND_API.G_VALID_LEVEL_NONE,

848: (
849: p_api_version => 1.0 ,
850: p_init_msg_list => FND_API.G_FALSE,
851: p_commit => FND_API.G_FALSE,
852: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
853: p_return_status => l_return_status,
854: p_msg_count => l_msg_count,
855: p_msg_data => l_msg_data ,
856: --

Line 861: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

857: p_budget_revision_id => p_budget_revision_id ,
858: p_budget_revision_id_OUT => l_parent_budget_revision_id
859: ) ;
860: --
861: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
862: RAISE FND_API.G_EXC_ERROR ;
863: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
864: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
865: END IF;

Line 862: RAISE FND_API.G_EXC_ERROR ;

858: p_budget_revision_id_OUT => l_parent_budget_revision_id
859: ) ;
860: --
861: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
862: RAISE FND_API.G_EXC_ERROR ;
863: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
864: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
865: END IF;
866:

Line 863: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

859: ) ;
860: --
861: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
862: RAISE FND_API.G_EXC_ERROR ;
863: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
864: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
865: END IF;
866:
867: -- Check the freeze_flag for the parent worksheet.

Line 864: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

860: --
861: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
862: RAISE FND_API.G_EXC_ERROR ;
863: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
864: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
865: END IF;
866:
867: -- Check the freeze_flag for the parent worksheet.
868: IF l_parent_budget_revision_id <> 0 THEN

Line 878: RAISE FND_API.G_EXC_ERROR ;

874: IF l_parent_freeze_flag = 'Y' THEN
875:
876: Fnd_Message.Set_Name('PSB','PSB_CANNOT_UNFREEZE_REVISION') ;
877: FND_MSG_PUB.Add;
878: RAISE FND_API.G_EXC_ERROR ;
879:
880: END IF ;
881:
882: END IF ;

Line 898: p_init_msg_list => FND_API.G_FALSE,

894: IF p_freeze_flag = 'Y' THEN
895: PSB_Budget_Revisions_Pvt.Create_Budget_Revision
896: (
897: p_api_version => 1.0 ,
898: p_init_msg_list => FND_API.G_FALSE,
899: p_commit => FND_API.G_FALSE,
900: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
901: p_return_status => l_return_status,
902: p_msg_count => l_msg_count,

Line 899: p_commit => FND_API.G_FALSE,

895: PSB_Budget_Revisions_Pvt.Create_Budget_Revision
896: (
897: p_api_version => 1.0 ,
898: p_init_msg_list => FND_API.G_FALSE,
899: p_commit => FND_API.G_FALSE,
900: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
901: p_return_status => l_return_status,
902: p_msg_count => l_msg_count,
903: p_msg_data => l_msg_data ,

Line 900: p_validation_level => FND_API.G_VALID_LEVEL_NONE,

896: (
897: p_api_version => 1.0 ,
898: p_init_msg_list => FND_API.G_FALSE,
899: p_commit => FND_API.G_FALSE,
900: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
901: p_return_status => l_return_status,
902: p_msg_count => l_msg_count,
903: p_msg_data => l_msg_data ,
904: --

Line 913: p_init_msg_list => FND_API.G_FALSE,

909:
910: PSB_Budget_Revisions_Pvt.Create_Budget_Revision
911: (
912: p_api_version => 1.0 ,
913: p_init_msg_list => FND_API.G_FALSE,
914: p_commit => FND_API.G_FALSE,
915: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
916: p_return_status => l_return_status,
917: p_msg_count => l_msg_count,

Line 914: p_commit => FND_API.G_FALSE,

910: PSB_Budget_Revisions_Pvt.Create_Budget_Revision
911: (
912: p_api_version => 1.0 ,
913: p_init_msg_list => FND_API.G_FALSE,
914: p_commit => FND_API.G_FALSE,
915: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
916: p_return_status => l_return_status,
917: p_msg_count => l_msg_count,
918: p_msg_data => l_msg_data ,

Line 915: p_validation_level => FND_API.G_VALID_LEVEL_NONE,

911: (
912: p_api_version => 1.0 ,
913: p_init_msg_list => FND_API.G_FALSE,
914: p_commit => FND_API.G_FALSE,
915: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
916: p_return_status => l_return_status,
917: p_msg_count => l_msg_count,
918: p_msg_data => l_msg_data ,
919: --

Line 927: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

923: );
924:
925: END IF;
926: --
927: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
928: RAISE FND_API.G_EXC_ERROR ;
929: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
931: END IF;

Line 928: RAISE FND_API.G_EXC_ERROR ;

924:
925: END IF;
926: --
927: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
928: RAISE FND_API.G_EXC_ERROR ;
929: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
931: END IF;
932: --

Line 929: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

925: END IF;
926: --
927: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
928: RAISE FND_API.G_EXC_ERROR ;
929: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
931: END IF;
932: --
933: -- Update freeze_flag in psb_budget_revision_lines.

Line 930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

926: --
927: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
928: RAISE FND_API.G_EXC_ERROR ;
929: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
931: END IF;
932: --
933: -- Update freeze_flag in psb_budget_revision_lines.
934:

Line 949: IF FND_API.To_Boolean ( p_commit ) THEN

945: WHERE budget_revision_id = p_budget_revision_id;
946: --
947: END IF;
948:
949: IF FND_API.To_Boolean ( p_commit ) THEN
950: COMMIT WORK;
951: END IF;
952: --
953: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 958: WHEN FND_API.G_EXC_ERROR THEN

954: p_data => p_msg_data );
955: --
956: EXCEPTION
957: --
958: WHEN FND_API.G_EXC_ERROR THEN
959: --
960: ROLLBACK TO Freeze_Budget_Revision_Pvt ;
961: p_return_status := FND_API.G_RET_STS_ERROR;
962: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 961: p_return_status := FND_API.G_RET_STS_ERROR;

957: --
958: WHEN FND_API.G_EXC_ERROR THEN
959: --
960: ROLLBACK TO Freeze_Budget_Revision_Pvt ;
961: p_return_status := FND_API.G_RET_STS_ERROR;
962: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
963: p_data => p_msg_data );
964: --
965: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 965: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

961: p_return_status := FND_API.G_RET_STS_ERROR;
962: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
963: p_data => p_msg_data );
964: --
965: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
966: --
967: ROLLBACK TO Freeze_Budget_Revision_Pvt ;
968: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
969: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 968: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

964: --
965: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
966: --
967: ROLLBACK TO Freeze_Budget_Revision_Pvt ;
968: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
969: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
970: p_data => p_msg_data );
971: --
972: WHEN OTHERS THEN

Line 975: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

971: --
972: WHEN OTHERS THEN
973: --
974: ROLLBACK TO Freeze_Budget_Revision_Pvt ;
975: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
976: --
977: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
978: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
979: l_api_name);

Line 997: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

993: --
994: PROCEDURE Find_Parent_Budget_Revision
995: (
996: p_api_version IN NUMBER,
997: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
998: p_commit IN VARCHAR2 := FND_API.G_FALSE,
999: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1000: p_return_status OUT NOCOPY VARCHAR2,
1001: p_msg_count OUT NOCOPY NUMBER,

Line 998: p_commit IN VARCHAR2 := FND_API.G_FALSE,

994: PROCEDURE Find_Parent_Budget_Revision
995: (
996: p_api_version IN NUMBER,
997: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
998: p_commit IN VARCHAR2 := FND_API.G_FALSE,
999: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1000: p_return_status OUT NOCOPY VARCHAR2,
1001: p_msg_count OUT NOCOPY NUMBER,
1002: p_msg_data OUT NOCOPY VARCHAR2,

Line 999: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

995: (
996: p_api_version IN NUMBER,
997: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
998: p_commit IN VARCHAR2 := FND_API.G_FALSE,
999: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1000: p_return_status OUT NOCOPY VARCHAR2,
1001: p_msg_count OUT NOCOPY NUMBER,
1002: p_msg_data OUT NOCOPY VARCHAR2,
1003: --

Line 1027: IF NOT FND_API.Compatible_API_Call ( l_api_version,

1023: BEGIN
1024: --
1025: SAVEPOINT Find_Parent_Revision_Pvt ;
1026: --
1027: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1028: p_api_version,
1029: l_api_name,
1030: G_PKG_NAME )
1031: THEN

Line 1032: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

1028: p_api_version,
1029: l_api_name,
1030: G_PKG_NAME )
1031: THEN
1032: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1033: END IF;
1034: --
1035:
1036: IF FND_API.To_Boolean ( p_init_msg_list ) THEN

Line 1036: IF FND_API.To_Boolean ( p_init_msg_list ) THEN

1032: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1033: END IF;
1034: --
1035:
1036: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
1037: FND_MSG_PUB.initialize ;
1038: END IF;
1039: --
1040: p_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 1040: p_return_status := FND_API.G_RET_STS_SUCCESS ;

1036: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
1037: FND_MSG_PUB.initialize ;
1038: END IF;
1039: --
1040: p_return_status := FND_API.G_RET_STS_SUCCESS ;
1041: p_budget_revision_id_OUT := -99 ;
1042: --
1043: --
1044: -- Finding the budget revision information.

Line 1112: -- Cannot use FND_API.G_MISS_NUM as budget_revision_id is NUMBER(20) only.

1108: --
1109: EXCEPTION
1110: WHEN no_data_found THEN
1111: --
1112: -- Cannot use FND_API.G_MISS_NUM as budget_revision_id is NUMBER(20) only.
1113: --
1114: p_budget_revision_id_OUT := 0 ;
1115: --
1116: END ;

Line 1119: IF FND_API.To_Boolean ( p_commit ) THEN

1115: --
1116: END ;
1117:
1118: --
1119: IF FND_API.To_Boolean ( p_commit ) THEN
1120: COMMIT WORK;
1121: END IF;
1122: --
1123: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1128: WHEN FND_API.G_EXC_ERROR THEN

1124: p_data => p_msg_data );
1125: --
1126: EXCEPTION
1127: --
1128: WHEN FND_API.G_EXC_ERROR THEN
1129: --
1130: ROLLBACK TO Find_Parent_Revision_Pvt ;
1131: p_return_status := FND_API.G_RET_STS_ERROR;
1132: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1131: p_return_status := FND_API.G_RET_STS_ERROR;

1127: --
1128: WHEN FND_API.G_EXC_ERROR THEN
1129: --
1130: ROLLBACK TO Find_Parent_Revision_Pvt ;
1131: p_return_status := FND_API.G_RET_STS_ERROR;
1132: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1133: p_data => p_msg_data );
1134: --
1135: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1135: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1131: p_return_status := FND_API.G_RET_STS_ERROR;
1132: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1133: p_data => p_msg_data );
1134: --
1135: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1136: --
1137: ROLLBACK TO Find_Parent_Revision_Pvt ;
1138: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1139: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1138: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1134: --
1135: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1136: --
1137: ROLLBACK TO Find_Parent_Revision_Pvt ;
1138: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1139: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1140: p_data => p_msg_data );
1141: --
1142: WHEN OTHERS THEN

Line 1145: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1141: --
1142: WHEN OTHERS THEN
1143: --
1144: ROLLBACK TO Find_Parent_Revision_Pvt ;
1145: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1146: --
1147: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1148: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1149: l_api_name);

Line 1167: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1163: --
1164: PROCEDURE Find_Parent_Budget_Revisions
1165: (
1166: p_api_version IN NUMBER,
1167: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1168: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1169: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1170: p_return_status OUT NOCOPY VARCHAR2,
1171: p_msg_count OUT NOCOPY NUMBER,

Line 1168: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1164: PROCEDURE Find_Parent_Budget_Revisions
1165: (
1166: p_api_version IN NUMBER,
1167: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1168: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1169: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1170: p_return_status OUT NOCOPY VARCHAR2,
1171: p_msg_count OUT NOCOPY NUMBER,
1172: p_msg_data OUT NOCOPY VARCHAR2,

Line 1169: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1165: (
1166: p_api_version IN NUMBER,
1167: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1168: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1169: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1170: p_return_status OUT NOCOPY VARCHAR2,
1171: p_msg_count OUT NOCOPY NUMBER,
1172: p_msg_data OUT NOCOPY VARCHAR2,
1173: --

Line 1195: IF NOT FND_API.Compatible_API_Call ( l_api_version,

1191: BEGIN
1192: --
1193: SAVEPOINT Find_Parent_Revisions_Pvt;
1194: --
1195: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1196: p_api_version,
1197: l_api_name,
1198: G_PKG_NAME )
1199: THEN

Line 1200: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

1196: p_api_version,
1197: l_api_name,
1198: G_PKG_NAME )
1199: THEN
1200: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1201: END IF;
1202: --
1203:
1204: IF FND_API.To_Boolean ( p_init_msg_list ) THEN

Line 1204: IF FND_API.To_Boolean ( p_init_msg_list ) THEN

1200: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1201: END IF;
1202: --
1203:
1204: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
1205: FND_MSG_PUB.initialize ;
1206: END IF;
1207: --
1208: p_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 1208: p_return_status := FND_API.G_RET_STS_SUCCESS ;

1204: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
1205: FND_MSG_PUB.initialize ;
1206: END IF;
1207: --
1208: p_return_status := FND_API.G_RET_STS_SUCCESS ;
1209: --
1210:
1211: --
1212: -- Perform initialization

Line 1225: p_init_msg_list => FND_API.G_FALSE,

1221: --
1222: PSB_Create_BR_Pvt.Find_Parent_Budget_Revision
1223: (
1224: p_api_version => 1.0,
1225: p_init_msg_list => FND_API.G_FALSE,
1226: p_commit => FND_API.G_FALSE,
1227: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1228: p_return_status => l_return_status,
1229: p_msg_count => l_msg_count,

Line 1226: p_commit => FND_API.G_FALSE,

1222: PSB_Create_BR_Pvt.Find_Parent_Budget_Revision
1223: (
1224: p_api_version => 1.0,
1225: p_init_msg_list => FND_API.G_FALSE,
1226: p_commit => FND_API.G_FALSE,
1227: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1228: p_return_status => l_return_status,
1229: p_msg_count => l_msg_count,
1230: p_msg_data => l_msg_data,

Line 1227: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1223: (
1224: p_api_version => 1.0,
1225: p_init_msg_list => FND_API.G_FALSE,
1226: p_commit => FND_API.G_FALSE,
1227: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1228: p_return_status => l_return_status,
1229: p_msg_count => l_msg_count,
1230: p_msg_data => l_msg_data,
1231: --

Line 1236: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1232: p_budget_revision_id => l_current_budget_revision_id,
1233: p_budget_revision_id_OUT => l_parent_budget_revision_id
1234: );
1235: --
1236: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1237: RAISE FND_API.G_EXC_ERROR;
1238: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1239: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1240: END IF;

Line 1237: RAISE FND_API.G_EXC_ERROR;

1233: p_budget_revision_id_OUT => l_parent_budget_revision_id
1234: );
1235: --
1236: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1237: RAISE FND_API.G_EXC_ERROR;
1238: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1239: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1240: END IF;
1241: --

Line 1238: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1234: );
1235: --
1236: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1237: RAISE FND_API.G_EXC_ERROR;
1238: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1239: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1240: END IF;
1241: --
1242: IF l_parent_budget_revision_id = 0 THEN

Line 1239: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1235: --
1236: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1237: RAISE FND_API.G_EXC_ERROR;
1238: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1239: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1240: END IF;
1241: --
1242: IF l_parent_budget_revision_id = 0 THEN
1243:

Line 1259: IF FND_API.To_Boolean ( p_commit ) THEN

1255: --
1256: END LOOP ;
1257:
1258: --
1259: IF FND_API.To_Boolean ( p_commit ) THEN
1260: COMMIT WORK;
1261: END IF;
1262: --
1263: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1268: WHEN FND_API.G_EXC_ERROR THEN

1264: p_data => p_msg_data );
1265: --
1266: EXCEPTION
1267: --
1268: WHEN FND_API.G_EXC_ERROR THEN
1269: --
1270: ROLLBACK TO Find_Parent_Revisions_Pvt;
1271: p_return_status := FND_API.G_RET_STS_ERROR;
1272: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1271: p_return_status := FND_API.G_RET_STS_ERROR;

1267: --
1268: WHEN FND_API.G_EXC_ERROR THEN
1269: --
1270: ROLLBACK TO Find_Parent_Revisions_Pvt;
1271: p_return_status := FND_API.G_RET_STS_ERROR;
1272: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1273: p_data => p_msg_data );
1274: --
1275: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1275: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1271: p_return_status := FND_API.G_RET_STS_ERROR;
1272: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1273: p_data => p_msg_data );
1274: --
1275: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1276: --
1277: ROLLBACK TO Find_Parent_Revisions_Pvt;
1278: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1279: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1278: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1274: --
1275: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1276: --
1277: ROLLBACK TO Find_Parent_Revisions_Pvt;
1278: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1279: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1280: p_data => p_msg_data );
1281: --
1282: WHEN OTHERS THEN

Line 1285: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1281: --
1282: WHEN OTHERS THEN
1283: --
1284: ROLLBACK TO Find_Parent_Revisions_Pvt;
1285: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1286: --
1287: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1288: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1289: l_api_name);

Line 1308: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1304: --
1305: PROCEDURE Find_Child_Budget_Revisions
1306: (
1307: p_api_version IN NUMBER,
1308: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1309: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1310: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1311: p_return_status OUT NOCOPY VARCHAR2,
1312: p_msg_count OUT NOCOPY NUMBER,

Line 1309: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1305: PROCEDURE Find_Child_Budget_Revisions
1306: (
1307: p_api_version IN NUMBER,
1308: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1309: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1310: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1311: p_return_status OUT NOCOPY VARCHAR2,
1312: p_msg_count OUT NOCOPY NUMBER,
1313: p_msg_data OUT NOCOPY VARCHAR2,

Line 1310: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1306: (
1307: p_api_version IN NUMBER,
1308: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1309: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1310: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1311: p_return_status OUT NOCOPY VARCHAR2,
1312: p_msg_count OUT NOCOPY NUMBER,
1313: p_msg_data OUT NOCOPY VARCHAR2,
1314: --

Line 1339: IF NOT FND_API.Compatible_API_Call ( l_api_version,

1335: BEGIN
1336: --
1337: SAVEPOINT Find_Child_Revisions_Pvt;
1338: --
1339: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1340: p_api_version,
1341: l_api_name,
1342: G_PKG_NAME )
1343: THEN

Line 1344: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

1340: p_api_version,
1341: l_api_name,
1342: G_PKG_NAME )
1343: THEN
1344: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1345: END IF;
1346: --
1347:
1348: IF FND_API.To_Boolean ( p_init_msg_list ) THEN

Line 1348: IF FND_API.To_Boolean ( p_init_msg_list ) THEN

1344: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1345: END IF;
1346: --
1347:
1348: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
1349: FND_MSG_PUB.initialize ;
1350: END IF;
1351: --
1352: p_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 1352: p_return_status := FND_API.G_RET_STS_SUCCESS ;

1348: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
1349: FND_MSG_PUB.initialize ;
1350: END IF;
1351: --
1352: p_return_status := FND_API.G_RET_STS_SUCCESS ;
1353: --
1354:
1355: --
1356: -- Perform initialization

Line 1456: IF FND_API.To_Boolean ( p_commit ) THEN

1452:
1453: END LOOP ;
1454:
1455: --
1456: IF FND_API.To_Boolean ( p_commit ) THEN
1457: COMMIT WORK;
1458: END IF;
1459: --
1460: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1465: WHEN FND_API.G_EXC_ERROR THEN

1461: p_data => p_msg_data );
1462: --
1463: EXCEPTION
1464: --
1465: WHEN FND_API.G_EXC_ERROR THEN
1466: --
1467: ROLLBACK TO Find_Child_Revisions_Pvt ;
1468: p_return_status := FND_API.G_RET_STS_ERROR;
1469: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1468: p_return_status := FND_API.G_RET_STS_ERROR;

1464: --
1465: WHEN FND_API.G_EXC_ERROR THEN
1466: --
1467: ROLLBACK TO Find_Child_Revisions_Pvt ;
1468: p_return_status := FND_API.G_RET_STS_ERROR;
1469: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1470: p_data => p_msg_data );
1471: --
1472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1468: p_return_status := FND_API.G_RET_STS_ERROR;
1469: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1470: p_data => p_msg_data );
1471: --
1472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1473: --
1474: ROLLBACK TO Find_Child_Revisions_Pvt ;
1475: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1476: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1475: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1471: --
1472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1473: --
1474: ROLLBACK TO Find_Child_Revisions_Pvt ;
1475: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1476: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1477: p_data => p_msg_data );
1478: --
1479: WHEN OTHERS THEN

Line 1482: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1478: --
1479: WHEN OTHERS THEN
1480: --
1481: ROLLBACK TO Find_Child_Revisions_Pvt ;
1482: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1483: --
1484: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1485: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1486: l_api_name);

Line 1507: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1503: --
1504: PROCEDURE Update_Target_Budget_Revision
1505: (
1506: p_api_version IN NUMBER,
1507: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1508: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1509: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1510: p_return_status OUT NOCOPY VARCHAR2,
1511: p_msg_count OUT NOCOPY NUMBER,

Line 1508: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1504: PROCEDURE Update_Target_Budget_Revision
1505: (
1506: p_api_version IN NUMBER,
1507: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1508: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1509: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1510: p_return_status OUT NOCOPY VARCHAR2,
1511: p_msg_count OUT NOCOPY NUMBER,
1512: p_msg_data OUT NOCOPY VARCHAR2,

Line 1509: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1505: (
1506: p_api_version IN NUMBER,
1507: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1508: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1509: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1510: p_return_status OUT NOCOPY VARCHAR2,
1511: p_msg_count OUT NOCOPY NUMBER,
1512: p_msg_data OUT NOCOPY VARCHAR2,
1513: --

Line 1554: IF NOT FND_API.Compatible_API_Call ( l_api_version,

1550: BEGIN
1551: --
1552: SAVEPOINT Update_Target_Revision_Pvt ;
1553: --
1554: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1555: p_api_version,
1556: l_api_name,
1557: G_PKG_NAME )
1558: THEN

Line 1559: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

1555: p_api_version,
1556: l_api_name,
1557: G_PKG_NAME )
1558: THEN
1559: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1560: END IF;
1561: --
1562:
1563: IF FND_API.To_Boolean ( p_init_msg_list ) THEN

Line 1563: IF FND_API.To_Boolean ( p_init_msg_list ) THEN

1559: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1560: END IF;
1561: --
1562:
1563: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
1564: FND_MSG_PUB.initialize ;
1565: END IF;
1566: --
1567: p_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 1567: p_return_status := FND_API.G_RET_STS_SUCCESS ;

1563: IF FND_API.To_Boolean ( p_init_msg_list ) THEN
1564: FND_MSG_PUB.initialize ;
1565: END IF;
1566: --
1567: p_return_status := FND_API.G_RET_STS_SUCCESS ;
1568: --
1569: --
1570: -- Update budget revision submission related columns in the target
1571: -- budget revision.

Line 1582: p_init_msg_list => FND_API.G_FALSE,

1578:
1579: PSB_Budget_Revisions_Pvt.Create_Budget_Revision
1580: (
1581: p_api_version => 1.0 ,
1582: p_init_msg_list => FND_API.G_FALSE,
1583: p_commit => FND_API.G_FALSE,
1584: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
1585: p_return_status => l_return_status,
1586: p_msg_count => l_msg_count,

Line 1583: p_commit => FND_API.G_FALSE,

1579: PSB_Budget_Revisions_Pvt.Create_Budget_Revision
1580: (
1581: p_api_version => 1.0 ,
1582: p_init_msg_list => FND_API.G_FALSE,
1583: p_commit => FND_API.G_FALSE,
1584: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
1585: p_return_status => l_return_status,
1586: p_msg_count => l_msg_count,
1587: p_msg_data => l_msg_data ,

Line 1584: p_validation_level => FND_API.G_VALID_LEVEL_NONE,

1580: (
1581: p_api_version => 1.0 ,
1582: p_init_msg_list => FND_API.G_FALSE,
1583: p_commit => FND_API.G_FALSE,
1584: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
1585: p_return_status => l_return_status,
1586: p_msg_count => l_msg_count,
1587: p_msg_data => l_msg_data ,
1588: --

Line 1593: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1589: p_freeze_flag => l_freeze_flag,
1590: p_budget_revision_id => l_target_budget_revision_id
1591: );
1592: --
1593: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1594: RAISE FND_API.G_EXC_ERROR ;
1595: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1596: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1597: END IF;

Line 1594: RAISE FND_API.G_EXC_ERROR ;

1590: p_budget_revision_id => l_target_budget_revision_id
1591: );
1592: --
1593: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1594: RAISE FND_API.G_EXC_ERROR ;
1595: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1596: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1597: END IF;
1598:

Line 1595: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1591: );
1592: --
1593: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1594: RAISE FND_API.G_EXC_ERROR ;
1595: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1596: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1597: END IF;
1598:
1599: --

Line 1596: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

1592: --
1593: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1594: RAISE FND_API.G_EXC_ERROR ;
1595: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1596: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1597: END IF;
1598:
1599: --
1600: -- Find the source budget revision information.

Line 1688: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1684: p_creation_date => g_current_date,
1685: p_return_status => l_return_status
1686: ) ;
1687: --
1688: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1689: RAISE FND_API.G_EXC_ERROR ;
1690: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1692: END IF;

Line 1689: RAISE FND_API.G_EXC_ERROR ;

1685: p_return_status => l_return_status
1686: ) ;
1687: --
1688: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1689: RAISE FND_API.G_EXC_ERROR ;
1690: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1692: END IF;
1693: --

Line 1690: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1686: ) ;
1687: --
1688: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1689: RAISE FND_API.G_EXC_ERROR ;
1690: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1692: END IF;
1693: --
1694: END LOOP ;

Line 1691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

1687: --
1688: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1689: RAISE FND_API.G_EXC_ERROR ;
1690: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1692: END IF;
1693: --
1694: END LOOP ;
1695:

Line 1760: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1756: p_creation_date => g_current_date,
1757: p_return_status => l_return_status
1758: );
1759: --
1760: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1761: RAISE FND_API.G_EXC_ERROR ;
1762: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1763: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1764: END IF;

Line 1761: RAISE FND_API.G_EXC_ERROR ;

1757: p_return_status => l_return_status
1758: );
1759: --
1760: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1761: RAISE FND_API.G_EXC_ERROR ;
1762: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1763: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1764: END IF;
1765: --

Line 1762: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1758: );
1759: --
1760: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1761: RAISE FND_API.G_EXC_ERROR ;
1762: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1763: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1764: END IF;
1765: --
1766: END LOOP ;

Line 1763: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

1759: --
1760: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1761: RAISE FND_API.G_EXC_ERROR ;
1762: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1763: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1764: END IF;
1765: --
1766: END LOOP ;
1767:

Line 1771: IF FND_API.To_Boolean ( p_commit ) THEN

1767:
1768: END IF ;
1769:
1770: --
1771: IF FND_API.To_Boolean ( p_commit ) THEN
1772: COMMIT WORK;
1773: END IF;
1774: --
1775: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1780: WHEN FND_API.G_EXC_ERROR THEN

1776: p_data => p_msg_data );
1777: --
1778: EXCEPTION
1779: --
1780: WHEN FND_API.G_EXC_ERROR THEN
1781: --
1782: ROLLBACK TO Update_Target_Revision_Pvt ;
1783: p_return_status := FND_API.G_RET_STS_ERROR;
1784: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1783: p_return_status := FND_API.G_RET_STS_ERROR;

1779: --
1780: WHEN FND_API.G_EXC_ERROR THEN
1781: --
1782: ROLLBACK TO Update_Target_Revision_Pvt ;
1783: p_return_status := FND_API.G_RET_STS_ERROR;
1784: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1785: p_data => p_msg_data );
1786: --
1787: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1787: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1783: p_return_status := FND_API.G_RET_STS_ERROR;
1784: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1785: p_data => p_msg_data );
1786: --
1787: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1788: --
1789: ROLLBACK TO Update_Target_Revision_Pvt ;
1790: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1791: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,

Line 1790: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1786: --
1787: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1788: --
1789: ROLLBACK TO Update_Target_Revision_Pvt ;
1790: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1791: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
1792: p_data => p_msg_data );
1793: --
1794: WHEN OTHERS THEN

Line 1797: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1793: --
1794: WHEN OTHERS THEN
1795: --
1796: ROLLBACK TO Update_Target_Revision_Pvt ;
1797: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1798: --
1799:
1800: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1801: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,

Line 1836: p_return_status := FND_API.G_RET_STS_SUCCESS ;

1832: l_api_name CONSTANT VARCHAR2(30) := 'Insert_BR_Lines_Pvt' ;
1833: --
1834: BEGIN
1835: --
1836: p_return_status := FND_API.G_RET_STS_SUCCESS ;
1837: --
1838: update psb_budget_revision_lines
1839: set freeze_flag = p_freeze_flag,
1840: view_line_flag = p_view_line_flag,

Line 1881: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1877: EXCEPTION
1878: --
1879: WHEN OTHERS THEN
1880: --
1881: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1882: --
1883: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1884: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1885: l_api_name );

Line 1917: p_return_status := FND_API.G_RET_STS_SUCCESS ;

1913: l_api_name CONSTANT VARCHAR2(30) := 'Insert_BR_Pos_Lines_Pvt' ;
1914: --
1915: BEGIN
1916: --
1917: p_return_status := FND_API.G_RET_STS_SUCCESS ;
1918: --
1919: update psb_budget_revision_pos_lines
1920: set freeze_flag = p_freeze_flag,
1921: view_line_flag = p_view_line_flag,

Line 1962: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1958: EXCEPTION
1959: --
1960: WHEN OTHERS THEN
1961: --
1962: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1963: --
1964: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1965: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1966: l_api_name );