APPS.GL_DEFAS_RESP_ASSIGN_PKG dependencies on GL_DEFAS_RESP_ASSIGN

Line 1: PACKAGE BODY gl_defas_resp_assign_pkg AS

1: PACKAGE BODY gl_defas_resp_assign_pkg AS
2: /* $Header: glistrab.pls 120.5 2005/09/02 10:35:14 adesu ship $ */
3:
4: PROCEDURE Insert_Row(
5: X_Rowid IN OUT NOCOPY VARCHAR2,

Line 39: FROM gl_defas_resp_assign

35: X_Default_Modify_Flag IN VARCHAR2
36: ) IS
37: CURSOR C IS
38: SELECT rowid
39: FROM gl_defas_resp_assign
40: WHERE definition_access_set_id = X_Definition_Access_Set_Id
41: AND application_id = X_Application_Id
42: AND responsibility_id = X_Responsibility_Id;
43:

Line 45: INSERT INTO gl_defas_resp_assign(

41: AND application_id = X_Application_Id
42: AND responsibility_id = X_Responsibility_Id;
43:
44: BEGIN
45: INSERT INTO gl_defas_resp_assign(
46: security_group_id,
47: application_id,
48: responsibility_id,
49: definition_access_set_id,

Line 157: FROM gl_defas_resp_assign

153: X_Default_Modify_Flag IN VARCHAR2
154: ) IS
155: CURSOR C IS
156: SELECT *
157: FROM gl_defas_resp_assign
158: WHERE rowid = X_Rowid
159: FOR UPDATE of Definition_Access_Set_Id NOWAIT;
160: Recinfo C%ROWTYPE;
161: l_request_id NUMBER(15);

Line 329: UPDATE gl_defas_resp_assign

325: X_Default_Use_Flag IN VARCHAR2,
326: X_Default_Modify_Flag IN VARCHAR2
327: ) IS
328: BEGIN
329: UPDATE gl_defas_resp_assign
330: SET last_update_date = X_Last_Update_Date,
331: last_updated_by = X_Last_Updated_By,
332: last_update_login = X_Last_Update_Login,
333: status_code = X_Status_Code,

Line 366: UPDATE GL_DEFAS_RESP_ASSIGN

362:
363:
364: PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
365: BEGIN
366: UPDATE GL_DEFAS_RESP_ASSIGN
367: SET status_code = 'D'
368: WHERE rowid = X_Rowid;
369:
370: if SQL%NOTFOUND then

Line 384: FROM GL_DEFAS_RESP_ASSIGN r

380: X_Security_Group_Id NUMBER)IS
381:
382: CURSOR c_dup IS
383: SELECT 'Duplicate'
384: FROM GL_DEFAS_RESP_ASSIGN r
385: WHERE r.application_id = X_Application_Id
386: AND r.responsibility_Id = X_Responsibility_Id
387: AND r.security_group_id = X_Security_Group_Id
388: AND r.definition_access_set_id = X_Definition_Access_Set_Id

Line 411: 'GL_DEFAS_RESP_ASSIGN_PKG.check_unique_set');

407: RAISE;
408: WHEN OTHERS THEN
409: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
410: fnd_message.set_token('PROCEDURE',
411: 'GL_DEFAS_RESP_ASSIGN_PKG.check_unique_set');
412: RAISE;
413:
414: END check_unique_set;
415:

Line 417: END gl_defas_resp_assign_pkg;

413:
414: END check_unique_set;
415:
416:
417: END gl_defas_resp_assign_pkg;