[Home] [Help]
PACKAGE BODY: APPS.JTF_TASK_PHONES_PKG
Source
1 PACKAGE BODY jtf_task_phones_pkg AS
2 /* $Header: jtftkphb.pls 115.20 2002/12/04 21:49:07 cjang ship $ */
3 PROCEDURE insert_row (
4 x_rowid IN OUT NOCOPY VARCHAR2,
5 x_task_phone_id IN NUMBER,
6 x_attribute5 IN VARCHAR2,
7 x_attribute6 IN VARCHAR2,
8 x_attribute7 IN VARCHAR2,
9 x_attribute8 IN VARCHAR2,
10 x_attribute9 IN VARCHAR2,
11 x_attribute10 IN VARCHAR2,
12 x_attribute11 IN VARCHAR2,
13 x_attribute12 IN VARCHAR2,
14 x_attribute13 IN VARCHAR2,
15 x_attribute14 IN VARCHAR2,
16 x_attribute15 IN VARCHAR2,
17 x_attribute_category IN VARCHAR2,
18 x_attribute4 IN VARCHAR2,
19 x_attribute3 IN VARCHAR2,
20 x_task_contact_id IN NUMBER,
21 x_attribute1 IN VARCHAR2,
22 x_attribute2 IN VARCHAR2,
23 x_phone_id IN NUMBER,
24 x_creation_date IN DATE,
25 x_created_by IN NUMBER,
26 x_last_update_date IN DATE,
27 x_last_updated_by IN NUMBER,
28 x_last_update_login IN NUMBER,
29 x_owner_table_name IN VARCHAR2 DEFAULT 'JTF_TASK_CONTACTS',
30 x_primary_flag IN VARCHAR2 DEFAULT NULL
31 )
32 IS
33 CURSOR c
34 IS
35 SELECT ROWID
36 FROM jtf_task_phones
37 WHERE task_phone_id = x_task_phone_id;
38 BEGIN
39 INSERT INTO jtf_task_phones (
40 attribute5,
41 attribute6,
42 attribute7,
43 attribute8,
44 attribute9,
45 attribute10,
46 attribute11,
47 attribute12,
48 attribute13,
49 attribute14,
50 attribute15,
51 attribute_category,
52 last_update_date,
53 created_by,
54 creation_date,
55 last_updated_by,
56 attribute4,
57 task_phone_id,
58 attribute3,
59 last_update_login,
60 task_contact_id,
61 phone_id,
62 attribute1,
63 attribute2,
64 object_version_number,
65 owner_table_name,
66 primary_flag
67 )
68 VALUES (
69 x_attribute5,
70 x_attribute6,
71 x_attribute7,
72 x_attribute8,
73 x_attribute9,
74 x_attribute10,
75 x_attribute11,
76 x_attribute12,
77 x_attribute13,
78 x_attribute14,
79 x_attribute15,
80 x_attribute_category,
81 x_last_update_date,
82 x_created_by,
83 x_creation_date,
84 x_last_updated_by,
85 x_attribute4,
86 x_task_phone_id,
87 x_attribute3,
88 x_last_update_login,
89 x_task_contact_id,
90 x_phone_id,
91 x_attribute1,
92 x_attribute2,
93 1,
94 x_owner_table_name,
95 x_primary_flag
96 );
97 OPEN c;
98 FETCH c INTO x_rowid;
99
100 IF (c%NOTFOUND)
101 THEN
102 CLOSE c;
103 RAISE NO_DATA_FOUND;
104 END IF;
105
106 CLOSE c;
107 END insert_row;
108
109 PROCEDURE lock_row (
110 x_task_phone_id IN NUMBER,
111 x_object_version_number IN NUMBER
112 )
113 IS
114 CURSOR c1
115 IS
116 SELECT object_version_number
117 FROM jtf_task_phones
118 WHERE task_phone_id = x_task_phone_id
119 FOR UPDATE OF task_phone_id NOWAIT;
120
121 tlinfo c1%ROWTYPE;
122 BEGIN
123 OPEN c1;
124 FETCH c1 INTO tlinfo;
125
126 IF (c1%NOTFOUND)
127 THEN
128 CLOSE c1;
129 fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
130 app_exception.raise_exception;
131 END IF;
132
133 CLOSE c1;
134
135 IF (tlinfo.object_version_number = x_object_version_number)
136 THEN
137 NULL;
138 ELSE
139 fnd_message.set_name ('FND', 'FORM_RECORD_CHANGED');
140 app_exception.raise_exception;
141 END IF;
142 END lock_row;
143
144 PROCEDURE update_row (
145 x_task_phone_id IN NUMBER,
146 x_object_version_number IN NUMBER,
147 x_attribute5 IN VARCHAR2,
148 x_attribute6 IN VARCHAR2,
149 x_attribute7 IN VARCHAR2,
150 x_attribute8 IN VARCHAR2,
151 x_attribute9 IN VARCHAR2,
152 x_attribute10 IN VARCHAR2,
153 x_attribute11 IN VARCHAR2,
154 x_attribute12 IN VARCHAR2,
155 x_attribute13 IN VARCHAR2,
156 x_attribute14 IN VARCHAR2,
157 x_attribute15 IN VARCHAR2,
158 x_attribute_category IN VARCHAR2,
159 x_attribute4 IN VARCHAR2,
160 x_attribute3 IN VARCHAR2,
161 x_task_contact_id IN NUMBER,
162 x_attribute1 IN VARCHAR2,
163 x_attribute2 IN VARCHAR2,
164 x_phone_id IN NUMBER,
165 x_last_update_date IN DATE,
166 x_last_updated_by IN NUMBER,
167 x_last_update_login IN NUMBER,
168 x_owner_table_name IN VARCHAR2 DEFAULT 'JTF_TASK_CONTACTS',
169 x_primary_flag IN VARCHAR2 DEFAULT jtf_task_utl.g_miss_char
170 )
171 IS
172 BEGIN
173 UPDATE jtf_task_phones
174 SET object_version_number = x_object_version_number,
175 attribute5 = x_attribute5,
176 attribute6 = x_attribute6,
177 attribute7 = x_attribute7,
178 attribute8 = x_attribute8,
179 attribute9 = x_attribute9,
180 attribute10 = x_attribute10,
181 attribute11 = x_attribute11,
182 attribute12 = x_attribute12,
183 attribute13 = x_attribute13,
184 attribute14 = x_attribute14,
185 attribute15 = x_attribute15,
186 attribute_category = x_attribute_category,
187 attribute4 = x_attribute4,
188 attribute3 = x_attribute3,
189 task_contact_id = x_task_contact_id,
190 attribute1 = x_attribute1,
191 attribute2 = x_attribute2,
192 phone_id = x_phone_id,
193 last_update_date = x_last_update_date,
194 last_updated_by = x_last_updated_by,
195 last_update_login = x_last_update_login,
196 owner_table_name = x_owner_table_name,
197 primary_flag = x_primary_flag
198 WHERE task_phone_id = x_task_phone_id;
199
200 IF (SQL%NOTFOUND)
201 THEN
202 RAISE NO_DATA_FOUND;
203 END IF;
204 END update_row;
205
206 PROCEDURE delete_row (x_task_phone_id IN NUMBER)
207 IS
208 BEGIN
209 DELETE
210 FROM jtf_task_phones
211 WHERE task_phone_id = x_task_phone_id;
212
213 IF (SQL%NOTFOUND)
214 THEN
215 RAISE NO_DATA_FOUND;
216 END IF;
217 END delete_row;
218 END jtf_task_phones_pkg;