1 PACKAGE BODY ieu_uwq_media_actions_pkg AS
2 /* $Header: IEUMACLB.pls 120.0 2005/06/02 15:57:02 appldev noship $ */
3 PROCEDURE insert_row(
4 x_rowid IN OUT NOCOPY VARCHAR2
5 , x_media_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_media_type_id NUMBER
12 , x_maction_def_id NUMBER
13 , x_application_id NUMBER
14 , x_classification VARCHAR2
15 , x_other_params VARCHAR2
16 ) IS
17 CURSOR l_insert IS
18 SELECT ROWID
19 FROM ieu_uwq_media_actions
20 WHERE media_action_id = x_media_action_id;
21 BEGIN
22 INSERT INTO ieu_uwq_media_actions (
23 media_action_id
24 , created_by
25 , creation_date
26 , last_updated_by
27 , last_update_date
28 , last_update_login
29 , media_type_id
30 , maction_def_id
31 , application_id
32 , classification
33 , other_params
34 , object_version_number
35 ) VALUES (
36 x_media_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_media_type_id,FND_API.G_MISS_NUM,NULL,x_media_type_id)
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_classification,FND_API.G_MISS_CHAR,NULL,x_classification)
46 , DECODE(x_other_params,FND_API.G_MISS_CHAR,NULL,x_other_params)
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 END insert_row;
57
58 PROCEDURE delete_row(
59 x_media_action_id NUMBER
60 ) IS
61 BEGIN
62 DELETE FROM ieu_uwq_media_actions
63 WHERE media_action_id = x_media_action_id;
64 IF (SQL%NOTFOUND) THEN
65 RAISE NO_DATA_FOUND;
66 END IF;
67 END delete_row;
68
69 PROCEDURE update_row(
70 x_rowid VARCHAR2
71 , x_media_action_id NUMBER
72 , x_created_by NUMBER
73 , x_creation_date DATE
74 , x_last_updated_by NUMBER
75 , x_last_update_date DATE
76 , x_last_update_login NUMBER
77 , x_media_type_id NUMBER
78 , x_maction_def_id NUMBER
79 , x_application_id NUMBER
80 , x_classification VARCHAR2
81 , x_other_params VARCHAR2
82 ) IS
83 BEGIN
84 UPDATE ieu_uwq_media_actions
85 SET
86 media_action_id=DECODE(x_media_action_id,FND_API.G_MISS_NUM,NULL,x_media_action_id)
87 , created_by=DECODE(x_created_by,FND_API.G_MISS_NUM,NULL,x_created_by)
88 , creation_date=DECODE(x_creation_date,FND_API.G_MISS_DATE,NULL,x_creation_date)
89 , last_updated_by=DECODE(x_last_updated_by,FND_API.G_MISS_NUM,NULL,x_last_updated_by)
90 , last_update_date=DECODE(x_last_update_date,FND_API.G_MISS_DATE,NULL,x_last_update_date)
91 , last_update_login=DECODE(x_last_update_login,FND_API.G_MISS_NUM,NULL,x_last_update_login)
92 , media_type_id=DECODE(x_media_type_id,FND_API.G_MISS_NUM,NULL,x_media_type_id)
93 , maction_def_id=DECODE(x_maction_def_id,FND_API.G_MISS_NUM,NULL,x_maction_def_id)
94 , application_id=DECODE(x_application_id,FND_API.G_MISS_NUM,NULL,x_application_id)
95 , classification=DECODE(x_classification,FND_API.G_MISS_CHAR,NULL,x_classification)
96 , other_params=DECODE(x_other_params,FND_API.G_MISS_CHAR,NULL,x_other_params)
97 , object_version_number=nvl(object_version_number,0) + 1
98 WHERE ROWID = x_rowid;
99 IF (SQL%NOTFOUND) THEN
100 RAISE NO_DATA_FOUND;
101 END IF;
102 END update_row;
103
104 PROCEDURE lock_row(
105 x_rowid VARCHAR2
106 , x_media_action_id NUMBER
107 , x_created_by NUMBER
108 , x_creation_date DATE
109 , x_last_updated_by NUMBER
110 , x_last_update_date DATE
111 , x_last_update_login NUMBER
112 , x_media_type_id NUMBER
113 , x_maction_def_id NUMBER
114 , x_application_id NUMBER
115 , x_classification VARCHAR2
116 , x_other_params VARCHAR2
117 ) IS
118 CURSOR l_lock IS
119 SELECT *
120 FROM ieu_uwq_media_actions
121 WHERE rowid = x_rowid
122 FOR UPDATE OF media_action_id NOWAIT;
123 l_table_rec l_lock%ROWTYPE;
124 BEGIN
125 OPEN l_lock;
126 FETCH l_lock INTO l_table_rec;
127 IF (l_lock%NOTFOUND) THEN
128 CLOSE l_lock;
129 FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
130 APP_EXCEPTION.RAISE_EXCEPTION;
131 END IF;
132 CLOSE l_lock;
133 IF (
134 ((l_table_rec.media_action_id = x_media_action_id)
135 OR ((l_table_rec.media_action_id IS NULL)
136 AND ( x_media_action_id IS NULL)))
137 AND ((l_table_rec.created_by = x_created_by)
138 OR ((l_table_rec.created_by IS NULL)
139 AND ( x_created_by IS NULL)))
140 AND ((l_table_rec.creation_date = x_creation_date)
141 OR ((l_table_rec.creation_date IS NULL)
142 AND ( x_creation_date IS NULL)))
143 AND ((l_table_rec.last_updated_by = x_last_updated_by)
144 OR ((l_table_rec.last_updated_by IS NULL)
145 AND ( x_last_updated_by IS NULL)))
146 AND ((l_table_rec.last_update_date = x_last_update_date)
147 OR ((l_table_rec.last_update_date IS NULL)
148 AND ( x_last_update_date IS NULL)))
149 AND ((l_table_rec.last_update_login = x_last_update_login)
150 OR ((l_table_rec.last_update_login IS NULL)
151 AND ( x_last_update_login IS NULL)))
152 AND ((l_table_rec.media_type_id = x_media_type_id)
153 OR ((l_table_rec.media_type_id IS NULL)
154 AND ( x_media_type_id IS NULL)))
155 AND ((l_table_rec.maction_def_id = x_maction_def_id)
156 OR ((l_table_rec.maction_def_id IS NULL)
157 AND ( x_maction_def_id IS NULL)))
158 AND ((l_table_rec.application_id = x_application_id)
159 OR ((l_table_rec.application_id IS NULL)
160 AND ( x_application_id IS NULL)))
161 AND ((l_table_rec.classification = x_classification)
162 OR ((l_table_rec.classification IS NULL)
163 AND ( x_classification IS NULL)))
164 AND ((l_table_rec.other_params = x_other_params)
165 OR ((l_table_rec.other_params IS NULL)
166 AND ( x_other_params IS NULL)))
167 ) THEN
168 RETURN;
169 ELSE
170 FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
171 APP_EXCEPTION.RAISE_EXCEPTION;
172 END IF;
173 END lock_row;
174 END ieu_uwq_media_actions_pkg;