[Home] [Help]
PACKAGE BODY: APPS.CSD_REPAIR_ACTUAL_LINES_PKG
Source
1 PACKAGE BODY CSD_REPAIR_ACTUAL_LINES_PKG as
2 /* $Header: csdtalnb.pls 120.1 2008/02/15 04:02:42 takwong ship $ csdtalnb.pls */
3
4 G_PKG_NAME CONSTANT VARCHAR2(30) := 'CSD_REPAIR_ACTUAL_LINES_PKG';
5 G_FILE_NAME CONSTANT VARCHAR2(12) := 'csdtclnb.pls';
6 l_debug NUMBER := csd_gen_utility_pvt.g_debug_level;
7
8 -- Global variable for storing the debug level
9 G_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10
11 PROCEDURE Insert_Row(
12 px_REPAIR_ACTUAL_LINE_ID IN OUT NOCOPY NUMBER
13 ,p_OBJECT_VERSION_NUMBER NUMBER
14 ,p_ESTIMATE_DETAIL_ID NUMBER
15 ,p_REPAIR_ACTUAL_ID NUMBER
16 ,p_REPAIR_LINE_ID NUMBER
17 ,p_CREATED_BY NUMBER
18 ,p_CREATION_DATE DATE
19 ,p_LAST_UPDATED_BY NUMBER
20 ,p_LAST_UPDATE_DATE DATE
21 ,p_LAST_UPDATE_LOGIN NUMBER
22 ,p_ITEM_COST NUMBER
23 ,p_JUSTIFICATION_NOTES VARCHAR2
24 ,p_RESOURCE_ID NUMBER
25 ,p_OVERRIDE_CHARGE_FLAG VARCHAR2
26 ,p_ACTUAL_SOURCE_CODE VARCHAR2
27 ,p_ACTUAL_SOURCE_ID NUMBER
28 ,p_WARRANTY_CLAIM_FLAG VARCHAR2 := FND_API.G_MISS_CHAR
29 ,p_WARRANTY_NUMBER VARCHAR2 := FND_API.G_MISS_CHAR
30 ,p_WARRANTY_STATUS_CODE VARCHAR2 := FND_API.G_MISS_CHAR
31 ,p_REPLACED_ITEM_ID NUMBER := FND_API.G_MISS_NUM
32 ,p_ATTRIBUTE_CATEGORY VARCHAR2
33 ,p_ATTRIBUTE1 VARCHAR2
34 ,p_ATTRIBUTE2 VARCHAR2
35 ,p_ATTRIBUTE3 VARCHAR2
36 ,p_ATTRIBUTE4 VARCHAR2
37 ,p_ATTRIBUTE5 VARCHAR2
38 ,p_ATTRIBUTE6 VARCHAR2
39 ,p_ATTRIBUTE7 VARCHAR2
40 ,p_ATTRIBUTE8 VARCHAR2
41 ,p_ATTRIBUTE9 VARCHAR2
42 ,p_ATTRIBUTE10 VARCHAR2
43 ,p_ATTRIBUTE11 VARCHAR2
44 ,p_ATTRIBUTE12 VARCHAR2
45 ,p_ATTRIBUTE13 VARCHAR2
46 ,p_ATTRIBUTE14 VARCHAR2
47 ,p_ATTRIBUTE15 VARCHAR2
48 ,p_LOCATOR_ID NUMBER
49 ,p_LOC_SEGMENT1 VARCHAR2
50 ,p_LOC_SEGMENT2 VARCHAR2
51 ,p_LOC_SEGMENT3 VARCHAR2
52 ,p_LOC_SEGMENT4 VARCHAR2
53 ,p_LOC_SEGMENT5 VARCHAR2
54 ,p_LOC_SEGMENT6 VARCHAR2
55 ,p_LOC_SEGMENT7 VARCHAR2
56 ,p_LOC_SEGMENT8 VARCHAR2
57 ,p_LOC_SEGMENT9 VARCHAR2
58 ,p_LOC_SEGMENT10 VARCHAR2
59 ,p_LOC_SEGMENT11 VARCHAR2
60 ,p_LOC_SEGMENT12 VARCHAR2
61 ,p_LOC_SEGMENT13 VARCHAR2
62 ,p_LOC_SEGMENT14 VARCHAR2
63 ,p_LOC_SEGMENT15 VARCHAR2
64 ,p_LOC_SEGMENT16 VARCHAR2
65 ,p_LOC_SEGMENT17 VARCHAR2
66 ,p_LOC_SEGMENT18 VARCHAR2
67 ,p_LOC_SEGMENT19 VARCHAR2
68 ,p_LOC_SEGMENT20 VARCHAR2)
69
70 IS
71 CURSOR C2 IS SELECT CSD_REPAIR_ACTUAL_LINES_S1.nextval FROM sys.dual;
72 BEGIN
73 If (px_REPAIR_ACTUAL_LINE_ID IS NULL) OR (px_REPAIR_ACTUAL_LINE_ID = FND_API.G_MISS_NUM) then
74 OPEN C2;
75 FETCH C2 INTO px_REPAIR_ACTUAL_LINE_ID;
76 CLOSE C2;
77 End If;
78 INSERT INTO CSD_REPAIR_ACTUAL_LINES(
79 REPAIR_ACTUAL_LINE_ID
80 ,OBJECT_VERSION_NUMBER
81 ,ESTIMATE_DETAIL_ID
82 ,REPAIR_ACTUAL_ID
83 ,REPAIR_LINE_ID
84 ,CREATED_BY
85 ,CREATION_DATE
86 ,LAST_UPDATED_BY
87 ,LAST_UPDATE_DATE
88 ,LAST_UPDATE_LOGIN
89 ,ITEM_COST
90 ,JUSTIFICATION_NOTES
91 ,RESOURCE_ID
92 ,OVERRIDE_CHARGE_FLAG
93 ,ACTUAL_SOURCE_CODE
94 ,ACTUAL_SOURCE_ID
95 ,WARRANTY_CLAIM_FLAG
96 ,WARRANTY_NUMBER
97 ,WARRANTY_STATUS_CODE
98 ,REPLACED_ITEM_ID
99 ,ATTRIBUTE_CATEGORY
100 ,ATTRIBUTE1
101 ,ATTRIBUTE2
102 ,ATTRIBUTE3
103 ,ATTRIBUTE4
104 ,ATTRIBUTE5
105 ,ATTRIBUTE6
106 ,ATTRIBUTE7
107 ,ATTRIBUTE8
108 ,ATTRIBUTE9
109 ,ATTRIBUTE10
110 ,ATTRIBUTE11
111 ,ATTRIBUTE12
112 ,ATTRIBUTE13
113 ,ATTRIBUTE14
114 ,ATTRIBUTE15
115 ,LOCATOR_ID
116 ,LOC_SEGMENT1
117 ,LOC_SEGMENT2
118 ,LOC_SEGMENT3
119 ,LOC_SEGMENT4
120 ,LOC_SEGMENT5
121 ,LOC_SEGMENT6
122 ,LOC_SEGMENT7
123 ,LOC_SEGMENT8
124 ,LOC_SEGMENT9
125 ,LOC_SEGMENT10
126 ,LOC_SEGMENT11
127 ,LOC_SEGMENT12
128 ,LOC_SEGMENT13
129 ,LOC_SEGMENT14
130 ,LOC_SEGMENT15
131 ,LOC_SEGMENT16
132 ,LOC_SEGMENT17
133 ,LOC_SEGMENT18
134 ,LOC_SEGMENT19
135 ,LOC_SEGMENT20
136 ) VALUES (
137 px_REPAIR_ACTUAL_LINE_ID
138 ,decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, p_OBJECT_VERSION_NUMBER)
139 ,decode( p_ESTIMATE_DETAIL_ID, FND_API.G_MISS_NUM, NULL, p_ESTIMATE_DETAIL_ID)
140 ,decode( p_REPAIR_ACTUAL_ID, FND_API.G_MISS_NUM, NULL, p_REPAIR_ACTUAL_ID)
141 ,decode( p_REPAIR_LINE_ID, FND_API.G_MISS_NUM, NULL, p_REPAIR_LINE_ID)
142 ,decode( p_CREATED_BY, FND_API.G_MISS_NUM, NULL, p_CREATED_BY)
143 ,decode( p_CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_CREATION_DATE)
144 ,decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATED_BY)
145 ,decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL), p_LAST_UPDATE_DATE)
146 ,decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATE_LOGIN)
147 ,decode( p_ITEM_COST, FND_API.G_MISS_NUM, NULL, p_ITEM_COST)
148 ,decode( p_JUSTIFICATION_NOTES, FND_API.G_MISS_CHAR, NULL, p_JUSTIFICATION_NOTES)
149 ,decode( p_RESOURCE_ID, FND_API.G_MISS_NUM, NULL, p_RESOURCE_ID)
150 ,decode( p_OVERRIDE_CHARGE_FLAG, FND_API.G_MISS_CHAR, NULL, p_OVERRIDE_CHARGE_FLAG)
151 ,decode( p_ACTUAL_SOURCE_CODE, FND_API.G_MISS_CHAR, NULL, p_ACTUAL_SOURCE_CODE)
152 ,decode( p_ACTUAL_SOURCE_ID, FND_API.G_MISS_NUM, NULL, p_ACTUAL_SOURCE_ID)
153 ,decode( p_WARRANTY_CLAIM_FLAG, FND_API.G_MISS_CHAR, NULL, p_WARRANTY_CLAIM_FLAG)
154 ,decode( p_WARRANTY_NUMBER, FND_API.G_MISS_CHAR, NULL, p_WARRANTY_NUMBER)
155 ,decode( p_WARRANTY_STATUS_CODE, FND_API.G_MISS_CHAR, NULL, p_WARRANTY_STATUS_CODE)
156 ,decode( p_REPLACED_ITEM_ID, FND_API.G_MISS_NUM, NULL, p_REPLACED_ITEM_ID)
157 ,decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE_CATEGORY)
158 ,decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE1)
159 ,decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE2)
160 ,decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE3)
161 ,decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE4)
162 ,decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE5)
163 ,decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE6)
164 ,decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE7)
165 ,decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE8)
166 ,decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE9)
167 ,decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE10)
168 ,decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE11)
169 ,decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE12)
170 ,decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE13)
171 ,decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE14)
172 ,decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE15)
173 ,decode( p_LOCATOR_ID, FND_API.G_MISS_NUM, NULL, p_LOCATOR_ID)
174 ,decode( p_LOC_SEGMENT1, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT1)
175 ,decode( p_LOC_SEGMENT2, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT2)
176 ,decode( p_LOC_SEGMENT3, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT3)
177 ,decode( p_LOC_SEGMENT4, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT4)
178 ,decode( p_LOC_SEGMENT5, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT5)
179 ,decode( p_LOC_SEGMENT6, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT6)
180 ,decode( p_LOC_SEGMENT7, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT7)
181 ,decode( p_LOC_SEGMENT8, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT8)
182 ,decode( p_LOC_SEGMENT9, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT9)
183 ,decode( p_LOC_SEGMENT10, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT10)
184 ,decode( p_LOC_SEGMENT11, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT11)
185 ,decode( p_LOC_SEGMENT12, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT12)
186 ,decode( p_LOC_SEGMENT13, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT13)
187 ,decode( p_LOC_SEGMENT14, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT14)
188 ,decode( p_LOC_SEGMENT15, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT15)
189 ,decode( p_LOC_SEGMENT16, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT16)
190 ,decode( p_LOC_SEGMENT17, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT17)
191 ,decode( p_LOC_SEGMENT18, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT18)
192 ,decode( p_LOC_SEGMENT19, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT19)
193 ,decode( p_LOC_SEGMENT20, FND_API.G_MISS_CHAR, NULL, p_LOC_SEGMENT20));
194 End Insert_Row;
195
196 PROCEDURE Update_Row(
197 p_REPAIR_ACTUAL_LINE_ID NUMBER
198 ,p_OBJECT_VERSION_NUMBER NUMBER
199 ,p_ESTIMATE_DETAIL_ID NUMBER
200 ,p_REPAIR_ACTUAL_ID NUMBER
201 ,p_REPAIR_LINE_ID NUMBER
202 ,p_CREATED_BY NUMBER
203 ,p_CREATION_DATE DATE
204 ,p_LAST_UPDATED_BY NUMBER
205 ,p_LAST_UPDATE_DATE DATE
206 ,p_LAST_UPDATE_LOGIN NUMBER
207 ,p_ITEM_COST NUMBER
208 ,p_JUSTIFICATION_NOTES VARCHAR2
209 ,p_RESOURCE_ID NUMBER
210 ,p_OVERRIDE_CHARGE_FLAG VARCHAR2
211 ,p_ACTUAL_SOURCE_CODE VARCHAR2
212 ,p_ACTUAL_SOURCE_ID NUMBER
213 ,p_WARRANTY_CLAIM_FLAG VARCHAR2 := FND_API.G_MISS_CHAR
214 ,p_WARRANTY_NUMBER VARCHAR2 := FND_API.G_MISS_CHAR
215 ,p_WARRANTY_STATUS_CODE VARCHAR2 := FND_API.G_MISS_CHAR
216 ,p_REPLACED_ITEM_ID NUMBER := FND_API.G_MISS_NUM
217 ,p_ATTRIBUTE_CATEGORY VARCHAR2
218 ,p_ATTRIBUTE1 VARCHAR2
219 ,p_ATTRIBUTE2 VARCHAR2
220 ,p_ATTRIBUTE3 VARCHAR2
221 ,p_ATTRIBUTE4 VARCHAR2
222 ,p_ATTRIBUTE5 VARCHAR2
223 ,p_ATTRIBUTE6 VARCHAR2
224 ,p_ATTRIBUTE7 VARCHAR2
225 ,p_ATTRIBUTE8 VARCHAR2
226 ,p_ATTRIBUTE9 VARCHAR2
227 ,p_ATTRIBUTE10 VARCHAR2
228 ,p_ATTRIBUTE11 VARCHAR2
229 ,p_ATTRIBUTE12 VARCHAR2
230 ,p_ATTRIBUTE13 VARCHAR2
231 ,p_ATTRIBUTE14 VARCHAR2
232 ,p_ATTRIBUTE15 VARCHAR2
233 ,p_LOCATOR_ID NUMBER
234 ,p_LOC_SEGMENT1 VARCHAR2
235 ,p_LOC_SEGMENT2 VARCHAR2
236 ,p_LOC_SEGMENT3 VARCHAR2
237 ,p_LOC_SEGMENT4 VARCHAR2
238 ,p_LOC_SEGMENT5 VARCHAR2
239 ,p_LOC_SEGMENT6 VARCHAR2
240 ,p_LOC_SEGMENT7 VARCHAR2
241 ,p_LOC_SEGMENT8 VARCHAR2
242 ,p_LOC_SEGMENT9 VARCHAR2
243 ,p_LOC_SEGMENT10 VARCHAR2
244 ,p_LOC_SEGMENT11 VARCHAR2
245 ,p_LOC_SEGMENT12 VARCHAR2
246 ,p_LOC_SEGMENT13 VARCHAR2
247 ,p_LOC_SEGMENT14 VARCHAR2
248 ,p_LOC_SEGMENT15 VARCHAR2
249 ,p_LOC_SEGMENT16 VARCHAR2
250 ,p_LOC_SEGMENT17 VARCHAR2
251 ,p_LOC_SEGMENT18 VARCHAR2
252 ,p_LOC_SEGMENT19 VARCHAR2
253 ,p_LOC_SEGMENT20 VARCHAR2)
254
255 IS
259 OBJECT_VERSION_NUMBER = decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, NULL, OBJECT_VERSION_NUMBER, p_OBJECT_VERSION_NUMBER)
256 BEGIN
257 Update CSD_REPAIR_ACTUAL_LINES
258 SET
260 ,ESTIMATE_DETAIL_ID = decode( p_ESTIMATE_DETAIL_ID, FND_API.G_MISS_NUM, NULL, NULL, ESTIMATE_DETAIL_ID, p_ESTIMATE_DETAIL_ID)
261 ,REPAIR_ACTUAL_ID = decode( p_REPAIR_ACTUAL_ID, FND_API.G_MISS_NUM, NULL, NULL, REPAIR_ACTUAL_ID, p_REPAIR_ACTUAL_ID)
262 ,REPAIR_LINE_ID = decode( p_REPAIR_LINE_ID, FND_API.G_MISS_NUM, NULL, NULL, REPAIR_LINE_ID, p_REPAIR_LINE_ID)
263 -- ,CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, NULL, NULL, CREATED_BY, p_CREATED_BY)
264 -- ,CREATION_DATE = decode( p_CREATION_DATE, FND_API.G_MISS_DATE, NULL, NULL, CREATION_DATE, p_CREATION_DATE)
265 ,LAST_UPDATED_BY = decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL, NULL, LAST_UPDATED_BY, p_LAST_UPDATED_BY)
266 ,LAST_UPDATE_DATE = decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, NULL, NULL, LAST_UPDATE_DATE, p_LAST_UPDATE_DATE)
267 ,LAST_UPDATE_LOGIN = decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL, NULL, LAST_UPDATE_LOGIN, p_LAST_UPDATE_LOGIN)
268 ,ITEM_COST = decode( p_ITEM_COST, FND_API.G_MISS_NUM, NULL, NULL, ITEM_COST, p_ITEM_COST)
269 ,JUSTIFICATION_NOTES = decode( p_JUSTIFICATION_NOTES, FND_API.G_MISS_CHAR, NULL, NULL, JUSTIFICATION_NOTES, p_JUSTIFICATION_NOTES)
270 ,RESOURCE_ID = decode( p_RESOURCE_ID, FND_API.G_MISS_NUM, NULL, NULL, RESOURCE_ID, p_RESOURCE_ID)
271 ,OVERRIDE_CHARGE_FLAG = decode( p_OVERRIDE_CHARGE_FLAG, FND_API.G_MISS_CHAR, NULL, NULL, OVERRIDE_CHARGE_FLAG, p_OVERRIDE_CHARGE_FLAG)
272 ,ACTUAL_SOURCE_CODE = decode( p_ACTUAL_SOURCE_CODE, FND_API.G_MISS_CHAR, NULL, NULL, ACTUAL_SOURCE_CODE, p_ACTUAL_SOURCE_CODE)
273 ,ACTUAL_SOURCE_ID = decode( p_ACTUAL_SOURCE_ID, FND_API.G_MISS_NUM, NULL, NULL, ACTUAL_SOURCE_ID, p_ACTUAL_SOURCE_ID)
274 ,WARRANTY_CLAIM_FLAG = decode( p_WARRANTY_CLAIM_FLAG, FND_API.G_MISS_CHAR, NULL, NULL, WARRANTY_CLAIM_FLAG, p_WARRANTY_CLAIM_FLAG)
275 ,WARRANTY_NUMBER = decode( p_WARRANTY_NUMBER, FND_API.G_MISS_CHAR, NULL, NULL, WARRANTY_NUMBER, p_WARRANTY_NUMBER)
276 ,WARRANTY_STATUS_CODE = decode( p_WARRANTY_STATUS_CODE, FND_API.G_MISS_CHAR, NULL, NULL, WARRANTY_STATUS_CODE, p_WARRANTY_STATUS_CODE)
277 ,REPLACED_ITEM_ID = decode( p_REPLACED_ITEM_ID, FND_API.G_MISS_NUM, NULL, NULL, REPLACED_ITEM_ID, p_REPLACED_ITEM_ID)
278 ,ATTRIBUTE_CATEGORY = decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE_CATEGORY, p_ATTRIBUTE_CATEGORY)
279 ,ATTRIBUTE1 = decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE1, p_ATTRIBUTE1)
280 ,ATTRIBUTE2 = decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE2, p_ATTRIBUTE2)
281 ,ATTRIBUTE3 = decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE3, p_ATTRIBUTE3)
282 ,ATTRIBUTE4 = decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE4, p_ATTRIBUTE4)
283 ,ATTRIBUTE5 = decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE5, p_ATTRIBUTE5)
284 ,ATTRIBUTE6 = decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE6, p_ATTRIBUTE6)
285 ,ATTRIBUTE7 = decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE7, p_ATTRIBUTE7)
286 ,ATTRIBUTE8 = decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE8, p_ATTRIBUTE8)
287 ,ATTRIBUTE9 = decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE9, p_ATTRIBUTE9)
288 ,ATTRIBUTE10 = decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE10, p_ATTRIBUTE10)
289 ,ATTRIBUTE11 = decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE11, p_ATTRIBUTE11)
290 ,ATTRIBUTE12 = decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE12, p_ATTRIBUTE12)
291 ,ATTRIBUTE13 = decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE13, p_ATTRIBUTE13)
292 ,ATTRIBUTE14 = decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE14, p_ATTRIBUTE14)
293 ,ATTRIBUTE15 = decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, NULL, ATTRIBUTE15, p_ATTRIBUTE15)
294 ,LOCATOR_ID = decode( p_LOCATOR_ID, FND_API.G_MISS_NUM, NULL, NULL, LOCATOR_ID, p_LOCATOR_ID)
295 ,LOC_SEGMENT1 = decode( p_LOC_SEGMENT1, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT1, p_LOC_SEGMENT1)
296 ,LOC_SEGMENT2 = decode( p_LOC_SEGMENT2, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT2, p_LOC_SEGMENT2)
297 ,LOC_SEGMENT3 = decode( p_LOC_SEGMENT3, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT3, p_LOC_SEGMENT3)
298 ,LOC_SEGMENT4 = decode( p_LOC_SEGMENT4, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT4, p_LOC_SEGMENT4)
299 ,LOC_SEGMENT5 = decode( p_LOC_SEGMENT5, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT5, p_LOC_SEGMENT5)
300 ,LOC_SEGMENT6 = decode( p_LOC_SEGMENT6, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT6, p_LOC_SEGMENT6)
301 ,LOC_SEGMENT7 = decode( p_LOC_SEGMENT7, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT7, p_LOC_SEGMENT7)
302 ,LOC_SEGMENT8 = decode( p_LOC_SEGMENT8, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT8, p_LOC_SEGMENT8)
303 ,LOC_SEGMENT9 = decode( p_LOC_SEGMENT9, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT9, p_LOC_SEGMENT9)
304 ,LOC_SEGMENT10 = decode( p_LOC_SEGMENT10, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT10, p_LOC_SEGMENT10)
305 ,LOC_SEGMENT11 = decode( p_LOC_SEGMENT11, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT11, p_LOC_SEGMENT11)
306 ,LOC_SEGMENT12 = decode( p_LOC_SEGMENT12, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT12, p_LOC_SEGMENT12)
307 ,LOC_SEGMENT13 = decode( p_LOC_SEGMENT13, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT13, p_LOC_SEGMENT13)
308 ,LOC_SEGMENT14 = decode( p_LOC_SEGMENT14, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT14, p_LOC_SEGMENT14)
309 ,LOC_SEGMENT15 = decode( p_LOC_SEGMENT15, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT15, p_LOC_SEGMENT15)
310 ,LOC_SEGMENT16 = decode( p_LOC_SEGMENT16, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT16, p_LOC_SEGMENT16)
311 ,LOC_SEGMENT17 = decode( p_LOC_SEGMENT17, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT17, p_LOC_SEGMENT17)
312 ,LOC_SEGMENT18 = decode( p_LOC_SEGMENT18, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT18, p_LOC_SEGMENT18)
313 ,LOC_SEGMENT19 = decode( p_LOC_SEGMENT19, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT19, p_LOC_SEGMENT19)
314 ,LOC_SEGMENT20 = decode( p_LOC_SEGMENT20, FND_API.G_MISS_CHAR, NULL, NULL, LOC_SEGMENT20, p_LOC_SEGMENT20)
315 where REPAIR_ACTUAL_LINE_ID = p_REPAIR_ACTUAL_LINE_ID;
316
317 If (SQL%NOTFOUND) then
318 RAISE NO_DATA_FOUND;
319 End If;
320 END Update_Row;
321
322 PROCEDURE Delete_Row(
323 p_REPAIR_ACTUAL_LINE_ID NUMBER
324 ,p_OBJECT_VERSION_NUMBER NUMBER)
325 IS
326 BEGIN
327 DELETE FROM CSD_REPAIR_ACTUAL_LINES
328 WHERE REPAIR_ACTUAL_LINE_ID = p_REPAIR_ACTUAL_LINE_ID;
329 If (SQL%NOTFOUND) then
330 RAISE NO_DATA_FOUND;
331 End If;
332 END Delete_Row;
333
334 PROCEDURE Lock_Row(
335 p_REPAIR_ACTUAL_LINE_ID NUMBER
336 ,p_OBJECT_VERSION_NUMBER NUMBER)
337
338 IS
339 -- Variables used in FND Log
340 l_stat_level number := FND_LOG.LEVEL_STATEMENT;
341 l_proc_level number := FND_LOG.LEVEL_PROCEDURE;
342 l_event_level number := FND_LOG.LEVEL_EVENT;
343 l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
344 l_error_level number := FND_LOG.LEVEL_ERROR;
345 l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED;
346 l_mod_name varchar2(2000) := 'csd.plsql.CSD_REPAIR_ACTUAL_LINES_PKG.Lock_Row';
347
348 CURSOR C IS
349 SELECT *
350 FROM CSD_REPAIR_ACTUAL_LINES
351 WHERE REPAIR_ACTUAL_LINE_ID = p_REPAIR_ACTUAL_LINE_ID
352 FOR UPDATE of REPAIR_ACTUAL_LINE_ID NOWAIT;
353 Recinfo C%ROWTYPE;
354 BEGIN
355 OPEN C;
356 FETCH C INTO Recinfo;
357 If (C%NOTFOUND) then
358 CLOSE C;
359 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
360 APP_EXCEPTION.RAISE_EXCEPTION;
361 End If;
362 CLOSE C;
363
364 IF ( l_stat_level >= G_debug_level) THEN
365 FND_LOG.STRING(l_stat_level,l_mod_name,'CSD_REPAIR_ACTUAL_LINES_PKG Recinfo.OBJECT_VERSION_NUMBER : '||Recinfo.OBJECT_VERSION_NUMBER);
366 FND_LOG.STRING(l_stat_level,l_mod_name,'CSD_REPAIR_ACTUAL_LINES_PKG p_OBJECT_VERSION_NUMBER : '||p_OBJECT_VERSION_NUMBER);
367 END IF;
368
369 If ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER) then
370 return;
371 else
372 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
373 APP_EXCEPTION.RAISE_EXCEPTION;
374 End If;
375 END Lock_Row;
376
377 End CSD_REPAIR_ACTUAL_LINES_PKG;