[Home] [Help]
PACKAGE BODY: APPS.AMS_IS_LINE_PVT
Source
1 PACKAGE BODY AMS_Is_Line_PVT as
2 /* $Header: amsvislb.pls 115.16 2004/01/27 20:49:07 sranka ship $ */
3 -- ===============================================================
4 -- Start of Comments
5 -- Package name
6 -- AMS_Is_Line_PVT
7 -- Purpose
8 --
9 -- History
10 --
11 -- NOTE
12 --
13 -- End of Comments
14 -- ===============================================================
15
16
17 G_PKG_NAME CONSTANT VARCHAR2(30):= 'AMS_Is_Line_PVT';
18 G_FILE_NAME CONSTANT VARCHAR2(12) := 'amsvislb.pls';
19
20
21 -- Hint: Primary key needs to be returned.
22 AMS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
23 AMS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
24 AMS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
25
26 PROCEDURE Create_Is_Line(
27 p_api_version_number IN NUMBER,
28 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
29 p_commit IN VARCHAR2 := FND_API.G_FALSE,
30 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
31
32 x_return_status OUT NOCOPY VARCHAR2,
33 x_msg_count OUT NOCOPY NUMBER,
34 x_msg_data OUT NOCOPY VARCHAR2,
35
36 p_is_line_rec IN is_line_rec_type := g_miss_is_line_rec,
37 x_import_source_line_id OUT NOCOPY NUMBER
38 )
39
40 IS
41 L_API_NAME CONSTANT VARCHAR2(30) := 'Create_Is_Line';
42 L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
43 l_return_status_full VARCHAR2(1);
44 l_object_version_number NUMBER := 1;
45 l_org_id NUMBER := FND_API.G_MISS_NUM;
46 l_IMPORT_SOURCE_LINE_ID NUMBER;
47 l_dummy NUMBER;
48
49 CURSOR c_id IS
50 SELECT AMS_IMP_SOURCE_LINES_s.NEXTVAL
51 FROM dual;
52
53 CURSOR c_id_exists (l_id IN NUMBER) IS
54 SELECT 1
55 FROM AMS_IMP_SOURCE_LINES
56 WHERE IMPORT_SOURCE_LINE_ID = l_id;
57
58 BEGIN
59 -- Standard Start of API savepoint
60 SAVEPOINT CREATE_Is_Line_PVT;
61
62 -- Standard call to check for call compatibility.
63 IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
64 p_api_version_number,
65 l_api_name,
66 G_PKG_NAME)
67 THEN
68 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
69 END IF;
70
71 -- Initialize message list if p_init_msg_list is set to TRUE.
72 IF FND_API.to_Boolean( p_init_msg_list )
73 THEN
74 FND_MSG_PUB.initialize;
75 END IF;
76
77 -- Debug Message
78 IF (AMS_DEBUG_HIGH_ON) THEN
79
80 AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
81 END IF;
82
83
84 -- Initialize API return status to SUCCESS
85 x_return_status := FND_API.G_RET_STS_SUCCESS;
86
87 -- Local variable initialization
88
89 IF p_is_line_rec.IMPORT_SOURCE_LINE_ID IS NULL OR p_is_line_rec.IMPORT_SOURCE_LINE_ID = FND_API.g_miss_num THEN
90 LOOP
91 l_dummy := NULL;
92 OPEN c_id;
93 FETCH c_id INTO l_IMPORT_SOURCE_LINE_ID;
94 CLOSE c_id;
95
96 OPEN c_id_exists(l_IMPORT_SOURCE_LINE_ID);
97 FETCH c_id_exists INTO l_dummy;
98 CLOSE c_id_exists;
99 EXIT WHEN l_dummy IS NULL;
100 END LOOP;
101 END IF;
102
103 -- =========================================================================
104 -- Validate Environment
105 -- =========================================================================
106
107 IF FND_GLOBAL.User_Id IS NULL
108 THEN
109 AMS_Utility_PVT.Error_Message(p_message_name => 'USER_PROFILE_MISSING');
110 RAISE FND_API.G_EXC_ERROR;
111 END IF;
112
113 IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
114 THEN
115 -- Debug message
116 IF (AMS_DEBUG_HIGH_ON) THEN
117
118 AMS_UTILITY_PVT.debug_message('Private API: Validate_Is_Line');
119 END IF;
120
121 -- Invoke validation procedures
122 Validate_is_line(
123 p_api_version_number => 1.0,
124 p_init_msg_list => FND_API.G_FALSE,
125 p_validation_level => p_validation_level,
126 p_is_line_rec => p_is_line_rec,
127 x_return_status => x_return_status,
128 x_msg_count => x_msg_count,
129 x_msg_data => x_msg_data);
130 END IF;
131
132 IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
133 RAISE FND_API.G_EXC_ERROR;
134 END IF;
135
136
137 -- Debug Message
138 IF (AMS_DEBUG_HIGH_ON) THEN
139
140 AMS_UTILITY_PVT.debug_message( 'Private API: Calling create table handler');
141 END IF;
142
143 -- Invoke table handler(AMS_IMP_SOURCE_LINES_PKG.Insert_Row)
144 AMS_IMP_SOURCE_LINES_PKG.Insert_Row(
145 px_import_source_line_id => l_import_source_line_id,
146 px_object_version_number => l_object_version_number,
147 p_last_update_date => SYSDATE,
148 p_last_updated_by => FND_GLOBAL.USER_ID,
149 p_creation_date => SYSDATE,
150 p_created_by => FND_GLOBAL.USER_ID,
151 p_last_update_login => FND_GLOBAL.CONC_LOGIN_ID,
152 p_import_list_header_id => p_is_line_rec.import_list_header_id,
153 p_import_successful_flag => p_is_line_rec.import_successful_flag,
154 p_enabled_flag => p_is_line_rec.enabled_flag,
155 p_import_failure_reason => p_is_line_rec.import_failure_reason,
156 p_re_import_last_done_date => p_is_line_rec.re_import_last_done_date,
157 p_party_id => p_is_line_rec.party_id,
158 p_dedupe_key => p_is_line_rec.dedupe_key,
159 p_col1 => p_is_line_rec.col1,
160 p_col2 => p_is_line_rec.col2,
161 p_col3 => p_is_line_rec.col3,
162 p_col4 => p_is_line_rec.col4,
163 p_col5 => p_is_line_rec.col5,
164 p_col6 => p_is_line_rec.col6,
165 p_col7 => p_is_line_rec.col7,
166 p_col8 => p_is_line_rec.col8,
167 p_col9 => p_is_line_rec.col9,
168 p_col10 => p_is_line_rec.col10,
169 p_col11 => p_is_line_rec.col11,
170 p_col12 => p_is_line_rec.col12,
171 p_col13 => p_is_line_rec.col13,
172 p_col14 => p_is_line_rec.col14,
173 p_col15 => p_is_line_rec.col15,
174 p_col16 => p_is_line_rec.col16,
175 p_col17 => p_is_line_rec.col17,
176 p_col18 => p_is_line_rec.col18,
177 p_col19 => p_is_line_rec.col19,
178 p_col20 => p_is_line_rec.col20,
179 p_col21 => p_is_line_rec.col21,
180 p_col22 => p_is_line_rec.col22,
181 p_col23 => p_is_line_rec.col23,
182 p_col24 => p_is_line_rec.col24,
183 p_col25 => p_is_line_rec.col25,
184 p_col26 => p_is_line_rec.col26,
185 p_col27 => p_is_line_rec.col27,
186 p_col28 => p_is_line_rec.col28,
187 p_col29 => p_is_line_rec.col29,
188 p_col30 => p_is_line_rec.col30,
189 p_col31 => p_is_line_rec.col31,
190 p_col32 => p_is_line_rec.col32,
191 p_col33 => p_is_line_rec.col33,
192 p_col34 => p_is_line_rec.col34,
193 p_col35 => p_is_line_rec.col35,
194 p_col36 => p_is_line_rec.col36,
195 p_col37 => p_is_line_rec.col37,
196 p_col38 => p_is_line_rec.col38,
197 p_col39 => p_is_line_rec.col39,
198 p_col40 => p_is_line_rec.col40,
199 p_col41 => p_is_line_rec.col41,
200 p_col42 => p_is_line_rec.col42,
201 p_col43 => p_is_line_rec.col43,
202 p_col44 => p_is_line_rec.col44,
203 p_col45 => p_is_line_rec.col45,
204 p_col46 => p_is_line_rec.col46,
205 p_col47 => p_is_line_rec.col47,
206 p_col48 => p_is_line_rec.col48,
207 p_col49 => p_is_line_rec.col49,
208 p_col50 => p_is_line_rec.col50,
209 p_col51 => p_is_line_rec.col51,
210 p_col52 => p_is_line_rec.col52,
211 p_col53 => p_is_line_rec.col53,
212 p_col54 => p_is_line_rec.col54,
213 p_col55 => p_is_line_rec.col55,
214 p_col56 => p_is_line_rec.col56,
215 p_col57 => p_is_line_rec.col57,
216 p_col58 => p_is_line_rec.col58,
217 p_col59 => p_is_line_rec.col59,
218 p_col60 => p_is_line_rec.col60,
219 p_col61 => p_is_line_rec.col61,
220 p_col62 => p_is_line_rec.col62,
221 p_col63 => p_is_line_rec.col63,
222 p_col64 => p_is_line_rec.col64,
223 p_col65 => p_is_line_rec.col65,
224 p_col66 => p_is_line_rec.col66,
225 p_col67 => p_is_line_rec.col67,
226 p_col68 => p_is_line_rec.col68,
227 p_col69 => p_is_line_rec.col69,
228 p_col70 => p_is_line_rec.col70,
229 p_col71 => p_is_line_rec.col71,
230 p_col72 => p_is_line_rec.col72,
231 p_col73 => p_is_line_rec.col73,
232 p_col74 => p_is_line_rec.col74,
233 p_col75 => p_is_line_rec.col75,
234 p_col76 => p_is_line_rec.col76,
235 p_col77 => p_is_line_rec.col77,
236 p_col78 => p_is_line_rec.col78,
237 p_col79 => p_is_line_rec.col79,
238 p_col80 => p_is_line_rec.col80,
239 p_col81 => p_is_line_rec.col81,
240 p_col82 => p_is_line_rec.col82,
241 p_col83 => p_is_line_rec.col83,
242 p_col84 => p_is_line_rec.col84,
243 p_col85 => p_is_line_rec.col85,
244 p_col86 => p_is_line_rec.col86,
245 p_col87 => p_is_line_rec.col87,
246 p_col88 => p_is_line_rec.col88,
247 p_col89 => p_is_line_rec.col89,
248 p_col90 => p_is_line_rec.col90,
249 p_col91 => p_is_line_rec.col91,
250 p_col92 => p_is_line_rec.col92,
251 p_col93 => p_is_line_rec.col93,
252 p_col94 => p_is_line_rec.col94,
253 p_col95 => p_is_line_rec.col95,
254 p_col96 => p_is_line_rec.col96,
255 p_col97 => p_is_line_rec.col97,
256 p_col98 => p_is_line_rec.col98,
257 p_col99 => p_is_line_rec.col99,
258 p_col100 => p_is_line_rec.col100,
259 p_col101 => p_is_line_rec.col101,
260 p_col102 => p_is_line_rec.col102,
261 p_col103 => p_is_line_rec.col103,
262 p_col104 => p_is_line_rec.col104,
263 p_col105 => p_is_line_rec.col105,
264 p_col106 => p_is_line_rec.col106,
265 p_col107 => p_is_line_rec.col107,
266 p_col108 => p_is_line_rec.col108,
267 p_col109 => p_is_line_rec.col109,
268 p_col110 => p_is_line_rec.col110,
269 p_col111 => p_is_line_rec.col111,
270 p_col112 => p_is_line_rec.col112,
271 p_col113 => p_is_line_rec.col113,
272 p_col114 => p_is_line_rec.col114,
273 p_col115 => p_is_line_rec.col115,
274 p_col116 => p_is_line_rec.col116,
275 p_col117 => p_is_line_rec.col117,
276 p_col118 => p_is_line_rec.col118,
277 p_col119 => p_is_line_rec.col119,
278 p_col120 => p_is_line_rec.col120,
279 p_col121 => p_is_line_rec.col121,
280 p_col122 => p_is_line_rec.col122,
281 p_col123 => p_is_line_rec.col123,
282 p_col124 => p_is_line_rec.col124,
283 p_col125 => p_is_line_rec.col125,
284 p_col126 => p_is_line_rec.col126,
285 p_col127 => p_is_line_rec.col127,
286 p_col128 => p_is_line_rec.col128,
287 p_col129 => p_is_line_rec.col129,
288 p_col130 => p_is_line_rec.col130,
289 p_col131 => p_is_line_rec.col131,
290 p_col132 => p_is_line_rec.col132,
291 p_col133 => p_is_line_rec.col133,
292 p_col134 => p_is_line_rec.col134,
293 p_col135 => p_is_line_rec.col135,
294 p_col136 => p_is_line_rec.col136,
295 p_col137 => p_is_line_rec.col137,
296 p_col138 => p_is_line_rec.col138,
297 p_col139 => p_is_line_rec.col139,
298 p_col140 => p_is_line_rec.col140,
299 p_col141 => p_is_line_rec.col141,
300 p_col142 => p_is_line_rec.col142,
301 p_col143 => p_is_line_rec.col143,
302 p_col144 => p_is_line_rec.col144,
303 p_col145 => p_is_line_rec.col145,
304 p_col146 => p_is_line_rec.col146,
305 p_col147 => p_is_line_rec.col147,
306 p_col148 => p_is_line_rec.col148,
307 p_col149 => p_is_line_rec.col149,
308 p_col150 => p_is_line_rec.col150,
309 p_col151 => p_is_line_rec.col151,
310 p_col152 => p_is_line_rec.col152,
311 p_col153 => p_is_line_rec.col153,
312 p_col154 => p_is_line_rec.col154,
313 p_col155 => p_is_line_rec.col155,
314 p_col156 => p_is_line_rec.col156,
315 p_col157 => p_is_line_rec.col157,
316 p_col158 => p_is_line_rec.col158,
317 p_col159 => p_is_line_rec.col159,
318 p_col160 => p_is_line_rec.col160,
319 p_col161 => p_is_line_rec.col161,
320 p_col162 => p_is_line_rec.col162,
321 p_col163 => p_is_line_rec.col163,
322 p_col164 => p_is_line_rec.col164,
323 p_col165 => p_is_line_rec.col165,
324 p_col166 => p_is_line_rec.col166,
325 p_col167 => p_is_line_rec.col167,
326 p_col168 => p_is_line_rec.col168,
327 p_col169 => p_is_line_rec.col169,
328 p_col170 => p_is_line_rec.col170,
329 p_col171 => p_is_line_rec.col171,
330 p_col172 => p_is_line_rec.col172,
331 p_col173 => p_is_line_rec.col173,
332 p_col174 => p_is_line_rec.col174,
333 p_col175 => p_is_line_rec.col175,
334 p_col176 => p_is_line_rec.col176,
335 p_col177 => p_is_line_rec.col177,
336 p_col178 => p_is_line_rec.col178,
337 p_col179 => p_is_line_rec.col179,
338 p_col180 => p_is_line_rec.col180,
339 p_col181 => p_is_line_rec.col181,
340 p_col182 => p_is_line_rec.col182,
341 p_col183 => p_is_line_rec.col183,
342 p_col184 => p_is_line_rec.col184,
343 p_col185 => p_is_line_rec.col185,
344 p_col186 => p_is_line_rec.col186,
345 p_col187 => p_is_line_rec.col187,
346 p_col188 => p_is_line_rec.col188,
347 p_col189 => p_is_line_rec.col189,
348 p_col190 => p_is_line_rec.col190,
349 p_col191 => p_is_line_rec.col191,
350 p_col192 => p_is_line_rec.col192,
351 p_col193 => p_is_line_rec.col193,
352 p_col194 => p_is_line_rec.col194,
353 p_col195 => p_is_line_rec.col195,
354 p_col196 => p_is_line_rec.col196,
355 p_col197 => p_is_line_rec.col197,
356 p_col198 => p_is_line_rec.col198,
357 p_col199 => p_is_line_rec.col199,
358 p_col200 => p_is_line_rec.col200,
359 p_col201 => p_is_line_rec.col201,
360 p_col202 => p_is_line_rec.col202,
361 p_col203 => p_is_line_rec.col203,
362 p_col204 => p_is_line_rec.col204,
363 p_col205 => p_is_line_rec.col205,
367 p_col209 => p_is_line_rec.col209,
364 p_col206 => p_is_line_rec.col206,
365 p_col207 => p_is_line_rec.col207,
366 p_col208 => p_is_line_rec.col208,
368 p_col210 => p_is_line_rec.col210,
369 p_col211 => p_is_line_rec.col211,
370 p_col212 => p_is_line_rec.col212,
371 p_col213 => p_is_line_rec.col213,
372 p_col214 => p_is_line_rec.col214,
373 p_col215 => p_is_line_rec.col215,
374 p_col216 => p_is_line_rec.col216,
375 p_col217 => p_is_line_rec.col217,
376 p_col218 => p_is_line_rec.col218,
377 p_col219 => p_is_line_rec.col219,
378 p_col220 => p_is_line_rec.col220,
379 p_col221 => p_is_line_rec.col221,
380 p_col222 => p_is_line_rec.col222,
381 p_col223 => p_is_line_rec.col223,
382 p_col224 => p_is_line_rec.col224,
383 p_col225 => p_is_line_rec.col225,
384 p_col226 => p_is_line_rec.col226,
385 p_col227 => p_is_line_rec.col227,
386 p_col228 => p_is_line_rec.col228,
387 p_col229 => p_is_line_rec.col229,
388 p_col230 => p_is_line_rec.col230,
389 p_col231 => p_is_line_rec.col231,
390 p_col232 => p_is_line_rec.col232,
391 p_col233 => p_is_line_rec.col233,
392 p_col234 => p_is_line_rec.col234,
393 p_col235 => p_is_line_rec.col235,
394 p_col236 => p_is_line_rec.col236,
395 p_col237 => p_is_line_rec.col237,
396 p_col238 => p_is_line_rec.col238,
397 p_col239 => p_is_line_rec.col239,
398 p_col240 => p_is_line_rec.col240,
399 p_col241 => p_is_line_rec.col241,
400 p_col242 => p_is_line_rec.col242,
401 p_col243 => p_is_line_rec.col243,
402 p_col244 => p_is_line_rec.col244,
403 p_col245 => p_is_line_rec.col245,
404 p_col246 => p_is_line_rec.col246,
405 p_col247 => p_is_line_rec.col247,
406 p_col248 => p_is_line_rec.col248,
407 p_col249 => p_is_line_rec.col249,
408 p_col250 => p_is_line_rec.col250,
409 p_duplicate_flag => p_is_line_rec.duplicate_flag,
410 p_current_usage => p_is_line_rec.current_usage,
411 p_notes => p_is_line_rec.notes,
412 p_sales_agent_email_address => p_is_line_rec.sales_agent_email_address,
413 p_vehicle_response_code => p_is_line_rec.vehicle_response_code,
414 p_custom_column1 => p_is_line_rec.custom_column1,
415 p_custom_column2 => p_is_line_rec.custom_column2,
416 p_custom_column3 => p_is_line_rec.custom_column3,
417 p_custom_column4 => p_is_line_rec.custom_column4,
418 p_custom_column5 => p_is_line_rec.custom_column5,
419 p_custom_column6 => p_is_line_rec.custom_column6,
420 p_custom_column7 => p_is_line_rec.custom_column7,
421 p_custom_column8 => p_is_line_rec.custom_column8,
422 p_custom_column9 => p_is_line_rec.custom_column9,
423 p_custom_column10 => p_is_line_rec.custom_column10,
424 p_custom_column11 => p_is_line_rec.custom_column11,
425 p_custom_column12 => p_is_line_rec.custom_column12,
426 p_custom_column13 => p_is_line_rec.custom_column13,
427 p_custom_column14 => p_is_line_rec.custom_column14,
428 p_custom_column15 => p_is_line_rec.custom_column15,
429 p_custom_column16 => p_is_line_rec.custom_column16,
430 p_custom_column17 => p_is_line_rec.custom_column17,
431 p_custom_column18 => p_is_line_rec.custom_column18,
432 p_custom_column19 => p_is_line_rec.custom_column19,
433 p_custom_column20 => p_is_line_rec.custom_column20,
434 p_custom_column21 => p_is_line_rec.custom_column21,
435 p_custom_column22 => p_is_line_rec.custom_column22,
436 p_custom_column23 => p_is_line_rec.custom_column23,
437 p_custom_column24 => p_is_line_rec.custom_column24,
438 p_custom_column25 => p_is_line_rec.custom_column25
439
440 );
441 IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
442 RAISE FND_API.G_EXC_ERROR;
443 END IF;
444 x_import_source_line_id := l_import_source_line_id;
445 --
446 -- End of API body
447 --
448
449 -- Standard check for p_commit
450 IF FND_API.to_Boolean( p_commit )
451 THEN
452 COMMIT WORK;
453 END IF;
454
455
456 -- Debug Message
457 IF (AMS_DEBUG_HIGH_ON) THEN
458
459 AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
460 END IF;
461
462 -- Standard call to get message count and if count is 1, get message info.
463 FND_MSG_PUB.Count_And_Get
464 (p_count => x_msg_count,
465 p_data => x_msg_data
466 );
467 EXCEPTION
468
469 WHEN AMS_Utility_PVT.resource_locked THEN
470 x_return_status := FND_API.g_ret_sts_error;
471 AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
472
473 WHEN FND_API.G_EXC_ERROR THEN
474 ROLLBACK TO CREATE_Is_Line_PVT;
475 x_return_status := FND_API.G_RET_STS_ERROR;
476 -- Standard call to get message count and if count=1, get the message
477 FND_MSG_PUB.Count_And_Get (
481 );
478 p_encoded => FND_API.G_FALSE,
479 p_count => x_msg_count,
480 p_data => x_msg_data
482
483 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
484 ROLLBACK TO CREATE_Is_Line_PVT;
485 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
486 -- Standard call to get message count and if count=1, get the message
487 FND_MSG_PUB.Count_And_Get (
488 p_encoded => FND_API.G_FALSE,
489 p_count => x_msg_count,
490 p_data => x_msg_data
491 );
492
493 WHEN OTHERS THEN
494 ROLLBACK TO CREATE_Is_Line_PVT;
495 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
496 IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
497 THEN
498 FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
499 END IF;
500 -- Standard call to get message count and if count=1, get the message
501 FND_MSG_PUB.Count_And_Get (
502 p_encoded => FND_API.G_FALSE,
503 p_count => x_msg_count,
504 p_data => x_msg_data
505 );
506 End Create_Is_Line;
507
508
509 PROCEDURE Update_Is_Line(
510 p_api_version_number IN NUMBER,
511 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
512 p_commit IN VARCHAR2 := FND_API.G_FALSE,
513 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
514
515 x_return_status OUT NOCOPY VARCHAR2,
516 x_msg_count OUT NOCOPY NUMBER,
517 x_msg_data OUT NOCOPY VARCHAR2,
518
519 p_is_line_rec IN is_line_rec_type,
520 x_object_version_number OUT NOCOPY NUMBER
521 )
522
523 IS
524
525 CURSOR c_get_is_line(import_source_line_id NUMBER) IS
526 SELECT *
527 FROM AMS_IMP_SOURCE_LINES
528 where import_source_line_id=p_is_line_rec.import_source_line_id;
529
530 CURSOR c_get_batch_id IS
531 SELECT AS_IMPORT_INTERFACE_S.NEXTVAL
532 FROM DUAL;
533
534 -- Hint: Developer need to provide Where clause
535
536 L_API_NAME CONSTANT VARCHAR2(30) := 'Update_Is_Line';
537 L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
538 -- Local Variables
539 l_object_version_number NUMBER;
540 l_IMPORT_SOURCE_LINE_ID NUMBER;
541 l_ref_is_line_rec c_get_Is_Line%ROWTYPE ;
542 l_tar_is_line_rec AMS_Is_Line_PVT.is_line_rec_type := P_is_line_rec;
543 l_rowid ROWID;
544 l_batchId NUMBER;
545 l_user_status_id NUMBER;
546
547 BEGIN
548 -- Standard Start of API savepoint
549 SAVEPOINT UPDATE_Is_Line_PVT;
550
551 -- Standard call to check for call compatibility.
552 IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
553 p_api_version_number,
554 l_api_name,
555 G_PKG_NAME)
556 THEN
557 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
558 END IF;
559
560 -- Initialize message list if p_init_msg_list is set to TRUE.
561 IF FND_API.to_Boolean( p_init_msg_list )
562 THEN
563 FND_MSG_PUB.initialize;
564 END IF;
565
566 -- Debug Message
567 IF (AMS_DEBUG_HIGH_ON) THEN
568
569 AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
570 END IF;
571
572
573 -- Initialize API return status to SUCCESS
574 x_return_status := FND_API.G_RET_STS_SUCCESS;
575
576 -- Debug Message
577 IF (AMS_DEBUG_HIGH_ON) THEN
578
579 AMS_UTILITY_PVT.debug_message('Private API: - Open Cursor to Select');
580 END IF;
581
582
583 OPEN c_get_Is_Line( l_tar_is_line_rec.import_source_line_id);
584 FETCH c_get_Is_Line INTO l_ref_is_line_rec ;
585 CLOSE c_get_Is_Line;
586 if (l_ref_is_line_rec.load_status = 'DUPLICATE') then
587 -- p_is_line_rec.duplicate_flag := 'N';
588 l_tar_is_line_rec.duplicate_flag := 'N';
589 end if;
590
591
592 /*
593 If ( c_get_Is_Line%NOTFOUND) THEN
594 AMS_Utility_PVT.Error_Message(p_message_name => 'API_MISSING_UPDATE_TARGET',
595 p_token_name => 'INFO',
596 p_token_value => 'Is_Line') ;
597 RAISE FND_API.G_EXC_ERROR;
598 END IF;
599 -- Debug Message
600 IF (AMS_DEBUG_HIGH_ON) THEN
601
602 AMS_UTILITY_PVT.debug_message('Private API: - Close Cursor');
603 END IF;
604 CLOSE c_get_Is_Line;
605 */
606
607
608 If (l_tar_is_line_rec.object_version_number is NULL or
609 l_tar_is_line_rec.object_version_number = FND_API.G_MISS_NUM ) Then
610 AMS_Utility_PVT.Error_Message(p_message_name => 'API_VERSION_MISSING',
611 p_token_name => 'COLUMN',
612 p_token_value => 'OBJECT_VERSION_NUMBER') ;
613 raise FND_API.G_EXC_ERROR;
614 End if;
615 -- Check Whether record has been changed by someone else
616 If (l_tar_is_line_rec.object_version_number <> l_ref_is_line_rec.object_version_number) Then
620 raise FND_API.G_EXC_ERROR;
617 AMS_Utility_PVT.Error_Message(p_message_name => 'API_RECORD_CHANGED',
618 p_token_name => 'INFO',
619 p_token_value => 'Is_Line') ;
621 End if;
622 IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
623 THEN
624 -- Debug message
625 IF (AMS_DEBUG_HIGH_ON) THEN
626
627 AMS_UTILITY_PVT.debug_message('Private API: Validate_Is_Line');
628 END IF;
629
630 -- Invoke validation procedures
631 Validate_is_line(
632 p_api_version_number => 1.0,
633 p_init_msg_list => FND_API.G_FALSE,
634 p_validation_level => p_validation_level,
635 p_is_line_rec => p_is_line_rec,
636 x_return_status => x_return_status,
637 x_msg_count => x_msg_count,
638 x_msg_data => x_msg_data);
639 END IF;
640
641 IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
642 RAISE FND_API.G_EXC_ERROR;
643 END IF;
644
645
646 -- Debug Message
647 IF (AMS_DEBUG_HIGH_ON) THEN
648
649 AMS_UTILITY_PVT.debug_message('Private API: Calling update table handler');
650 END IF;
651
652
653
654 -- Invoke table handler(AMS_IMP_SOURCE_LINES_PKG.Update_Row)
655 AMS_IMP_SOURCE_LINES_PKG.Update_Row(
656 p_import_source_line_id => p_is_line_rec.import_source_line_id,
657 p_object_version_number => p_is_line_rec.object_version_number,
658 p_last_update_date => SYSDATE,
659 p_last_updated_by => FND_GLOBAL.USER_ID,
660 p_creation_date => SYSDATE,
661 p_created_by => FND_GLOBAL.USER_ID,
662 p_last_update_login => FND_GLOBAL.CONC_LOGIN_ID,
663 p_import_list_header_id => p_is_line_rec.import_list_header_id,
664 p_import_successful_flag => p_is_line_rec.import_successful_flag,
665 p_enabled_flag => p_is_line_rec.enabled_flag,
666 p_import_failure_reason => p_is_line_rec.import_failure_reason,
667 p_re_import_last_done_date => p_is_line_rec.re_import_last_done_date,
668 p_party_id => p_is_line_rec.party_id,
669 p_dedupe_key => p_is_line_rec.dedupe_key,
670 p_col1 => p_is_line_rec.col1,
671 p_col2 => p_is_line_rec.col2,
672 p_col3 => p_is_line_rec.col3,
673 p_col4 => p_is_line_rec.col4,
674 p_col5 => p_is_line_rec.col5,
675 p_col6 => p_is_line_rec.col6,
676 p_col7 => p_is_line_rec.col7,
677 p_col8 => p_is_line_rec.col8,
678 p_col9 => p_is_line_rec.col9,
679 p_col10 => p_is_line_rec.col10,
680 p_col11 => p_is_line_rec.col11,
681 p_col12 => p_is_line_rec.col12,
682 p_col13 => p_is_line_rec.col13,
683 p_col14 => p_is_line_rec.col14,
684 p_col15 => p_is_line_rec.col15,
685 p_col16 => p_is_line_rec.col16,
686 p_col17 => p_is_line_rec.col17,
687 p_col18 => p_is_line_rec.col18,
688 p_col19 => p_is_line_rec.col19,
689 p_col20 => p_is_line_rec.col20,
690 p_col21 => p_is_line_rec.col21,
691 p_col22 => p_is_line_rec.col22,
692 p_col23 => p_is_line_rec.col23,
693 p_col24 => p_is_line_rec.col24,
694 p_col25 => p_is_line_rec.col25,
695 p_col26 => p_is_line_rec.col26,
696 p_col27 => p_is_line_rec.col27,
697 p_col28 => p_is_line_rec.col28,
698 p_col29 => p_is_line_rec.col29,
699 p_col30 => p_is_line_rec.col30,
700 p_col31 => p_is_line_rec.col31,
701 p_col32 => p_is_line_rec.col32,
702 p_col33 => p_is_line_rec.col33,
703 p_col34 => p_is_line_rec.col34,
704 p_col35 => p_is_line_rec.col35,
705 p_col36 => p_is_line_rec.col36,
706 p_col37 => p_is_line_rec.col37,
707 p_col38 => p_is_line_rec.col38,
708 p_col39 => p_is_line_rec.col39,
709 p_col40 => p_is_line_rec.col40,
710 p_col41 => p_is_line_rec.col41,
711 p_col42 => p_is_line_rec.col42,
712 p_col43 => p_is_line_rec.col43,
713 p_col44 => p_is_line_rec.col44,
714 p_col45 => p_is_line_rec.col45,
715 p_col46 => p_is_line_rec.col46,
716 p_col47 => p_is_line_rec.col47,
717 p_col48 => p_is_line_rec.col48,
718 p_col49 => p_is_line_rec.col49,
719 p_col50 => p_is_line_rec.col50,
720 p_col51 => p_is_line_rec.col51,
721 p_col52 => p_is_line_rec.col52,
722 p_col53 => p_is_line_rec.col53,
723 p_col54 => p_is_line_rec.col54,
724 p_col55 => p_is_line_rec.col55,
725 p_col56 => p_is_line_rec.col56,
726 p_col57 => p_is_line_rec.col57,
727 p_col58 => p_is_line_rec.col58,
728 p_col59 => p_is_line_rec.col59,
729 p_col60 => p_is_line_rec.col60,
730 p_col61 => p_is_line_rec.col61,
734 p_col65 => p_is_line_rec.col65,
731 p_col62 => p_is_line_rec.col62,
732 p_col63 => p_is_line_rec.col63,
733 p_col64 => p_is_line_rec.col64,
735 p_col66 => p_is_line_rec.col66,
736 p_col67 => p_is_line_rec.col67,
737 p_col68 => p_is_line_rec.col68,
738 p_col69 => p_is_line_rec.col69,
739 p_col70 => p_is_line_rec.col70,
740 p_col71 => p_is_line_rec.col71,
741 p_col72 => p_is_line_rec.col72,
742 p_col73 => p_is_line_rec.col73,
743 p_col74 => p_is_line_rec.col74,
744 p_col75 => p_is_line_rec.col75,
745 p_col76 => p_is_line_rec.col76,
746 p_col77 => p_is_line_rec.col77,
747 p_col78 => p_is_line_rec.col78,
748 p_col79 => p_is_line_rec.col79,
749 p_col80 => p_is_line_rec.col80,
750 p_col81 => p_is_line_rec.col81,
751 p_col82 => p_is_line_rec.col82,
752 p_col83 => p_is_line_rec.col83,
753 p_col84 => p_is_line_rec.col84,
754 p_col85 => p_is_line_rec.col85,
755 p_col86 => p_is_line_rec.col86,
756 p_col87 => p_is_line_rec.col87,
757 p_col88 => p_is_line_rec.col88,
758 p_col89 => p_is_line_rec.col89,
759 p_col90 => p_is_line_rec.col90,
760 p_col91 => p_is_line_rec.col91,
761 p_col92 => p_is_line_rec.col92,
762 p_col93 => p_is_line_rec.col93,
763 p_col94 => p_is_line_rec.col94,
764 p_col95 => p_is_line_rec.col95,
765 p_col96 => p_is_line_rec.col96,
766 p_col97 => p_is_line_rec.col97,
767 p_col98 => p_is_line_rec.col98,
768 p_col99 => p_is_line_rec.col99,
769 p_col100 => p_is_line_rec.col100,
770 p_col101 => p_is_line_rec.col101,
771 p_col102 => p_is_line_rec.col102,
772 p_col103 => p_is_line_rec.col103,
773 p_col104 => p_is_line_rec.col104,
774 p_col105 => p_is_line_rec.col105,
775 p_col106 => p_is_line_rec.col106,
776 p_col107 => p_is_line_rec.col107,
777 p_col108 => p_is_line_rec.col108,
778 p_col109 => p_is_line_rec.col109,
779 p_col110 => p_is_line_rec.col110,
780 p_col111 => p_is_line_rec.col111,
781 p_col112 => p_is_line_rec.col112,
782 p_col113 => p_is_line_rec.col113,
783 p_col114 => p_is_line_rec.col114,
784 p_col115 => p_is_line_rec.col115,
785 p_col116 => p_is_line_rec.col116,
786 p_col117 => p_is_line_rec.col117,
787 p_col118 => p_is_line_rec.col118,
788 p_col119 => p_is_line_rec.col119,
789 p_col120 => p_is_line_rec.col120,
790 p_col121 => p_is_line_rec.col121,
791 p_col122 => p_is_line_rec.col122,
792 p_col123 => p_is_line_rec.col123,
793 p_col124 => p_is_line_rec.col124,
794 p_col125 => p_is_line_rec.col125,
795 p_col126 => p_is_line_rec.col126,
796 p_col127 => p_is_line_rec.col127,
797 p_col128 => p_is_line_rec.col128,
798 p_col129 => p_is_line_rec.col129,
799 p_col130 => p_is_line_rec.col130,
800 p_col131 => p_is_line_rec.col131,
801 p_col132 => p_is_line_rec.col132,
802 p_col133 => p_is_line_rec.col133,
803 p_col134 => p_is_line_rec.col134,
804 p_col135 => p_is_line_rec.col135,
805 p_col136 => p_is_line_rec.col136,
806 p_col137 => p_is_line_rec.col137,
807 p_col138 => p_is_line_rec.col138,
808 p_col139 => p_is_line_rec.col139,
809 p_col140 => p_is_line_rec.col140,
810 p_col141 => p_is_line_rec.col141,
811 p_col142 => p_is_line_rec.col142,
812 p_col143 => p_is_line_rec.col143,
813 p_col144 => p_is_line_rec.col144,
814 p_col145 => p_is_line_rec.col145,
815 p_col146 => p_is_line_rec.col146,
816 p_col147 => p_is_line_rec.col147,
817 p_col148 => p_is_line_rec.col148,
818 p_col149 => p_is_line_rec.col149,
819 p_col150 => p_is_line_rec.col150,
820 p_col151 => p_is_line_rec.col151,
821 p_col152 => p_is_line_rec.col152,
822 p_col153 => p_is_line_rec.col153,
823 p_col154 => p_is_line_rec.col154,
824 p_col155 => p_is_line_rec.col155,
825 p_col156 => p_is_line_rec.col156,
826 p_col157 => p_is_line_rec.col157,
827 p_col158 => p_is_line_rec.col158,
828 p_col159 => p_is_line_rec.col159,
829 p_col160 => p_is_line_rec.col160,
830 p_col161 => p_is_line_rec.col161,
831 p_col162 => p_is_line_rec.col162,
832 p_col163 => p_is_line_rec.col163,
833 p_col164 => p_is_line_rec.col164,
834 p_col165 => p_is_line_rec.col165,
835 p_col166 => p_is_line_rec.col166,
836 p_col167 => p_is_line_rec.col167,
837 p_col168 => p_is_line_rec.col168,
841 p_col172 => p_is_line_rec.col172,
838 p_col169 => p_is_line_rec.col169,
839 p_col170 => p_is_line_rec.col170,
840 p_col171 => p_is_line_rec.col171,
842 p_col173 => p_is_line_rec.col173,
843 p_col174 => p_is_line_rec.col174,
844 p_col175 => p_is_line_rec.col175,
845 p_col176 => p_is_line_rec.col176,
846 p_col177 => p_is_line_rec.col177,
847 p_col178 => p_is_line_rec.col178,
848 p_col179 => p_is_line_rec.col179,
849 p_col180 => p_is_line_rec.col180,
850 p_col181 => p_is_line_rec.col181,
851 p_col182 => p_is_line_rec.col182,
852 p_col183 => p_is_line_rec.col183,
853 p_col184 => p_is_line_rec.col184,
854 p_col185 => p_is_line_rec.col185,
855 p_col186 => p_is_line_rec.col186,
856 p_col187 => p_is_line_rec.col187,
857 p_col188 => p_is_line_rec.col188,
858 p_col189 => p_is_line_rec.col189,
859 p_col190 => p_is_line_rec.col190,
860 p_col191 => p_is_line_rec.col191,
861 p_col192 => p_is_line_rec.col192,
862 p_col193 => p_is_line_rec.col193,
863 p_col194 => p_is_line_rec.col194,
864 p_col195 => p_is_line_rec.col195,
865 p_col196 => p_is_line_rec.col196,
866 p_col197 => p_is_line_rec.col197,
867 p_col198 => p_is_line_rec.col198,
868 p_col199 => p_is_line_rec.col199,
869 p_col200 => p_is_line_rec.col200,
870 p_col201 => p_is_line_rec.col201,
871 p_col202 => p_is_line_rec.col202,
872 p_col203 => p_is_line_rec.col203,
873 p_col204 => p_is_line_rec.col204,
874 p_col205 => p_is_line_rec.col205,
875 p_col206 => p_is_line_rec.col206,
876 p_col207 => p_is_line_rec.col207,
877 p_col208 => p_is_line_rec.col208,
878 p_col209 => p_is_line_rec.col209,
879 p_col210 => p_is_line_rec.col210,
880 p_col211 => p_is_line_rec.col211,
881 p_col212 => p_is_line_rec.col212,
882 p_col213 => p_is_line_rec.col213,
883 p_col214 => p_is_line_rec.col214,
884 p_col215 => p_is_line_rec.col215,
885 p_col216 => p_is_line_rec.col216,
886 p_col217 => p_is_line_rec.col217,
887 p_col218 => p_is_line_rec.col218,
888 p_col219 => p_is_line_rec.col219,
889 p_col220 => p_is_line_rec.col220,
890 p_col221 => p_is_line_rec.col221,
891 p_col222 => p_is_line_rec.col222,
892 p_col223 => p_is_line_rec.col223,
893 p_col224 => p_is_line_rec.col224,
894 p_col225 => p_is_line_rec.col225,
895 p_col226 => p_is_line_rec.col226,
896 p_col227 => p_is_line_rec.col227,
897 p_col228 => p_is_line_rec.col228,
898 p_col229 => p_is_line_rec.col229,
899 p_col230 => p_is_line_rec.col230,
900 p_col231 => p_is_line_rec.col231,
901 p_col232 => p_is_line_rec.col232,
902 p_col233 => p_is_line_rec.col233,
903 p_col234 => p_is_line_rec.col234,
904 p_col235 => p_is_line_rec.col235,
905 p_col236 => p_is_line_rec.col236,
906 p_col237 => p_is_line_rec.col237,
907 p_col238 => p_is_line_rec.col238,
908 p_col239 => p_is_line_rec.col239,
909 p_col240 => p_is_line_rec.col240,
910 p_col241 => p_is_line_rec.col241,
911 p_col242 => p_is_line_rec.col242,
912 p_col243 => p_is_line_rec.col243,
913 p_col244 => p_is_line_rec.col244,
914 p_col245 => p_is_line_rec.col245,
915 p_col246 => p_is_line_rec.col246,
916 p_col247 => p_is_line_rec.col247,
917 p_col248 => p_is_line_rec.col248,
918 p_col249 => p_is_line_rec.col249,
919 p_col250 => p_is_line_rec.col250,
920 -- p_duplicate_flag => p_is_line_rec.duplicate_flag,
921 p_duplicate_flag => l_tar_is_line_rec.duplicate_flag,
922 p_current_usage => p_is_line_rec.current_usage,
923 p_load_status => 'RELOAD',
924 p_notes => p_is_line_rec.notes,
925 p_sales_agent_email_address => p_is_line_rec.sales_agent_email_address,
926 p_vehicle_response_code => p_is_line_rec.vehicle_response_code,
927 p_custom_column1 => p_is_line_rec.custom_column1,
928 p_custom_column2 => p_is_line_rec.custom_column2,
929 p_custom_column3 => p_is_line_rec.custom_column3,
930 p_custom_column4 => p_is_line_rec.custom_column4,
931 p_custom_column5 => p_is_line_rec.custom_column5,
932 p_custom_column6 => p_is_line_rec.custom_column6,
933 p_custom_column7 => p_is_line_rec.custom_column7,
934 p_custom_column8 => p_is_line_rec.custom_column8,
935 p_custom_column9 => p_is_line_rec.custom_column9,
936 p_custom_column10 => p_is_line_rec.custom_column10,
937 p_custom_column11 => p_is_line_rec.custom_column11,
938 p_custom_column12 => p_is_line_rec.custom_column12,
942 p_custom_column16 => p_is_line_rec.custom_column16,
939 p_custom_column13 => p_is_line_rec.custom_column13,
940 p_custom_column14 => p_is_line_rec.custom_column14,
941 p_custom_column15 => p_is_line_rec.custom_column15,
943 p_custom_column17 => p_is_line_rec.custom_column17,
944 p_custom_column18 => p_is_line_rec.custom_column18,
945 p_custom_column19 => p_is_line_rec.custom_column19,
946 p_custom_column20 => p_is_line_rec.custom_column20,
947 p_custom_column21 => p_is_line_rec.custom_column21,
948 p_custom_column22 => p_is_line_rec.custom_column22,
949 p_custom_column23 => p_is_line_rec.custom_column23,
950 p_custom_column24 => p_is_line_rec.custom_column24,
951 p_custom_column25 => p_is_line_rec.custom_column25
952
953
954 ); --For Error handling and Correction Update LOAD_STATUS = 'RELOAD'
955
956
957 --In AMS_IMP_LIST_HEADERS_ALL
958 --1. Increment BATCH_ID FROM AS_IMPORT_INTERFACE_S SEQUENCE.
959 --2. Update the STATUS_CODE = 'STAGED'
960 --3. Update EXECUTE_MODE = 'R'
961
962 /* OPEN c_get_batch_id;
963 FETCH c_get_batch_id INTO l_batchId;
964 CLOSE c_get_batch_id;
965
966 l_user_status_id := null;
967 SELECT user_status_id into l_user_status_id FROM ams_user_statuses_vl
968 WHERE system_status_type = 'AMS_IMPORT_STATUS' AND
969 system_status_code = 'STAGED';
970 */
971
972 UPDATE ams_imp_list_headers_all
973 SET
974 -- batch_id =l_batchId
975 -- , status_code = 'STAGED'
976 execute_mode = 'R'
977 -- , user_status_id = l_user_status_id
978 WHERE import_list_header_id=p_is_line_rec.import_list_header_id
979 --AND STATUS_CODE <> 'STAGED'
980 --AND user_status_id <> l_user_status_id;
981 AND execute_mode <> 'R';
982
983
984 --
985 -- End of API body.
986 --
987
988 -- Standard check for p_commit
989 IF FND_API.to_Boolean( p_commit )
990 THEN
991 COMMIT WORK;
992 END IF;
993
994
995 -- Debug Message
996 IF (AMS_DEBUG_HIGH_ON) THEN
997
998 AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
999 END IF;
1000
1001 -- Standard call to get message count and if count is 1, get message info.
1002 FND_MSG_PUB.Count_And_Get
1003 (p_count => x_msg_count,
1004 p_data => x_msg_data
1005 );
1006 EXCEPTION
1007
1008 WHEN AMS_Utility_PVT.resource_locked THEN
1009 x_return_status := FND_API.g_ret_sts_error;
1010 AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
1011
1012 WHEN FND_API.G_EXC_ERROR THEN
1013 ROLLBACK TO UPDATE_Is_Line_PVT;
1014 x_return_status := FND_API.G_RET_STS_ERROR;
1015 -- Standard call to get message count and if count=1, get the message
1016 FND_MSG_PUB.Count_And_Get (
1017 p_encoded => FND_API.G_FALSE,
1018 p_count => x_msg_count,
1019 p_data => x_msg_data
1020 );
1021
1022 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1023 ROLLBACK TO UPDATE_Is_Line_PVT;
1024 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1025 -- Standard call to get message count and if count=1, get the message
1026 FND_MSG_PUB.Count_And_Get (
1027 p_encoded => FND_API.G_FALSE,
1028 p_count => x_msg_count,
1029 p_data => x_msg_data
1030 );
1031
1032 WHEN OTHERS THEN
1033 ROLLBACK TO UPDATE_Is_Line_PVT;
1034 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1035 IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1036 THEN
1037 FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1038 END IF;
1039 -- Standard call to get message count and if count=1, get the message
1040 FND_MSG_PUB.Count_And_Get (
1041 p_encoded => FND_API.G_FALSE,
1042 p_count => x_msg_count,
1043 p_data => x_msg_data
1044 );
1045 End Update_Is_Line;
1046
1047
1048 PROCEDURE Delete_Is_Line(
1049 p_api_version_number IN NUMBER,
1050 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1051 p_commit IN VARCHAR2 := FND_API.G_FALSE,
1052 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1053 x_return_status OUT NOCOPY VARCHAR2,
1054 x_msg_count OUT NOCOPY NUMBER,
1055 x_msg_data OUT NOCOPY VARCHAR2,
1056 p_import_source_line_id IN NUMBER,
1057 p_object_version_number IN NUMBER
1058 )
1059
1060 IS
1061 L_API_NAME CONSTANT VARCHAR2(30) := 'Delete_Is_Line';
1062 L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
1063 l_object_version_number NUMBER;
1064
1065 BEGIN
1066 -- Standard Start of API savepoint
1067 SAVEPOINT DELETE_Is_Line_PVT;
1068
1069 -- Standard call to check for call compatibility.
1070 IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1074 THEN
1071 p_api_version_number,
1072 l_api_name,
1073 G_PKG_NAME)
1075 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1076 END IF;
1077
1078 -- Initialize message list if p_init_msg_list is set to TRUE.
1079 IF FND_API.to_Boolean( p_init_msg_list )
1080 THEN
1081 FND_MSG_PUB.initialize;
1082 END IF;
1083
1084 -- Debug Message
1085 IF (AMS_DEBUG_HIGH_ON) THEN
1086
1087 AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
1088 END IF;
1089
1090
1091 -- Initialize API return status to SUCCESS
1092 x_return_status := FND_API.G_RET_STS_SUCCESS;
1093
1094 --
1095 -- Api body
1096 --
1097 -- Debug Message
1098 IF (AMS_DEBUG_HIGH_ON) THEN
1099
1100 AMS_UTILITY_PVT.debug_message( 'Private API: Calling delete table handler');
1101 END IF;
1102
1103 -- Invoke table handler(AMS_IMP_SOURCE_LINES_PKG.Delete_Row)
1104 AMS_IMP_SOURCE_LINES_PKG.Delete_Row(
1105 p_IMPORT_SOURCE_LINE_ID => p_IMPORT_SOURCE_LINE_ID);
1106 --
1107 -- End of API body
1108 --
1109
1110 -- Standard check for p_commit
1111 IF FND_API.to_Boolean( p_commit )
1112 THEN
1113 COMMIT WORK;
1114 END IF;
1115
1116
1117 -- Debug Message
1118 IF (AMS_DEBUG_HIGH_ON) THEN
1119
1120 AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1121 END IF;
1122
1123 -- Standard call to get message count and if count is 1, get message info.
1124 FND_MSG_PUB.Count_And_Get
1125 (p_count => x_msg_count,
1126 p_data => x_msg_data
1127 );
1128 EXCEPTION
1129
1130 WHEN AMS_Utility_PVT.resource_locked THEN
1131 x_return_status := FND_API.g_ret_sts_error;
1132 AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
1133
1134 WHEN FND_API.G_EXC_ERROR THEN
1135 ROLLBACK TO DELETE_Is_Line_PVT;
1136 x_return_status := FND_API.G_RET_STS_ERROR;
1137 -- Standard call to get message count and if count=1, get the message
1138 FND_MSG_PUB.Count_And_Get (
1139 p_encoded => FND_API.G_FALSE,
1140 p_count => x_msg_count,
1141 p_data => x_msg_data
1142 );
1143
1144 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1145 ROLLBACK TO DELETE_Is_Line_PVT;
1146 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1147 -- Standard call to get message count and if count=1, get the message
1148 FND_MSG_PUB.Count_And_Get (
1149 p_encoded => FND_API.G_FALSE,
1150 p_count => x_msg_count,
1151 p_data => x_msg_data
1152 );
1153
1154 WHEN OTHERS THEN
1155 ROLLBACK TO DELETE_Is_Line_PVT;
1156 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1157 IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1158 THEN
1159 FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1160 END IF;
1161 -- Standard call to get message count and if count=1, get the message
1162 FND_MSG_PUB.Count_And_Get (
1163 p_encoded => FND_API.G_FALSE,
1164 p_count => x_msg_count,
1165 p_data => x_msg_data
1166 );
1167 End Delete_Is_Line;
1168
1169
1170
1171 -- Hint: Primary key needs to be returned.
1172 PROCEDURE Lock_Is_Line(
1173 p_api_version_number IN NUMBER,
1174 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1175
1176 x_return_status OUT NOCOPY VARCHAR2,
1177 x_msg_count OUT NOCOPY NUMBER,
1178 x_msg_data OUT NOCOPY VARCHAR2,
1179
1180 p_import_source_line_id IN NUMBER,
1181 p_object_version IN NUMBER
1182 )
1183
1184 IS
1185 L_API_NAME CONSTANT VARCHAR2(30) := 'Lock_Is_Line';
1186 L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
1187 L_FULL_NAME CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
1188 l_IMPORT_SOURCE_LINE_ID NUMBER;
1189
1190 CURSOR c_Is_Line IS
1191 SELECT IMPORT_SOURCE_LINE_ID
1192 FROM AMS_IMP_SOURCE_LINES
1193 WHERE IMPORT_SOURCE_LINE_ID = p_IMPORT_SOURCE_LINE_ID
1194 AND object_version_number = p_object_version
1195 FOR UPDATE NOWAIT;
1196
1197 BEGIN
1198
1199 -- Debug Message
1200 IF (AMS_DEBUG_HIGH_ON) THEN
1201
1202 AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
1203 END IF;
1204
1205 -- Initialize message list if p_init_msg_list is set to TRUE.
1206 IF FND_API.to_Boolean( p_init_msg_list )
1207 THEN
1208 FND_MSG_PUB.initialize;
1209 END IF;
1210
1211 -- Standard call to check for call compatibility.
1212 IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1213 p_api_version_number,
1217 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1214 l_api_name,
1215 G_PKG_NAME)
1216 THEN
1218 END IF;
1219
1220
1221 -- Initialize API return status to SUCCESS
1222 x_return_status := FND_API.G_RET_STS_SUCCESS;
1223
1224
1225 ------------------------ lock -------------------------
1226
1227 IF (AMS_DEBUG_HIGH_ON) THEN
1228
1229
1230
1231 AMS_Utility_PVT.debug_message(l_full_name||': start');
1232
1233 END IF;
1234 OPEN c_Is_Line;
1235
1236 FETCH c_Is_Line INTO l_IMPORT_SOURCE_LINE_ID;
1237
1238 IF (c_Is_Line%NOTFOUND) THEN
1239 CLOSE c_Is_Line;
1240 IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1241 FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
1242 FND_MSG_PUB.add;
1243 END IF;
1244 RAISE FND_API.g_exc_error;
1245 END IF;
1246
1247 CLOSE c_Is_Line;
1248
1249 -------------------- finish --------------------------
1250 FND_MSG_PUB.count_and_get(
1251 p_encoded => FND_API.g_false,
1252 p_count => x_msg_count,
1253 p_data => x_msg_data);
1254 IF (AMS_DEBUG_HIGH_ON) THEN
1255
1256 AMS_Utility_PVT.debug_message(l_full_name ||': end');
1257 END IF;
1258 EXCEPTION
1259
1260 WHEN AMS_Utility_PVT.resource_locked THEN
1261 x_return_status := FND_API.g_ret_sts_error;
1262 AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
1263
1264 WHEN FND_API.G_EXC_ERROR THEN
1265 ROLLBACK TO LOCK_Is_Line_PVT;
1266 x_return_status := FND_API.G_RET_STS_ERROR;
1267 -- Standard call to get message count and if count=1, get the message
1268 FND_MSG_PUB.Count_And_Get (
1269 p_encoded => FND_API.G_FALSE,
1270 p_count => x_msg_count,
1271 p_data => x_msg_data
1272 );
1273
1274 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1275 ROLLBACK TO LOCK_Is_Line_PVT;
1276 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1277 -- Standard call to get message count and if count=1, get the message
1278 FND_MSG_PUB.Count_And_Get (
1279 p_encoded => FND_API.G_FALSE,
1280 p_count => x_msg_count,
1281 p_data => x_msg_data
1282 );
1283
1284 WHEN OTHERS THEN
1285 ROLLBACK TO LOCK_Is_Line_PVT;
1286 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1287 IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1288 THEN
1289 FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1290 END IF;
1291 -- Standard call to get message count and if count=1, get the message
1292 FND_MSG_PUB.Count_And_Get (
1293 p_encoded => FND_API.G_FALSE,
1294 p_count => x_msg_count,
1295 p_data => x_msg_data
1296 );
1297 End Lock_Is_Line;
1298
1299
1300 PROCEDURE check_is_line_uk_items(
1301 p_is_line_rec IN is_line_rec_type,
1302 p_validation_mode IN VARCHAR2 := JTF_PLSQL_API.g_create,
1303 x_return_status OUT NOCOPY VARCHAR2)
1304 IS
1305 l_valid_flag VARCHAR2(1);
1306
1307 BEGIN
1308 x_return_status := FND_API.g_ret_sts_success;
1309 IF p_validation_mode = JTF_PLSQL_API.g_create THEN
1310 l_valid_flag := AMS_Utility_PVT.check_uniqueness(
1311 'AMS_IMP_SOURCE_LINES',
1312 'IMPORT_SOURCE_LINE_ID = ''' || p_is_line_rec.IMPORT_SOURCE_LINE_ID ||''''
1313 );
1314 ELSE
1315 l_valid_flag := AMS_Utility_PVT.check_uniqueness(
1316 'AMS_IMP_SOURCE_LINES',
1317 'IMPORT_SOURCE_LINE_ID = ''' || p_is_line_rec.IMPORT_SOURCE_LINE_ID ||
1318 ''' AND IMPORT_SOURCE_LINE_ID <> ' || p_is_line_rec.IMPORT_SOURCE_LINE_ID
1319 );
1320 END IF;
1321
1322 IF l_valid_flag = FND_API.g_false THEN
1323 AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_IMPORT_SOURCE_LINE_ID_DUPLICATE');
1324 x_return_status := FND_API.g_ret_sts_error;
1325 RETURN;
1326 END IF;
1327
1328 END check_is_line_uk_items;
1329
1330 PROCEDURE check_is_line_req_items(
1331 p_is_line_rec IN is_line_rec_type,
1332 p_validation_mode IN VARCHAR2 := JTF_PLSQL_API.g_create,
1333 x_return_status OUT NOCOPY VARCHAR2
1334 )
1335 IS
1336 BEGIN
1337 x_return_status := FND_API.g_ret_sts_success;
1338
1339 IF p_validation_mode = JTF_PLSQL_API.g_create THEN
1340
1341
1342 IF p_is_line_rec.import_source_line_id = FND_API.g_miss_num OR p_is_line_rec.import_source_line_id IS NULL THEN
1343 AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_is_line_NO_import_source_line_id');
1344 x_return_status := FND_API.g_ret_sts_error;
1345 RETURN;
1346 END IF;
1347
1348
1349 IF p_is_line_rec.last_update_date = FND_API.g_miss_date OR p_is_line_rec.last_update_date IS NULL THEN
1350 AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_is_line_NO_last_update_date');
1351 x_return_status := FND_API.g_ret_sts_error;
1352 RETURN;
1353 END IF;
1354
1355
1356 IF p_is_line_rec.last_updated_by = FND_API.g_miss_num OR p_is_line_rec.last_updated_by IS NULL THEN
1360 END IF;
1357 AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_is_line_NO_last_updated_by');
1358 x_return_status := FND_API.g_ret_sts_error;
1359 RETURN;
1361
1362
1363 IF p_is_line_rec.creation_date = FND_API.g_miss_date OR p_is_line_rec.creation_date IS NULL THEN
1364 AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_is_line_NO_creation_date');
1365 x_return_status := FND_API.g_ret_sts_error;
1366 RETURN;
1367 END IF;
1368
1369
1370 IF p_is_line_rec.created_by = FND_API.g_miss_num OR p_is_line_rec.created_by IS NULL THEN
1371 AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_is_line_NO_created_by');
1372 x_return_status := FND_API.g_ret_sts_error;
1373 RETURN;
1374 END IF;
1375
1376
1377 IF p_is_line_rec.last_update_login = FND_API.g_miss_num OR p_is_line_rec.last_update_login IS NULL THEN
1378 AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_is_line_NO_last_update_login');
1379 x_return_status := FND_API.g_ret_sts_error;
1380 RETURN;
1381 END IF;
1382
1383
1384 IF p_is_line_rec.import_list_header_id = FND_API.g_miss_num OR p_is_line_rec.import_list_header_id IS NULL THEN
1385 AMS_Utility_PVT.Error_Message(p_message_name => 'NO_import_list_header_id');
1386 x_return_status := FND_API.g_ret_sts_error;
1387 RETURN;
1388 END IF;
1389
1390
1391 IF p_is_line_rec.import_successful_flag = FND_API.g_miss_char OR p_is_line_rec.import_successful_flag IS NULL THEN
1392 AMS_Utility_PVT.Error_Message(p_message_name => 'NO_import_successful_flag');
1393 x_return_status := FND_API.g_ret_sts_error;
1394 RETURN;
1395 END IF;
1396 ELSE
1397
1398
1399 IF p_is_line_rec.import_source_line_id IS NULL THEN
1400 AMS_Utility_PVT.Error_Message(p_message_name => 'NO_import_source_line_id');
1401 x_return_status := FND_API.g_ret_sts_error;
1402 RETURN;
1403 END IF;
1404
1405
1406 IF p_is_line_rec.last_update_date IS NULL THEN
1407 AMS_Utility_PVT.Error_Message(p_message_name => 'NO_last_update_date');
1408 x_return_status := FND_API.g_ret_sts_error;
1409 RETURN;
1410 END IF;
1411
1412
1413 IF p_is_line_rec.last_updated_by IS NULL THEN
1414 AMS_Utility_PVT.Error_Message(p_message_name => 'NO_last_updated_by');
1415 x_return_status := FND_API.g_ret_sts_error;
1416 RETURN;
1417 END IF;
1418
1419
1420 IF p_is_line_rec.creation_date IS NULL THEN
1421 AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_is_line_NO_creation_date');
1422 x_return_status := FND_API.g_ret_sts_error;
1423 RETURN;
1424 END IF;
1425
1426
1427 IF p_is_line_rec.created_by IS NULL THEN
1428 AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_is_line_NO_created_by');
1429 x_return_status := FND_API.g_ret_sts_error;
1430 RETURN;
1431 END IF;
1432
1433
1434 IF p_is_line_rec.last_update_login IS NULL THEN
1435 AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_is_line_NO_last_update_login');
1436 x_return_status := FND_API.g_ret_sts_error;
1437 RETURN;
1438 END IF;
1439
1440
1441 IF p_is_line_rec.import_list_header_id IS NULL THEN
1442 AMS_Utility_PVT.Error_Message(p_message_name => 'NO_import_list_header_id');
1443 x_return_status := FND_API.g_ret_sts_error;
1444 RETURN;
1445 END IF;
1446
1447
1448 IF p_is_line_rec.import_successful_flag IS NULL THEN
1449 AMS_Utility_PVT.Error_Message(p_message_name => 'NO_import_successful_flag');
1450 x_return_status := FND_API.g_ret_sts_error;
1451 RETURN;
1452 END IF;
1453 END IF;
1454
1455 END check_is_line_req_items;
1456
1457 PROCEDURE check_is_line_FK_items(
1458 p_is_line_rec IN is_line_rec_type,
1459 x_return_status OUT NOCOPY VARCHAR2
1460 )
1461 IS
1462 BEGIN
1463 x_return_status := FND_API.g_ret_sts_success;
1464
1465 -- Enter custom code here
1466
1467 END check_is_line_FK_items;
1468
1469 PROCEDURE check_is_line_Lookup_items(
1470 p_is_line_rec IN is_line_rec_type,
1471 x_return_status OUT NOCOPY VARCHAR2
1472 )
1473 IS
1474 BEGIN
1475 x_return_status := FND_API.g_ret_sts_success;
1476
1477 -- Enter custom code here
1478
1479 END check_is_line_Lookup_items;
1480
1481 PROCEDURE Check_is_line_Items (
1482 P_is_line_rec IN is_line_rec_type,
1483 p_validation_mode IN VARCHAR2,
1484 x_return_status OUT NOCOPY VARCHAR2
1485 )
1486 IS
1487 BEGIN
1488
1489 -- Check Items Uniqueness API calls
1490
1491 check_is_line_uk_items(
1492 p_is_line_rec => p_is_line_rec,
1493 p_validation_mode => p_validation_mode,
1494 x_return_status => x_return_status);
1495 IF x_return_status <> FND_API.g_ret_sts_success THEN
1496 RETURN;
1497 END IF;
1498
1499 -- Check Items Required/NOT NULL API calls
1500
1501 check_is_line_req_items(
1502 p_is_line_rec => p_is_line_rec,
1503 p_validation_mode => p_validation_mode,
1507 END IF;
1504 x_return_status => x_return_status);
1505 IF x_return_status <> FND_API.g_ret_sts_success THEN
1506 RETURN;
1508 -- Check Items Foreign Keys API calls
1509
1510 check_is_line_FK_items(
1511 p_is_line_rec => p_is_line_rec,
1512 x_return_status => x_return_status);
1513 IF x_return_status <> FND_API.g_ret_sts_success THEN
1514 RETURN;
1515 END IF;
1516 -- Check Items Lookups
1517
1518 check_is_line_Lookup_items(
1519 p_is_line_rec => p_is_line_rec,
1520 x_return_status => x_return_status);
1521 IF x_return_status <> FND_API.g_ret_sts_success THEN
1522 RETURN;
1523 END IF;
1524
1525 END Check_is_line_Items;
1526
1527
1528 PROCEDURE Complete_is_line_Rec (
1529 p_is_line_rec IN is_line_rec_type,
1530 x_complete_rec OUT NOCOPY is_line_rec_type)
1531 IS
1532 l_return_status VARCHAR2(1);
1533
1534 CURSOR c_complete IS
1535 SELECT *
1536 FROM ams_imp_source_lines
1537 WHERE import_source_line_id = p_is_line_rec.import_source_line_id;
1538 l_is_line_rec c_complete%ROWTYPE;
1539 BEGIN
1540 x_complete_rec := p_is_line_rec;
1541
1542
1543 OPEN c_complete;
1544 FETCH c_complete INTO l_is_line_rec;
1545 CLOSE c_complete;
1546
1547 -- import_source_line_id
1548 IF p_is_line_rec.import_source_line_id = FND_API.g_miss_num THEN
1549 x_complete_rec.import_source_line_id := l_is_line_rec.import_source_line_id;
1550 END IF;
1551
1552 -- object_version_number
1553 IF p_is_line_rec.object_version_number = FND_API.g_miss_num THEN
1554 x_complete_rec.object_version_number := l_is_line_rec.object_version_number;
1555 END IF;
1556
1557 -- last_update_date
1558 IF p_is_line_rec.last_update_date = FND_API.g_miss_date THEN
1559 x_complete_rec.last_update_date := l_is_line_rec.last_update_date;
1560 END IF;
1561
1562 -- last_updated_by
1563 IF p_is_line_rec.last_updated_by = FND_API.g_miss_num THEN
1564 x_complete_rec.last_updated_by := l_is_line_rec.last_updated_by;
1565 END IF;
1566
1567 -- creation_date
1568 IF p_is_line_rec.creation_date = FND_API.g_miss_date THEN
1569 x_complete_rec.creation_date := l_is_line_rec.creation_date;
1570 END IF;
1571
1572 -- created_by
1573 IF p_is_line_rec.created_by = FND_API.g_miss_num THEN
1574 x_complete_rec.created_by := l_is_line_rec.created_by;
1575 END IF;
1576
1577 -- last_update_login
1578 IF p_is_line_rec.last_update_login = FND_API.g_miss_num THEN
1579 x_complete_rec.last_update_login := l_is_line_rec.last_update_login;
1580 END IF;
1581
1582 -- import_list_header_id
1583 IF p_is_line_rec.import_list_header_id = FND_API.g_miss_num THEN
1584 x_complete_rec.import_list_header_id := l_is_line_rec.import_list_header_id;
1585 END IF;
1586
1587 -- import_successful_flag
1588 IF p_is_line_rec.import_successful_flag = FND_API.g_miss_char THEN
1589 x_complete_rec.import_successful_flag := l_is_line_rec.import_successful_flag;
1590 END IF;
1591
1592 -- enabled_flag
1593 IF p_is_line_rec.enabled_flag = FND_API.g_miss_char THEN
1594 x_complete_rec.enabled_flag := l_is_line_rec.enabled_flag;
1595 END IF;
1596
1597 -- import_failure_reason
1598 IF p_is_line_rec.import_failure_reason = FND_API.g_miss_char THEN
1599 x_complete_rec.import_failure_reason := l_is_line_rec.import_failure_reason;
1600 END IF;
1601
1602 -- re_import_last_done_date
1603 IF p_is_line_rec.re_import_last_done_date = FND_API.g_miss_date THEN
1604 x_complete_rec.re_import_last_done_date := l_is_line_rec.re_import_last_done_date;
1605 END IF;
1606
1607 -- party_id
1608 IF p_is_line_rec.party_id = FND_API.g_miss_num THEN
1609 x_complete_rec.party_id := l_is_line_rec.party_id;
1610 END IF;
1611
1612 -- dedupe_key
1613 IF p_is_line_rec.dedupe_key = FND_API.g_miss_char THEN
1614 x_complete_rec.dedupe_key := l_is_line_rec.dedupe_key;
1615 END IF;
1616
1617 -- col1
1618 IF p_is_line_rec.col1 = FND_API.g_miss_char THEN
1619 x_complete_rec.col1 := l_is_line_rec.col1;
1620 END IF;
1621
1622 -- col2
1623 IF p_is_line_rec.col2 = FND_API.g_miss_char THEN
1624 x_complete_rec.col2 := l_is_line_rec.col2;
1625 END IF;
1626
1627 -- col3
1628 IF p_is_line_rec.col3 = FND_API.g_miss_char THEN
1629 x_complete_rec.col3 := l_is_line_rec.col3;
1630 END IF;
1631
1632 -- col4
1633 IF p_is_line_rec.col4 = FND_API.g_miss_char THEN
1634 x_complete_rec.col4 := l_is_line_rec.col4;
1635 END IF;
1636
1637 -- col5
1638 IF p_is_line_rec.col5 = FND_API.g_miss_char THEN
1639 x_complete_rec.col5 := l_is_line_rec.col5;
1640 END IF;
1641
1642 -- col6
1643 IF p_is_line_rec.col6 = FND_API.g_miss_char THEN
1644 x_complete_rec.col6 := l_is_line_rec.col6;
1645 END IF;
1646
1647 -- col7
1648 IF p_is_line_rec.col7 = FND_API.g_miss_char THEN
1649 x_complete_rec.col7 := l_is_line_rec.col7;
1650 END IF;
1651
1652 -- col8
1653 IF p_is_line_rec.col8 = FND_API.g_miss_char THEN
1657 -- col9
1654 x_complete_rec.col8 := l_is_line_rec.col8;
1655 END IF;
1656
1658 IF p_is_line_rec.col9 = FND_API.g_miss_char THEN
1659 x_complete_rec.col9 := l_is_line_rec.col9;
1660 END IF;
1661
1662 -- col10
1663 IF p_is_line_rec.col10 = FND_API.g_miss_char THEN
1664 x_complete_rec.col10 := l_is_line_rec.col10;
1665 END IF;
1666
1667 -- col11
1668 IF p_is_line_rec.col11 = FND_API.g_miss_char THEN
1669 x_complete_rec.col11 := l_is_line_rec.col11;
1670 END IF;
1671
1672 -- col12
1673 IF p_is_line_rec.col12 = FND_API.g_miss_char THEN
1674 x_complete_rec.col12 := l_is_line_rec.col12;
1675 END IF;
1676
1677 -- col13
1678 IF p_is_line_rec.col13 = FND_API.g_miss_char THEN
1679 x_complete_rec.col13 := l_is_line_rec.col13;
1680 END IF;
1681
1682 -- col14
1683 IF p_is_line_rec.col14 = FND_API.g_miss_char THEN
1684 x_complete_rec.col14 := l_is_line_rec.col14;
1685 END IF;
1686
1687 -- col15
1688 IF p_is_line_rec.col15 = FND_API.g_miss_char THEN
1689 x_complete_rec.col15 := l_is_line_rec.col15;
1690 END IF;
1691
1692 -- col16
1693 IF p_is_line_rec.col16 = FND_API.g_miss_char THEN
1694 x_complete_rec.col16 := l_is_line_rec.col16;
1695 END IF;
1696
1697 -- col17
1698 IF p_is_line_rec.col17 = FND_API.g_miss_char THEN
1699 x_complete_rec.col17 := l_is_line_rec.col17;
1700 END IF;
1701
1702 -- col18
1703 IF p_is_line_rec.col18 = FND_API.g_miss_char THEN
1704 x_complete_rec.col18 := l_is_line_rec.col18;
1705 END IF;
1706
1707 -- col19
1708 IF p_is_line_rec.col19 = FND_API.g_miss_char THEN
1709 x_complete_rec.col19 := l_is_line_rec.col19;
1710 END IF;
1711
1712 -- col20
1713 IF p_is_line_rec.col20 = FND_API.g_miss_char THEN
1714 x_complete_rec.col20 := l_is_line_rec.col20;
1715 END IF;
1716
1717 -- col21
1718 IF p_is_line_rec.col21 = FND_API.g_miss_char THEN
1719 x_complete_rec.col21 := l_is_line_rec.col21;
1720 END IF;
1721
1722 -- col22
1723 IF p_is_line_rec.col22 = FND_API.g_miss_char THEN
1724 x_complete_rec.col22 := l_is_line_rec.col22;
1725 END IF;
1726
1727 -- col23
1728 IF p_is_line_rec.col23 = FND_API.g_miss_char THEN
1729 x_complete_rec.col23 := l_is_line_rec.col23;
1730 END IF;
1731
1732 -- col24
1733 IF p_is_line_rec.col24 = FND_API.g_miss_char THEN
1734 x_complete_rec.col24 := l_is_line_rec.col24;
1735 END IF;
1736
1737 -- col25
1738 IF p_is_line_rec.col25 = FND_API.g_miss_char THEN
1739 x_complete_rec.col25 := l_is_line_rec.col25;
1740 END IF;
1741
1742 -- col26
1743 IF p_is_line_rec.col26 = FND_API.g_miss_char THEN
1744 x_complete_rec.col26 := l_is_line_rec.col26;
1745 END IF;
1746
1747 -- col27
1748 IF p_is_line_rec.col27 = FND_API.g_miss_char THEN
1749 x_complete_rec.col27 := l_is_line_rec.col27;
1750 END IF;
1751
1752 -- col28
1753 IF p_is_line_rec.col28 = FND_API.g_miss_char THEN
1754 x_complete_rec.col28 := l_is_line_rec.col28;
1755 END IF;
1756
1757 -- col29
1758 IF p_is_line_rec.col29 = FND_API.g_miss_char THEN
1759 x_complete_rec.col29 := l_is_line_rec.col29;
1760 END IF;
1761
1762 -- col30
1763 IF p_is_line_rec.col30 = FND_API.g_miss_char THEN
1764 x_complete_rec.col30 := l_is_line_rec.col30;
1765 END IF;
1766
1767 -- col31
1768 IF p_is_line_rec.col31 = FND_API.g_miss_char THEN
1769 x_complete_rec.col31 := l_is_line_rec.col31;
1770 END IF;
1771
1772 -- col32
1773 IF p_is_line_rec.col32 = FND_API.g_miss_char THEN
1774 x_complete_rec.col32 := l_is_line_rec.col32;
1775 END IF;
1776
1777 -- col33
1778 IF p_is_line_rec.col33 = FND_API.g_miss_char THEN
1779 x_complete_rec.col33 := l_is_line_rec.col33;
1780 END IF;
1781
1782 -- col34
1783 IF p_is_line_rec.col34 = FND_API.g_miss_char THEN
1784 x_complete_rec.col34 := l_is_line_rec.col34;
1785 END IF;
1786
1787 -- col35
1788 IF p_is_line_rec.col35 = FND_API.g_miss_char THEN
1789 x_complete_rec.col35 := l_is_line_rec.col35;
1790 END IF;
1791
1792 -- col36
1793 IF p_is_line_rec.col36 = FND_API.g_miss_char THEN
1794 x_complete_rec.col36 := l_is_line_rec.col36;
1795 END IF;
1796
1797 -- col37
1798 IF p_is_line_rec.col37 = FND_API.g_miss_char THEN
1799 x_complete_rec.col37 := l_is_line_rec.col37;
1800 END IF;
1801
1802 -- col38
1803 IF p_is_line_rec.col38 = FND_API.g_miss_char THEN
1804 x_complete_rec.col38 := l_is_line_rec.col38;
1805 END IF;
1806
1807 -- col39
1808 IF p_is_line_rec.col39 = FND_API.g_miss_char THEN
1809 x_complete_rec.col39 := l_is_line_rec.col39;
1810 END IF;
1811
1812 -- col40
1813 IF p_is_line_rec.col40 = FND_API.g_miss_char THEN
1814 x_complete_rec.col40 := l_is_line_rec.col40;
1815 END IF;
1816
1817 -- col41
1818 IF p_is_line_rec.col41 = FND_API.g_miss_char THEN
1819 x_complete_rec.col41 := l_is_line_rec.col41;
1823 IF p_is_line_rec.col42 = FND_API.g_miss_char THEN
1820 END IF;
1821
1822 -- col42
1824 x_complete_rec.col42 := l_is_line_rec.col42;
1825 END IF;
1826
1827 -- col43
1828 IF p_is_line_rec.col43 = FND_API.g_miss_char THEN
1829 x_complete_rec.col43 := l_is_line_rec.col43;
1830 END IF;
1831
1832 -- col44
1833 IF p_is_line_rec.col44 = FND_API.g_miss_char THEN
1834 x_complete_rec.col44 := l_is_line_rec.col44;
1835 END IF;
1836
1837 -- col45
1838 IF p_is_line_rec.col45 = FND_API.g_miss_char THEN
1839 x_complete_rec.col45 := l_is_line_rec.col45;
1840 END IF;
1841
1842 -- col46
1843 IF p_is_line_rec.col46 = FND_API.g_miss_char THEN
1844 x_complete_rec.col46 := l_is_line_rec.col46;
1845 END IF;
1846
1847 -- col47
1848 IF p_is_line_rec.col47 = FND_API.g_miss_char THEN
1849 x_complete_rec.col47 := l_is_line_rec.col47;
1850 END IF;
1851
1852 -- col48
1853 IF p_is_line_rec.col48 = FND_API.g_miss_char THEN
1854 x_complete_rec.col48 := l_is_line_rec.col48;
1855 END IF;
1856
1857 -- col49
1858 IF p_is_line_rec.col49 = FND_API.g_miss_char THEN
1859 x_complete_rec.col49 := l_is_line_rec.col49;
1860 END IF;
1861
1862 -- col50
1863 IF p_is_line_rec.col50 = FND_API.g_miss_char THEN
1864 x_complete_rec.col50 := l_is_line_rec.col50;
1865 END IF;
1866
1867 -- col51
1868 IF p_is_line_rec.col51 = FND_API.g_miss_char THEN
1869 x_complete_rec.col51 := l_is_line_rec.col51;
1870 END IF;
1871
1872 -- col52
1873 IF p_is_line_rec.col52 = FND_API.g_miss_char THEN
1874 x_complete_rec.col52 := l_is_line_rec.col52;
1875 END IF;
1876
1877 -- col53
1878 IF p_is_line_rec.col53 = FND_API.g_miss_char THEN
1879 x_complete_rec.col53 := l_is_line_rec.col53;
1880 END IF;
1881
1882 -- col54
1883 IF p_is_line_rec.col54 = FND_API.g_miss_char THEN
1884 x_complete_rec.col54 := l_is_line_rec.col54;
1885 END IF;
1886
1887 -- col55
1888 IF p_is_line_rec.col55 = FND_API.g_miss_char THEN
1889 x_complete_rec.col55 := l_is_line_rec.col55;
1890 END IF;
1891
1892 -- col56
1893 IF p_is_line_rec.col56 = FND_API.g_miss_char THEN
1894 x_complete_rec.col56 := l_is_line_rec.col56;
1895 END IF;
1896
1897 -- col57
1898 IF p_is_line_rec.col57 = FND_API.g_miss_char THEN
1899 x_complete_rec.col57 := l_is_line_rec.col57;
1900 END IF;
1901
1902 -- col58
1903 IF p_is_line_rec.col58 = FND_API.g_miss_char THEN
1904 x_complete_rec.col58 := l_is_line_rec.col58;
1905 END IF;
1906
1907 -- col59
1908 IF p_is_line_rec.col59 = FND_API.g_miss_char THEN
1909 x_complete_rec.col59 := l_is_line_rec.col59;
1910 END IF;
1911
1912 -- col60
1913 IF p_is_line_rec.col60 = FND_API.g_miss_char THEN
1914 x_complete_rec.col60 := l_is_line_rec.col60;
1915 END IF;
1916
1917 -- col61
1918 IF p_is_line_rec.col61 = FND_API.g_miss_char THEN
1919 x_complete_rec.col61 := l_is_line_rec.col61;
1920 END IF;
1921
1922 -- col62
1923 IF p_is_line_rec.col62 = FND_API.g_miss_char THEN
1924 x_complete_rec.col62 := l_is_line_rec.col62;
1925 END IF;
1926
1927 -- col63
1928 IF p_is_line_rec.col63 = FND_API.g_miss_char THEN
1929 x_complete_rec.col63 := l_is_line_rec.col63;
1930 END IF;
1931
1932 -- col64
1933 IF p_is_line_rec.col64 = FND_API.g_miss_char THEN
1934 x_complete_rec.col64 := l_is_line_rec.col64;
1935 END IF;
1936
1937 -- col65
1938 IF p_is_line_rec.col65 = FND_API.g_miss_char THEN
1939 x_complete_rec.col65 := l_is_line_rec.col65;
1940 END IF;
1941
1942 -- col66
1943 IF p_is_line_rec.col66 = FND_API.g_miss_char THEN
1944 x_complete_rec.col66 := l_is_line_rec.col66;
1945 END IF;
1946
1947 -- col67
1948 IF p_is_line_rec.col67 = FND_API.g_miss_char THEN
1949 x_complete_rec.col67 := l_is_line_rec.col67;
1950 END IF;
1951
1952 -- col68
1953 IF p_is_line_rec.col68 = FND_API.g_miss_char THEN
1954 x_complete_rec.col68 := l_is_line_rec.col68;
1955 END IF;
1956
1957 -- col69
1958 IF p_is_line_rec.col69 = FND_API.g_miss_char THEN
1959 x_complete_rec.col69 := l_is_line_rec.col69;
1960 END IF;
1961
1962 -- col70
1963 IF p_is_line_rec.col70 = FND_API.g_miss_char THEN
1964 x_complete_rec.col70 := l_is_line_rec.col70;
1965 END IF;
1966
1967 -- col71
1968 IF p_is_line_rec.col71 = FND_API.g_miss_char THEN
1969 x_complete_rec.col71 := l_is_line_rec.col71;
1970 END IF;
1971
1972 -- col72
1973 IF p_is_line_rec.col72 = FND_API.g_miss_char THEN
1974 x_complete_rec.col72 := l_is_line_rec.col72;
1975 END IF;
1976
1977 -- col73
1978 IF p_is_line_rec.col73 = FND_API.g_miss_char THEN
1979 x_complete_rec.col73 := l_is_line_rec.col73;
1980 END IF;
1981
1982 -- col74
1983 IF p_is_line_rec.col74 = FND_API.g_miss_char THEN
1984 x_complete_rec.col74 := l_is_line_rec.col74;
1985 END IF;
1986
1987 -- col75
1991
1988 IF p_is_line_rec.col75 = FND_API.g_miss_char THEN
1989 x_complete_rec.col75 := l_is_line_rec.col75;
1990 END IF;
1992 -- col76
1993 IF p_is_line_rec.col76 = FND_API.g_miss_char THEN
1994 x_complete_rec.col76 := l_is_line_rec.col76;
1995 END IF;
1996
1997 -- col77
1998 IF p_is_line_rec.col77 = FND_API.g_miss_char THEN
1999 x_complete_rec.col77 := l_is_line_rec.col77;
2000 END IF;
2001
2002 -- col78
2003 IF p_is_line_rec.col78 = FND_API.g_miss_char THEN
2004 x_complete_rec.col78 := l_is_line_rec.col78;
2005 END IF;
2006
2007 -- col79
2008 IF p_is_line_rec.col79 = FND_API.g_miss_char THEN
2009 x_complete_rec.col79 := l_is_line_rec.col79;
2010 END IF;
2011
2012 -- col80
2013 IF p_is_line_rec.col80 = FND_API.g_miss_char THEN
2014 x_complete_rec.col80 := l_is_line_rec.col80;
2015 END IF;
2016
2017 -- col81
2018 IF p_is_line_rec.col81 = FND_API.g_miss_char THEN
2019 x_complete_rec.col81 := l_is_line_rec.col81;
2020 END IF;
2021
2022 -- col82
2023 IF p_is_line_rec.col82 = FND_API.g_miss_char THEN
2024 x_complete_rec.col82 := l_is_line_rec.col82;
2025 END IF;
2026
2027 -- col83
2028 IF p_is_line_rec.col83 = FND_API.g_miss_char THEN
2029 x_complete_rec.col83 := l_is_line_rec.col83;
2030 END IF;
2031
2032 -- col84
2033 IF p_is_line_rec.col84 = FND_API.g_miss_char THEN
2034 x_complete_rec.col84 := l_is_line_rec.col84;
2035 END IF;
2036
2037 -- col85
2038 IF p_is_line_rec.col85 = FND_API.g_miss_char THEN
2039 x_complete_rec.col85 := l_is_line_rec.col85;
2040 END IF;
2041
2042 -- col86
2043 IF p_is_line_rec.col86 = FND_API.g_miss_char THEN
2044 x_complete_rec.col86 := l_is_line_rec.col86;
2045 END IF;
2046
2047 -- col87
2048 IF p_is_line_rec.col87 = FND_API.g_miss_char THEN
2049 x_complete_rec.col87 := l_is_line_rec.col87;
2050 END IF;
2051
2052 -- col88
2053 IF p_is_line_rec.col88 = FND_API.g_miss_char THEN
2054 x_complete_rec.col88 := l_is_line_rec.col88;
2055 END IF;
2056
2057 -- col89
2058 IF p_is_line_rec.col89 = FND_API.g_miss_char THEN
2059 x_complete_rec.col89 := l_is_line_rec.col89;
2060 END IF;
2061
2062 -- col90
2063 IF p_is_line_rec.col90 = FND_API.g_miss_char THEN
2064 x_complete_rec.col90 := l_is_line_rec.col90;
2065 END IF;
2066
2067 -- col91
2068 IF p_is_line_rec.col91 = FND_API.g_miss_char THEN
2069 x_complete_rec.col91 := l_is_line_rec.col91;
2070 END IF;
2071
2072 -- col92
2073 IF p_is_line_rec.col92 = FND_API.g_miss_char THEN
2074 x_complete_rec.col92 := l_is_line_rec.col92;
2075 END IF;
2076
2077 -- col93
2078 IF p_is_line_rec.col93 = FND_API.g_miss_char THEN
2079 x_complete_rec.col93 := l_is_line_rec.col93;
2080 END IF;
2081
2082 -- col94
2083 IF p_is_line_rec.col94 = FND_API.g_miss_char THEN
2084 x_complete_rec.col94 := l_is_line_rec.col94;
2085 END IF;
2086
2087 -- col95
2088 IF p_is_line_rec.col95 = FND_API.g_miss_char THEN
2089 x_complete_rec.col95 := l_is_line_rec.col95;
2090 END IF;
2091
2092 -- col96
2093 IF p_is_line_rec.col96 = FND_API.g_miss_char THEN
2094 x_complete_rec.col96 := l_is_line_rec.col96;
2095 END IF;
2096
2097 -- col97
2098 IF p_is_line_rec.col97 = FND_API.g_miss_char THEN
2099 x_complete_rec.col97 := l_is_line_rec.col97;
2100 END IF;
2101
2102 -- col98
2103 IF p_is_line_rec.col98 = FND_API.g_miss_char THEN
2104 x_complete_rec.col98 := l_is_line_rec.col98;
2105 END IF;
2106
2107 -- col99
2108 IF p_is_line_rec.col99 = FND_API.g_miss_char THEN
2109 x_complete_rec.col99 := l_is_line_rec.col99;
2110 END IF;
2111
2112 -- col100
2113 IF p_is_line_rec.col100 = FND_API.g_miss_char THEN
2114 x_complete_rec.col100 := l_is_line_rec.col100;
2115 END IF;
2116
2117 -- col101
2118 IF p_is_line_rec.col101 = FND_API.g_miss_char THEN
2119 x_complete_rec.col101 := l_is_line_rec.col101;
2120 END IF;
2121
2122 -- col102
2123 IF p_is_line_rec.col102 = FND_API.g_miss_char THEN
2124 x_complete_rec.col102 := l_is_line_rec.col102;
2125 END IF;
2126
2127 -- col103
2128 IF p_is_line_rec.col103 = FND_API.g_miss_char THEN
2129 x_complete_rec.col103 := l_is_line_rec.col103;
2130 END IF;
2131
2132 -- col104
2133 IF p_is_line_rec.col104 = FND_API.g_miss_char THEN
2134 x_complete_rec.col104 := l_is_line_rec.col104;
2135 END IF;
2136
2137 -- col105
2138 IF p_is_line_rec.col105 = FND_API.g_miss_char THEN
2139 x_complete_rec.col105 := l_is_line_rec.col105;
2140 END IF;
2141
2142 -- col106
2143 IF p_is_line_rec.col106 = FND_API.g_miss_char THEN
2144 x_complete_rec.col106 := l_is_line_rec.col106;
2145 END IF;
2146
2147 -- col107
2148 IF p_is_line_rec.col107 = FND_API.g_miss_char THEN
2149 x_complete_rec.col107 := l_is_line_rec.col107;
2150 END IF;
2151
2152 -- col108
2153 IF p_is_line_rec.col108 = FND_API.g_miss_char THEN
2157 -- col109
2154 x_complete_rec.col108 := l_is_line_rec.col108;
2155 END IF;
2156
2158 IF p_is_line_rec.col109 = FND_API.g_miss_char THEN
2159 x_complete_rec.col109 := l_is_line_rec.col109;
2160 END IF;
2161
2162 -- col110
2163 IF p_is_line_rec.col110 = FND_API.g_miss_char THEN
2164 x_complete_rec.col110 := l_is_line_rec.col110;
2165 END IF;
2166
2167 -- col111
2168 IF p_is_line_rec.col111 = FND_API.g_miss_char THEN
2169 x_complete_rec.col111 := l_is_line_rec.col111;
2170 END IF;
2171
2172 -- col112
2173 IF p_is_line_rec.col112 = FND_API.g_miss_char THEN
2174 x_complete_rec.col112 := l_is_line_rec.col112;
2175 END IF;
2176
2177 -- col113
2178 IF p_is_line_rec.col113 = FND_API.g_miss_char THEN
2179 x_complete_rec.col113 := l_is_line_rec.col113;
2180 END IF;
2181
2182 -- col114
2183 IF p_is_line_rec.col114 = FND_API.g_miss_char THEN
2184 x_complete_rec.col114 := l_is_line_rec.col114;
2185 END IF;
2186
2187 -- col115
2188 IF p_is_line_rec.col115 = FND_API.g_miss_char THEN
2189 x_complete_rec.col115 := l_is_line_rec.col115;
2190 END IF;
2191
2192 -- col116
2193 IF p_is_line_rec.col116 = FND_API.g_miss_char THEN
2194 x_complete_rec.col116 := l_is_line_rec.col116;
2195 END IF;
2196
2197 -- col117
2198 IF p_is_line_rec.col117 = FND_API.g_miss_char THEN
2199 x_complete_rec.col117 := l_is_line_rec.col117;
2200 END IF;
2201
2202 -- col118
2203 IF p_is_line_rec.col118 = FND_API.g_miss_char THEN
2204 x_complete_rec.col118 := l_is_line_rec.col118;
2205 END IF;
2206
2207 -- col119
2208 IF p_is_line_rec.col119 = FND_API.g_miss_char THEN
2209 x_complete_rec.col119 := l_is_line_rec.col119;
2210 END IF;
2211
2212 -- col120
2213 IF p_is_line_rec.col120 = FND_API.g_miss_char THEN
2214 x_complete_rec.col120 := l_is_line_rec.col120;
2215 END IF;
2216
2217 -- col121
2218 IF p_is_line_rec.col121 = FND_API.g_miss_char THEN
2219 x_complete_rec.col121 := l_is_line_rec.col121;
2220 END IF;
2221
2222 -- col122
2223 IF p_is_line_rec.col122 = FND_API.g_miss_char THEN
2224 x_complete_rec.col122 := l_is_line_rec.col122;
2225 END IF;
2226
2227 -- col123
2228 IF p_is_line_rec.col123 = FND_API.g_miss_char THEN
2229 x_complete_rec.col123 := l_is_line_rec.col123;
2230 END IF;
2231
2232 -- col124
2233 IF p_is_line_rec.col124 = FND_API.g_miss_char THEN
2234 x_complete_rec.col124 := l_is_line_rec.col124;
2235 END IF;
2236
2237 -- col125
2238 IF p_is_line_rec.col125 = FND_API.g_miss_char THEN
2239 x_complete_rec.col125 := l_is_line_rec.col125;
2240 END IF;
2241
2242 -- col126
2243 IF p_is_line_rec.col126 = FND_API.g_miss_char THEN
2244 x_complete_rec.col126 := l_is_line_rec.col126;
2245 END IF;
2246
2247 -- col127
2248 IF p_is_line_rec.col127 = FND_API.g_miss_char THEN
2249 x_complete_rec.col127 := l_is_line_rec.col127;
2250 END IF;
2251
2252 -- col128
2253 IF p_is_line_rec.col128 = FND_API.g_miss_char THEN
2254 x_complete_rec.col128 := l_is_line_rec.col128;
2255 END IF;
2256
2257 -- col129
2258 IF p_is_line_rec.col129 = FND_API.g_miss_char THEN
2259 x_complete_rec.col129 := l_is_line_rec.col129;
2260 END IF;
2261
2262 -- col130
2263 IF p_is_line_rec.col130 = FND_API.g_miss_char THEN
2264 x_complete_rec.col130 := l_is_line_rec.col130;
2265 END IF;
2266
2267 -- col131
2268 IF p_is_line_rec.col131 = FND_API.g_miss_char THEN
2269 x_complete_rec.col131 := l_is_line_rec.col131;
2270 END IF;
2271
2272 -- col132
2273 IF p_is_line_rec.col132 = FND_API.g_miss_char THEN
2274 x_complete_rec.col132 := l_is_line_rec.col132;
2275 END IF;
2276
2277 -- col133
2278 IF p_is_line_rec.col133 = FND_API.g_miss_char THEN
2279 x_complete_rec.col133 := l_is_line_rec.col133;
2280 END IF;
2281
2282 -- col134
2283 IF p_is_line_rec.col134 = FND_API.g_miss_char THEN
2284 x_complete_rec.col134 := l_is_line_rec.col134;
2285 END IF;
2286
2287 -- col135
2288 IF p_is_line_rec.col135 = FND_API.g_miss_char THEN
2289 x_complete_rec.col135 := l_is_line_rec.col135;
2290 END IF;
2291
2292 -- col136
2293 IF p_is_line_rec.col136 = FND_API.g_miss_char THEN
2294 x_complete_rec.col136 := l_is_line_rec.col136;
2295 END IF;
2296
2297 -- col137
2298 IF p_is_line_rec.col137 = FND_API.g_miss_char THEN
2299 x_complete_rec.col137 := l_is_line_rec.col137;
2300 END IF;
2301
2302 -- col138
2303 IF p_is_line_rec.col138 = FND_API.g_miss_char THEN
2304 x_complete_rec.col138 := l_is_line_rec.col138;
2305 END IF;
2306
2307 -- col139
2308 IF p_is_line_rec.col139 = FND_API.g_miss_char THEN
2309 x_complete_rec.col139 := l_is_line_rec.col139;
2310 END IF;
2311
2312 -- col140
2313 IF p_is_line_rec.col140 = FND_API.g_miss_char THEN
2314 x_complete_rec.col140 := l_is_line_rec.col140;
2315 END IF;
2316
2317 -- col141
2318 IF p_is_line_rec.col141 = FND_API.g_miss_char THEN
2319 x_complete_rec.col141 := l_is_line_rec.col141;
2320 END IF;
2324 x_complete_rec.col142 := l_is_line_rec.col142;
2321
2322 -- col142
2323 IF p_is_line_rec.col142 = FND_API.g_miss_char THEN
2325 END IF;
2326
2327 -- col143
2328 IF p_is_line_rec.col143 = FND_API.g_miss_char THEN
2329 x_complete_rec.col143 := l_is_line_rec.col143;
2330 END IF;
2331
2332 -- col144
2333 IF p_is_line_rec.col144 = FND_API.g_miss_char THEN
2334 x_complete_rec.col144 := l_is_line_rec.col144;
2335 END IF;
2336
2337 -- col145
2338 IF p_is_line_rec.col145 = FND_API.g_miss_char THEN
2339 x_complete_rec.col145 := l_is_line_rec.col145;
2340 END IF;
2341
2342 -- col146
2343 IF p_is_line_rec.col146 = FND_API.g_miss_char THEN
2344 x_complete_rec.col146 := l_is_line_rec.col146;
2345 END IF;
2346
2347 -- col147
2348 IF p_is_line_rec.col147 = FND_API.g_miss_char THEN
2349 x_complete_rec.col147 := l_is_line_rec.col147;
2350 END IF;
2351
2352 -- col148
2353 IF p_is_line_rec.col148 = FND_API.g_miss_char THEN
2354 x_complete_rec.col148 := l_is_line_rec.col148;
2355 END IF;
2356
2357 -- col149
2358 IF p_is_line_rec.col149 = FND_API.g_miss_char THEN
2359 x_complete_rec.col149 := l_is_line_rec.col149;
2360 END IF;
2361
2362 -- col150
2363 IF p_is_line_rec.col150 = FND_API.g_miss_char THEN
2364 x_complete_rec.col150 := l_is_line_rec.col150;
2365 END IF;
2366
2367 -- col151
2368 IF p_is_line_rec.col151 = FND_API.g_miss_char THEN
2369 x_complete_rec.col151 := l_is_line_rec.col151;
2370 END IF;
2371
2372 -- col152
2373 IF p_is_line_rec.col152 = FND_API.g_miss_char THEN
2374 x_complete_rec.col152 := l_is_line_rec.col152;
2375 END IF;
2376
2377 -- col153
2378 IF p_is_line_rec.col153 = FND_API.g_miss_char THEN
2379 x_complete_rec.col153 := l_is_line_rec.col153;
2380 END IF;
2381
2382 -- col154
2383 IF p_is_line_rec.col154 = FND_API.g_miss_char THEN
2384 x_complete_rec.col154 := l_is_line_rec.col154;
2385 END IF;
2386
2387 -- col155
2388 IF p_is_line_rec.col155 = FND_API.g_miss_char THEN
2389 x_complete_rec.col155 := l_is_line_rec.col155;
2390 END IF;
2391
2392 -- col156
2393 IF p_is_line_rec.col156 = FND_API.g_miss_char THEN
2394 x_complete_rec.col156 := l_is_line_rec.col156;
2395 END IF;
2396
2397 -- col157
2398 IF p_is_line_rec.col157 = FND_API.g_miss_char THEN
2399 x_complete_rec.col157 := l_is_line_rec.col157;
2400 END IF;
2401
2402 -- col158
2403 IF p_is_line_rec.col158 = FND_API.g_miss_char THEN
2404 x_complete_rec.col158 := l_is_line_rec.col158;
2405 END IF;
2406
2407 -- col159
2408 IF p_is_line_rec.col159 = FND_API.g_miss_char THEN
2409 x_complete_rec.col159 := l_is_line_rec.col159;
2410 END IF;
2411
2412 -- col160
2413 IF p_is_line_rec.col160 = FND_API.g_miss_char THEN
2414 x_complete_rec.col160 := l_is_line_rec.col160;
2415 END IF;
2416
2417 -- col161
2418 IF p_is_line_rec.col161 = FND_API.g_miss_char THEN
2419 x_complete_rec.col161 := l_is_line_rec.col161;
2420 END IF;
2421
2422 -- col162
2423 IF p_is_line_rec.col162 = FND_API.g_miss_char THEN
2424 x_complete_rec.col162 := l_is_line_rec.col162;
2425 END IF;
2426
2427 -- col163
2428 IF p_is_line_rec.col163 = FND_API.g_miss_char THEN
2429 x_complete_rec.col163 := l_is_line_rec.col163;
2430 END IF;
2431
2432 -- col164
2433 IF p_is_line_rec.col164 = FND_API.g_miss_char THEN
2434 x_complete_rec.col164 := l_is_line_rec.col164;
2435 END IF;
2436
2437 -- col165
2438 IF p_is_line_rec.col165 = FND_API.g_miss_char THEN
2439 x_complete_rec.col165 := l_is_line_rec.col165;
2440 END IF;
2441
2442 -- col166
2443 IF p_is_line_rec.col166 = FND_API.g_miss_char THEN
2444 x_complete_rec.col166 := l_is_line_rec.col166;
2445 END IF;
2446
2447 -- col167
2448 IF p_is_line_rec.col167 = FND_API.g_miss_char THEN
2449 x_complete_rec.col167 := l_is_line_rec.col167;
2450 END IF;
2451
2452 -- col168
2453 IF p_is_line_rec.col168 = FND_API.g_miss_char THEN
2454 x_complete_rec.col168 := l_is_line_rec.col168;
2455 END IF;
2456
2457 -- col169
2458 IF p_is_line_rec.col169 = FND_API.g_miss_char THEN
2459 x_complete_rec.col169 := l_is_line_rec.col169;
2460 END IF;
2461
2462 -- col170
2463 IF p_is_line_rec.col170 = FND_API.g_miss_char THEN
2464 x_complete_rec.col170 := l_is_line_rec.col170;
2465 END IF;
2466
2467 -- col171
2468 IF p_is_line_rec.col171 = FND_API.g_miss_char THEN
2469 x_complete_rec.col171 := l_is_line_rec.col171;
2470 END IF;
2471
2472 -- col172
2473 IF p_is_line_rec.col172 = FND_API.g_miss_char THEN
2474 x_complete_rec.col172 := l_is_line_rec.col172;
2475 END IF;
2476
2477 -- col173
2478 IF p_is_line_rec.col173 = FND_API.g_miss_char THEN
2479 x_complete_rec.col173 := l_is_line_rec.col173;
2480 END IF;
2481
2482 -- col174
2483 IF p_is_line_rec.col174 = FND_API.g_miss_char THEN
2484 x_complete_rec.col174 := l_is_line_rec.col174;
2485 END IF;
2486
2487 -- col175
2491
2488 IF p_is_line_rec.col175 = FND_API.g_miss_char THEN
2489 x_complete_rec.col175 := l_is_line_rec.col175;
2490 END IF;
2492 -- col176
2493 IF p_is_line_rec.col176 = FND_API.g_miss_char THEN
2494 x_complete_rec.col176 := l_is_line_rec.col176;
2495 END IF;
2496
2497 -- col177
2498 IF p_is_line_rec.col177 = FND_API.g_miss_char THEN
2499 x_complete_rec.col177 := l_is_line_rec.col177;
2500 END IF;
2501
2502 -- col178
2503 IF p_is_line_rec.col178 = FND_API.g_miss_char THEN
2504 x_complete_rec.col178 := l_is_line_rec.col178;
2505 END IF;
2506
2507 -- col179
2508 IF p_is_line_rec.col179 = FND_API.g_miss_char THEN
2509 x_complete_rec.col179 := l_is_line_rec.col179;
2510 END IF;
2511
2512 -- col180
2513 IF p_is_line_rec.col180 = FND_API.g_miss_char THEN
2514 x_complete_rec.col180 := l_is_line_rec.col180;
2515 END IF;
2516
2517 -- col181
2518 IF p_is_line_rec.col181 = FND_API.g_miss_char THEN
2519 x_complete_rec.col181 := l_is_line_rec.col181;
2520 END IF;
2521
2522 -- col182
2523 IF p_is_line_rec.col182 = FND_API.g_miss_char THEN
2524 x_complete_rec.col182 := l_is_line_rec.col182;
2525 END IF;
2526
2527 -- col183
2528 IF p_is_line_rec.col183 = FND_API.g_miss_char THEN
2529 x_complete_rec.col183 := l_is_line_rec.col183;
2530 END IF;
2531
2532 -- col184
2533 IF p_is_line_rec.col184 = FND_API.g_miss_char THEN
2534 x_complete_rec.col184 := l_is_line_rec.col184;
2535 END IF;
2536
2537 -- col185
2538 IF p_is_line_rec.col185 = FND_API.g_miss_char THEN
2539 x_complete_rec.col185 := l_is_line_rec.col185;
2540 END IF;
2541
2542 -- col186
2543 IF p_is_line_rec.col186 = FND_API.g_miss_char THEN
2544 x_complete_rec.col186 := l_is_line_rec.col186;
2545 END IF;
2546
2547 -- col187
2548 IF p_is_line_rec.col187 = FND_API.g_miss_char THEN
2549 x_complete_rec.col187 := l_is_line_rec.col187;
2550 END IF;
2551
2552 -- col188
2553 IF p_is_line_rec.col188 = FND_API.g_miss_char THEN
2554 x_complete_rec.col188 := l_is_line_rec.col188;
2555 END IF;
2556
2557 -- col189
2558 IF p_is_line_rec.col189 = FND_API.g_miss_char THEN
2559 x_complete_rec.col189 := l_is_line_rec.col189;
2560 END IF;
2561
2562 -- col190
2563 IF p_is_line_rec.col190 = FND_API.g_miss_char THEN
2564 x_complete_rec.col190 := l_is_line_rec.col190;
2565 END IF;
2566
2567 -- col191
2568 IF p_is_line_rec.col191 = FND_API.g_miss_char THEN
2569 x_complete_rec.col191 := l_is_line_rec.col191;
2570 END IF;
2571
2572 -- col192
2573 IF p_is_line_rec.col192 = FND_API.g_miss_char THEN
2574 x_complete_rec.col192 := l_is_line_rec.col192;
2575 END IF;
2576
2577 -- col193
2578 IF p_is_line_rec.col193 = FND_API.g_miss_char THEN
2579 x_complete_rec.col193 := l_is_line_rec.col193;
2580 END IF;
2581
2582 -- col194
2583 IF p_is_line_rec.col194 = FND_API.g_miss_char THEN
2584 x_complete_rec.col194 := l_is_line_rec.col194;
2585 END IF;
2586
2587 -- col195
2588 IF p_is_line_rec.col195 = FND_API.g_miss_char THEN
2589 x_complete_rec.col195 := l_is_line_rec.col195;
2590 END IF;
2591
2592 -- col196
2593 IF p_is_line_rec.col196 = FND_API.g_miss_char THEN
2594 x_complete_rec.col196 := l_is_line_rec.col196;
2595 END IF;
2596
2597 -- col197
2598 IF p_is_line_rec.col197 = FND_API.g_miss_char THEN
2599 x_complete_rec.col197 := l_is_line_rec.col197;
2600 END IF;
2601
2602 -- col198
2603 IF p_is_line_rec.col198 = FND_API.g_miss_char THEN
2604 x_complete_rec.col198 := l_is_line_rec.col198;
2605 END IF;
2606
2607 -- col199
2608 IF p_is_line_rec.col199 = FND_API.g_miss_char THEN
2609 x_complete_rec.col199 := l_is_line_rec.col199;
2610 END IF;
2611
2612 -- col200
2613 IF p_is_line_rec.col200 = FND_API.g_miss_char THEN
2614 x_complete_rec.col200 := l_is_line_rec.col200;
2615 END IF;
2616
2617 -- col201
2618 IF p_is_line_rec.col201 = FND_API.g_miss_char THEN
2619 x_complete_rec.col201 := l_is_line_rec.col201;
2620 END IF;
2621
2622 -- col202
2623 IF p_is_line_rec.col202 = FND_API.g_miss_char THEN
2624 x_complete_rec.col202 := l_is_line_rec.col202;
2625 END IF;
2626
2627 -- col203
2628 IF p_is_line_rec.col203 = FND_API.g_miss_char THEN
2629 x_complete_rec.col203 := l_is_line_rec.col203;
2630 END IF;
2631
2632 -- col204
2633 IF p_is_line_rec.col204 = FND_API.g_miss_char THEN
2634 x_complete_rec.col204 := l_is_line_rec.col204;
2635 END IF;
2636
2637 -- col205
2638 IF p_is_line_rec.col205 = FND_API.g_miss_char THEN
2639 x_complete_rec.col205 := l_is_line_rec.col205;
2640 END IF;
2641
2642 -- col206
2643 IF p_is_line_rec.col206 = FND_API.g_miss_char THEN
2644 x_complete_rec.col206 := l_is_line_rec.col206;
2645 END IF;
2646
2647 -- col207
2648 IF p_is_line_rec.col207 = FND_API.g_miss_char THEN
2649 x_complete_rec.col207 := l_is_line_rec.col207;
2650 END IF;
2651
2652 -- col208
2653 IF p_is_line_rec.col208 = FND_API.g_miss_char THEN
2654 x_complete_rec.col208 := l_is_line_rec.col208;
2655 END IF;
2656
2660 END IF;
2657 -- col209
2658 IF p_is_line_rec.col209 = FND_API.g_miss_char THEN
2659 x_complete_rec.col209 := l_is_line_rec.col209;
2661
2662 -- col210
2663 IF p_is_line_rec.col210 = FND_API.g_miss_char THEN
2664 x_complete_rec.col210 := l_is_line_rec.col210;
2665 END IF;
2666
2667 -- col211
2668 IF p_is_line_rec.col211 = FND_API.g_miss_char THEN
2669 x_complete_rec.col211 := l_is_line_rec.col211;
2670 END IF;
2671
2672 -- col212
2673 IF p_is_line_rec.col212 = FND_API.g_miss_char THEN
2674 x_complete_rec.col212 := l_is_line_rec.col212;
2675 END IF;
2676
2677 -- col213
2678 IF p_is_line_rec.col213 = FND_API.g_miss_char THEN
2679 x_complete_rec.col213 := l_is_line_rec.col213;
2680 END IF;
2681
2682 -- col214
2683 IF p_is_line_rec.col214 = FND_API.g_miss_char THEN
2684 x_complete_rec.col214 := l_is_line_rec.col214;
2685 END IF;
2686
2687 -- col215
2688 IF p_is_line_rec.col215 = FND_API.g_miss_char THEN
2689 x_complete_rec.col215 := l_is_line_rec.col215;
2690 END IF;
2691
2692 -- col216
2693 IF p_is_line_rec.col216 = FND_API.g_miss_char THEN
2694 x_complete_rec.col216 := l_is_line_rec.col216;
2695 END IF;
2696
2697 -- col217
2698 IF p_is_line_rec.col217 = FND_API.g_miss_char THEN
2699 x_complete_rec.col217 := l_is_line_rec.col217;
2700 END IF;
2701
2702 -- col218
2703 IF p_is_line_rec.col218 = FND_API.g_miss_char THEN
2704 x_complete_rec.col218 := l_is_line_rec.col218;
2705 END IF;
2706
2707 -- col219
2708 IF p_is_line_rec.col219 = FND_API.g_miss_char THEN
2709 x_complete_rec.col219 := l_is_line_rec.col219;
2710 END IF;
2711
2712 -- col220
2713 IF p_is_line_rec.col220 = FND_API.g_miss_char THEN
2714 x_complete_rec.col220 := l_is_line_rec.col220;
2715 END IF;
2716
2717 -- col221
2718 IF p_is_line_rec.col221 = FND_API.g_miss_char THEN
2719 x_complete_rec.col221 := l_is_line_rec.col221;
2720 END IF;
2721
2722 -- col222
2723 IF p_is_line_rec.col222 = FND_API.g_miss_char THEN
2724 x_complete_rec.col222 := l_is_line_rec.col222;
2725 END IF;
2726
2727 -- col223
2728 IF p_is_line_rec.col223 = FND_API.g_miss_char THEN
2729 x_complete_rec.col223 := l_is_line_rec.col223;
2730 END IF;
2731
2732 -- col224
2733 IF p_is_line_rec.col224 = FND_API.g_miss_char THEN
2734 x_complete_rec.col224 := l_is_line_rec.col224;
2735 END IF;
2736
2737 -- col225
2738 IF p_is_line_rec.col225 = FND_API.g_miss_char THEN
2739 x_complete_rec.col225 := l_is_line_rec.col225;
2740 END IF;
2741
2742 -- col226
2743 IF p_is_line_rec.col226 = FND_API.g_miss_char THEN
2744 x_complete_rec.col226 := l_is_line_rec.col226;
2745 END IF;
2746
2747 -- col227
2748 IF p_is_line_rec.col227 = FND_API.g_miss_char THEN
2749 x_complete_rec.col227 := l_is_line_rec.col227;
2750 END IF;
2751
2752 -- col228
2753 IF p_is_line_rec.col228 = FND_API.g_miss_char THEN
2754 x_complete_rec.col228 := l_is_line_rec.col228;
2755 END IF;
2756
2757 -- col229
2758 IF p_is_line_rec.col229 = FND_API.g_miss_char THEN
2759 x_complete_rec.col229 := l_is_line_rec.col229;
2760 END IF;
2761
2762 -- col230
2763 IF p_is_line_rec.col230 = FND_API.g_miss_char THEN
2764 x_complete_rec.col230 := l_is_line_rec.col230;
2765 END IF;
2766
2767 -- col231
2768 IF p_is_line_rec.col231 = FND_API.g_miss_char THEN
2769 x_complete_rec.col231 := l_is_line_rec.col231;
2770 END IF;
2771
2772 -- col232
2773 IF p_is_line_rec.col232 = FND_API.g_miss_char THEN
2774 x_complete_rec.col232 := l_is_line_rec.col232;
2775 END IF;
2776
2777 -- col233
2778 IF p_is_line_rec.col233 = FND_API.g_miss_char THEN
2779 x_complete_rec.col233 := l_is_line_rec.col233;
2780 END IF;
2781
2782 -- col234
2783 IF p_is_line_rec.col234 = FND_API.g_miss_char THEN
2784 x_complete_rec.col234 := l_is_line_rec.col234;
2785 END IF;
2786
2787 -- col235
2788 IF p_is_line_rec.col235 = FND_API.g_miss_char THEN
2789 x_complete_rec.col235 := l_is_line_rec.col235;
2790 END IF;
2791
2792 -- col236
2793 IF p_is_line_rec.col236 = FND_API.g_miss_char THEN
2794 x_complete_rec.col236 := l_is_line_rec.col236;
2795 END IF;
2796
2797 -- col237
2798 IF p_is_line_rec.col237 = FND_API.g_miss_char THEN
2799 x_complete_rec.col237 := l_is_line_rec.col237;
2800 END IF;
2801
2802 -- col238
2803 IF p_is_line_rec.col238 = FND_API.g_miss_char THEN
2804 x_complete_rec.col238 := l_is_line_rec.col238;
2805 END IF;
2806
2807 -- col239
2808 IF p_is_line_rec.col239 = FND_API.g_miss_char THEN
2809 x_complete_rec.col239 := l_is_line_rec.col239;
2810 END IF;
2811
2812 -- col240
2813 IF p_is_line_rec.col240 = FND_API.g_miss_char THEN
2814 x_complete_rec.col240 := l_is_line_rec.col240;
2815 END IF;
2816
2817 -- col241
2818 IF p_is_line_rec.col241 = FND_API.g_miss_char THEN
2819 x_complete_rec.col241 := l_is_line_rec.col241;
2820 END IF;
2821
2822 -- col242
2823 IF p_is_line_rec.col242 = FND_API.g_miss_char THEN
2824 x_complete_rec.col242 := l_is_line_rec.col242;
2828 IF p_is_line_rec.col243 = FND_API.g_miss_char THEN
2825 END IF;
2826
2827 -- col243
2829 x_complete_rec.col243 := l_is_line_rec.col243;
2830 END IF;
2831
2832 -- col244
2833 IF p_is_line_rec.col244 = FND_API.g_miss_char THEN
2834 x_complete_rec.col244 := l_is_line_rec.col244;
2835 END IF;
2836
2837 -- col245
2838 IF p_is_line_rec.col245 = FND_API.g_miss_char THEN
2839 x_complete_rec.col245 := l_is_line_rec.col245;
2840 END IF;
2841
2842 -- col246
2843 IF p_is_line_rec.col246 = FND_API.g_miss_char THEN
2844 x_complete_rec.col246 := l_is_line_rec.col246;
2845 END IF;
2846
2847 -- col247
2848 IF p_is_line_rec.col247 = FND_API.g_miss_char THEN
2849 x_complete_rec.col247 := l_is_line_rec.col247;
2850 END IF;
2851
2852 -- col248
2853 IF p_is_line_rec.col248 = FND_API.g_miss_char THEN
2854 x_complete_rec.col248 := l_is_line_rec.col248;
2855 END IF;
2856
2857 -- col249
2858 IF p_is_line_rec.col249 = FND_API.g_miss_char THEN
2859 x_complete_rec.col249 := l_is_line_rec.col249;
2860 END IF;
2861
2862 -- col250
2863 IF p_is_line_rec.col250 = FND_API.g_miss_char THEN
2864 x_complete_rec.col250 := l_is_line_rec.col250;
2865 END IF;
2866
2867
2868 -- duplicate_flag
2869 IF p_is_line_rec.duplicate_flag = FND_API.g_miss_char THEN
2870 x_complete_rec.duplicate_flag := l_is_line_rec.duplicate_flag;
2871 END IF;
2872
2873 -- current_usage
2874 IF p_is_line_rec.current_usage = FND_API.g_miss_num THEN
2875 x_complete_rec.current_usage := l_is_line_rec.current_usage;
2876 END IF;
2877
2878 -- notes
2879 IF p_is_line_rec.notes = FND_API.g_miss_char THEN
2880 x_complete_rec.notes := l_is_line_rec.notes;
2881 END IF;
2882
2883 -- sales_agent_email_address
2884 IF p_is_line_rec.sales_agent_email_address = FND_API.g_miss_char THEN
2885 x_complete_rec.sales_agent_email_address := l_is_line_rec.sales_agent_email_address;
2886 END IF;
2887
2888 -- vehicle_response_code
2889 IF p_is_line_rec.vehicle_response_code = FND_API.g_miss_char THEN
2890 x_complete_rec.vehicle_response_code := l_is_line_rec.vehicle_response_code;
2891 END IF;
2892
2893 -- custom_column1
2894 IF p_is_line_rec.custom_column1 = FND_API.g_miss_char THEN
2895 x_complete_rec.custom_column1 := l_is_line_rec.custom_column1;
2896 END IF;
2897 -- custom_column2
2898 IF p_is_line_rec.custom_column2 = FND_API.g_miss_char THEN
2899 x_complete_rec.custom_column2 := l_is_line_rec.custom_column2;
2900 END IF;
2901 -- custom_column3
2902 IF p_is_line_rec.custom_column3 = FND_API.g_miss_char THEN
2903 x_complete_rec.custom_column3 := l_is_line_rec.custom_column3;
2904 END IF;
2905 -- custom_column4
2906 IF p_is_line_rec.custom_column4 = FND_API.g_miss_char THEN
2907 x_complete_rec.custom_column4 := l_is_line_rec.custom_column4;
2908 END IF;
2909 -- custom_column5
2910 IF p_is_line_rec.custom_column5 = FND_API.g_miss_char THEN
2911 x_complete_rec.custom_column5 := l_is_line_rec.custom_column5;
2912 END IF;
2913 -- custom_column6
2914 IF p_is_line_rec.custom_column6 = FND_API.g_miss_char THEN
2915 x_complete_rec.custom_column6 := l_is_line_rec.custom_column6;
2916 END IF;
2917 -- custom_column7
2918 IF p_is_line_rec.custom_column7 = FND_API.g_miss_char THEN
2919 x_complete_rec.custom_column7 := l_is_line_rec.custom_column7;
2920 END IF;
2921 -- custom_column8
2922 IF p_is_line_rec.custom_column8 = FND_API.g_miss_char THEN
2923 x_complete_rec.custom_column8 := l_is_line_rec.custom_column8;
2924 END IF;
2925 -- custom_column9
2926 IF p_is_line_rec.custom_column9 = FND_API.g_miss_char THEN
2927 x_complete_rec.custom_column9 := l_is_line_rec.custom_column9;
2928 END IF;
2929 -- custom_column10
2930 IF p_is_line_rec.custom_column10 = FND_API.g_miss_char THEN
2931 x_complete_rec.custom_column10 := l_is_line_rec.custom_column10;
2932 END IF;
2933 -- custom_column11
2934 IF p_is_line_rec.custom_column11 = FND_API.g_miss_char THEN
2935 x_complete_rec.custom_column11 := l_is_line_rec.custom_column11;
2936 END IF;
2937 -- custom_column12
2938 IF p_is_line_rec.custom_column12 = FND_API.g_miss_char THEN
2939 x_complete_rec.custom_column12 := l_is_line_rec.custom_column12;
2940 END IF;
2941 -- custom_column13
2942 IF p_is_line_rec.custom_column13 = FND_API.g_miss_char THEN
2943 x_complete_rec.custom_column13 := l_is_line_rec.custom_column13;
2944 END IF;
2945 -- custom_column14
2946 IF p_is_line_rec.custom_column14 = FND_API.g_miss_char THEN
2947 x_complete_rec.custom_column14 := l_is_line_rec.custom_column14;
2948 END IF;
2949 -- custom_column15
2950 IF p_is_line_rec.custom_column15 = FND_API.g_miss_char THEN
2951 x_complete_rec.custom_column15 := l_is_line_rec.custom_column15;
2952 END IF;
2953 -- custom_column16
2954 IF p_is_line_rec.custom_column16 = FND_API.g_miss_char THEN
2955 x_complete_rec.custom_column16 := l_is_line_rec.custom_column16;
2956 END IF;
2957 -- custom_column17
2958 IF p_is_line_rec.custom_column17 = FND_API.g_miss_char THEN
2959 x_complete_rec.custom_column17 := l_is_line_rec.custom_column17;
2960 END IF;
2961 -- custom_column18
2962 IF p_is_line_rec.custom_column18 = FND_API.g_miss_char THEN
2966 IF p_is_line_rec.custom_column19 = FND_API.g_miss_char THEN
2963 x_complete_rec.custom_column18 := l_is_line_rec.custom_column18;
2964 END IF;
2965 -- custom_column19
2967 x_complete_rec.custom_column19 := l_is_line_rec.custom_column19;
2968 END IF;
2969 -- custom_column20
2970 IF p_is_line_rec.custom_column20 = FND_API.g_miss_char THEN
2971 x_complete_rec.custom_column20 := l_is_line_rec.custom_column20;
2972 END IF;
2973 -- custom_column21
2974 IF p_is_line_rec.custom_column21 = FND_API.g_miss_char THEN
2975 x_complete_rec.custom_column21 := l_is_line_rec.custom_column21;
2976 END IF;
2977 -- custom_column22
2978 IF p_is_line_rec.custom_column22 = FND_API.g_miss_char THEN
2979 x_complete_rec.custom_column22 := l_is_line_rec.custom_column22;
2980 END IF;
2981 -- custom_column23
2982 IF p_is_line_rec.custom_column23 = FND_API.g_miss_char THEN
2983 x_complete_rec.custom_column23 := l_is_line_rec.custom_column23;
2984 END IF;
2985 -- custom_column24
2986 IF p_is_line_rec.custom_column24 = FND_API.g_miss_char THEN
2987 x_complete_rec.custom_column24 := l_is_line_rec.custom_column24;
2988 END IF;
2989 -- custom_column25
2990 IF p_is_line_rec.custom_column25 = FND_API.g_miss_char THEN
2991 x_complete_rec.custom_column25 := l_is_line_rec.custom_column25;
2992 END IF;
2993
2994
2995 -- Note: Developers need to modify the procedure
2996 -- to handle any business specific requirements.
2997 END Complete_is_line_Rec;
2998 PROCEDURE Validate_is_line(
2999 p_api_version_number IN NUMBER,
3000 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3001 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3002 p_is_line_rec IN is_line_rec_type,
3003 x_return_status OUT NOCOPY VARCHAR2,
3004 x_msg_count OUT NOCOPY NUMBER,
3005 x_msg_data OUT NOCOPY VARCHAR2
3006 )
3007 IS
3008 L_API_NAME CONSTANT VARCHAR2(30) := 'Validate_Is_Line';
3009 L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
3010 l_object_version_number NUMBER;
3011 l_is_line_rec AMS_Is_Line_PVT.is_line_rec_type;
3012
3013 BEGIN
3014 -- Standard Start of API savepoint
3015 SAVEPOINT VALIDATE_Is_Line_;
3016
3017 -- Standard call to check for call compatibility.
3018 IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3019 p_api_version_number,
3020 l_api_name,
3021 G_PKG_NAME)
3022 THEN
3023 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3024 END IF;
3025
3026 -- Initialize message list if p_init_msg_list is set to TRUE.
3027 IF FND_API.to_Boolean( p_init_msg_list )
3028 THEN
3029 FND_MSG_PUB.initialize;
3030 END IF;
3031 IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
3032 Check_is_line_Items(
3033 p_is_line_rec => p_is_line_rec,
3034 p_validation_mode => JTF_PLSQL_API.g_update,
3035 x_return_status => x_return_status
3036 );
3037
3038 IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3039 RAISE FND_API.G_EXC_ERROR;
3040 ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3041 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3042 END IF;
3043 END IF;
3044
3045 Complete_is_line_Rec(
3046 p_is_line_rec => p_is_line_rec,
3047 x_complete_rec => l_is_line_rec
3048 );
3049
3050 IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
3051 Validate_is_line_Rec(
3052 p_api_version_number => 1.0,
3053 p_init_msg_list => FND_API.G_FALSE,
3054 x_return_status => x_return_status,
3055 x_msg_count => x_msg_count,
3056 x_msg_data => x_msg_data,
3057 p_is_line_rec => l_is_line_rec);
3058
3059 IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3060 RAISE FND_API.G_EXC_ERROR;
3061 ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3062 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3063 END IF;
3064 END IF;
3065
3066
3067 -- Debug Message
3068 IF (AMS_DEBUG_HIGH_ON) THEN
3069
3070 AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
3071 END IF;
3072
3073
3074 -- Initialize API return status to SUCCESS
3075 x_return_status := FND_API.G_RET_STS_SUCCESS;
3076
3077
3078 -- Debug Message
3079 IF (AMS_DEBUG_HIGH_ON) THEN
3080
3081 AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
3082 END IF;
3083
3084 -- Standard call to get message count and if count is 1, get message info.
3085 FND_MSG_PUB.Count_And_Get
3086 (p_count => x_msg_count,
3087 p_data => x_msg_data
3088 );
3089 EXCEPTION
3090
3091 WHEN AMS_Utility_PVT.resource_locked THEN
3092 x_return_status := FND_API.g_ret_sts_error;
3096 ROLLBACK TO VALIDATE_Is_Line_;
3093 AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
3094
3095 WHEN FND_API.G_EXC_ERROR THEN
3097 x_return_status := FND_API.G_RET_STS_ERROR;
3098 -- Standard call to get message count and if count=1, get the message
3099 FND_MSG_PUB.Count_And_Get (
3100 p_encoded => FND_API.G_FALSE,
3101 p_count => x_msg_count,
3102 p_data => x_msg_data
3103 );
3104
3105 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3106 ROLLBACK TO VALIDATE_Is_Line_;
3107 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3108 -- Standard call to get message count and if count=1, get the message
3109 FND_MSG_PUB.Count_And_Get (
3110 p_encoded => FND_API.G_FALSE,
3111 p_count => x_msg_count,
3112 p_data => x_msg_data
3113 );
3114
3115 WHEN OTHERS THEN
3116 ROLLBACK TO VALIDATE_Is_Line_;
3117 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3118 IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3119 THEN
3120 FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3121 END IF;
3122 -- Standard call to get message count and if count=1, get the message
3123 FND_MSG_PUB.Count_And_Get (
3124 p_encoded => FND_API.G_FALSE,
3125 p_count => x_msg_count,
3126 p_data => x_msg_data
3127 );
3128 End Validate_Is_Line;
3129
3130
3131 PROCEDURE Validate_is_line_rec(
3132 p_api_version_number IN NUMBER,
3133 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3134 x_return_status OUT NOCOPY VARCHAR2,
3135 x_msg_count OUT NOCOPY NUMBER,
3136 x_msg_data OUT NOCOPY VARCHAR2,
3137 p_is_line_rec IN is_line_rec_type
3138 )
3139 IS
3140 BEGIN
3141 -- Initialize message list if p_init_msg_list is set to TRUE.
3142 IF FND_API.to_Boolean( p_init_msg_list )
3143 THEN
3144 FND_MSG_PUB.initialize;
3145 END IF;
3146
3147 -- Initialize API return status to SUCCESS
3148 x_return_status := FND_API.G_RET_STS_SUCCESS;
3149
3150 -- Hint: Validate data
3151 -- If data not valid
3152 -- THEN
3153 -- x_return_status := FND_API.G_RET_STS_ERROR;
3154
3155 -- Debug Message
3156 IF (AMS_DEBUG_HIGH_ON) THEN
3157
3158 AMS_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
3159 END IF;
3160 -- Standard call to get message count and if count is 1, get message info.
3161 FND_MSG_PUB.Count_And_Get
3162 (p_count => x_msg_count,
3163 p_data => x_msg_data
3164 );
3165 END Validate_is_line_Rec;
3166
3167 END AMS_Is_Line_PVT;