1 PACKAGE BODY ieu_uwq_nonmedia_actions_pkg AS
2 /* $Header: IEUNMACB.pls 115.4 2003/08/21 18:34:42 fsuthar ship $ */
3 PROCEDURE insert_row(
4 x_rowid IN OUT NOCOPY VARCHAR2
5 , x_nonmedia_action_id NUMBER
6 , x_created_by NUMBER
7 , x_creation_date DATE
8 , x_last_updated_by NUMBER
9 , x_last_update_date DATE
10 , x_last_update_login NUMBER
11 , x_action_object_code VARCHAR2
12 , x_maction_def_id NUMBER
13 , x_application_id NUMBER
14 , x_source_for_task_flag VARCHAR2
15 , x_responsibility_id NUMBER
16 ) IS
17 CURSOR l_insert IS
18 SELECT ROWID
19 FROM ieu_uwq_nonmedia_actions
20 WHERE nonmedia_action_id = x_nonmedia_action_id;
21 BEGIN
22 INSERT INTO ieu_uwq_nonmedia_actions (
23 nonmedia_action_id
24 , created_by
25 , creation_date
26 , last_updated_by
27 , last_update_date
28 , last_update_login
29 , action_object_code
30 , maction_def_id
31 , application_id
32 , source_for_task_flag
33 , responsibility_id
34 , object_version_number
35 ) VALUES (
36 x_nonmedia_action_id
37 , DECODE(x_created_by,FND_API.G_MISS_NUM,NULL,x_created_by)
38 , DECODE(x_creation_date,FND_API.G_MISS_DATE,NULL,x_creation_date)
39 , DECODE(x_last_updated_by,FND_API.G_MISS_NUM,NULL,x_last_updated_by)
40 , DECODE(x_last_update_date,FND_API.G_MISS_DATE,NULL,x_last_update_date)
41 , DECODE(x_last_update_login,FND_API.G_MISS_NUM,NULL,x_last_update_login)
42 , DECODE(x_action_object_code,FND_API.G_MISS_CHAR,NULL,x_action_object_code)
43 , DECODE(x_maction_def_id,FND_API.G_MISS_NUM,NULL,x_maction_def_id)
44 , DECODE(x_application_id,FND_API.G_MISS_NUM,NULL,x_application_id)
45 , DECODE(x_source_for_task_flag,FND_API.G_MISS_CHAR,NULL,x_source_for_task_flag)
46 , DECODE(x_responsibility_id,FND_API.G_MISS_NUM,NULL,x_responsibility_id)
47 , 1
48 );
49
50 OPEN l_insert;
51 FETCH l_insert INTO x_rowid;
52 IF (l_insert%NOTFOUND) THEN
53 CLOSE l_insert;
54 RAISE NO_DATA_FOUND;
55 END IF;
56
57 END insert_row;
58
59 PROCEDURE delete_row(
60 x_nonmedia_action_id NUMBER
61 ) IS
62 BEGIN
63 DELETE FROM ieu_uwq_nonmedia_actions
64 WHERE nonmedia_action_id = x_nonmedia_action_id;
65 IF (SQL%NOTFOUND) THEN
66 RAISE NO_DATA_FOUND;
67 END IF;
68 END delete_row;
69
70 PROCEDURE update_row(
71 x_rowid VARCHAR2
72 , x_nonmedia_action_id NUMBER
73 , x_created_by NUMBER
74 , x_creation_date DATE
75 , x_last_updated_by NUMBER
76 , x_last_update_date DATE
77 , x_last_update_login NUMBER
78 , x_action_object_code VARCHAR2
79 , x_maction_def_id NUMBER
80 , x_application_id NUMBER
81 , x_source_for_task_flag VARCHAR2
82 , x_responsibility_id NUMBER
83 ) IS
84 BEGIN
85 UPDATE ieu_uwq_nonmedia_actions
86 SET
87 nonmedia_action_id=DECODE(x_nonmedia_action_id,FND_API.G_MISS_NUM,NULL,x_nonmedia_action_id)
88 , created_by=DECODE(x_created_by,FND_API.G_MISS_NUM,NULL,x_created_by)
89 , creation_date=DECODE(x_creation_date,FND_API.G_MISS_DATE,NULL,x_creation_date)
90 , last_updated_by=DECODE(x_last_updated_by,FND_API.G_MISS_NUM,NULL,x_last_updated_by)
91 , last_update_date=DECODE(x_last_update_date,FND_API.G_MISS_DATE,NULL,x_last_update_date)
92 , last_update_login=DECODE(x_last_update_login,FND_API.G_MISS_NUM,NULL,x_last_update_login)
93 , action_object_code=DECODE(x_action_object_code,FND_API.G_MISS_CHAR,NULL,x_action_object_code)
94 , maction_def_id=DECODE(x_maction_def_id,FND_API.G_MISS_NUM,NULL,x_maction_def_id)
95 , application_id=DECODE(x_application_id,FND_API.G_MISS_NUM,NULL,x_application_id)
96 , source_for_task_flag = DECODE(x_source_for_task_flag,FND_API.G_MISS_CHAR,NULL,x_source_for_task_flag)
97 , responsibility_id = DECODE(x_responsibility_id,FND_API.G_MISS_NUM,NULL,x_responsibility_id)
98 , object_version_number=nvl(object_version_number,0) + 1
99 WHERE ROWID = x_rowid;
100 IF (SQL%NOTFOUND) THEN
101 RAISE NO_DATA_FOUND;
102 END IF;
103 END update_row;
104
105
106 PROCEDURE lock_row(
107 x_rowid VARCHAR2
108 , x_nonmedia_action_id NUMBER
109 , x_created_by NUMBER
110 , x_creation_date DATE
111 , x_last_updated_by NUMBER
112 , x_last_update_date DATE
113 , x_last_update_login NUMBER
114 , x_action_object_code VARCHAR2
115 , x_maction_def_id NUMBER
116 , x_application_id NUMBER
117 , x_source_for_task_flag VARCHAR2
118 , x_responsibility_id NUMBER
119 ) IS
120 CURSOR l_lock IS
121 SELECT *
122 FROM ieu_uwq_nonmedia_actions
123 WHERE rowid = x_rowid
124 FOR UPDATE OF nonmedia_action_id NOWAIT;
125 l_table_rec l_lock%ROWTYPE;
126 BEGIN
127 OPEN l_lock;
128 FETCH l_lock INTO l_table_rec;
129 IF (l_lock%NOTFOUND) THEN
130 CLOSE l_lock;
131 FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
132 APP_EXCEPTION.RAISE_EXCEPTION;
133 END IF;
134 CLOSE l_lock;
135 IF (
136 ((l_table_rec.nonmedia_action_id = x_nonmedia_action_id)
137 OR ((l_table_rec.nonmedia_action_id IS NULL)
138 AND ( x_nonmedia_action_id IS NULL)))
139 AND ((l_table_rec.created_by = x_created_by)
140 OR ((l_table_rec.created_by IS NULL)
141 AND ( x_created_by IS NULL)))
142 AND ((l_table_rec.creation_date = x_creation_date)
143 OR ((l_table_rec.creation_date IS NULL)
144 AND ( x_creation_date IS NULL)))
145 AND ((l_table_rec.last_updated_by = x_last_updated_by)
146 OR ((l_table_rec.last_updated_by IS NULL)
147 AND ( x_last_updated_by IS NULL)))
148 AND ((l_table_rec.last_update_date = x_last_update_date)
149 OR ((l_table_rec.last_update_date IS NULL)
150 AND ( x_last_update_date IS NULL)))
151 AND ((l_table_rec.last_update_login = x_last_update_login)
152 OR ((l_table_rec.last_update_login IS NULL)
153 AND ( x_last_update_login IS NULL)))
154 AND ((l_table_rec.action_object_code = x_action_object_code)
155 OR ((l_table_rec.action_object_code IS NULL)
156 AND ( x_action_object_code IS NULL)))
157 AND ((l_table_rec.maction_def_id = x_maction_def_id)
158 OR ((l_table_rec.maction_def_id IS NULL)
159 AND ( x_maction_def_id IS NULL)))
160 AND ((l_table_rec.application_id = x_application_id)
161 OR ((l_table_rec.application_id IS NULL)
162 AND ( x_application_id IS NULL)))
163 AND ((l_table_rec.source_for_task_flag = x_source_for_task_flag)
164 OR ((l_table_rec.source_for_task_flag IS NULL)
165 AND ( x_source_for_task_flag IS NULL)))
166 AND ((l_table_rec.responsibility_id = x_responsibility_id)
167 OR ((l_table_rec.responsibility_id IS NULL)
168 AND ( x_responsibility_id IS NULL)))
169 ) THEN
170 RETURN;
171 ELSE
172 FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
173 APP_EXCEPTION.RAISE_EXCEPTION;
174 END IF;
175 END lock_row;
176 END ieu_uwq_nonmedia_actions_pkg;