DBA Data[Home] [Help]

APPS.PA_ROLE_STATUS_MENU_PVT dependencies on FND_API

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

1: package body PA_ROLE_STATUS_MENU_PVT AS
2: /* $Header: PAXRSMVB.pls 115.3 2003/08/21 05:21:40 sulkumar ship $ */
3:
4: procedure INSERT_ROW (
5: p_commit IN VARCHAR2:=FND_API.G_FALSE,
6: p_debug_mode in varchar2 default 'N',
7: P_ROLE_STATUS_MENU_ID OUT NOCOPY NUMBER,
8: P_ROLE_ID IN NUMBER,
9: P_STATUS_TYPE IN VARCHAR2,

Line 57: IF p_return_status = FND_API.G_RET_STS_SUCCESS THEN

53: p_status_code => p_status_code,
54: p_return_status => p_return_status,
55: p_error_message_code => l_error_message_code);
56:
57: IF p_return_status = FND_API.G_RET_STS_SUCCESS THEN
58:
59: -- Call the table handler to insert into the table
60:
61: pa_role_status_menu_pkg.insert_row(

Line 104: (p_commit => FND_API.G_FALSE,

100: l_new_menu_name_tbl(1) := l_menu_name;
101: l_new_role_sts_menu_id_tbl(1) := p_role_status_menu_id;
102:
103: pa_security_pvt.update_status_based_sec
104: (p_commit => FND_API.G_FALSE,
105: p_project_role_id => p_role_id,
106: p_status_level => l_status_level,
107: p_new_status_code_tbl => l_new_status_code_tbl,
108: p_new_status_type_tbl => l_new_status_type_tbl,

Line 124: ELSIF p_return_status = FND_API.G_RET_STS_ERROR THEN

120: x_msg_data => p_msg_data
121: );
122: END IF;
123:
124: ELSIF p_return_status = FND_API.G_RET_STS_ERROR THEN
125: fnd_message.set_name('PA', l_error_message_code);
126: fnd_msg_pub.ADD;
127: p_msg_count := p_msg_count + 1;
128:

Line 129: ELSIF p_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

125: fnd_message.set_name('PA', l_error_message_code);
126: fnd_msg_pub.ADD;
127: p_msg_count := p_msg_count + 1;
128:
129: ELSIF p_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
130:
131: fnd_msg_pub.add_exc_msg
132: (p_pkg_name => 'pa_role_status_menu_utils',
133: p_procedure_name => 'check_dup_role_status',

Line 143: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

139:
140: EXCEPTION
141: WHEN OTHERS THEN
142:
143: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
144: l_sqlcode := SQLCODE;
145:
146: fnd_msg_pub.add_exc_msg
147: (p_pkg_name => 'PA_ROLE_STATUS_MENU_PVT',

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

152:
153: END;
154:
155: procedure LOCK_ROW (
156: p_commit IN VARCHAR2:=FND_API.G_FALSE,
157: p_debug_mode in varchar2 default 'N',
158: P_ROLE_STATUS_MENU_ID IN NUMBER,
159: P_OBJECT_VERSION_NUMBER IN NUMBER,
160: p_return_status OUT NOCOPY varchar2,

Line 180: p_return_status := FND_API.G_RET_STS_SUCCESS;

176: P_ROLE_STATUS_MENU_ID => P_ROLE_STATUS_MENU_ID,
177: P_OBJECT_VERSION_NUMBER => P_OBJECT_VERSION_NUMBER
178: );
179:
180: p_return_status := FND_API.G_RET_STS_SUCCESS;
181:
182: EXCEPTION
183: WHEN OTHERS THEN
184:

Line 185: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

181:
182: EXCEPTION
183: WHEN OTHERS THEN
184:
185: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
186: l_sqlcode := SQLCODE;
187:
188: fnd_msg_pub.add_exc_msg
189: (p_pkg_name => 'PA_ROLE_STATUS_MENU_PVT',

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

193: p_msg_count := p_msg_count + 1;
194: END;
195:
196: procedure UPDATE_ROW (
197: p_commit IN VARCHAR2:=FND_API.G_FALSE,
198: p_debug_mode in varchar2 default 'N',
199: -- P_ROWID IN OUT NOCOPY VARCHAR2,
200: P_ROLE_STATUS_MENU_ID IN NUMBER,
201: P_ROLE_ID IN NUMBER,

Line 248: p_return_status := FND_API.G_RET_STS_SUCCESS;

244: into l_status_code
245: from pa_role_status_menu_map
246: where role_status_menu_id = p_role_status_menu_id;
247:
248: p_return_status := FND_API.G_RET_STS_SUCCESS;
249:
250: IF l_status_code <> p_status_code THEN
251:
252: -- Check if the role status is a duplicate

Line 263: IF p_return_status = FND_API.G_RET_STS_SUCCESS THEN

259: p_error_message_code => l_error_message_code);
260:
261: END IF;
262:
263: IF p_return_status = FND_API.G_RET_STS_SUCCESS THEN
264:
265: -- Call the table handler to update the row
266:
267: pa_role_status_menu_pkg.update_row(

Line 305: (p_commit => FND_API.G_FALSE,

301: l_mod_menu_id_tbl(1) := p_menu_id;
302: l_mod_role_sts_menu_id_tbl(1) := p_role_status_menu_id;
303:
304: pa_security_pvt.update_status_based_sec
305: (p_commit => FND_API.G_FALSE,
306: p_project_role_id => p_role_id,
307: p_status_level => l_status_level,
308: p_new_status_code_tbl => l_new_status_code_tbl,
309: p_new_status_type_tbl => l_new_status_type_tbl,

Line 326: ELSIF p_return_status = FND_API.G_RET_STS_ERROR THEN

322: );
323: END IF;
324:
325:
326: ELSIF p_return_status = FND_API.G_RET_STS_ERROR THEN
327: fnd_message.set_name('PA', l_error_message_code);
328: fnd_msg_pub.ADD;
329:
330: p_msg_count := p_msg_count + 1;

Line 331: ELSIF p_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

327: fnd_message.set_name('PA', l_error_message_code);
328: fnd_msg_pub.ADD;
329:
330: p_msg_count := p_msg_count + 1;
331: ELSIF p_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
332:
333: fnd_msg_pub.add_exc_msg
334: (p_pkg_name => 'PA_ROLE_STATUS_MENU_UTILS',
335: p_procedure_name => 'check_dup_role_status',

Line 344: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

340:
341: EXCEPTION
342: WHEN OTHERS THEN
343:
344: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
345: l_sqlcode := SQLCODE;
346:
347: fnd_msg_pub.add_exc_msg
348: (p_pkg_name => 'PA_ROLE_STATUS_MENU_PVT',

Line 357: p_commit in VARCHAR2 := FND_API.G_FALSE,

353: END;
354:
355:
356: procedure DELETE_ROW (
357: p_commit in VARCHAR2 := FND_API.G_FALSE,
358: p_debug_mode in varchar2 default 'N',
359: P_ROLE_STATUS_MENU_ID IN NUMBER,
360: P_OBJECT_VERSION_NUMBER IN NUMBER,
361: p_return_status out NOCOPY varchar2,

Line 395: p_return_status := FND_API.G_RET_STS_SUCCESS;

391: FND_MSG_PUB.initialize;
392:
393: p_msg_count := 0;
394:
395: p_return_status := FND_API.G_RET_STS_SUCCESS;
396:
397: -- hr_utility.trace('before my stuff');
398: select role_id, status_code, status_type
399: into l_role_id, l_status_code, l_status_type

Line 434: (p_commit => FND_API.G_FALSE,

430:
431: IF l_count > 0 THEN
432:
433: pa_security_pvt.update_status_based_sec
434: (p_commit => FND_API.G_FALSE,
435: p_project_role_id => l_role_id,
436: p_status_level => l_status_level,
437: p_new_status_code_tbl => l_new_status_code_tbl,
438: p_new_status_type_tbl => l_new_status_type_tbl,

Line 457: -- IF p_return_status = FND_API.G_RET_STS_SUCCESS THEN

453: -- hr_utility.trace('p_return_status is ' || p_return_status);
454: -- hr_utility.trace('p_msg_data is ' || p_msg_data);
455:
456: END IF; -- l_count > 0
457: -- IF p_return_status = FND_API.G_RET_STS_SUCCESS THEN
458: -- END IF;
459:
460: EXCEPTION
461: WHEN OTHERS THEN

Line 464: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

460: EXCEPTION
461: WHEN OTHERS THEN
462:
463: -- hr_utility.trace('SQLERRM is ' || SQLERRM);
464: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
465:
466: l_sqlcode := SQLCODE;
467:
468: fnd_msg_pub.add_exc_msg