DBA Data[Home] [Help]

PACKAGE BODY: APPS.AMS_LIST_ENTRIES_PVT

Source


1 PACKAGE BODY AMS_List_Entries_PVT as
2 /* $Header: amsvlieb.pls 120.0.12010000.2 2008/08/11 09:02:30 amlal ship $ */
3 -- ===============================================================
4 -- Start of Comments
5 -- Package name
6 --          AMS_List_Entries_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_List_Entries_PVT';
18 G_FILE_NAME CONSTANT VARCHAR2(12) := 'amsvlieb.pls';
19 
20 
21 AMS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
22 AMS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
23 AMS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
24 
25 PROCEDURE Complete_list_entries_Rec (
26     P_list_entries_rec     IN    list_entries_rec_type,
27      x_complete_rec        OUT NOCOPY    list_entries_rec_type
28     )
29 IS
30    CURSOR c_listentries IS
31    select
32        list_entry_id                   ,
33        list_header_id                  ,
34        last_update_date                ,
35        last_updated_by                 ,
36        creation_date                   ,
37        created_by                      ,
38        last_update_login               ,
39        object_version_number           ,
40        list_select_action_id           ,
41        arc_list_select_action_from     ,
42        list_select_action_from_name    ,
43        source_code                     ,
44        arc_list_used_by_source         ,
45        source_code_for_id              ,
46        pin_code                        ,
47        list_entry_source_system_id     ,
48        list_entry_source_system_type   ,
49        view_application_id             ,
50        manually_entered_flag           ,
51        marked_as_duplicate_flag        ,
52        marked_as_random_flag           ,
53        part_of_control_group_flag      ,
54        exclude_in_triggered_list_flag  ,
55        enabled_flag                    ,
56        cell_code                       ,
57        dedupe_key                      ,
58        randomly_generated_number       ,
59        campaign_id                     ,
60        media_id                        ,
61        channel_id                      ,
62        channel_schedule_id             ,
63        event_offer_id                  ,
64        customer_id                     ,
65        market_segment_id               ,
66        vendor_id                       ,
67        transfer_flag                   ,
68        transfer_status                 ,
69        list_source                     ,
70        duplicate_master_entry_id       ,
71        marked_flag                     ,
72        lead_id                         ,
73        letter_id                       ,
74        picking_header_id               ,
75        batch_id                        ,
76        suffix                          ,
77        first_name                      ,
78        last_name                       ,
79        customer_name                   ,
80        title                           ,
81        address_line1                   ,
82        address_line2                   ,
83        city                            ,
84        state                           ,
85        zipcode                         ,
86        country                         ,
87        fax                             ,
88        phone                           ,
89        email_address                   ,
90        col1                            ,
91        col2                            ,
92        col3                            ,
93        col4                            ,
94        col5                            ,
95        col6                            ,
96        col7                            ,
97        col8                            ,
98        col9                            ,
99        col10                           ,
100        col11                           ,
101        col12                           ,
102        col13                           ,
103        col14                           ,
104        col15                           ,
105        col16                           ,
106        col17                           ,
107        col18                           ,
108        col19                           ,
109        col20                           ,
110        col21                           ,
111        col22                           ,
112        col23                           ,
113        col24                           ,
114        col25                           ,
115        col26                           ,
116        col27                           ,
117        col28                           ,
118        col29                           ,
119        col30                           ,
120        col31                           ,
121        col32                           ,
122        col33                           ,
123        col34                           ,
124        col35                           ,
125        col36                           ,
126        col37                           ,
127        col38                           ,
128        col39                           ,
129        col40                           ,
130        col41                           ,
131        col42                           ,
132        col43                           ,
133        col44                           ,
134        col45                           ,
135        col46                           ,
136        col47                           ,
137        col48                           ,
138        col49                           ,
139        col50                           ,
140        col51                           ,
141        col52                           ,
142        col53                           ,
143        col54                           ,
144        col55                           ,
145        col56                           ,
146        col57                           ,
147        col58                           ,
148        col59                           ,
149        col60                           ,
150        col61                           ,
151        col62                           ,
152        col63                           ,
153        col64                           ,
154        col65                           ,
155        col66                           ,
156        col67                           ,
157        col68                           ,
158        col69                           ,
159        col70                           ,
160        col71                           ,
161        col72                           ,
162        col73                           ,
163        col74                           ,
164        col75                           ,
165        col76                           ,
166        col77                           ,
167        col78                           ,
168        col79                           ,
169        col80                           ,
170        col81                           ,
171        col82                           ,
172        col83                           ,
173        col84                           ,
174        col85                           ,
175        col86                           ,
176        col87                           ,
177        col88                           ,
178        col89                           ,
179        col90                           ,
180        col91                           ,
181        col92                           ,
182        col93                           ,
183        col94                           ,
184        col95                           ,
185        col96                           ,
186        col97                           ,
187        col98                           ,
188        col99                           ,
189        col100                          ,
190        col101                          ,
191        col102                          ,
192        col103                          ,
193        col104                          ,
194        col105                          ,
195        col106                          ,
196        col107                          ,
197        col108                          ,
198        col109                          ,
199        col110                          ,
200        col111                          ,
201        col112                          ,
202        col113                          ,
203        col114                          ,
204        col115                          ,
205        col116                          ,
206        col117                          ,
207        col118                          ,
208        col119                          ,
209        col120                          ,
210        col121                          ,
211        col122                          ,
212        col123                          ,
213        col124                          ,
214        col125                          ,
215        col126                          ,
216        col127                          ,
217        col128                          ,
218        col129                          ,
219        col130                          ,
220        col131                          ,
221        col132                          ,
222        col133                          ,
223        col134                          ,
224        col135                          ,
225        col136                          ,
226        col137                          ,
227        col138                          ,
228        col139                          ,
229        col140                          ,
230        col141                          ,
231        col142                          ,
232        col143                          ,
233        col144                          ,
234        col145                          ,
235        col146                          ,
236        col147                          ,
237        col148                          ,
238        col149                          ,
239        col150                          ,
240        col151                          ,
241        col152                          ,
242        col153                          ,
243        col154                          ,
244        col155                          ,
245        col156                          ,
246        col157                          ,
247        col158                          ,
248        col159                          ,
249        col160                          ,
250        col161                          ,
251        col162                          ,
252        col163                          ,
253        col164                          ,
254        col165                          ,
255        col166                          ,
256        col167                          ,
257        col168                          ,
258        col169                          ,
259        col170                          ,
260        col171                          ,
261        col172                          ,
262        col173                          ,
263        col174                          ,
264        col175                          ,
265        col176                          ,
266        col177                          ,
267        col178                          ,
268        col179                          ,
269        col180                          ,
270        col181                          ,
271        col182                          ,
272        col183                          ,
273        col184                          ,
274        col185                          ,
275        col186                          ,
276        col187                          ,
277        col188                          ,
278        col189                          ,
279        col190                          ,
280        col191                          ,
281        col192                          ,
282        col193                          ,
283        col194                          ,
284        col195                          ,
285        col196                          ,
286        col197                          ,
287        col198                          ,
288        col199                          ,
289        col200                          ,
290        COL201                          ,
291        COL202                          ,
292        COL203                          ,
293        COL204                          ,
294        COL205                          ,
295        COL206                          ,
296        COL207                          ,
297        COL208                          ,
298        COL209                          ,
299        COL210                          ,
300        COL211                          ,
301        COL212                          ,
302        COL213                          ,
303        COL214                          ,
304        COL215                          ,
305        COL216                          ,
306        COL217                          ,
307        COL218                          ,
308        COL219                          ,
309        COL220                          ,
310        COL221                          ,
311        COL222                          ,
312        COL223                          ,
313        COL224                          ,
314        COL225                          ,
315        COL226                          ,
316        COL227                          ,
317        COL228                          ,
318        COL229                          ,
319        COL230                          ,
320        COL231                          ,
321        COL232                          ,
322        COL233                          ,
323        COL234                          ,
324        COL235                          ,
325        COL236                          ,
326        COL237                          ,
327        COL238                          ,
328        COL239                          ,
329        COL240                          ,
330        COL241                          ,
331        COL242                          ,
332        COL243                          ,
333        COL244                          ,
334        COL245                          ,
335        COL246                          ,
336        COL247                          ,
337        COL248                          ,
338        COL249                          ,
339        COL250                          ,
340        COL251                          ,
341        COL252                          ,
342        COL253                          ,
343        COL254                          ,
344        COL255                          ,
345        COL256                          ,
346        COL257                          ,
347        COL258                          ,
348        COL259                          ,
349        COL260                          ,
350        COL261                          ,
351        COL262                          ,
352        COL263                          ,
353        COL264                          ,
354        COL265                          ,
355        COL266                          ,
356        COL267                          ,
357        COL268                          ,
358        COL269                          ,
359        COL270                          ,
360        COL271                          ,
361        COL272                          ,
362        COL273                          ,
363        COL274                          ,
364        COL275                          ,
365        COL276                          ,
366        COL277                          ,
367        COL278                          ,
368        COL279                          ,
369        COL280                          ,
370        COL281                          ,
371        COL282                          ,
372        COL283                          ,
373        COL284                          ,
374        COL285                          ,
375        COL286                          ,
376        COL287                          ,
377        COL288                          ,
378        COL289                          ,
379        COL290                          ,
380        COL291                          ,
381        COL292                          ,
382        COL293                          ,
383        COL294                          ,
384        COL295                          ,
385        COL296                          ,
386        COL297                          ,
387        COL298                          ,
388        COL299                          ,
389        COL300                          ,
390        CURR_CP_COUNTRY_CODE            ,
391        CURR_CP_PHONE_NUMBER            ,
392        CURR_CP_RAW_PHONE_NUMBER        ,
393        CURR_CP_AREA_CODE               ,
394        CURR_CP_ID                      ,
395        CURR_CP_INDEX                   ,
396        CURR_CP_TIME_ZONE               ,
397        CURR_CP_TIME_ZONE_AUX           ,
398        party_id                        ,
399        parent_party_id                 ,
400        imp_source_line_id              ,
401        usage_restriction               ,
402        next_call_time                  ,
403        callback_flag                   ,
404        do_not_use_flag                 ,
405        do_not_use_reason               ,
406        record_out_flag                 ,
407        record_release_time             ,
408        group_code                      ,
409        newly_updated_flag              ,
410        outcome_id                ,
411        result_id               ,
412        reason_id                    ,
413        notes ,
414        VEHICLE_RESPONSE_CODE ,
415        SALES_AGENT_EMAIL_ADDRESS ,
416        RESOURCE_ID ,
417        LOCATION_ID       ,
418        CONTACT_POINT_ID  ,
419        last_contacted_date
420    FROM   ams_list_entries
421    WHERE list_entry_id = p_list_entries_rec.list_entry_id;
422 
423    l_listentries_rec  list_entries_rec_type;
424 
425 BEGIN
426 
427    x_complete_rec := p_list_entries_rec;
428    OPEN c_listentries;
429    FETCH c_listentries INTO l_listentries_rec;
430    IF c_listentries%NOTFOUND THEN
431       CLOSE c_listentries;
432       IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
433          FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
434          FND_MSG_PUB.add;
435       END IF;
436       RAISE FND_API.g_exc_error;
437    END IF;
438    CLOSE c_listentries;
439     IF p_list_entries_rec.LIST_ENTRY_ID = FND_API.g_miss_num THEN
440        x_complete_rec.LIST_ENTRY_ID := l_listentries_rec.LIST_ENTRY_ID  ;
441     END IF;
442     IF p_list_entries_rec.LIST_HEADER_ID = FND_API.g_miss_num THEN
443        x_complete_rec.LIST_HEADER_ID := l_listentries_rec.LIST_HEADER_ID  ;
444     END IF;
445     IF p_list_entries_rec.LAST_UPDATE_DATE = FND_API.g_miss_date THEN
446        x_complete_rec.LAST_UPDATE_DATE := l_listentries_rec.LAST_UPDATE_DATE  ;
447     END IF;
448     IF p_list_entries_rec.LAST_UPDATED_BY = FND_API.g_miss_num THEN
449        x_complete_rec.LAST_UPDATED_BY := l_listentries_rec.LAST_UPDATED_BY  ;
450     END IF;
451     IF p_list_entries_rec.CREATION_DATE = FND_API.g_miss_date THEN
452        x_complete_rec.CREATION_DATE := l_listentries_rec.CREATION_DATE  ;
453     END IF;
454     IF p_list_entries_rec.CREATED_BY = FND_API.g_miss_num THEN
455        x_complete_rec.CREATED_BY := l_listentries_rec.CREATED_BY  ;
456     END IF;
457     IF p_list_entries_rec.LAST_UPDATE_LOGIN = FND_API.g_miss_num THEN
458        x_complete_rec.LAST_UPDATE_LOGIN := l_listentries_rec.LAST_UPDATE_LOGIN  ;
459     END IF;
460     IF p_list_entries_rec.OBJECT_VERSION_NUMBER = FND_API.g_miss_num THEN
461        x_complete_rec.OBJECT_VERSION_NUMBER := l_listentries_rec.OBJECT_VERSION_NUMBER  ;
462     END IF;
463     IF p_list_entries_rec.LIST_SELECT_ACTION_ID = FND_API.g_miss_num THEN
464        x_complete_rec.LIST_SELECT_ACTION_ID := l_listentries_rec.LIST_SELECT_ACTION_ID  ;
465     END IF;
466     IF p_list_entries_rec.ARC_LIST_SELECT_ACTION_FROM = FND_API.g_miss_char THEN
467        x_complete_rec.ARC_LIST_SELECT_ACTION_FROM := l_listentries_rec.ARC_LIST_SELECT_ACTION_FROM  ;
468     END IF;
469     IF p_list_entries_rec.LIST_SELECT_ACTION_FROM_NAME = FND_API.g_miss_char THEN
470        x_complete_rec.LIST_SELECT_ACTION_FROM_NAME := l_listentries_rec.LIST_SELECT_ACTION_FROM_NAME  ;
471     END IF;
472     IF p_list_entries_rec.SOURCE_CODE = FND_API.g_miss_char THEN
473        x_complete_rec.SOURCE_CODE := l_listentries_rec.SOURCE_CODE  ;
474     END IF;
475     IF p_list_entries_rec.ARC_LIST_USED_BY_SOURCE = FND_API.g_miss_char THEN
476        x_complete_rec.ARC_LIST_USED_BY_SOURCE := l_listentries_rec.ARC_LIST_USED_BY_SOURCE  ;
477     END IF;
478     IF p_list_entries_rec.SOURCE_CODE_FOR_ID = FND_API.g_miss_num THEN
479        x_complete_rec.SOURCE_CODE_FOR_ID := l_listentries_rec.SOURCE_CODE_FOR_ID  ;
480     END IF;
481     IF p_list_entries_rec.PIN_CODE = FND_API.g_miss_char THEN
482        x_complete_rec.PIN_CODE := l_listentries_rec.PIN_CODE  ;
483     END IF;
484     IF p_list_entries_rec.LIST_ENTRY_SOURCE_SYSTEM_ID = FND_API.g_miss_num THEN
485        x_complete_rec.LIST_ENTRY_SOURCE_SYSTEM_ID := l_listentries_rec.LIST_ENTRY_SOURCE_SYSTEM_ID  ;
486     END IF;
487     IF p_list_entries_rec.LIST_ENTRY_SOURCE_SYSTEM_TYPE = FND_API.g_miss_char THEN
488        x_complete_rec.LIST_ENTRY_SOURCE_SYSTEM_TYPE := l_listentries_rec.LIST_ENTRY_SOURCE_SYSTEM_TYPE  ;
489     END IF;
490     IF p_list_entries_rec.VIEW_APPLICATION_ID = FND_API.g_miss_num THEN
491        x_complete_rec.VIEW_APPLICATION_ID := l_listentries_rec.VIEW_APPLICATION_ID  ;
492     END IF;
493     IF p_list_entries_rec.MANUALLY_ENTERED_FLAG = FND_API.g_miss_char THEN
494        x_complete_rec.MANUALLY_ENTERED_FLAG := l_listentries_rec.MANUALLY_ENTERED_FLAG  ;
495     END IF;
496     IF p_list_entries_rec.MARKED_AS_DUPLICATE_FLAG = FND_API.g_miss_char THEN
497        x_complete_rec.MARKED_AS_DUPLICATE_FLAG := l_listentries_rec.MARKED_AS_DUPLICATE_FLAG  ;
498     END IF;
499     IF p_list_entries_rec.MARKED_AS_RANDOM_FLAG = FND_API.g_miss_char THEN
500        x_complete_rec.MARKED_AS_RANDOM_FLAG := l_listentries_rec.MARKED_AS_RANDOM_FLAG  ;
501     END IF;
502     IF p_list_entries_rec.EXCLUDE_IN_TRIGGERED_LIST_FLAG = FND_API.g_miss_char THEN
503        x_complete_rec.EXCLUDE_IN_TRIGGERED_LIST_FLAG := l_listentries_rec.EXCLUDE_IN_TRIGGERED_LIST_FLAG  ;
504     END IF;
505     IF p_list_entries_rec.ENABLED_FLAG = FND_API.g_miss_char THEN
506        x_complete_rec.ENABLED_FLAG := l_listentries_rec.ENABLED_FLAG  ;
507     END IF;
508     IF p_list_entries_rec.PART_OF_CONTROL_GROUP_FLAG = 'Y' THEN
509        x_complete_rec.ENABLED_FLAG := 'N';
510     END IF;
511     IF p_list_entries_rec.PART_OF_CONTROL_GROUP_FLAG = FND_API.g_miss_char THEN
512        x_complete_rec.PART_OF_CONTROL_GROUP_FLAG := l_listentries_rec.PART_OF_CONTROL_GROUP_FLAG  ;
513     END IF;
514     IF p_list_entries_rec.CELL_CODE = FND_API.g_miss_char THEN
515        x_complete_rec.CELL_CODE := l_listentries_rec.CELL_CODE  ;
516     END IF;
517     IF p_list_entries_rec.DEDUPE_KEY = FND_API.g_miss_char THEN
518        x_complete_rec.DEDUPE_KEY := l_listentries_rec.DEDUPE_KEY  ;
519     END IF;
520     IF p_list_entries_rec.RANDOMLY_GENERATED_NUMBER = FND_API.g_miss_num THEN
521        x_complete_rec.RANDOMLY_GENERATED_NUMBER := l_listentries_rec.RANDOMLY_GENERATED_NUMBER  ;
522     END IF;
523     IF p_list_entries_rec.CAMPAIGN_ID = FND_API.g_miss_num THEN
524        x_complete_rec.CAMPAIGN_ID := l_listentries_rec.CAMPAIGN_ID  ;
525     END IF;
526     IF p_list_entries_rec.MEDIA_ID = FND_API.g_miss_num THEN
527        x_complete_rec.MEDIA_ID := l_listentries_rec.MEDIA_ID  ;
528     END IF;
529     IF p_list_entries_rec.CHANNEL_ID = FND_API.g_miss_num THEN
530        x_complete_rec.CHANNEL_ID := l_listentries_rec.CHANNEL_ID  ;
531     END IF;
532     IF p_list_entries_rec.CHANNEL_SCHEDULE_ID = FND_API.g_miss_num THEN
533        x_complete_rec.CHANNEL_SCHEDULE_ID := l_listentries_rec.CHANNEL_SCHEDULE_ID  ;
534     END IF;
535     IF p_list_entries_rec.EVENT_OFFER_ID = FND_API.g_miss_num THEN
536        x_complete_rec.EVENT_OFFER_ID := l_listentries_rec.EVENT_OFFER_ID  ;
537     END IF;
538     IF p_list_entries_rec.CUSTOMER_ID = FND_API.g_miss_num THEN
539        x_complete_rec.CUSTOMER_ID := l_listentries_rec.CUSTOMER_ID  ;
540     END IF;
541     IF p_list_entries_rec.MARKET_SEGMENT_ID = FND_API.g_miss_num THEN
542        x_complete_rec.MARKET_SEGMENT_ID := l_listentries_rec.MARKET_SEGMENT_ID  ;
543     END IF;
544     IF p_list_entries_rec.PARTY_ID = FND_API.g_miss_num THEN
545        x_complete_rec.PARTY_ID := l_listentries_rec.PARTY_ID  ;
546     END IF;
547     IF p_list_entries_rec.PARENT_PARTY_ID = FND_API.g_miss_num THEN
548        x_complete_rec.PARENT_PARTY_ID := l_listentries_rec.PARENT_PARTY_ID  ;
549     END IF;
550     IF p_list_entries_rec.VENDOR_ID = FND_API.g_miss_num THEN
551        x_complete_rec.VENDOR_ID := l_listentries_rec.VENDOR_ID  ;
552     END IF;
553     IF p_list_entries_rec.TRANSFER_FLAG = FND_API.g_miss_char THEN
554        x_complete_rec.TRANSFER_FLAG := l_listentries_rec.TRANSFER_FLAG  ;
555     END IF;
556     IF p_list_entries_rec.TRANSFER_STATUS = FND_API.g_miss_char THEN
557        x_complete_rec.TRANSFER_STATUS := l_listentries_rec.TRANSFER_STATUS  ;
558     END IF;
559     IF p_list_entries_rec.LIST_SOURCE = FND_API.g_miss_char THEN
560        x_complete_rec.LIST_SOURCE := l_listentries_rec.LIST_SOURCE  ;
561     END IF;
562     IF p_list_entries_rec.DUPLICATE_MASTER_ENTRY_ID = FND_API.g_miss_num THEN
563        x_complete_rec.DUPLICATE_MASTER_ENTRY_ID := l_listentries_rec.DUPLICATE_MASTER_ENTRY_ID  ;
564     END IF;
565     IF p_list_entries_rec.MARKED_FLAG = FND_API.g_miss_char THEN
566        x_complete_rec.MARKED_FLAG := l_listentries_rec.MARKED_FLAG  ;
567     END IF;
568     IF p_list_entries_rec.LEAD_ID = FND_API.g_miss_num THEN
569        x_complete_rec.LEAD_ID := l_listentries_rec.LEAD_ID  ;
570     END IF;
571     IF p_list_entries_rec.LETTER_ID = FND_API.g_miss_num THEN
572        x_complete_rec.LETTER_ID := l_listentries_rec.LETTER_ID  ;
573     END IF;
574     IF p_list_entries_rec.PICKING_HEADER_ID = FND_API.g_miss_num THEN
575        x_complete_rec.PICKING_HEADER_ID := l_listentries_rec.PICKING_HEADER_ID  ;
576     END IF;
577     IF p_list_entries_rec.BATCH_ID = FND_API.g_miss_num THEN
578        x_complete_rec.BATCH_ID := l_listentries_rec.BATCH_ID  ;
579     END IF;
580     IF p_list_entries_rec.SUFFIX = FND_API.g_miss_char THEN
581        x_complete_rec.SUFFIX := l_listentries_rec.SUFFIX  ;
582     END IF;
583     IF p_list_entries_rec.FIRST_NAME = FND_API.g_miss_char THEN
584        x_complete_rec.FIRST_NAME := l_listentries_rec.FIRST_NAME  ;
585     END IF;
586     IF p_list_entries_rec.LAST_NAME = FND_API.g_miss_char THEN
587        x_complete_rec.LAST_NAME := l_listentries_rec.LAST_NAME  ;
588     END IF;
589     IF p_list_entries_rec.CUSTOMER_NAME = FND_API.g_miss_char THEN
590        x_complete_rec.CUSTOMER_NAME := l_listentries_rec.CUSTOMER_NAME  ;
591     END IF;
592     IF p_list_entries_rec.TITLE = FND_API.g_miss_char THEN
593        x_complete_rec.TITLE := l_listentries_rec.TITLE  ;
594     END IF;
595     IF p_list_entries_rec.ADDRESS_LINE1 = FND_API.g_miss_char THEN
596        x_complete_rec.ADDRESS_LINE1 := l_listentries_rec.ADDRESS_LINE1  ;
597     END IF;
598     IF p_list_entries_rec.ADDRESS_LINE2 = FND_API.g_miss_char THEN
599        x_complete_rec.ADDRESS_LINE2 := l_listentries_rec.ADDRESS_LINE2  ;
600     END IF;
601     IF p_list_entries_rec.CITY = FND_API.g_miss_char THEN
602        x_complete_rec.CITY := l_listentries_rec.CITY  ;
603     END IF;
604     IF p_list_entries_rec.STATE = FND_API.g_miss_char THEN
605        x_complete_rec.STATE := l_listentries_rec.STATE  ;
606     END IF;
607     IF p_list_entries_rec.ZIPCODE = FND_API.g_miss_char THEN
608        x_complete_rec.ZIPCODE := l_listentries_rec.ZIPCODE  ;
609     END IF;
610     IF p_list_entries_rec.COUNTRY = FND_API.g_miss_char THEN
611        x_complete_rec.COUNTRY := l_listentries_rec.COUNTRY  ;
612     END IF;
613     IF p_list_entries_rec.FAX = FND_API.g_miss_char THEN
614        x_complete_rec.FAX := l_listentries_rec.FAX  ;
615     END IF;
616     IF p_list_entries_rec.PHONE = FND_API.g_miss_char THEN
617        x_complete_rec.PHONE := l_listentries_rec.PHONE  ;
618     END IF;
619     IF p_list_entries_rec.EMAIL_ADDRESS = FND_API.g_miss_char THEN
620        x_complete_rec.EMAIL_ADDRESS := l_listentries_rec.EMAIL_ADDRESS  ;
621     END IF;
622     IF p_list_entries_rec.COL1 = FND_API.g_miss_char THEN
623        x_complete_rec.COL1 := l_listentries_rec.COL1  ;
624     END IF;
625     IF p_list_entries_rec.COL2 = FND_API.g_miss_char THEN
626        x_complete_rec.COL2 := l_listentries_rec.COL2  ;
627     END IF;
628     IF p_list_entries_rec.COL3 = FND_API.g_miss_char THEN
629        x_complete_rec.COL3 := l_listentries_rec.COL3  ;
630     END IF;
631     IF p_list_entries_rec.COL4 = FND_API.g_miss_char THEN
632        x_complete_rec.COL4 := l_listentries_rec.COL4  ;
633     END IF;
634     IF p_list_entries_rec.COL5 = FND_API.g_miss_char THEN
635        x_complete_rec.COL5 := l_listentries_rec.COL5  ;
636     END IF;
637     IF p_list_entries_rec.COL6 = FND_API.g_miss_char THEN
638        x_complete_rec.COL6 := l_listentries_rec.COL6  ;
639     END IF;
640     IF p_list_entries_rec.COL7 = FND_API.g_miss_char THEN
641        x_complete_rec.COL7 := l_listentries_rec.COL7  ;
642     END IF;
643     IF p_list_entries_rec.COL8 = FND_API.g_miss_char THEN
644        x_complete_rec.COL8 := l_listentries_rec.COL8  ;
645     END IF;
646     IF p_list_entries_rec.COL9 = FND_API.g_miss_char THEN
647        x_complete_rec.COL9 := l_listentries_rec.COL9  ;
648     END IF;
649     IF p_list_entries_rec.COL10 = FND_API.g_miss_char THEN
650        x_complete_rec.COL10 := l_listentries_rec.COL10  ;
651     END IF;
652     IF p_list_entries_rec.COL11 = FND_API.g_miss_char THEN
653        x_complete_rec.COL11 := l_listentries_rec.COL11  ;
654     END IF;
655     IF p_list_entries_rec.COL12 = FND_API.g_miss_char THEN
656        x_complete_rec.COL12 := l_listentries_rec.COL12  ;
657     END IF;
658     IF p_list_entries_rec.COL13 = FND_API.g_miss_char THEN
659        x_complete_rec.COL13 := l_listentries_rec.COL13  ;
660     END IF;
661     IF p_list_entries_rec.COL14 = FND_API.g_miss_char THEN
662        x_complete_rec.COL14 := l_listentries_rec.COL14  ;
663     END IF;
664     IF p_list_entries_rec.COL15 = FND_API.g_miss_char THEN
665        x_complete_rec.COL15 := l_listentries_rec.COL15  ;
666     END IF;
667     IF p_list_entries_rec.COL16 = FND_API.g_miss_char THEN
668        x_complete_rec.COL16 := l_listentries_rec.COL16  ;
669     END IF;
670     IF p_list_entries_rec.COL17 = FND_API.g_miss_char THEN
671        x_complete_rec.COL17 := l_listentries_rec.COL17  ;
672     END IF;
673     IF p_list_entries_rec.COL18 = FND_API.g_miss_char THEN
674        x_complete_rec.COL18 := l_listentries_rec.COL18  ;
675     END IF;
676     IF p_list_entries_rec.COL19 = FND_API.g_miss_char THEN
677        x_complete_rec.COL19 := l_listentries_rec.COL19  ;
678     END IF;
679     IF p_list_entries_rec.COL20 = FND_API.g_miss_char THEN
680        x_complete_rec.COL20 := l_listentries_rec.COL20  ;
681     END IF;
682     IF p_list_entries_rec.COL21 = FND_API.g_miss_char THEN
683        x_complete_rec.COL21 := l_listentries_rec.COL21  ;
684     END IF;
685     IF p_list_entries_rec.COL22 = FND_API.g_miss_char THEN
686        x_complete_rec.COL22 := l_listentries_rec.COL22  ;
687     END IF;
688     IF p_list_entries_rec.COL23 = FND_API.g_miss_char THEN
689        x_complete_rec.COL23 := l_listentries_rec.COL23  ;
690     END IF;
691     IF p_list_entries_rec.COL24 = FND_API.g_miss_char THEN
692        x_complete_rec.COL24 := l_listentries_rec.COL24  ;
693     END IF;
694     IF p_list_entries_rec.COL25 = FND_API.g_miss_char THEN
695        x_complete_rec.COL25 := l_listentries_rec.COL25  ;
696     END IF;
697     IF p_list_entries_rec.COL26 = FND_API.g_miss_char THEN
698        x_complete_rec.COL26 := l_listentries_rec.COL26  ;
699     END IF;
700     IF p_list_entries_rec.COL27 = FND_API.g_miss_char THEN
701        x_complete_rec.COL27 := l_listentries_rec.COL27  ;
702     END IF;
703     IF p_list_entries_rec.COL28 = FND_API.g_miss_char THEN
704        x_complete_rec.COL28 := l_listentries_rec.COL28  ;
705     END IF;
706     IF p_list_entries_rec.COL29 = FND_API.g_miss_char THEN
707        x_complete_rec.COL29 := l_listentries_rec.COL29  ;
708     END IF;
709     IF p_list_entries_rec.COL30 = FND_API.g_miss_char THEN
710        x_complete_rec.COL30 := l_listentries_rec.COL30  ;
711     END IF;
712     IF p_list_entries_rec.COL31 = FND_API.g_miss_char THEN
713        x_complete_rec.COL31 := l_listentries_rec.COL31  ;
714     END IF;
715     IF p_list_entries_rec.COL32 = FND_API.g_miss_char THEN
716        x_complete_rec.COL32 := l_listentries_rec.COL32  ;
717     END IF;
718     IF p_list_entries_rec.COL33 = FND_API.g_miss_char THEN
719        x_complete_rec.COL33 := l_listentries_rec.COL33  ;
720     END IF;
721     IF p_list_entries_rec.COL34 = FND_API.g_miss_char THEN
722        x_complete_rec.COL34 := l_listentries_rec.COL34  ;
723     END IF;
724     IF p_list_entries_rec.COL35 = FND_API.g_miss_char THEN
725        x_complete_rec.COL35 := l_listentries_rec.COL35  ;
726     END IF;
727     IF p_list_entries_rec.COL36 = FND_API.g_miss_char THEN
728        x_complete_rec.COL36 := l_listentries_rec.COL36  ;
729     END IF;
730     IF p_list_entries_rec.COL37 = FND_API.g_miss_char THEN
731        x_complete_rec.COL37 := l_listentries_rec.COL37  ;
732     END IF;
733     IF p_list_entries_rec.COL38 = FND_API.g_miss_char THEN
734        x_complete_rec.COL38 := l_listentries_rec.COL38  ;
735     END IF;
736     IF p_list_entries_rec.COL39 = FND_API.g_miss_char THEN
737        x_complete_rec.COL39 := l_listentries_rec.COL39  ;
738     END IF;
739     IF p_list_entries_rec.COL40 = FND_API.g_miss_char THEN
740        x_complete_rec.COL40 := l_listentries_rec.COL40  ;
741     END IF;
742     IF p_list_entries_rec.COL41 = FND_API.g_miss_char THEN
743        x_complete_rec.COL41 := l_listentries_rec.COL41  ;
744     END IF;
745     IF p_list_entries_rec.COL42 = FND_API.g_miss_char THEN
746        x_complete_rec.COL42 := l_listentries_rec.COL42  ;
747     END IF;
748     IF p_list_entries_rec.COL43 = FND_API.g_miss_char THEN
749        x_complete_rec.COL43 := l_listentries_rec.COL43  ;
750     END IF;
751     IF p_list_entries_rec.COL44 = FND_API.g_miss_char THEN
752        x_complete_rec.COL44 := l_listentries_rec.COL44  ;
753     END IF;
754     IF p_list_entries_rec.COL45 = FND_API.g_miss_char THEN
755        x_complete_rec.COL45 := l_listentries_rec.COL45  ;
756     END IF;
757     IF p_list_entries_rec.COL46 = FND_API.g_miss_char THEN
758        x_complete_rec.COL46 := l_listentries_rec.COL46  ;
759     END IF;
760     IF p_list_entries_rec.COL47 = FND_API.g_miss_char THEN
761        x_complete_rec.COL47 := l_listentries_rec.COL47  ;
762     END IF;
763     IF p_list_entries_rec.COL48 = FND_API.g_miss_char THEN
764        x_complete_rec.COL48 := l_listentries_rec.COL48  ;
765     END IF;
766     IF p_list_entries_rec.COL49 = FND_API.g_miss_char THEN
767        x_complete_rec.COL49 := l_listentries_rec.COL49  ;
768     END IF;
769     IF p_list_entries_rec.COL50 = FND_API.g_miss_char THEN
770        x_complete_rec.COL50 := l_listentries_rec.COL50  ;
771     END IF;
772     IF p_list_entries_rec.COL51 = FND_API.g_miss_char THEN
773        x_complete_rec.COL51 := l_listentries_rec.COL51  ;
774     END IF;
775     IF p_list_entries_rec.COL52 = FND_API.g_miss_char THEN
776        x_complete_rec.COL52 := l_listentries_rec.COL52  ;
777     END IF;
778     IF p_list_entries_rec.COL53 = FND_API.g_miss_char THEN
779        x_complete_rec.COL53 := l_listentries_rec.COL53  ;
780     END IF;
781     IF p_list_entries_rec.COL54 = FND_API.g_miss_char THEN
782        x_complete_rec.COL54 := l_listentries_rec.COL54  ;
783     END IF;
784     IF p_list_entries_rec.COL55 = FND_API.g_miss_char THEN
785        x_complete_rec.COL55 := l_listentries_rec.COL55  ;
786     END IF;
787     IF p_list_entries_rec.COL56 = FND_API.g_miss_char THEN
788        x_complete_rec.COL56 := l_listentries_rec.COL56  ;
789     END IF;
790     IF p_list_entries_rec.COL57 = FND_API.g_miss_char THEN
791        x_complete_rec.COL57 := l_listentries_rec.COL57  ;
792     END IF;
793     IF p_list_entries_rec.COL58 = FND_API.g_miss_char THEN
794        x_complete_rec.COL58 := l_listentries_rec.COL58  ;
795     END IF;
796     IF p_list_entries_rec.COL59 = FND_API.g_miss_char THEN
797        x_complete_rec.COL59 := l_listentries_rec.COL59  ;
798     END IF;
799     IF p_list_entries_rec.COL60 = FND_API.g_miss_char THEN
800        x_complete_rec.COL60 := l_listentries_rec.COL60  ;
801     END IF;
802     IF p_list_entries_rec.COL61 = FND_API.g_miss_char THEN
803        x_complete_rec.COL61 := l_listentries_rec.COL61  ;
804     END IF;
805     IF p_list_entries_rec.COL62 = FND_API.g_miss_char THEN
806        x_complete_rec.COL62 := l_listentries_rec.COL62  ;
807     END IF;
808     IF p_list_entries_rec.COL63 = FND_API.g_miss_char THEN
809        x_complete_rec.COL63 := l_listentries_rec.COL63  ;
810     END IF;
811     IF p_list_entries_rec.COL64 = FND_API.g_miss_char THEN
812        x_complete_rec.COL64 := l_listentries_rec.COL64  ;
813     END IF;
814     IF p_list_entries_rec.COL65 = FND_API.g_miss_char THEN
815        x_complete_rec.COL65 := l_listentries_rec.COL65  ;
816     END IF;
817     IF p_list_entries_rec.COL66 = FND_API.g_miss_char THEN
818        x_complete_rec.COL66 := l_listentries_rec.COL66  ;
819     END IF;
820     IF p_list_entries_rec.COL67 = FND_API.g_miss_char THEN
821        x_complete_rec.COL67 := l_listentries_rec.COL67  ;
822     END IF;
823     IF p_list_entries_rec.COL68 = FND_API.g_miss_char THEN
824        x_complete_rec.COL68 := l_listentries_rec.COL68  ;
825     END IF;
826     IF p_list_entries_rec.COL69 = FND_API.g_miss_char THEN
827        x_complete_rec.COL69 := l_listentries_rec.COL69  ;
828     END IF;
829     IF p_list_entries_rec.COL70 = FND_API.g_miss_char THEN
830        x_complete_rec.COL70 := l_listentries_rec.COL70  ;
831     END IF;
832     IF p_list_entries_rec.COL71 = FND_API.g_miss_char THEN
833        x_complete_rec.COL71 := l_listentries_rec.COL71  ;
834     END IF;
835     IF p_list_entries_rec.COL72 = FND_API.g_miss_char THEN
836        x_complete_rec.COL72 := l_listentries_rec.COL72  ;
837     END IF;
838     IF p_list_entries_rec.COL73 = FND_API.g_miss_char THEN
839        x_complete_rec.COL73 := l_listentries_rec.COL73  ;
840     END IF;
841     IF p_list_entries_rec.COL74 = FND_API.g_miss_char THEN
842        x_complete_rec.COL74 := l_listentries_rec.COL74  ;
843     END IF;
844     IF p_list_entries_rec.COL75 = FND_API.g_miss_char THEN
845        x_complete_rec.COL75 := l_listentries_rec.COL75  ;
846     END IF;
847     IF p_list_entries_rec.COL76 = FND_API.g_miss_char THEN
848        x_complete_rec.COL76 := l_listentries_rec.COL76  ;
849     END IF;
850     IF p_list_entries_rec.COL77 = FND_API.g_miss_char THEN
851        x_complete_rec.COL77 := l_listentries_rec.COL77  ;
852     END IF;
853     IF p_list_entries_rec.COL78 = FND_API.g_miss_char THEN
854        x_complete_rec.COL78 := l_listentries_rec.COL78  ;
855     END IF;
856     IF p_list_entries_rec.COL79 = FND_API.g_miss_char THEN
857        x_complete_rec.COL79 := l_listentries_rec.COL79  ;
858     END IF;
859     IF p_list_entries_rec.COL80 = FND_API.g_miss_char THEN
860        x_complete_rec.COL80 := l_listentries_rec.COL80  ;
861     END IF;
862     IF p_list_entries_rec.COL81 = FND_API.g_miss_char THEN
863        x_complete_rec.COL81 := l_listentries_rec.COL81  ;
864     END IF;
865     IF p_list_entries_rec.COL82 = FND_API.g_miss_char THEN
866        x_complete_rec.COL82 := l_listentries_rec.COL82  ;
867     END IF;
868     IF p_list_entries_rec.COL83 = FND_API.g_miss_char THEN
869        x_complete_rec.COL83 := l_listentries_rec.COL83  ;
870     END IF;
871     IF p_list_entries_rec.COL84 = FND_API.g_miss_char THEN
872        x_complete_rec.COL84 := l_listentries_rec.COL84  ;
873     END IF;
874     IF p_list_entries_rec.COL85 = FND_API.g_miss_char THEN
875        x_complete_rec.COL85 := l_listentries_rec.COL85  ;
876     END IF;
877     IF p_list_entries_rec.COL86 = FND_API.g_miss_char THEN
878        x_complete_rec.COL86 := l_listentries_rec.COL86  ;
879     END IF;
880     IF p_list_entries_rec.COL87 = FND_API.g_miss_char THEN
881        x_complete_rec.COL87 := l_listentries_rec.COL87  ;
882     END IF;
883     IF p_list_entries_rec.COL88 = FND_API.g_miss_char THEN
884        x_complete_rec.COL88 := l_listentries_rec.COL88  ;
885     END IF;
886     IF p_list_entries_rec.COL89 = FND_API.g_miss_char THEN
887        x_complete_rec.COL89 := l_listentries_rec.COL89  ;
888     END IF;
889     IF p_list_entries_rec.COL90 = FND_API.g_miss_char THEN
890        x_complete_rec.COL90 := l_listentries_rec.COL90  ;
891     END IF;
892     IF p_list_entries_rec.COL91 = FND_API.g_miss_char THEN
893        x_complete_rec.COL91 := l_listentries_rec.COL91  ;
894     END IF;
895     IF p_list_entries_rec.COL92 = FND_API.g_miss_char THEN
896        x_complete_rec.COL92 := l_listentries_rec.COL92  ;
897     END IF;
898     IF p_list_entries_rec.COL93 = FND_API.g_miss_char THEN
899        x_complete_rec.COL93 := l_listentries_rec.COL93  ;
900     END IF;
901     IF p_list_entries_rec.COL94 = FND_API.g_miss_char THEN
902        x_complete_rec.COL94 := l_listentries_rec.COL94  ;
903     END IF;
904     IF p_list_entries_rec.COL95 = FND_API.g_miss_char THEN
905        x_complete_rec.COL95 := l_listentries_rec.COL95  ;
906     END IF;
907     IF p_list_entries_rec.COL96 = FND_API.g_miss_char THEN
908        x_complete_rec.COL96 := l_listentries_rec.COL96  ;
909     END IF;
910     IF p_list_entries_rec.COL97 = FND_API.g_miss_char THEN
911        x_complete_rec.COL97 := l_listentries_rec.COL97  ;
912     END IF;
913     IF p_list_entries_rec.COL98 = FND_API.g_miss_char THEN
914        x_complete_rec.COL98 := l_listentries_rec.COL98  ;
915     END IF;
916     IF p_list_entries_rec.COL99 = FND_API.g_miss_char THEN
917        x_complete_rec.COL99 := l_listentries_rec.COL99  ;
918     END IF;
919     IF p_list_entries_rec.COL100 = FND_API.g_miss_char THEN
920        x_complete_rec.COL100 := l_listentries_rec.COL100  ;
921     END IF;
922     IF p_list_entries_rec.COL101 = FND_API.g_miss_char THEN
923        x_complete_rec.COL101 := l_listentries_rec.COL101  ;
924     END IF;
925     IF p_list_entries_rec.COL102 = FND_API.g_miss_char THEN
926        x_complete_rec.COL102 := l_listentries_rec.COL102  ;
927     END IF;
928     IF p_list_entries_rec.COL103 = FND_API.g_miss_char THEN
929        x_complete_rec.COL103 := l_listentries_rec.COL103  ;
930     END IF;
931     IF p_list_entries_rec.COL104 = FND_API.g_miss_char THEN
932        x_complete_rec.COL104 := l_listentries_rec.COL104  ;
933     END IF;
934     IF p_list_entries_rec.COL105 = FND_API.g_miss_char THEN
935        x_complete_rec.COL105 := l_listentries_rec.COL105  ;
936     END IF;
937     IF p_list_entries_rec.COL106 = FND_API.g_miss_char THEN
938        x_complete_rec.COL106 := l_listentries_rec.COL106  ;
939     END IF;
940     IF p_list_entries_rec.COL107 = FND_API.g_miss_char THEN
941        x_complete_rec.COL107 := l_listentries_rec.COL107  ;
942     END IF;
943     IF p_list_entries_rec.COL108 = FND_API.g_miss_char THEN
944        x_complete_rec.COL108 := l_listentries_rec.COL108  ;
945     END IF;
946     IF p_list_entries_rec.COL109 = FND_API.g_miss_char THEN
947        x_complete_rec.COL109 := l_listentries_rec.COL109  ;
948     END IF;
949     IF p_list_entries_rec.COL110 = FND_API.g_miss_char THEN
950        x_complete_rec.COL110 := l_listentries_rec.COL110  ;
951     END IF;
952     IF p_list_entries_rec.COL111 = FND_API.g_miss_char THEN
953        x_complete_rec.COL111 := l_listentries_rec.COL111  ;
954     END IF;
955     IF p_list_entries_rec.COL112 = FND_API.g_miss_char THEN
956        x_complete_rec.COL112 := l_listentries_rec.COL112  ;
957     END IF;
958     IF p_list_entries_rec.COL113 = FND_API.g_miss_char THEN
959        x_complete_rec.COL113 := l_listentries_rec.COL113  ;
960     END IF;
961     IF p_list_entries_rec.COL114 = FND_API.g_miss_char THEN
962        x_complete_rec.COL114 := l_listentries_rec.COL114  ;
963     END IF;
964     IF p_list_entries_rec.COL115 = FND_API.g_miss_char THEN
965        x_complete_rec.COL115 := l_listentries_rec.COL115  ;
966     END IF;
967     IF p_list_entries_rec.COL116 = FND_API.g_miss_char THEN
968        x_complete_rec.COL116 := l_listentries_rec.COL116  ;
969     END IF;
970     IF p_list_entries_rec.COL117 = FND_API.g_miss_char THEN
971        x_complete_rec.COL117 := l_listentries_rec.COL117  ;
972     END IF;
973     IF p_list_entries_rec.COL118 = FND_API.g_miss_char THEN
974        x_complete_rec.COL118 := l_listentries_rec.COL118  ;
975     END IF;
976     IF p_list_entries_rec.COL119 = FND_API.g_miss_char THEN
977        x_complete_rec.COL119 := l_listentries_rec.COL119  ;
978     END IF;
979     IF p_list_entries_rec.COL120 = FND_API.g_miss_char THEN
980        x_complete_rec.COL120 := l_listentries_rec.COL120  ;
981     END IF;
982     IF p_list_entries_rec.COL121 = FND_API.g_miss_char THEN
983        x_complete_rec.COL121 := l_listentries_rec.COL121  ;
984     END IF;
985     IF p_list_entries_rec.COL122 = FND_API.g_miss_char THEN
986        x_complete_rec.COL122 := l_listentries_rec.COL122  ;
987     END IF;
988     IF p_list_entries_rec.COL123 = FND_API.g_miss_char THEN
989        x_complete_rec.COL123 := l_listentries_rec.COL123  ;
990     END IF;
991     IF p_list_entries_rec.COL124 = FND_API.g_miss_char THEN
992        x_complete_rec.COL124 := l_listentries_rec.COL124  ;
993     END IF;
994     IF p_list_entries_rec.COL125 = FND_API.g_miss_char THEN
995        x_complete_rec.COL125 := l_listentries_rec.COL125  ;
996     END IF;
997     IF p_list_entries_rec.COL126 = FND_API.g_miss_char THEN
998        x_complete_rec.COL126 := l_listentries_rec.COL126  ;
999     END IF;
1000     IF p_list_entries_rec.COL127 = FND_API.g_miss_char THEN
1001        x_complete_rec.COL127 := l_listentries_rec.COL127  ;
1002     END IF;
1003     IF p_list_entries_rec.COL128 = FND_API.g_miss_char THEN
1004        x_complete_rec.COL128 := l_listentries_rec.COL128  ;
1005     END IF;
1006     IF p_list_entries_rec.COL129 = FND_API.g_miss_char THEN
1007        x_complete_rec.COL129 := l_listentries_rec.COL129  ;
1008     END IF;
1009     IF p_list_entries_rec.COL130 = FND_API.g_miss_char THEN
1010        x_complete_rec.COL130 := l_listentries_rec.COL130  ;
1011     END IF;
1012     IF p_list_entries_rec.COL131 = FND_API.g_miss_char THEN
1013        x_complete_rec.COL131 := l_listentries_rec.COL131  ;
1014     END IF;
1015     IF p_list_entries_rec.COL132 = FND_API.g_miss_char THEN
1016        x_complete_rec.COL132 := l_listentries_rec.COL132  ;
1017     END IF;
1018     IF p_list_entries_rec.COL133 = FND_API.g_miss_char THEN
1019        x_complete_rec.COL133 := l_listentries_rec.COL133  ;
1020     END IF;
1021     IF p_list_entries_rec.COL134 = FND_API.g_miss_char THEN
1022        x_complete_rec.COL134 := l_listentries_rec.COL134  ;
1023     END IF;
1024     IF p_list_entries_rec.COL135 = FND_API.g_miss_char THEN
1025        x_complete_rec.COL135 := l_listentries_rec.COL135  ;
1026     END IF;
1027     IF p_list_entries_rec.COL136 = FND_API.g_miss_char THEN
1028        x_complete_rec.COL136 := l_listentries_rec.COL136  ;
1029     END IF;
1030     IF p_list_entries_rec.COL137 = FND_API.g_miss_char THEN
1031        x_complete_rec.COL137 := l_listentries_rec.COL137  ;
1032     END IF;
1033     IF p_list_entries_rec.COL138 = FND_API.g_miss_char THEN
1034        x_complete_rec.COL138 := l_listentries_rec.COL138  ;
1035     END IF;
1036     IF p_list_entries_rec.COL139 = FND_API.g_miss_char THEN
1037        x_complete_rec.COL139 := l_listentries_rec.COL139  ;
1038     END IF;
1039     IF p_list_entries_rec.COL140 = FND_API.g_miss_char THEN
1040        x_complete_rec.COL140 := l_listentries_rec.COL140  ;
1041     END IF;
1042     IF p_list_entries_rec.COL141 = FND_API.g_miss_char THEN
1043        x_complete_rec.COL141 := l_listentries_rec.COL141  ;
1044     END IF;
1045     IF p_list_entries_rec.COL142 = FND_API.g_miss_char THEN
1046        x_complete_rec.COL142 := l_listentries_rec.COL142  ;
1047     END IF;
1048     IF p_list_entries_rec.COL143 = FND_API.g_miss_char THEN
1049        x_complete_rec.COL143 := l_listentries_rec.COL143  ;
1050     END IF;
1051     IF p_list_entries_rec.COL144 = FND_API.g_miss_char THEN
1052        x_complete_rec.COL144 := l_listentries_rec.COL144  ;
1053     END IF;
1054     IF p_list_entries_rec.COL145 = FND_API.g_miss_char THEN
1055        x_complete_rec.COL145 := l_listentries_rec.COL145  ;
1056     END IF;
1057     IF p_list_entries_rec.COL146 = FND_API.g_miss_char THEN
1058        x_complete_rec.COL146 := l_listentries_rec.COL146  ;
1059     END IF;
1060     IF p_list_entries_rec.COL147 = FND_API.g_miss_char THEN
1061        x_complete_rec.COL147 := l_listentries_rec.COL147  ;
1062     END IF;
1063     IF p_list_entries_rec.COL148 = FND_API.g_miss_char THEN
1064        x_complete_rec.COL148 := l_listentries_rec.COL148  ;
1065     END IF;
1066     IF p_list_entries_rec.COL149 = FND_API.g_miss_char THEN
1067        x_complete_rec.COL149 := l_listentries_rec.COL149  ;
1068     END IF;
1069     IF p_list_entries_rec.COL150 = FND_API.g_miss_char THEN
1070        x_complete_rec.COL150 := l_listentries_rec.COL150  ;
1071     END IF;
1072     IF p_list_entries_rec.COL151 = FND_API.g_miss_char THEN
1073        x_complete_rec.COL151 := l_listentries_rec.COL151  ;
1074     END IF;
1075     IF p_list_entries_rec.COL152 = FND_API.g_miss_char THEN
1076        x_complete_rec.COL152 := l_listentries_rec.COL152  ;
1077     END IF;
1078     IF p_list_entries_rec.COL153 = FND_API.g_miss_char THEN
1079        x_complete_rec.COL153 := l_listentries_rec.COL153  ;
1080     END IF;
1081     IF p_list_entries_rec.COL154 = FND_API.g_miss_char THEN
1082        x_complete_rec.COL154 := l_listentries_rec.COL154  ;
1083     END IF;
1084     IF p_list_entries_rec.COL155 = FND_API.g_miss_char THEN
1085        x_complete_rec.COL155 := l_listentries_rec.COL155  ;
1086     END IF;
1087     IF p_list_entries_rec.COL156 = FND_API.g_miss_char THEN
1088        x_complete_rec.COL156 := l_listentries_rec.COL156  ;
1089     END IF;
1090     IF p_list_entries_rec.COL157 = FND_API.g_miss_char THEN
1091        x_complete_rec.COL157 := l_listentries_rec.COL157  ;
1092     END IF;
1093     IF p_list_entries_rec.COL158 = FND_API.g_miss_char THEN
1094        x_complete_rec.COL158 := l_listentries_rec.COL158  ;
1095     END IF;
1096     IF p_list_entries_rec.COL159 = FND_API.g_miss_char THEN
1097        x_complete_rec.COL159 := l_listentries_rec.COL159  ;
1098     END IF;
1099     IF p_list_entries_rec.COL160 = FND_API.g_miss_char THEN
1100        x_complete_rec.COL160 := l_listentries_rec.COL160  ;
1101     END IF;
1102     IF p_list_entries_rec.COL161 = FND_API.g_miss_char THEN
1103        x_complete_rec.COL161 := l_listentries_rec.COL161  ;
1104     END IF;
1105     IF p_list_entries_rec.COL162 = FND_API.g_miss_char THEN
1106        x_complete_rec.COL162 := l_listentries_rec.COL162  ;
1107     END IF;
1108     IF p_list_entries_rec.COL163 = FND_API.g_miss_char THEN
1109        x_complete_rec.COL163 := l_listentries_rec.COL163  ;
1110     END IF;
1111     IF p_list_entries_rec.COL164 = FND_API.g_miss_char THEN
1112        x_complete_rec.COL164 := l_listentries_rec.COL164  ;
1113     END IF;
1114     IF p_list_entries_rec.COL165 = FND_API.g_miss_char THEN
1115        x_complete_rec.COL165 := l_listentries_rec.COL165  ;
1116     END IF;
1117     IF p_list_entries_rec.COL166 = FND_API.g_miss_char THEN
1118        x_complete_rec.COL166 := l_listentries_rec.COL166  ;
1119     END IF;
1120     IF p_list_entries_rec.COL167 = FND_API.g_miss_char THEN
1121        x_complete_rec.COL167 := l_listentries_rec.COL167  ;
1122     END IF;
1123     IF p_list_entries_rec.COL168 = FND_API.g_miss_char THEN
1124        x_complete_rec.COL168 := l_listentries_rec.COL168  ;
1125     END IF;
1126     IF p_list_entries_rec.COL169 = FND_API.g_miss_char THEN
1127        x_complete_rec.COL169 := l_listentries_rec.COL169  ;
1128     END IF;
1129     IF p_list_entries_rec.COL170 = FND_API.g_miss_char THEN
1130        x_complete_rec.COL170 := l_listentries_rec.COL170  ;
1131     END IF;
1132     IF p_list_entries_rec.COL171 = FND_API.g_miss_char THEN
1133        x_complete_rec.COL171 := l_listentries_rec.COL171  ;
1134     END IF;
1135     IF p_list_entries_rec.COL172 = FND_API.g_miss_char THEN
1136        x_complete_rec.COL172 := l_listentries_rec.COL172  ;
1137     END IF;
1138     IF p_list_entries_rec.COL173 = FND_API.g_miss_char THEN
1139        x_complete_rec.COL173 := l_listentries_rec.COL173  ;
1140     END IF;
1141     IF p_list_entries_rec.COL174 = FND_API.g_miss_char THEN
1142        x_complete_rec.COL174 := l_listentries_rec.COL174  ;
1143     END IF;
1144     IF p_list_entries_rec.COL175 = FND_API.g_miss_char THEN
1145        x_complete_rec.COL175 := l_listentries_rec.COL175  ;
1146     END IF;
1147     IF p_list_entries_rec.COL176 = FND_API.g_miss_char THEN
1148        x_complete_rec.COL176 := l_listentries_rec.COL176  ;
1149     END IF;
1150     IF p_list_entries_rec.COL177 = FND_API.g_miss_char THEN
1151        x_complete_rec.COL177 := l_listentries_rec.COL177  ;
1152     END IF;
1153     IF p_list_entries_rec.COL178 = FND_API.g_miss_char THEN
1154        x_complete_rec.COL178 := l_listentries_rec.COL178  ;
1155     END IF;
1156     IF p_list_entries_rec.COL179 = FND_API.g_miss_char THEN
1157        x_complete_rec.COL179 := l_listentries_rec.COL179  ;
1158     END IF;
1159     IF p_list_entries_rec.COL180 = FND_API.g_miss_char THEN
1160        x_complete_rec.COL180 := l_listentries_rec.COL180  ;
1161     END IF;
1162     IF p_list_entries_rec.COL181 = FND_API.g_miss_char THEN
1163        x_complete_rec.COL181 := l_listentries_rec.COL181  ;
1164     END IF;
1165     IF p_list_entries_rec.COL182 = FND_API.g_miss_char THEN
1166        x_complete_rec.COL182 := l_listentries_rec.COL182  ;
1167     END IF;
1168     IF p_list_entries_rec.COL183 = FND_API.g_miss_char THEN
1169        x_complete_rec.COL183 := l_listentries_rec.COL183  ;
1170     END IF;
1171     IF p_list_entries_rec.COL184 = FND_API.g_miss_char THEN
1172        x_complete_rec.COL184 := l_listentries_rec.COL184  ;
1173     END IF;
1174     IF p_list_entries_rec.COL185 = FND_API.g_miss_char THEN
1175        x_complete_rec.COL185 := l_listentries_rec.COL185  ;
1176     END IF;
1177     IF p_list_entries_rec.COL186 = FND_API.g_miss_char THEN
1178        x_complete_rec.COL186 := l_listentries_rec.COL186  ;
1179     END IF;
1180     IF p_list_entries_rec.COL187 = FND_API.g_miss_char THEN
1181        x_complete_rec.COL187 := l_listentries_rec.COL187  ;
1182     END IF;
1183     IF p_list_entries_rec.COL188 = FND_API.g_miss_char THEN
1184        x_complete_rec.COL188 := l_listentries_rec.COL188  ;
1185     END IF;
1186     IF p_list_entries_rec.COL189 = FND_API.g_miss_char THEN
1187        x_complete_rec.COL189 := l_listentries_rec.COL189  ;
1188     END IF;
1189     IF p_list_entries_rec.COL190 = FND_API.g_miss_char THEN
1190        x_complete_rec.COL190 := l_listentries_rec.COL190  ;
1191     END IF;
1192     IF p_list_entries_rec.COL191 = FND_API.g_miss_char THEN
1193        x_complete_rec.COL191 := l_listentries_rec.COL191  ;
1194     END IF;
1195     IF p_list_entries_rec.COL192 = FND_API.g_miss_char THEN
1196        x_complete_rec.COL192 := l_listentries_rec.COL192  ;
1197     END IF;
1198     IF p_list_entries_rec.COL193 = FND_API.g_miss_char THEN
1199        x_complete_rec.COL193 := l_listentries_rec.COL193  ;
1200     END IF;
1201     IF p_list_entries_rec.COL194 = FND_API.g_miss_char THEN
1202        x_complete_rec.COL194 := l_listentries_rec.COL194  ;
1203     END IF;
1204     IF p_list_entries_rec.COL195 = FND_API.g_miss_char THEN
1205        x_complete_rec.COL195 := l_listentries_rec.COL195  ;
1206     END IF;
1207     IF p_list_entries_rec.COL196 = FND_API.g_miss_char THEN
1208        x_complete_rec.COL196 := l_listentries_rec.COL196  ;
1209     END IF;
1210     IF p_list_entries_rec.COL197 = FND_API.g_miss_char THEN
1211        x_complete_rec.COL197 := l_listentries_rec.COL197  ;
1212     END IF;
1213     IF p_list_entries_rec.COL198 = FND_API.g_miss_char THEN
1214        x_complete_rec.COL198 := l_listentries_rec.COL198  ;
1215     END IF;
1216     IF p_list_entries_rec.COL199 = FND_API.g_miss_char THEN
1217        x_complete_rec.COL199 := l_listentries_rec.COL199  ;
1218     END IF;
1219     IF p_list_entries_rec.COL200 = FND_API.g_miss_char THEN
1220        x_complete_rec.COL200 := l_listentries_rec.COL200  ;
1221     END IF;
1222 
1223 
1224  IF p_list_entries_rec.COL201  = FND_API.g_miss_char THEN
1225      x_complete_rec.COL201 := l_listentries_rec.COL201;
1226  END IF;
1227 
1228  IF p_list_entries_rec.COL202 = FND_API.g_miss_char THEN
1229      x_complete_rec.COL202 := l_listentries_rec.COL202;
1230  END IF;
1231 
1232  IF p_list_entries_rec.COL203 = FND_API.g_miss_char THEN
1233      x_complete_rec.COL203 := l_listentries_rec.COL203;
1234  END IF;
1235 
1236  IF p_list_entries_rec.COL204 = FND_API.g_miss_char THEN
1237      x_complete_rec.COL204 := l_listentries_rec.COL204;
1238  END IF;
1239 
1240  IF p_list_entries_rec.COL205 = FND_API.g_miss_char THEN
1241      x_complete_rec.COL205 := l_listentries_rec.COL205;
1242  END IF;
1243 
1244  IF p_list_entries_rec.COL206 = FND_API.g_miss_char THEN
1245      x_complete_rec.COL206 := l_listentries_rec.COL206;
1246  END IF;
1247 
1248  IF p_list_entries_rec.COL207 = FND_API.g_miss_char THEN
1249      x_complete_rec.COL207 := l_listentries_rec.COL207;
1250  END IF;
1251 
1252  IF p_list_entries_rec.COL208 = FND_API.g_miss_char THEN
1253      x_complete_rec.COL208 := l_listentries_rec.COL208;
1254  END IF;
1255 
1256  IF p_list_entries_rec.COL209 = FND_API.g_miss_char THEN
1257      x_complete_rec.COL209 := l_listentries_rec.COL209;
1258  END IF;
1259 
1260  IF p_list_entries_rec.COL210 = FND_API.g_miss_char THEN
1261      x_complete_rec.COL210 := l_listentries_rec.COL210;
1262  END IF;
1263 
1264  IF p_list_entries_rec.COL211 = FND_API.g_miss_char THEN
1265      x_complete_rec.COL211 := l_listentries_rec.COL211;
1266  END IF;
1267 
1268  IF p_list_entries_rec.COL212 = FND_API.g_miss_char THEN
1269      x_complete_rec.COL212 := l_listentries_rec.COL212;
1270  END IF;
1271 
1272  IF p_list_entries_rec.COL213 = FND_API.g_miss_char THEN
1273      x_complete_rec.COL213 := l_listentries_rec.COL213;
1274  END IF;
1275 
1276  IF p_list_entries_rec.COL214 = FND_API.g_miss_char THEN
1277      x_complete_rec.COL214 := l_listentries_rec.COL214;
1278  END IF;
1279 
1280  IF p_list_entries_rec.COL215 = FND_API.g_miss_char THEN
1281      x_complete_rec.COL215 := l_listentries_rec.COL215;
1282  END IF;
1283 
1284  IF p_list_entries_rec.COL216 = FND_API.g_miss_char THEN
1285       x_complete_rec.COL216 := l_listentries_rec.COL216;
1286  END IF;
1287 
1288  IF p_list_entries_rec.COL217 = FND_API.g_miss_char THEN
1289      x_complete_rec.COL217 := l_listentries_rec.COL217;
1290  END IF;
1291 
1292  IF p_list_entries_rec.COL218 = FND_API.g_miss_char THEN
1293      x_complete_rec.COL218 := l_listentries_rec.COL218;
1294  END IF;
1295 
1296  IF p_list_entries_rec.COL219 = FND_API.g_miss_char THEN
1297      x_complete_rec.COL219 := l_listentries_rec.COL219;
1298  END IF;
1299 
1300  IF p_list_entries_rec.COL220 = FND_API.g_miss_char THEN
1301      x_complete_rec.COL220  := l_listentries_rec.COL220 ;
1302  END IF;
1303 
1304  IF p_list_entries_rec.COL221 = FND_API.g_miss_char THEN
1305      x_complete_rec.COL221 := l_listentries_rec.COL221;
1306  END IF;
1307 
1308  IF p_list_entries_rec.COL222 = FND_API.g_miss_char THEN
1309      x_complete_rec.COL222 := l_listentries_rec.COL222;
1310  END IF;
1311 
1312  IF p_list_entries_rec.COL223 = FND_API.g_miss_char THEN
1313      x_complete_rec.COL223 := l_listentries_rec.COL223;
1314  END IF;
1315 
1316  IF p_list_entries_rec.COL224 = FND_API.g_miss_char THEN
1317      x_complete_rec.COL224 := l_listentries_rec.COL224;
1318  END IF;
1319 
1320  IF p_list_entries_rec.COL225 = FND_API.g_miss_char THEN
1321      x_complete_rec.COL225 := l_listentries_rec.COL225;
1322  END IF;
1323 
1324  IF p_list_entries_rec.COL226 = FND_API.g_miss_char THEN
1325      x_complete_rec.COL226 := l_listentries_rec.COL226;
1326  END IF;
1327 
1328  IF p_list_entries_rec.COL227 = FND_API.g_miss_char THEN
1329      x_complete_rec.COL227  := l_listentries_rec.COL227 ;
1330  END IF;
1331 
1332  IF p_list_entries_rec.COL228 = FND_API.g_miss_char THEN
1333      x_complete_rec.COL228  := l_listentries_rec.COL228 ;
1334  END IF;
1335 
1336  IF p_list_entries_rec.COL229 = FND_API.g_miss_char THEN
1337      x_complete_rec.COL229 := l_listentries_rec.COL229;
1338  END IF;
1339 
1340  IF p_list_entries_rec.COL230 = FND_API.g_miss_char THEN
1341      x_complete_rec.COL230  := l_listentries_rec.COL230 ;
1342  END IF;
1343 
1344  IF p_list_entries_rec.COL231 = FND_API.g_miss_char THEN
1345      x_complete_rec.COL231 := l_listentries_rec.COL231;
1346  END IF;
1347 
1348  IF p_list_entries_rec.COL232 = FND_API.g_miss_char THEN
1349      x_complete_rec.COL232 := l_listentries_rec.COL232;
1350  END IF;
1351 
1352  IF p_list_entries_rec.COL233 = FND_API.g_miss_char THEN
1353      x_complete_rec.COL233 := l_listentries_rec.COL233;
1354  END IF;
1355 
1356  IF p_list_entries_rec.COL234 = FND_API.g_miss_char THEN
1357      x_complete_rec.COL234 := l_listentries_rec.COL234;
1358  END IF;
1359 
1360  IF p_list_entries_rec.COL235 = FND_API.g_miss_char THEN
1361      x_complete_rec.COL235  := l_listentries_rec.COL235 ;
1362  END IF;
1363 
1364  IF p_list_entries_rec.COL236 = FND_API.g_miss_char THEN
1365      x_complete_rec.COL236 := l_listentries_rec.COL236;
1366  END IF;
1367 
1368  IF p_list_entries_rec.COL237 = FND_API.g_miss_char THEN
1369      x_complete_rec.COL237 := l_listentries_rec.COL237;
1370  END IF;
1371 
1372  IF p_list_entries_rec.COL238 = FND_API.g_miss_char THEN
1373      x_complete_rec.COL238  := l_listentries_rec.COL238 ;
1374  END IF;
1375 
1376  IF p_list_entries_rec.COL239 = FND_API.g_miss_char THEN
1377      x_complete_rec.COL239 := l_listentries_rec.COL239;
1378  END IF;
1379 
1380  IF p_list_entries_rec.COL240 = FND_API.g_miss_char THEN
1381      x_complete_rec.COL240 := l_listentries_rec.COL240;
1382  END IF;
1383 
1384  IF p_list_entries_rec.COL241 = FND_API.g_miss_char THEN
1385      x_complete_rec.COL241  := l_listentries_rec.COL241 ;
1386  END IF;
1387 
1388  IF p_list_entries_rec.COL242 = FND_API.g_miss_char THEN
1389      x_complete_rec.COL242 := l_listentries_rec.COL242;
1390  END IF;
1391 
1392  IF p_list_entries_rec.COL243 = FND_API.g_miss_char THEN
1393      x_complete_rec.COL243 := l_listentries_rec.COL243;
1394  END IF;
1395 
1396  IF p_list_entries_rec.COL244 = FND_API.g_miss_char THEN
1397      x_complete_rec.COL244 := l_listentries_rec.COL244;
1398  END IF;
1399 
1400  IF p_list_entries_rec.COL245 = FND_API.g_miss_char THEN
1401      x_complete_rec.COL245 := l_listentries_rec.COL245;
1402  END IF;
1403 
1404  IF p_list_entries_rec.COL246 = FND_API.g_miss_char THEN
1405      x_complete_rec.COL246 := l_listentries_rec.COL246;
1406  END IF;
1407 
1408  IF p_list_entries_rec.COL247 = FND_API.g_miss_char THEN
1409      x_complete_rec.COL247 := l_listentries_rec.COL247;
1410  END IF;
1411 
1412  IF p_list_entries_rec.COL248 = FND_API.g_miss_char THEN
1413      x_complete_rec.COL248  := l_listentries_rec.COL248 ;
1414  END IF;
1415 
1416  IF p_list_entries_rec.COL249 = FND_API.g_miss_char THEN
1417      x_complete_rec.COL249 := l_listentries_rec.COL249;
1418  END IF;
1419 
1420  IF p_list_entries_rec.COL250 = FND_API.g_miss_char THEN
1421      x_complete_rec.COL250 := l_listentries_rec.COL250;
1422  END IF;
1423 
1424  IF p_list_entries_rec.COL251 = FND_API.g_miss_char THEN
1425     x_complete_rec.COL251 := l_listentries_rec.COL251;
1426  END IF;
1427 
1428 
1429  IF p_list_entries_rec.COL252 = FND_API.g_miss_char THEN
1430     x_complete_rec.COL252 := l_listentries_rec.COL252;
1431  END IF;
1432 
1433 
1434  IF p_list_entries_rec.COL253 = FND_API.g_miss_char THEN
1435     x_complete_rec.COL253 := l_listentries_rec.COL253;
1436  END IF;
1437 
1438 
1439  IF p_list_entries_rec.COL254 = FND_API.g_miss_char THEN
1440     x_complete_rec.COL254 := l_listentries_rec.COL254;
1441  END IF;
1442 
1443 
1444  IF p_list_entries_rec.COL255 = FND_API.g_miss_char THEN
1445     x_complete_rec.COL255 := l_listentries_rec.COL255;
1446  END IF;
1447 
1448 
1449  IF p_list_entries_rec.COL256 = FND_API.g_miss_char THEN
1450     x_complete_rec.COL256 := l_listentries_rec.COL256;
1451  END IF;
1452 
1453 
1454  IF p_list_entries_rec.COL257 = FND_API.g_miss_char THEN
1455     x_complete_rec.COL257 := l_listentries_rec.COL257;
1456  END IF;
1457 
1458 
1459  IF p_list_entries_rec.COL258 = FND_API.g_miss_char THEN
1460     x_complete_rec.COL258 := l_listentries_rec.COL258;
1461  END IF;
1462 
1463 
1464  IF p_list_entries_rec.COL259 = FND_API.g_miss_char THEN
1465     x_complete_rec.COL259 := l_listentries_rec.COL259;
1466  END IF;
1467 
1468 
1469  IF p_list_entries_rec.COL260 = FND_API.g_miss_char THEN
1470     x_complete_rec.COL260 := l_listentries_rec.COL260;
1471  END IF;
1472 
1473 
1474  IF p_list_entries_rec.COL261 = FND_API.g_miss_char THEN
1475     x_complete_rec.COL261 := l_listentries_rec.COL261;
1476  END IF;
1477 
1478 
1479  IF p_list_entries_rec.COL262 = FND_API.g_miss_char THEN
1480     x_complete_rec.COL262 := l_listentries_rec.COL262;
1481  END IF;
1482 
1483 
1484  IF p_list_entries_rec.COL263 = FND_API.g_miss_char THEN
1485     x_complete_rec.COL263 := l_listentries_rec.COL263;
1486  END IF;
1487 
1488 
1489  IF p_list_entries_rec.COL264 = FND_API.g_miss_char THEN
1490     x_complete_rec.COL264 := l_listentries_rec.COL264;
1491  END IF;
1492 
1493 
1494  IF p_list_entries_rec.COL265 = FND_API.g_miss_char THEN
1495     x_complete_rec.COL265 := l_listentries_rec.COL265;
1496  END IF;
1497 
1498 
1499  IF p_list_entries_rec.COL266 = FND_API.g_miss_char THEN
1500     x_complete_rec.COL266 := l_listentries_rec.COL266;
1501  END IF;
1502 
1503 
1504  IF p_list_entries_rec.COL267 = FND_API.g_miss_char THEN
1505     x_complete_rec.COL267 := l_listentries_rec.COL267;
1506  END IF;
1507 
1508 
1509  IF p_list_entries_rec.COL268 = FND_API.g_miss_char THEN
1510     x_complete_rec.COL268 := l_listentries_rec.COL268;
1511  END IF;
1512 
1513 
1514  IF p_list_entries_rec.COL269 = FND_API.g_miss_char THEN
1515     x_complete_rec.COL269 := l_listentries_rec.COL269;
1516  END IF;
1517 
1518 
1519  IF p_list_entries_rec.COL270 = FND_API.g_miss_char THEN
1520     x_complete_rec.COL270 := l_listentries_rec.COL270;
1521  END IF;
1522 
1523 
1524  IF p_list_entries_rec.COL271 = FND_API.g_miss_char THEN
1525     x_complete_rec.COL271 := l_listentries_rec.COL271;
1526  END IF;
1527 
1528 
1529  IF p_list_entries_rec.COL272 = FND_API.g_miss_char THEN
1530     x_complete_rec.COL272 := l_listentries_rec.COL272;
1531  END IF;
1532 
1533 
1534  IF p_list_entries_rec.COL273 = FND_API.g_miss_char THEN
1535     x_complete_rec.COL273 := l_listentries_rec.COL273;
1536  END IF;
1537 
1538 
1539  IF p_list_entries_rec.COL274 = FND_API.g_miss_char THEN
1540     x_complete_rec.COL274 := l_listentries_rec.COL274;
1541  END IF;
1542 
1543 
1544  IF p_list_entries_rec.COL275 = FND_API.g_miss_char THEN
1545     x_complete_rec.COL275 := l_listentries_rec.COL275;
1546  END IF;
1547 
1548 
1549  IF p_list_entries_rec.COL276 = FND_API.g_miss_char THEN
1550     x_complete_rec.COL276 := l_listentries_rec.COL276;
1551  END IF;
1552 
1553 
1554  IF p_list_entries_rec.COL277 = FND_API.g_miss_char THEN
1555     x_complete_rec.COL277 := l_listentries_rec.COL277;
1556  END IF;
1557 
1558 
1559  IF p_list_entries_rec.COL278 = FND_API.g_miss_char THEN
1560     x_complete_rec.COL278 := l_listentries_rec.COL278;
1561  END IF;
1562 
1563 
1564  IF p_list_entries_rec.COL279 = FND_API.g_miss_char THEN
1565     x_complete_rec.COL279 := l_listentries_rec.COL279;
1566  END IF;
1567 
1568 
1569  IF p_list_entries_rec.COL280 = FND_API.g_miss_char THEN
1570     x_complete_rec.COL280 := l_listentries_rec.COL280;
1571  END IF;
1572 
1573 
1574  IF p_list_entries_rec.COL281 = FND_API.g_miss_char THEN
1575     x_complete_rec.COL281 := l_listentries_rec.COL281;
1576  END IF;
1577 
1578 
1579  IF p_list_entries_rec.COL282 = FND_API.g_miss_char THEN
1580     x_complete_rec.COL282 := l_listentries_rec.COL282;
1581  END IF;
1582 
1583 
1584  IF p_list_entries_rec.COL283 = FND_API.g_miss_char THEN
1585     x_complete_rec.COL283 := l_listentries_rec.COL283;
1586  END IF;
1587 
1588 
1589  IF p_list_entries_rec.COL284 = FND_API.g_miss_char THEN
1590     x_complete_rec.COL284 := l_listentries_rec.COL284;
1591  END IF;
1592 
1593 
1594  IF p_list_entries_rec.COL285 = FND_API.g_miss_char THEN
1595     x_complete_rec.COL285 := l_listentries_rec.COL285;
1596  END IF;
1597 
1598 
1599  IF p_list_entries_rec.COL286 = FND_API.g_miss_char THEN
1600     x_complete_rec.COL286 := l_listentries_rec.COL286;
1601  END IF;
1602 
1603 
1604  IF p_list_entries_rec.COL287 = FND_API.g_miss_char THEN
1605     x_complete_rec.COL287 := l_listentries_rec.COL287;
1606  END IF;
1607 
1608 
1609  IF p_list_entries_rec.COL288 = FND_API.g_miss_char THEN
1610     x_complete_rec.COL288 := l_listentries_rec.COL288;
1611  END IF;
1612 
1613 
1614  IF p_list_entries_rec.COL289 = FND_API.g_miss_char THEN
1615     x_complete_rec.COL289 := l_listentries_rec.COL289;
1616  END IF;
1617 
1618 
1619  IF p_list_entries_rec.COL290 = FND_API.g_miss_char THEN
1620     x_complete_rec.COL290 := l_listentries_rec.COL290;
1621  END IF;
1622 
1623 
1624  IF p_list_entries_rec.COL291 = FND_API.g_miss_char THEN
1625     x_complete_rec.COL291 := l_listentries_rec.COL291;
1626  END IF;
1627 
1628 
1629  IF p_list_entries_rec.COL292 = FND_API.g_miss_char THEN
1630     x_complete_rec.COL292 := l_listentries_rec.COL292;
1631  END IF;
1632 
1633 
1634  IF p_list_entries_rec.COL293 = FND_API.g_miss_char THEN
1635     x_complete_rec.COL293 := l_listentries_rec.COL293;
1636  END IF;
1637 
1638 
1639  IF p_list_entries_rec.COL294 = FND_API.g_miss_char THEN
1640     x_complete_rec.COL294 := l_listentries_rec.COL294;
1641  END IF;
1642 
1643 
1644  IF p_list_entries_rec.COL295 = FND_API.g_miss_char THEN
1645     x_complete_rec.COL295 := l_listentries_rec.COL295;
1646  END IF;
1647 
1648 
1649  IF p_list_entries_rec.COL296 = FND_API.g_miss_char THEN
1650     x_complete_rec.COL296 := l_listentries_rec.COL296;
1651  END IF;
1652 
1653 
1654  IF p_list_entries_rec.COL297 = FND_API.g_miss_char THEN
1655     x_complete_rec.COL297 := l_listentries_rec.COL297;
1656  END IF;
1657 
1658 
1659  IF p_list_entries_rec.COL298 = FND_API.g_miss_char THEN
1660     x_complete_rec.COL298 := l_listentries_rec.COL298;
1661  END IF;
1662 
1663 
1664  IF p_list_entries_rec.COL299 = FND_API.g_miss_char THEN
1665     x_complete_rec.COL299 := l_listentries_rec.COL299;
1666  END IF;
1667 
1668 
1669  IF p_list_entries_rec.COL300 = FND_API.g_miss_char THEN
1670     x_complete_rec.COL300 := l_listentries_rec.COL300;
1671  END IF;
1672 
1673 
1674  IF p_list_entries_rec.ADDRESS_LINE1 = FND_API.g_miss_char THEN
1675     x_complete_rec.ADDRESS_LINE1 := l_listentries_rec.ADDRESS_LINE1;
1676  END IF;
1677 
1678 
1679  IF p_list_entries_rec.ADDRESS_LINE2 = FND_API.g_miss_char THEN
1680     x_complete_rec.ADDRESS_LINE2 := l_listentries_rec.ADDRESS_LINE2;
1681  END IF;
1682 
1683 
1684  IF p_list_entries_rec.CALLBACK_FLAG = FND_API.g_miss_char THEN
1685     x_complete_rec.CALLBACK_FLAG := l_listentries_rec.CALLBACK_FLAG;
1686  END IF;
1687 
1688 
1689  IF p_list_entries_rec.CITY = FND_API.g_miss_char THEN
1690     x_complete_rec.CITY := l_listentries_rec.CITY;
1691  END IF;
1692 
1693 
1694  IF p_list_entries_rec.COUNTRY = FND_API.g_miss_char THEN
1695     x_complete_rec.COUNTRY := l_listentries_rec.COUNTRY;
1696  END IF;
1697 
1698 
1699  IF p_list_entries_rec.DO_NOT_USE_FLAG = FND_API.g_miss_char THEN
1700     x_complete_rec.DO_NOT_USE_FLAG := l_listentries_rec.DO_NOT_USE_FLAG;
1701  END IF;
1702 
1703 
1704  IF p_list_entries_rec.DO_NOT_USE_REASON = FND_API.g_miss_char THEN
1705     x_complete_rec.DO_NOT_USE_REASON := l_listentries_rec.DO_NOT_USE_REASON;
1706  END IF;
1707 
1708 
1709  IF p_list_entries_rec.EMAIL_ADDRESS = FND_API.g_miss_char THEN
1710     x_complete_rec.EMAIL_ADDRESS := l_listentries_rec.EMAIL_ADDRESS;
1711  END IF;
1712 
1713 
1714  IF p_list_entries_rec.FAX = FND_API.g_miss_char THEN
1715     x_complete_rec.FAX := l_listentries_rec.FAX;
1716  END IF;
1717 
1718 
1719  IF p_list_entries_rec.PHONE = FND_API.g_miss_char THEN
1720     x_complete_rec.PHONE := l_listentries_rec.PHONE;
1721  END IF;
1722 
1723 
1724  IF p_list_entries_rec.RECORD_OUT_FLAG = FND_API.g_miss_char THEN
1725     x_complete_rec.RECORD_OUT_FLAG := l_listentries_rec.RECORD_OUT_FLAG;
1726  END IF;
1727 
1728 
1729  IF p_list_entries_rec.STATE = FND_API.g_miss_char THEN
1730     x_complete_rec.STATE := l_listentries_rec.STATE;
1731  END IF;
1732 
1733 
1734  IF p_list_entries_rec.SUFFIX = FND_API.g_miss_char THEN
1735     x_complete_rec.SUFFIX := l_listentries_rec.SUFFIX;
1736  END IF;
1737 
1738 
1739  IF p_list_entries_rec.TITLE = FND_API.g_miss_char THEN
1740     x_complete_rec.TITLE := l_listentries_rec.TITLE;
1741  END IF;
1742 
1743 
1744  IF p_list_entries_rec.USAGE_RESTRICTION = FND_API.g_miss_char THEN
1745     x_complete_rec.USAGE_RESTRICTION := l_listentries_rec.USAGE_RESTRICTION;
1746  END IF;
1747 
1748 
1749  IF p_list_entries_rec.ZIPCODE = FND_API.g_miss_char THEN
1750     x_complete_rec.ZIPCODE := l_listentries_rec.ZIPCODE;
1751  END IF;
1752 
1753 
1754  IF p_list_entries_rec.CURR_CP_COUNTRY_CODE = FND_API.g_miss_char THEN
1755     x_complete_rec.CURR_CP_COUNTRY_CODE := l_listentries_rec.CURR_CP_COUNTRY_CODE;
1756  END IF;
1757 
1758 
1759  IF p_list_entries_rec.CURR_CP_PHONE_NUMBER = FND_API.g_miss_char  THEN
1760     x_complete_rec.CURR_CP_PHONE_NUMBER := l_listentries_rec.CURR_CP_PHONE_NUMBER;
1761  END IF;
1762 
1763 
1764  IF p_list_entries_rec.CURR_CP_RAW_PHONE_NUMBER = FND_API.g_miss_char  THEN
1765     x_complete_rec.CURR_CP_RAW_PHONE_NUMBER := l_listentries_rec.CURR_CP_RAW_PHONE_NUMBER;
1766  END IF;
1767 
1768 
1769  IF p_list_entries_rec.CURR_CP_AREA_CODE = FND_API.g_miss_num  THEN
1770     x_complete_rec.CURR_CP_AREA_CODE := l_listentries_rec.CURR_CP_AREA_CODE;
1771  END IF;
1772 
1773 
1774  IF p_list_entries_rec.CURR_CP_ID = FND_API.g_miss_num  THEN
1775     x_complete_rec.CURR_CP_ID := l_listentries_rec.CURR_CP_ID;
1776  END IF;
1777 
1778 
1779  IF p_list_entries_rec.CURR_CP_INDEX = FND_API.g_miss_num  THEN
1780     x_complete_rec.CURR_CP_INDEX := l_listentries_rec.CURR_CP_INDEX;
1781  END IF;
1782 
1783 
1784  IF p_list_entries_rec.CURR_CP_TIME_ZONE = FND_API.g_miss_num  THEN
1785     x_complete_rec.CURR_CP_TIME_ZONE := l_listentries_rec.CURR_CP_TIME_ZONE;
1786  END IF;
1787 
1788 
1789  IF p_list_entries_rec.CURR_CP_TIME_ZONE_AUX = FND_API.g_miss_num  THEN
1790     x_complete_rec.CURR_CP_TIME_ZONE_AUX := l_listentries_rec.CURR_CP_TIME_ZONE_AUX;
1791  END IF;
1792 
1793 
1794  IF p_list_entries_rec.IMP_SOURCE_LINE_ID = FND_API.g_miss_num  THEN
1795     x_complete_rec.IMP_SOURCE_LINE_ID := l_listentries_rec.IMP_SOURCE_LINE_ID;
1796  END IF;
1797 
1798 
1799  IF p_list_entries_rec.NEXT_CALL_TIME = FND_API.g_miss_date THEN
1800     x_complete_rec.NEXT_CALL_TIME := l_listentries_rec.NEXT_CALL_TIME;
1801  END IF;
1802 
1803 
1804  IF p_list_entries_rec.RECORD_RELEASE_TIME = FND_API.g_miss_date THEN
1805     x_complete_rec.RECORD_RELEASE_TIME := l_listentries_rec.RECORD_RELEASE_TIME;
1806  END IF;
1807  IF p_list_entries_rec.PARTY_ID = FND_API.g_miss_num THEN
1808      x_complete_rec.PARTY_ID := l_listentries_rec.PARTY_ID;
1809  END IF;
1810  IF p_list_entries_rec.PARENT_PARTY_ID = FND_API.g_miss_num THEN
1811      x_complete_rec.PARENT_PARTY_ID := l_listentries_rec.PARENT_PARTY_ID;
1812  END IF;
1813 
1814  IF p_list_entries_rec.group_code = FND_API.g_miss_char THEN
1815      x_complete_rec.group_code := l_listentries_rec.group_code;
1816  END IF;
1817 
1818  IF p_list_entries_rec.newly_updated_flag = FND_API.g_miss_char THEN
1819      x_complete_rec.newly_updated_flag := l_listentries_rec.newly_updated_flag;
1820  END IF;
1821  IF p_list_entries_rec.outcome_id = FND_API.g_miss_num THEN
1822      x_complete_rec.outcome_id := l_listentries_rec.outcome_id;
1823  END IF;
1824  IF p_list_entries_rec.reason_id = FND_API.g_miss_num THEN
1825      x_complete_rec.reason_id := l_listentries_rec.reason_id;
1826  END IF;
1827  IF p_list_entries_rec.result_id = FND_API.g_miss_num THEN
1828      x_complete_rec.result_id := l_listentries_rec.result_id;
1829  END IF;
1830  IF p_list_entries_rec.notes = FND_API.g_miss_char THEN
1831      x_complete_rec.notes := l_listentries_rec.notes;
1832  END IF;
1833  IF p_list_entries_rec.VEHICLE_RESPONSE_CODE = FND_API.g_miss_char THEN
1834      x_complete_rec.VEHICLE_RESPONSE_CODE := l_listentries_rec.VEHICLE_RESPONSE_CODE;
1835  END IF;
1836  IF p_list_entries_rec.SALES_AGENT_EMAIL_ADDRESS = FND_API.g_miss_char THEN
1837      x_complete_rec.SALES_AGENT_EMAIL_ADDRESS := l_listentries_rec.SALES_AGENT_EMAIL_ADDRESS;
1838  END IF;
1839  IF p_list_entries_rec.RESOURCE_ID = FND_API.g_miss_num THEN
1840      x_complete_rec.RESOURCE_ID := l_listentries_rec.RESOURCE_ID;
1841  END IF;
1842  IF p_list_entries_rec.location_id = FND_API.g_miss_num THEN
1843      x_complete_rec.location_id := l_listentries_rec.location_id;
1844  END IF;
1845  IF p_list_entries_rec.contact_point_id = FND_API.g_miss_num THEN
1846      x_complete_rec.contact_point_id := l_listentries_rec.contact_point_id;
1847  END IF;
1848  IF p_list_entries_rec.last_contacted_date = FND_API.g_miss_date THEN
1849     x_complete_rec.last_contacted_date := l_listentries_rec.last_contacted_date;
1850  END IF;
1851 END Complete_list_entries_Rec;
1852 
1853 -- Hint: Primary key needs to be returned.
1854 PROCEDURE Create_List_Entries
1855 (
1856   p_api_version_number      IN   NUMBER,
1857   p_init_msg_list           IN   VARCHAR2     := FND_API.G_FALSE,
1858   p_commit                  IN   VARCHAR2     := FND_API.G_FALSE,
1859   p_validation_level        IN   NUMBER       := FND_API.G_VALID_LEVEL_FULL,
1860   x_return_status           OUT NOCOPY  VARCHAR2,
1861   x_msg_count               OUT NOCOPY  NUMBER,
1862   x_msg_data                OUT NOCOPY  VARCHAR2,
1863   p_list_entries_rec        IN   list_entries_rec_type
1864                                   := g_miss_list_entries_rec,
1865   x_list_entry_id           OUT NOCOPY  NUMBER
1866 ) IS
1867    L_API_NAME                  CONSTANT VARCHAR2(30) := 'Create_List_Entries';
1868    L_API_VERSION_NUMBER        CONSTANT NUMBER   := 1.0;
1869    l_return_status_full        VARCHAR2(1);
1870    l_object_version_number     NUMBER := 1;
1871    l_org_id                    NUMBER := FND_API.G_MISS_NUM;
1872    l_LIST_ENTRY_ID             NUMBER;
1873    l_dummy                     NUMBER;
1874 
1875    l_created_by                NUMBER;  --batoleti added this var. For bug# 6688996
1876 
1877    CURSOR c_id IS
1878       SELECT AMS_LIST_ENTRIES_s.NEXTVAL
1879       FROM dual;
1880 
1881    CURSOR c_id_exists (l_id IN NUMBER) IS
1882       SELECT 1 FROM dual
1883       WHERE EXISTS (SELECT 1 FROM AMS_LIST_ENTRIES
1884                     WHERE LIST_ENTRY_ID = l_id);
1885 
1886 /* batoleti. Bug# 6688996. Added the below cursor */
1887     CURSOR cur_get_created_by (x_list_header_id IN NUMBER) IS
1888       SELECT created_by
1889       FROM ams_list_headers_all
1890       WHERE list_header_id= x_list_header_id;
1891 
1892 BEGIN
1893       -- Standard Start of API savepoint
1894       SAVEPOINT CREATE_List_Entries_PVT;
1895 
1896       -- Standard call to check for call compatibility.
1897       IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1898                                            p_api_version_number,
1899                                            l_api_name,
1900                                            G_PKG_NAME)
1901       THEN
1902           RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1903       END IF;
1904 
1905       -- Initialize message list if p_init_msg_list is set to TRUE.
1906       IF FND_API.to_Boolean( p_init_msg_list )
1907       THEN
1908          FND_MSG_PUB.initialize;
1909       END IF;
1910 
1911       -- Debug Message
1912       IF (AMS_DEBUG_HIGH_ON) THEN
1913 
1914       AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
1915       END IF;
1916 
1917 
1918       -- Initialize API return status to SUCCESS
1919       x_return_status := FND_API.G_RET_STS_SUCCESS;
1920 
1921    -- Local variable initialization
1922 
1923    IF p_list_entries_rec.LIST_ENTRY_ID IS NULL
1924       OR
1925       p_list_entries_rec.LIST_ENTRY_ID = FND_API.g_miss_num THEN
1926       LOOP
1927          l_dummy := NULL;
1928          OPEN c_id;
1929          FETCH c_id INTO l_LIST_ENTRY_ID;
1930          CLOSE c_id;
1931 
1932          OPEN c_id_exists(l_LIST_ENTRY_ID);
1933          FETCH c_id_exists INTO l_dummy;
1934          CLOSE c_id_exists;
1935          EXIT WHEN l_dummy IS NULL;
1936       END LOOP;
1937    END IF;
1938    x_list_entry_id := l_list_entry_id;
1939 
1940    -- =========================================================================
1941    -- Validate Environment
1942    -- =========================================================================
1943 
1944    IF FND_GLOBAL.User_Id IS NULL THEN
1945       AMS_Utility_PVT.Error_Message(p_message_name => 'USER_PROFILE_MISSING');
1946       RAISE FND_API.G_EXC_ERROR;
1947    END IF;
1948 
1949    IF ( p_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
1950       -- Debug message
1951       IF (AMS_DEBUG_HIGH_ON) THEN
1952 
1953       AMS_UTILITY_PVT.debug_message('Private API: Validate_List_Entries');
1954       END IF;
1955 
1956       -- Invoke validation procedures
1957       Validate_list_entries(
1958          p_api_version_number     => 1.0,
1959          p_init_msg_list    => FND_API.G_FALSE,
1960          p_validation_level => p_validation_level,
1961 	 p_validation_mode => JTF_PLSQL_API.g_create,
1962          p_list_entries_rec  =>  p_list_entries_rec,
1963          x_return_status    => x_return_status,
1964          x_msg_count        => x_msg_count,
1965          x_msg_data         => x_msg_data);
1966    END IF;
1967 
1968       IF (AMS_DEBUG_HIGH_ON) THEN
1969 
1970 
1971 
1972       AMS_UTILITY_PVT.debug_message('Private API: After Validate' );
1973 
1974       END IF;
1975    IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1976       IF (AMS_DEBUG_HIGH_ON) THEN
1977 
1978       AMS_UTILITY_PVT.debug_message('Private API: After Validate failed'   );
1979       END IF;
1980       RAISE FND_API.G_EXC_ERROR;
1981    END IF;
1982 
1983 
1984    -- Debug Message
1985    IF (AMS_DEBUG_HIGH_ON) THEN
1986 
1987    AMS_UTILITY_PVT.debug_message( 'Private API: Calling create table handler');
1988    END IF;
1989 
1990       -- batoleti  coding starts for bug# 6688996
1991       l_created_by := 0;
1992 
1993        OPEN cur_get_created_by(p_list_entries_rec.list_header_id);
1994 
1995        FETCH cur_get_created_by INTO l_created_by;
1996        CLOSE cur_get_created_by;
1997 
1998    -- batoleti  coding ends for bug# 6688996
1999 
2000 
2001    -- Invoke table handler(AMS_LIST_ENTRIES_PKG.Insert_Row)
2002    AMS_LIST_ENTRIES_PKG.Insert_Row(
2003       px_list_entry_id  => l_list_entry_id,
2004       p_list_header_id  => p_list_entries_rec.list_header_id,
2005       p_last_update_date  => SYSDATE,
2006       p_last_updated_by  => FND_GLOBAL.USER_ID,
2007       p_creation_date  => SYSDATE,
2008       p_created_by  => nvl(l_created_by, FND_GLOBAL.USER_ID),
2009       p_last_update_login  => FND_GLOBAL.CONC_LOGIN_ID,
2010       px_object_version_number  => l_object_version_number,
2011       p_list_select_action_id  => p_list_entries_rec.list_select_action_id,
2012       p_arc_list_select_action_from  => p_list_entries_rec.arc_list_select_action_from,
2013       p_list_select_action_from_name  => p_list_entries_rec.list_select_action_from_name,
2014       p_source_code  => p_list_entries_rec.source_code,
2015       p_arc_list_used_by_source  => p_list_entries_rec.arc_list_used_by_source,
2016       p_source_code_for_id  => p_list_entries_rec.source_code_for_id,
2017       p_pin_code  => l_list_entry_id,
2018       p_list_entry_source_system_id  => p_list_entries_rec.list_entry_source_system_id,
2019       p_list_entry_source_system_tp  => p_list_entries_rec.list_entry_source_system_type,
2020       p_view_application_id  => p_list_entries_rec.view_application_id,
2021       p_manually_entered_flag  => p_list_entries_rec.manually_entered_flag,
2022       p_marked_as_duplicate_flag  => p_list_entries_rec.marked_as_duplicate_flag,
2023       p_marked_as_random_flag  => p_list_entries_rec.marked_as_random_flag,
2024       p_part_of_control_group_flag  => p_list_entries_rec.part_of_control_group_flag,
2025       p_exclude_in_triggered_list_fg  => p_list_entries_rec.exclude_in_triggered_list_flag,
2026       p_enabled_flag  => p_list_entries_rec.enabled_flag,
2027       p_cell_code  => p_list_entries_rec.cell_code,
2028       p_dedupe_key  => p_list_entries_rec.dedupe_key,
2029       p_randomly_generated_number  => p_list_entries_rec.randomly_generated_number,
2030       p_campaign_id  => p_list_entries_rec.campaign_id,
2031       p_media_id  => p_list_entries_rec.media_id,
2032       p_channel_id  => p_list_entries_rec.channel_id,
2033       p_channel_schedule_id  => p_list_entries_rec.channel_schedule_id,
2034       p_event_offer_id  => p_list_entries_rec.event_offer_id,
2035       p_customer_id  => p_list_entries_rec.customer_id,
2036       p_market_segment_id  => p_list_entries_rec.market_segment_id,
2037       p_vendor_id  => p_list_entries_rec.vendor_id,
2038       p_transfer_flag  => p_list_entries_rec.transfer_flag,
2039       p_transfer_status  => p_list_entries_rec.transfer_status,
2040       p_list_source  => p_list_entries_rec.list_source,
2041       p_duplicate_master_entry_id  => p_list_entries_rec.duplicate_master_entry_id,
2042       p_marked_flag  => p_list_entries_rec.marked_flag,
2043       p_lead_id  => p_list_entries_rec.lead_id,
2044       p_letter_id  => p_list_entries_rec.letter_id,
2045       p_picking_header_id  => p_list_entries_rec.picking_header_id,
2046       p_batch_id  => p_list_entries_rec.batch_id,
2047       p_suffix  => p_list_entries_rec.suffix,
2048       p_first_name  => p_list_entries_rec.first_name,
2049       p_last_name  => p_list_entries_rec.last_name,
2050       p_customer_name  => p_list_entries_rec.customer_name,
2051       p_title  => p_list_entries_rec.title,
2052       p_address_line1  => p_list_entries_rec.address_line1,
2053       p_address_line2  => p_list_entries_rec.address_line2,
2054       p_city  => p_list_entries_rec.city,
2055       p_state  => p_list_entries_rec.state,
2056       p_zipcode  => p_list_entries_rec.zipcode,
2057       p_country  => p_list_entries_rec.country,
2058       p_fax  => p_list_entries_rec.fax,
2059       p_phone  => p_list_entries_rec.phone,
2060       p_email_address  => p_list_entries_rec.email_address,
2061       p_col1  => p_list_entries_rec.col1,
2062       p_col2  => p_list_entries_rec.col2,
2063       p_col3  => p_list_entries_rec.col3,
2064       p_col4  => p_list_entries_rec.col4,
2065       p_col5  => p_list_entries_rec.col5,
2066       p_col6  => p_list_entries_rec.col6,
2067       p_col7  => p_list_entries_rec.col7,
2068       p_col8  => p_list_entries_rec.col8,
2069       p_col9  => p_list_entries_rec.col9,
2070       p_col10  => p_list_entries_rec.col10,
2071       p_col11  => p_list_entries_rec.col11,
2072       p_col12  => p_list_entries_rec.col12,
2073       p_col13  => p_list_entries_rec.col13,
2074       p_col14  => p_list_entries_rec.col14,
2075       p_col15  => p_list_entries_rec.col15,
2076       p_col16  => p_list_entries_rec.col16,
2077       p_col17  => p_list_entries_rec.col17,
2078       p_col18  => p_list_entries_rec.col18,
2079       p_col19  => p_list_entries_rec.col19,
2080       p_col20  => p_list_entries_rec.col20,
2081       p_col21  => p_list_entries_rec.col21,
2082       p_col22  => p_list_entries_rec.col22,
2083       p_col23  => p_list_entries_rec.col23,
2084       p_col24  => p_list_entries_rec.col24,
2085       p_col25  => p_list_entries_rec.col25,
2086       p_col26  => p_list_entries_rec.col26,
2087       p_col27  => p_list_entries_rec.col27,
2088       p_col28  => p_list_entries_rec.col28,
2089       p_col29  => p_list_entries_rec.col29,
2090       p_col30  => p_list_entries_rec.col30,
2091       p_col31  => p_list_entries_rec.col31,
2092       p_col32  => p_list_entries_rec.col32,
2093       p_col33  => p_list_entries_rec.col33,
2094       p_col34  => p_list_entries_rec.col34,
2095       p_col35  => p_list_entries_rec.col35,
2096       p_col36  => p_list_entries_rec.col36,
2097       p_col37  => p_list_entries_rec.col37,
2098       p_col38  => p_list_entries_rec.col38,
2099       p_col39  => p_list_entries_rec.col39,
2100       p_col40  => p_list_entries_rec.col40,
2101       p_col41  => p_list_entries_rec.col41,
2102       p_col42  => p_list_entries_rec.col42,
2103       p_col43  => p_list_entries_rec.col43,
2104       p_col44  => p_list_entries_rec.col44,
2105       p_col45  => p_list_entries_rec.col45,
2106       p_col46  => p_list_entries_rec.col46,
2107       p_col47  => p_list_entries_rec.col47,
2108       p_col48  => p_list_entries_rec.col48,
2109       p_col49  => p_list_entries_rec.col49,
2110       p_col50  => p_list_entries_rec.col50,
2111       p_col51  => p_list_entries_rec.col51,
2112       p_col52  => p_list_entries_rec.col52,
2113       p_col53  => p_list_entries_rec.col53,
2114       p_col54  => p_list_entries_rec.col54,
2115       p_col55  => p_list_entries_rec.col55,
2116       p_col56  => p_list_entries_rec.col56,
2117       p_col57  => p_list_entries_rec.col57,
2118       p_col58  => p_list_entries_rec.col58,
2119       p_col59  => p_list_entries_rec.col59,
2120       p_col60  => p_list_entries_rec.col60,
2121       p_col61  => p_list_entries_rec.col61,
2122       p_col62  => p_list_entries_rec.col62,
2123       p_col63  => p_list_entries_rec.col63,
2124       p_col64  => p_list_entries_rec.col64,
2125       p_col65  => p_list_entries_rec.col65,
2126       p_col66  => p_list_entries_rec.col66,
2127       p_col67  => p_list_entries_rec.col67,
2128       p_col68  => p_list_entries_rec.col68,
2129       p_col69  => p_list_entries_rec.col69,
2130       p_col70  => p_list_entries_rec.col70,
2131       p_col71  => p_list_entries_rec.col71,
2132       p_col72  => p_list_entries_rec.col72,
2133       p_col73  => p_list_entries_rec.col73,
2134       p_col74  => p_list_entries_rec.col74,
2135       p_col75  => p_list_entries_rec.col75,
2136       p_col76  => p_list_entries_rec.col76,
2137       p_col77  => p_list_entries_rec.col77,
2138       p_col78  => p_list_entries_rec.col78,
2139       p_col79  => p_list_entries_rec.col79,
2140       p_col80  => p_list_entries_rec.col80,
2141       p_col81  => p_list_entries_rec.col81,
2142       p_col82  => p_list_entries_rec.col82,
2143       p_col83  => p_list_entries_rec.col83,
2144       p_col84  => p_list_entries_rec.col84,
2145       p_col85  => p_list_entries_rec.col85,
2146       p_col86  => p_list_entries_rec.col86,
2147       p_col87  => p_list_entries_rec.col87,
2148       p_col88  => p_list_entries_rec.col88,
2149       p_col89  => p_list_entries_rec.col89,
2150       p_col90  => p_list_entries_rec.col90,
2151       p_col91  => p_list_entries_rec.col91,
2152       p_col92  => p_list_entries_rec.col92,
2153       p_col93  => p_list_entries_rec.col93,
2154       p_col94  => p_list_entries_rec.col94,
2155       p_col95  => p_list_entries_rec.col95,
2156       p_col96  => p_list_entries_rec.col96,
2157       p_col97  => p_list_entries_rec.col97,
2158       p_col98  => p_list_entries_rec.col98,
2159       p_col99  => p_list_entries_rec.col99,
2160       p_col100  => p_list_entries_rec.col100,
2161       p_col101  => p_list_entries_rec.col101,
2162       p_col102  => p_list_entries_rec.col102,
2163       p_col103  => p_list_entries_rec.col103,
2164       p_col104  => p_list_entries_rec.col104,
2165       p_col105  => p_list_entries_rec.col105,
2166       p_col106  => p_list_entries_rec.col106,
2167       p_col107  => p_list_entries_rec.col107,
2168       p_col108  => p_list_entries_rec.col108,
2169       p_col109  => p_list_entries_rec.col109,
2170       p_col110  => p_list_entries_rec.col110,
2171       p_col111  => p_list_entries_rec.col111,
2172       p_col112  => p_list_entries_rec.col112,
2173       p_col113  => p_list_entries_rec.col113,
2174       p_col114  => p_list_entries_rec.col114,
2175       p_col115  => p_list_entries_rec.col115,
2176       p_col116  => p_list_entries_rec.col116,
2177       p_col117  => p_list_entries_rec.col117,
2178       p_col118  => p_list_entries_rec.col118,
2179       p_col119  => p_list_entries_rec.col119,
2180       p_col120  => p_list_entries_rec.col120,
2181       p_col121  => p_list_entries_rec.col121,
2182       p_col122  => p_list_entries_rec.col122,
2183       p_col123  => p_list_entries_rec.col123,
2184       p_col124  => p_list_entries_rec.col124,
2185       p_col125  => p_list_entries_rec.col125,
2186       p_col126  => p_list_entries_rec.col126,
2187       p_col127  => p_list_entries_rec.col127,
2188       p_col128  => p_list_entries_rec.col128,
2189       p_col129  => p_list_entries_rec.col129,
2190       p_col130  => p_list_entries_rec.col130,
2191       p_col131  => p_list_entries_rec.col131,
2192       p_col132  => p_list_entries_rec.col132,
2193       p_col133  => p_list_entries_rec.col133,
2194       p_col134  => p_list_entries_rec.col134,
2195       p_col135  => p_list_entries_rec.col135,
2196       p_col136  => p_list_entries_rec.col136,
2197       p_col137  => p_list_entries_rec.col137,
2198       p_col138  => p_list_entries_rec.col138,
2199       p_col139  => p_list_entries_rec.col139,
2200       p_col140  => p_list_entries_rec.col140,
2201       p_col141  => p_list_entries_rec.col141,
2202       p_col142  => p_list_entries_rec.col142,
2203       p_col143  => p_list_entries_rec.col143,
2204       p_col144  => p_list_entries_rec.col144,
2205       p_col145  => p_list_entries_rec.col145,
2206       p_col146  => p_list_entries_rec.col146,
2207       p_col147  => p_list_entries_rec.col147,
2208       p_col148  => p_list_entries_rec.col148,
2209       p_col149  => p_list_entries_rec.col149,
2210       p_col150  => p_list_entries_rec.col150,
2211       p_col151  => p_list_entries_rec.col151,
2212       p_col152  => p_list_entries_rec.col152,
2213       p_col153  => p_list_entries_rec.col153,
2214       p_col154  => p_list_entries_rec.col154,
2215       p_col155  => p_list_entries_rec.col155,
2216       p_col156  => p_list_entries_rec.col156,
2217       p_col157  => p_list_entries_rec.col157,
2218       p_col158  => p_list_entries_rec.col158,
2219       p_col159  => p_list_entries_rec.col159,
2220       p_col160  => p_list_entries_rec.col160,
2221       p_col161  => p_list_entries_rec.col161,
2222       p_col162  => p_list_entries_rec.col162,
2223       p_col163  => p_list_entries_rec.col163,
2224       p_col164  => p_list_entries_rec.col164,
2225       p_col165  => p_list_entries_rec.col165,
2226       p_col166  => p_list_entries_rec.col166,
2227       p_col167  => p_list_entries_rec.col167,
2228       p_col168  => p_list_entries_rec.col168,
2229       p_col169  => p_list_entries_rec.col169,
2230       p_col170  => p_list_entries_rec.col170,
2231       p_col171  => p_list_entries_rec.col171,
2232       p_col172  => p_list_entries_rec.col172,
2233       p_col173  => p_list_entries_rec.col173,
2234       p_col174  => p_list_entries_rec.col174,
2235       p_col175  => p_list_entries_rec.col175,
2236       p_col176  => p_list_entries_rec.col176,
2237       p_col177  => p_list_entries_rec.col177,
2238       p_col178  => p_list_entries_rec.col178,
2239       p_col179  => p_list_entries_rec.col179,
2240       p_col180  => p_list_entries_rec.col180,
2241       p_col181  => p_list_entries_rec.col181,
2242       p_col182  => p_list_entries_rec.col182,
2243       p_col183  => p_list_entries_rec.col183,
2244       p_col184  => p_list_entries_rec.col184,
2245       p_col185  => p_list_entries_rec.col185,
2246       p_col186  => p_list_entries_rec.col186,
2247       p_col187  => p_list_entries_rec.col187,
2248       p_col188  => p_list_entries_rec.col188,
2249       p_col189  => p_list_entries_rec.col189,
2250       p_col190  => p_list_entries_rec.col190,
2251       p_col191  => p_list_entries_rec.col191,
2252       p_col192  => p_list_entries_rec.col192,
2253       p_col193  => p_list_entries_rec.col193,
2254       p_col194  => p_list_entries_rec.col194,
2255       p_col195  => p_list_entries_rec.col195,
2256       p_col196  => p_list_entries_rec.col196,
2257       p_col197  => p_list_entries_rec.col197,
2258       p_col198  => p_list_entries_rec.col198,
2259       p_col199  => p_list_entries_rec.col199,
2260       p_col200  => p_list_entries_rec.col200,
2261       p_col201  => p_list_entries_rec.col201,
2262       p_col202  => p_list_entries_rec.col202,
2263       p_col203  => p_list_entries_rec.col203,
2264       p_col204  => p_list_entries_rec.col204,
2265       p_col205  => p_list_entries_rec.col205,
2266       p_col206  => p_list_entries_rec.col206,
2267       p_col207  => p_list_entries_rec.col207,
2268       p_col208  => p_list_entries_rec.col208,
2269       p_col209  => p_list_entries_rec.col209,
2270       p_col210  => p_list_entries_rec.col210,
2271       p_col211  => p_list_entries_rec.col211,
2272       p_col212  => p_list_entries_rec.col212,
2273       p_col213  => p_list_entries_rec.col213,
2274       p_col214  => p_list_entries_rec.col214,
2275       p_col215  => p_list_entries_rec.col215,
2276       p_col216  => p_list_entries_rec.col216,
2277       p_col217  => p_list_entries_rec.col217,
2278       p_col218  => p_list_entries_rec.col218,
2279       p_col219  => p_list_entries_rec.col219,
2280       p_col220  => p_list_entries_rec.col220,
2281       p_col221  => p_list_entries_rec.col221,
2282       p_col222  => p_list_entries_rec.col222,
2283       p_col223  => p_list_entries_rec.col223,
2284       p_col224  => p_list_entries_rec.col224,
2285       p_col225  => p_list_entries_rec.col225,
2286       p_col226  => p_list_entries_rec.col226,
2287       p_col227  => p_list_entries_rec.col227,
2288       p_col228  => p_list_entries_rec.col228,
2289       p_col229  => p_list_entries_rec.col229,
2290       p_col230  => p_list_entries_rec.col230,
2291       p_col231  => p_list_entries_rec.col231,
2292       p_col232  => p_list_entries_rec.col232,
2293       p_col233  => p_list_entries_rec.col233,
2294       p_col234  => p_list_entries_rec.col234,
2295       p_col235  => p_list_entries_rec.col235,
2296       p_col236  => p_list_entries_rec.col236,
2297       p_col237  => p_list_entries_rec.col237,
2298       p_col238  => p_list_entries_rec.col238,
2299       p_col239  => p_list_entries_rec.col239,
2300       p_col240  => p_list_entries_rec.col240,
2301       p_col241  => p_list_entries_rec.col241,
2302       p_col242  => p_list_entries_rec.col242,
2303       p_col243  => p_list_entries_rec.col243,
2304       p_col244  => p_list_entries_rec.col244,
2305       p_col245  => p_list_entries_rec.col245,
2306       p_col246  => p_list_entries_rec.col246,
2307       p_col247  => p_list_entries_rec.col247,
2308       p_col248  => p_list_entries_rec.col248,
2309       p_col249  => p_list_entries_rec.col249,
2310       p_col250  => p_list_entries_rec.col250,
2311       p_col251  => p_list_entries_rec.col251,
2312       p_col252  => p_list_entries_rec.col252,
2313       p_col253  => p_list_entries_rec.col253,
2314       p_col254  => p_list_entries_rec.col254,
2315       p_col255  => p_list_entries_rec.col255,
2316       p_col256  => p_list_entries_rec.col256,
2317       p_col257  => p_list_entries_rec.col257,
2318       p_col258  => p_list_entries_rec.col258,
2319       p_col259  => p_list_entries_rec.col259,
2320       p_col260  => p_list_entries_rec.col260,
2321       p_col261  => p_list_entries_rec.col261,
2322       p_col262  => p_list_entries_rec.col262,
2323       p_col263  => p_list_entries_rec.col263,
2324       p_col264  => p_list_entries_rec.col264,
2325       p_col265  => p_list_entries_rec.col265,
2326       p_col266  => p_list_entries_rec.col266,
2327       p_col267  => p_list_entries_rec.col267,
2328       p_col268  => p_list_entries_rec.col268,
2329       p_col269  => p_list_entries_rec.col269,
2330       p_col270  => p_list_entries_rec.col270,
2331       p_col271  => p_list_entries_rec.col271,
2332       p_col272  => p_list_entries_rec.col272,
2333       p_col273  => p_list_entries_rec.col273,
2334       p_col274  => p_list_entries_rec.col274,
2335       p_col275  => p_list_entries_rec.col275,
2336       p_col276  => p_list_entries_rec.col276,
2337       p_col277  => p_list_entries_rec.col277,
2338       p_col278  => p_list_entries_rec.col278,
2339       p_col279  => p_list_entries_rec.col279,
2340       p_col280  => p_list_entries_rec.col280,
2341       p_col281  => p_list_entries_rec.col281,
2342       p_col282  => p_list_entries_rec.col282,
2343       p_col283  => p_list_entries_rec.col283,
2344       p_col284  => p_list_entries_rec.col284,
2345       p_col285  => p_list_entries_rec.col285,
2346       p_col286  => p_list_entries_rec.col286,
2347       p_col287  => p_list_entries_rec.col287,
2348       p_col288  => p_list_entries_rec.col288,
2349       p_col289  => p_list_entries_rec.col289,
2350       p_col290  => p_list_entries_rec.col290,
2351       p_col291  => p_list_entries_rec.col291,
2352       p_col292  => p_list_entries_rec.col292,
2353       p_col293  => p_list_entries_rec.col293,
2354       p_col294  => p_list_entries_rec.col294,
2355       p_col295  => p_list_entries_rec.col295,
2356       p_col296  => p_list_entries_rec.col296,
2357       p_col297  => p_list_entries_rec.col297,
2358       p_col298  => p_list_entries_rec.col298,
2359       p_col299  => p_list_entries_rec.col299,
2360       p_col300  => p_list_entries_rec.col300,
2361       p_party_id  => p_list_entries_rec.party_id,
2362       p_parent_party_id  => p_list_entries_rec.parent_party_id,
2363       p_imp_source_line_id  => p_list_entries_rec.imp_source_line_id,
2364       p_usage_restriction  => p_list_entries_rec.usage_restriction,
2365       p_next_call_time  => p_list_entries_rec.next_call_time,
2366       p_callback_flag  => p_list_entries_rec.callback_flag,
2367       p_do_not_use_flag  => p_list_entries_rec.do_not_use_flag,
2368       p_do_not_use_reason  => p_list_entries_rec.do_not_use_reason,
2369       p_record_out_flag  => p_list_entries_rec.record_out_flag,
2370       p_record_release_time  => p_list_entries_rec.record_release_time,
2371       p_group_code => p_list_entries_rec.group_code,
2372       p_newly_updated_flag => p_list_entries_rec.newly_updated_flag,
2373       p_outcome_id => p_list_entries_rec.outcome_id,
2374       p_result_id => p_list_entries_rec.result_id ,
2375       p_reason_id => p_list_entries_rec.reason_id,
2376       p_notes =>  p_list_entries_rec.notes ,
2377       p_VEHICLE_RESPONSE_CODE => p_list_entries_rec.VEHICLE_RESPONSE_CODE ,
2378       p_SALES_AGENT_EMAIL_ADDRESS => p_list_entries_rec.SALES_AGENT_EMAIL_ADDRESS ,
2379       p_RESOURCE_ID  => p_list_entries_rec.RESOURCE_ID ,
2380       p_LOCATION_ID       => p_list_entries_rec.location_id,
2381       p_CONTACT_POINT_ID  => p_list_entries_rec.contact_point_id,
2382       p_last_contacted_date  => p_list_entries_rec.last_contacted_date
2383       );
2384       IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2385           RAISE FND_API.G_EXC_ERROR;
2386       END IF;
2387 --
2388 -- End of API body
2389 --
2390 
2391       -- Standard check for p_commit
2392       IF FND_API.to_Boolean( p_commit )
2393       THEN
2394          COMMIT WORK;
2395       END IF;
2396       -- Debug Message
2397       IF (AMS_DEBUG_HIGH_ON) THEN
2398 
2399       AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
2400       END IF;
2401 
2402       -- Standard call to get message count and if count is 1, get message info.
2403       FND_MSG_PUB.Count_And_Get
2404         (p_count          =>   x_msg_count,
2405          p_data           =>   x_msg_data
2406       );
2407 EXCEPTION
2408 
2409    WHEN AMS_Utility_PVT.resource_locked THEN
2410      x_return_status := FND_API.g_ret_sts_error;
2411      AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
2412 
2413    WHEN FND_API.G_EXC_ERROR THEN
2414      ROLLBACK TO CREATE_List_Entries_PVT;
2415      x_return_status := FND_API.G_RET_STS_ERROR;
2416      -- Standard call to get message count and if count=1, get the message
2417      FND_MSG_PUB.Count_And_Get (
2418             p_encoded => FND_API.G_FALSE,
2419             p_count   => x_msg_count,
2420             p_data    => x_msg_data
2421      );
2422 
2423    WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2424      ROLLBACK TO CREATE_List_Entries_PVT;
2425      x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2426      -- Standard call to get message count and if count=1, get the message
2427      FND_MSG_PUB.Count_And_Get (
2428             p_encoded => FND_API.G_FALSE,
2429             p_count => x_msg_count,
2430             p_data  => x_msg_data
2431      );
2432 
2433    WHEN OTHERS THEN
2434      ROLLBACK TO CREATE_List_Entries_PVT;
2435      x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2436      IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2437      THEN
2438         FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2439      END IF;
2440      -- Standard call to get message count and if count=1, get the message
2441      FND_MSG_PUB.Count_And_Get (
2442             p_encoded => FND_API.G_FALSE,
2443             p_count => x_msg_count,
2444             p_data  => x_msg_data
2445      );
2446 End Create_List_Entries;
2447 
2448 
2449 PROCEDURE Update_List_Entries
2450 (
2451    p_api_version_number         IN   NUMBER,
2452    p_init_msg_list              IN   VARCHAR2     := FND_API.G_FALSE,
2453    p_commit                     IN   VARCHAR2     := FND_API.G_FALSE,
2454    p_validation_level           IN  NUMBER       := FND_API.G_VALID_LEVEL_FULL,
2455    x_return_status              OUT NOCOPY  VARCHAR2,
2456    x_msg_count                  OUT NOCOPY  NUMBER,
2457    x_msg_data                   OUT NOCOPY  VARCHAR2,
2458    p_list_entries_rec               IN    list_entries_rec_type,
2459    x_object_version_number      OUT NOCOPY  NUMBER
2460 ) IS
2461 CURSOR c_get_list_entries(lc_list_entry_id NUMBER) IS
2462     SELECT *
2463     FROM  AMS_LIST_ENTRIES
2464     WHERE list_entry_id = lc_list_entry_id ;
2465 L_API_NAME                  CONSTANT VARCHAR2(30) := 'Update_List_Entries';
2466 L_API_VERSION_NUMBER        CONSTANT NUMBER   := 1.0;
2467 -- Local Variables
2468 l_object_version_number     NUMBER;
2469 l_LIST_ENTRY_ID    NUMBER;
2470 l_ref_list_entries_rec  c_get_List_Entries%ROWTYPE ;
2471 l_tar_list_entries_rec  AMS_List_Entries_PVT.list_entries_rec_type := P_list_entries_rec;
2472 l_rowid  ROWID;
2473 x_list_entries_rec        AMS_List_Entries_PVT.list_entries_rec_type ;
2474 
2475 l_created_by                NUMBER;  --batoleti added this var. For bug# 6688996
2476 
2477 /* batoleti. Bug# 6688996. Added the below cursor */
2478     CURSOR cur_get_created_by (x_list_header_id IN NUMBER) IS
2479       SELECT created_by
2480       FROM ams_list_headers_all
2481       WHERE list_header_id= x_list_header_id;
2482 
2483  BEGIN
2484       -- Standard Start of API savepoint
2485       SAVEPOINT UPDATE_List_Entries_PVT;
2486 
2487       -- Standard call to check for call compatibility.
2488       IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2489                                            p_api_version_number,
2490                                            l_api_name,
2491                                            G_PKG_NAME)
2492       THEN
2493           RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2494       END IF;
2495 
2496       -- Initialize message list if p_init_msg_list is set to TRUE.
2497       IF FND_API.to_Boolean( p_init_msg_list )
2498       THEN
2499          FND_MSG_PUB.initialize;
2500       END IF;
2501 
2502       -- Debug Message
2503       IF (AMS_DEBUG_HIGH_ON) THEN
2504 
2505       AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
2506       END IF;
2507 
2508 
2509       -- Initialize API return status to SUCCESS
2510       x_return_status := FND_API.G_RET_STS_SUCCESS;
2511 
2512       -- Debug Message
2513       IF (AMS_DEBUG_HIGH_ON) THEN
2514 
2515       AMS_UTILITY_PVT.debug_message('Private API: - Open Cursor to Select');
2516       END IF;
2517 
2518       OPEN c_get_List_Entries( l_tar_list_entries_rec.list_entry_id);
2519 
2520       FETCH c_get_List_Entries INTO l_ref_list_entries_rec  ;
2521 
2522        If ( c_get_List_Entries%NOTFOUND) THEN
2523   AMS_Utility_PVT.Error_Message(p_message_name => 'API_MISSING_UPDATE_TARGET',
2524    p_token_name   => 'INFO',
2525  p_token_value  => 'List_Entries' || P_list_entries_rec.list_entry_id) ;
2526            RAISE FND_API.G_EXC_ERROR;
2527        END IF;
2528        -- Debug Message
2529        IF (AMS_DEBUG_HIGH_ON) THEN
2530 
2531        AMS_UTILITY_PVT.debug_message('Private API: - Close Cursor');
2532        END IF;
2533        CLOSE     c_get_List_Entries;
2534 
2535 
2536       If (l_tar_list_entries_rec.object_version_number is NULL or
2537           l_tar_list_entries_rec.object_version_number = FND_API.G_MISS_NUM ) Then
2538   AMS_Utility_PVT.Error_Message(p_message_name => 'API_VERSION_MISSING',
2539    p_token_name   => 'COLUMN',
2540  p_token_value  => 'object_version_number') ;
2541           raise FND_API.G_EXC_ERROR;
2542       End if;
2543       -- Check Whether record has been changed by someone else
2544       If (l_tar_list_entries_rec.object_version_number <> l_ref_list_entries_rec.object_version_number) Then
2545   AMS_Utility_PVT.Error_Message(p_message_name => 'API_RECORD_CHANGED',
2546    p_token_name   => 'INFO',
2547  p_token_value  => 'List_Entries') ;
2548           raise FND_API.G_EXC_ERROR;
2549       End if;
2550        Complete_list_entries_Rec (
2551         P_list_entries_rec    =>  P_list_entries_rec     ,
2552         x_complete_rec       =>  x_list_entries_rec        );
2553 
2554       IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
2555       THEN
2556           -- Debug message
2557           IF (AMS_DEBUG_HIGH_ON) THEN
2558 
2559           AMS_UTILITY_PVT.debug_message('Private API: Validate_List_Entries');
2560           END IF;
2561 
2562           -- Invoke validation procedures
2563           Validate_list_entries(
2564             p_api_version_number     => 1.0,
2565             p_init_msg_list    => FND_API.G_FALSE,
2566             p_validation_level => p_validation_level,
2567 	    p_validation_mode => JTF_PLSQL_API.g_update,
2568             p_list_entries_rec  =>  x_list_entries_rec,
2569             x_return_status    => x_return_status,
2570             x_msg_count        => x_msg_count,
2571             x_msg_data         => x_msg_data);
2572       END IF;
2573 
2574       IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2575           RAISE FND_API.G_EXC_ERROR;
2576       END IF;
2577 
2578       -- Debug Message
2579 
2580          -- batoleti  coding starts for bug# 6688996
2581       l_created_by := 0;
2582 
2583        OPEN cur_get_created_by(x_list_entries_rec.list_header_id);
2584 
2585        FETCH cur_get_created_by INTO l_created_by;
2586        CLOSE cur_get_created_by;
2587 
2588    -- batoleti  coding ends for bug# 6688996
2589 
2590 
2591       -- Invoke table handler(AMS_LIST_ENTRIES_PKG.Update_Row)
2592       AMS_LIST_ENTRIES_PKG.Update_Row(
2593           p_list_entry_id  => x_list_entries_rec.list_entry_id,
2594           p_list_header_id  => x_list_entries_rec.list_header_id,
2595           p_last_update_date  => SYSDATE,
2596           p_last_updated_by  => FND_GLOBAL.USER_ID,
2597           p_creation_date  => SYSDATE,
2598           p_created_by  => nvl(l_created_by, FND_GLOBAL.USER_ID),
2599           p_last_update_login  => FND_GLOBAL.CONC_LOGIN_ID,
2600           p_object_version_number  => x_list_entries_rec.object_version_number,
2601           p_list_select_action_id  => x_list_entries_rec.list_select_action_id,
2602           p_arc_list_select_action_from  => x_list_entries_rec.arc_list_select_action_from,
2603           p_list_select_action_from_name  => x_list_entries_rec.list_select_action_from_name,
2604           p_source_code  => x_list_entries_rec.source_code,
2605           p_arc_list_used_by_source  => x_list_entries_rec.arc_list_used_by_source,
2606           p_source_code_for_id  => x_list_entries_rec.source_code_for_id,
2607           p_pin_code  => x_list_entries_rec.pin_code,
2608           p_list_entry_source_system_id  => x_list_entries_rec.list_entry_source_system_id,
2609           p_list_entry_source_system_tp  => x_list_entries_rec.list_entry_source_system_type,
2610           p_view_application_id  => x_list_entries_rec.view_application_id,
2611           p_manually_entered_flag  => x_list_entries_rec.manually_entered_flag,
2612           p_marked_as_duplicate_flag  => x_list_entries_rec.marked_as_duplicate_flag,
2613           p_marked_as_random_flag  => x_list_entries_rec.marked_as_random_flag,
2614           p_part_of_control_group_flag  => x_list_entries_rec.part_of_control_group_flag,
2615           p_exclude_in_triggered_list_fg  => x_list_entries_rec.exclude_in_triggered_list_flag,
2616           p_enabled_flag  => x_list_entries_rec.enabled_flag,
2617           p_cell_code  => x_list_entries_rec.cell_code,
2618           p_dedupe_key  => x_list_entries_rec.dedupe_key,
2619           p_randomly_generated_number  => x_list_entries_rec.randomly_generated_number,
2620           p_campaign_id  => x_list_entries_rec.campaign_id,
2621           p_media_id  => x_list_entries_rec.media_id,
2622           p_channel_id  => x_list_entries_rec.channel_id,
2623           p_channel_schedule_id  => x_list_entries_rec.channel_schedule_id,
2624           p_event_offer_id  => x_list_entries_rec.event_offer_id,
2625           p_customer_id  => x_list_entries_rec.customer_id,
2626           p_market_segment_id  => x_list_entries_rec.market_segment_id,
2627           p_vendor_id  => x_list_entries_rec.vendor_id,
2628           p_transfer_flag  => x_list_entries_rec.transfer_flag,
2629           p_transfer_status  => x_list_entries_rec.transfer_status,
2630           p_list_source  => x_list_entries_rec.list_source,
2631           p_duplicate_master_entry_id  => x_list_entries_rec.duplicate_master_entry_id,
2632           p_marked_flag  => x_list_entries_rec.marked_flag,
2633           p_lead_id  => x_list_entries_rec.lead_id,
2634           p_letter_id  => x_list_entries_rec.letter_id,
2635           p_picking_header_id  => x_list_entries_rec.picking_header_id,
2636           p_batch_id  => x_list_entries_rec.batch_id,
2637           p_suffix  => x_list_entries_rec.suffix,
2638           p_first_name  => x_list_entries_rec.first_name,
2639           p_last_name  => x_list_entries_rec.last_name,
2640           p_customer_name  => x_list_entries_rec.customer_name,
2641           p_title  => x_list_entries_rec.title,
2642           p_address_line1  => x_list_entries_rec.address_line1,
2643           p_address_line2  => x_list_entries_rec.address_line2,
2644           p_city  => x_list_entries_rec.city,
2645           p_state  => x_list_entries_rec.state,
2646           p_zipcode  => x_list_entries_rec.zipcode,
2647           p_country  => x_list_entries_rec.country,
2648           p_fax  => x_list_entries_rec.fax,
2649           p_phone  => x_list_entries_rec.phone,
2650           p_email_address  => x_list_entries_rec.email_address,
2651           p_col1  => x_list_entries_rec.col1,
2652           p_col2  => x_list_entries_rec.col2,
2653           p_col3  => x_list_entries_rec.col3,
2654           p_col4  => x_list_entries_rec.col4,
2655           p_col5  => x_list_entries_rec.col5,
2656           p_col6  => x_list_entries_rec.col6,
2657           p_col7  => x_list_entries_rec.col7,
2658           p_col8  => x_list_entries_rec.col8,
2659           p_col9  => x_list_entries_rec.col9,
2660           p_col10  => x_list_entries_rec.col10,
2661           p_col11  => x_list_entries_rec.col11,
2662           p_col12  => x_list_entries_rec.col12,
2663           p_col13  => x_list_entries_rec.col13,
2664           p_col14  => x_list_entries_rec.col14,
2665           p_col15  => x_list_entries_rec.col15,
2666           p_col16  => x_list_entries_rec.col16,
2667           p_col17  => x_list_entries_rec.col17,
2668           p_col18  => x_list_entries_rec.col18,
2669           p_col19  => x_list_entries_rec.col19,
2670           p_col20  => x_list_entries_rec.col20,
2671           p_col21  => x_list_entries_rec.col21,
2672           p_col22  => x_list_entries_rec.col22,
2673           p_col23  => x_list_entries_rec.col23,
2674           p_col24  => x_list_entries_rec.col24,
2675           p_col25  => x_list_entries_rec.col25,
2676           p_col26  => x_list_entries_rec.col26,
2677           p_col27  => x_list_entries_rec.col27,
2678           p_col28  => x_list_entries_rec.col28,
2679           p_col29  => x_list_entries_rec.col29,
2680           p_col30  => x_list_entries_rec.col30,
2681           p_col31  => x_list_entries_rec.col31,
2682           p_col32  => x_list_entries_rec.col32,
2683           p_col33  => x_list_entries_rec.col33,
2684           p_col34  => x_list_entries_rec.col34,
2685           p_col35  => x_list_entries_rec.col35,
2686           p_col36  => x_list_entries_rec.col36,
2687           p_col37  => x_list_entries_rec.col37,
2688           p_col38  => x_list_entries_rec.col38,
2689           p_col39  => x_list_entries_rec.col39,
2690           p_col40  => x_list_entries_rec.col40,
2691           p_col41  => x_list_entries_rec.col41,
2692           p_col42  => x_list_entries_rec.col42,
2693           p_col43  => x_list_entries_rec.col43,
2694           p_col44  => x_list_entries_rec.col44,
2695           p_col45  => x_list_entries_rec.col45,
2696           p_col46  => x_list_entries_rec.col46,
2697           p_col47  => x_list_entries_rec.col47,
2698           p_col48  => x_list_entries_rec.col48,
2699           p_col49  => x_list_entries_rec.col49,
2700           p_col50  => x_list_entries_rec.col50,
2701           p_col51  => x_list_entries_rec.col51,
2702           p_col52  => x_list_entries_rec.col52,
2703           p_col53  => x_list_entries_rec.col53,
2704           p_col54  => x_list_entries_rec.col54,
2705           p_col55  => x_list_entries_rec.col55,
2706           p_col56  => x_list_entries_rec.col56,
2707           p_col57  => x_list_entries_rec.col57,
2708           p_col58  => x_list_entries_rec.col58,
2709           p_col59  => x_list_entries_rec.col59,
2710           p_col60  => x_list_entries_rec.col60,
2711           p_col61  => x_list_entries_rec.col61,
2712           p_col62  => x_list_entries_rec.col62,
2713           p_col63  => x_list_entries_rec.col63,
2714           p_col64  => x_list_entries_rec.col64,
2715           p_col65  => x_list_entries_rec.col65,
2716           p_col66  => x_list_entries_rec.col66,
2717           p_col67  => x_list_entries_rec.col67,
2718           p_col68  => x_list_entries_rec.col68,
2719           p_col69  => x_list_entries_rec.col69,
2720           p_col70  => x_list_entries_rec.col70,
2721           p_col71  => x_list_entries_rec.col71,
2722           p_col72  => x_list_entries_rec.col72,
2723           p_col73  => x_list_entries_rec.col73,
2724           p_col74  => x_list_entries_rec.col74,
2725           p_col75  => x_list_entries_rec.col75,
2726           p_col76  => x_list_entries_rec.col76,
2727           p_col77  => x_list_entries_rec.col77,
2728           p_col78  => x_list_entries_rec.col78,
2729           p_col79  => x_list_entries_rec.col79,
2730           p_col80  => x_list_entries_rec.col80,
2731           p_col81  => x_list_entries_rec.col81,
2732           p_col82  => x_list_entries_rec.col82,
2733           p_col83  => x_list_entries_rec.col83,
2734           p_col84  => x_list_entries_rec.col84,
2735           p_col85  => x_list_entries_rec.col85,
2736           p_col86  => x_list_entries_rec.col86,
2737           p_col87  => x_list_entries_rec.col87,
2738           p_col88  => x_list_entries_rec.col88,
2739           p_col89  => x_list_entries_rec.col89,
2740           p_col90  => x_list_entries_rec.col90,
2741           p_col91  => x_list_entries_rec.col91,
2742           p_col92  => x_list_entries_rec.col92,
2743           p_col93  => x_list_entries_rec.col93,
2744           p_col94  => x_list_entries_rec.col94,
2745           p_col95  => x_list_entries_rec.col95,
2746           p_col96  => x_list_entries_rec.col96,
2747           p_col97  => x_list_entries_rec.col97,
2748           p_col98  => x_list_entries_rec.col98,
2749           p_col99  => x_list_entries_rec.col99,
2750           p_col100  => x_list_entries_rec.col100,
2751           p_col101  => x_list_entries_rec.col101,
2752           p_col102  => x_list_entries_rec.col102,
2753           p_col103  => x_list_entries_rec.col103,
2754           p_col104  => x_list_entries_rec.col104,
2755           p_col105  => x_list_entries_rec.col105,
2756           p_col106  => x_list_entries_rec.col106,
2757           p_col107  => x_list_entries_rec.col107,
2758           p_col108  => x_list_entries_rec.col108,
2759           p_col109  => x_list_entries_rec.col109,
2760           p_col110  => x_list_entries_rec.col110,
2761           p_col111  => x_list_entries_rec.col111,
2762           p_col112  => x_list_entries_rec.col112,
2763           p_col113  => x_list_entries_rec.col113,
2764           p_col114  => x_list_entries_rec.col114,
2765           p_col115  => x_list_entries_rec.col115,
2766           p_col116  => x_list_entries_rec.col116,
2767           p_col117  => x_list_entries_rec.col117,
2768           p_col118  => x_list_entries_rec.col118,
2769           p_col119  => x_list_entries_rec.col119,
2770           p_col120  => x_list_entries_rec.col120,
2771           p_col121  => x_list_entries_rec.col121,
2772           p_col122  => x_list_entries_rec.col122,
2773           p_col123  => x_list_entries_rec.col123,
2774           p_col124  => x_list_entries_rec.col124,
2775           p_col125  => x_list_entries_rec.col125,
2776           p_col126  => x_list_entries_rec.col126,
2777           p_col127  => x_list_entries_rec.col127,
2778           p_col128  => x_list_entries_rec.col128,
2779           p_col129  => x_list_entries_rec.col129,
2780           p_col130  => x_list_entries_rec.col130,
2781           p_col131  => x_list_entries_rec.col131,
2782           p_col132  => x_list_entries_rec.col132,
2783           p_col133  => x_list_entries_rec.col133,
2784           p_col134  => x_list_entries_rec.col134,
2785           p_col135  => x_list_entries_rec.col135,
2786           p_col136  => x_list_entries_rec.col136,
2787           p_col137  => x_list_entries_rec.col137,
2788           p_col138  => x_list_entries_rec.col138,
2789           p_col139  => x_list_entries_rec.col139,
2790           p_col140  => x_list_entries_rec.col140,
2791           p_col141  => x_list_entries_rec.col141,
2792           p_col142  => x_list_entries_rec.col142,
2793           p_col143  => x_list_entries_rec.col143,
2794           p_col144  => x_list_entries_rec.col144,
2795           p_col145  => x_list_entries_rec.col145,
2796           p_col146  => x_list_entries_rec.col146,
2797           p_col147  => x_list_entries_rec.col147,
2798           p_col148  => x_list_entries_rec.col148,
2799           p_col149  => x_list_entries_rec.col149,
2800           p_col150  => x_list_entries_rec.col150,
2801           p_col151  => x_list_entries_rec.col151,
2802           p_col152  => x_list_entries_rec.col152,
2803           p_col153  => x_list_entries_rec.col153,
2804           p_col154  => x_list_entries_rec.col154,
2805           p_col155  => x_list_entries_rec.col155,
2806           p_col156  => x_list_entries_rec.col156,
2807           p_col157  => x_list_entries_rec.col157,
2808           p_col158  => x_list_entries_rec.col158,
2809           p_col159  => x_list_entries_rec.col159,
2810           p_col160  => x_list_entries_rec.col160,
2811           p_col161  => x_list_entries_rec.col161,
2812           p_col162  => x_list_entries_rec.col162,
2813           p_col163  => x_list_entries_rec.col163,
2814           p_col164  => x_list_entries_rec.col164,
2815           p_col165  => x_list_entries_rec.col165,
2816           p_col166  => x_list_entries_rec.col166,
2817           p_col167  => x_list_entries_rec.col167,
2818           p_col168  => x_list_entries_rec.col168,
2819           p_col169  => x_list_entries_rec.col169,
2820           p_col170  => x_list_entries_rec.col170,
2821           p_col171  => x_list_entries_rec.col171,
2822           p_col172  => x_list_entries_rec.col172,
2823           p_col173  => x_list_entries_rec.col173,
2824           p_col174  => x_list_entries_rec.col174,
2825           p_col175  => x_list_entries_rec.col175,
2826           p_col176  => x_list_entries_rec.col176,
2827           p_col177  => x_list_entries_rec.col177,
2828           p_col178  => x_list_entries_rec.col178,
2829           p_col179  => x_list_entries_rec.col179,
2830           p_col180  => x_list_entries_rec.col180,
2831           p_col181  => x_list_entries_rec.col181,
2832           p_col182  => x_list_entries_rec.col182,
2833           p_col183  => x_list_entries_rec.col183,
2834           p_col184  => x_list_entries_rec.col184,
2835           p_col185  => x_list_entries_rec.col185,
2836           p_col186  => x_list_entries_rec.col186,
2837           p_col187  => x_list_entries_rec.col187,
2838           p_col188  => x_list_entries_rec.col188,
2839           p_col189  => x_list_entries_rec.col189,
2840           p_col190  => x_list_entries_rec.col190,
2841           p_col191  => x_list_entries_rec.col191,
2842           p_col192  => x_list_entries_rec.col192,
2843           p_col193  => x_list_entries_rec.col193,
2844           p_col194  => x_list_entries_rec.col194,
2845           p_col195  => x_list_entries_rec.col195,
2846           p_col196  => x_list_entries_rec.col196,
2847           p_col197  => x_list_entries_rec.col197,
2848           p_col198  => x_list_entries_rec.col198,
2849           p_col199  => x_list_entries_rec.col199,
2850           p_col200  => x_list_entries_rec.col200,
2851           p_col201  => p_list_entries_rec.col201,
2852           p_col202  => p_list_entries_rec.col202,
2853           p_col203  => p_list_entries_rec.col203,
2854           p_col204  => p_list_entries_rec.col204,
2855           p_col205  => p_list_entries_rec.col205,
2856           p_col206  => p_list_entries_rec.col206,
2857           p_col207  => p_list_entries_rec.col207,
2858           p_col208  => p_list_entries_rec.col208,
2859           p_col209  => p_list_entries_rec.col209,
2860           p_col210  => p_list_entries_rec.col210,
2861           p_col211  => p_list_entries_rec.col211,
2862           p_col212  => p_list_entries_rec.col212,
2863           p_col213  => p_list_entries_rec.col213,
2864           p_col214  => p_list_entries_rec.col214,
2865           p_col215  => p_list_entries_rec.col215,
2866           p_col216  => p_list_entries_rec.col216,
2867           p_col217  => p_list_entries_rec.col217,
2868           p_col218  => p_list_entries_rec.col218,
2869           p_col219  => p_list_entries_rec.col219,
2870           p_col220  => p_list_entries_rec.col220,
2871           p_col221  => p_list_entries_rec.col221,
2872           p_col222  => p_list_entries_rec.col222,
2873           p_col223  => p_list_entries_rec.col223,
2874           p_col224  => p_list_entries_rec.col224,
2875           p_col225  => p_list_entries_rec.col225,
2876           p_col226  => p_list_entries_rec.col226,
2877           p_col227  => p_list_entries_rec.col227,
2878           p_col228  => p_list_entries_rec.col228,
2879           p_col229  => p_list_entries_rec.col229,
2880           p_col230  => p_list_entries_rec.col230,
2881           p_col231  => p_list_entries_rec.col231,
2882           p_col232  => p_list_entries_rec.col232,
2883           p_col233  => p_list_entries_rec.col233,
2884           p_col234  => p_list_entries_rec.col234,
2885           p_col235  => p_list_entries_rec.col235,
2886           p_col236  => p_list_entries_rec.col236,
2887           p_col237  => p_list_entries_rec.col237,
2888           p_col238  => p_list_entries_rec.col238,
2889           p_col239  => p_list_entries_rec.col239,
2890           p_col240  => p_list_entries_rec.col240,
2891           p_col241  => p_list_entries_rec.col241,
2892           p_col242  => p_list_entries_rec.col242,
2893           p_col243  => p_list_entries_rec.col243,
2894           p_col244  => p_list_entries_rec.col244,
2895           p_col245  => p_list_entries_rec.col245,
2896           p_col246  => p_list_entries_rec.col246,
2897           p_col247  => p_list_entries_rec.col247,
2898           p_col248  => p_list_entries_rec.col248,
2899           p_col249  => p_list_entries_rec.col249,
2900           p_col250  => p_list_entries_rec.col250,
2901           p_col251  => p_list_entries_rec.col251,
2902           p_col252  => p_list_entries_rec.col252,
2903           p_col253  => p_list_entries_rec.col253,
2904           p_col254  => p_list_entries_rec.col254,
2905           p_col255  => p_list_entries_rec.col255,
2906           p_col256  => p_list_entries_rec.col256,
2907           p_col257  => p_list_entries_rec.col257,
2908           p_col258  => p_list_entries_rec.col258,
2909           p_col259  => p_list_entries_rec.col259,
2910           p_col260  => p_list_entries_rec.col260,
2911           p_col261  => p_list_entries_rec.col261,
2912           p_col262  => p_list_entries_rec.col262,
2913 	  p_col263  => p_list_entries_rec.col263,
2914           p_col264  => p_list_entries_rec.col264,
2915           p_col265  => p_list_entries_rec.col265,
2916           p_col266  => p_list_entries_rec.col266,
2917           p_col267  => p_list_entries_rec.col267,
2918           p_col268  => p_list_entries_rec.col268,
2919           p_col269  => p_list_entries_rec.col269,
2920           p_col270  => p_list_entries_rec.col270,
2921           p_col271  => p_list_entries_rec.col271,
2922           p_col272  => p_list_entries_rec.col272,
2923           p_col273  => p_list_entries_rec.col273,
2924           p_col274  => p_list_entries_rec.col274,
2925           p_col275  => p_list_entries_rec.col275,
2926           p_col276  => p_list_entries_rec.col276,
2927           p_col277  => p_list_entries_rec.col277,
2928           p_col278  => p_list_entries_rec.col278,
2929           p_col279  => p_list_entries_rec.col279,
2930           p_col280  => p_list_entries_rec.col280,
2931           p_col281  => p_list_entries_rec.col281,
2932           p_col282  => p_list_entries_rec.col282,
2933           p_col283  => p_list_entries_rec.col283,
2934           p_col284  => p_list_entries_rec.col284,
2935           p_col285  => p_list_entries_rec.col285,
2936           p_col286  => p_list_entries_rec.col286,
2937           p_col287  => p_list_entries_rec.col287,
2938           p_col288  => p_list_entries_rec.col288,
2939           p_col289  => p_list_entries_rec.col289,
2940           p_col290  => p_list_entries_rec.col290,
2941           p_col291  => p_list_entries_rec.col291,
2942           p_col292  => p_list_entries_rec.col292,
2943           p_col293  => p_list_entries_rec.col293,
2944           p_col294  => p_list_entries_rec.col294,
2945           p_col295  => p_list_entries_rec.col295,
2946           p_col296  => p_list_entries_rec.col296,
2947           p_col297  => p_list_entries_rec.col297,
2948           p_col298  => p_list_entries_rec.col298,
2949           p_col299  => p_list_entries_rec.col299,
2950           p_col300  => p_list_entries_rec.col300,
2951           p_party_id  => x_list_entries_rec.party_id,
2952           p_parent_party_id  => x_list_entries_rec.parent_party_id,
2953           --p_geometry  => x_list_entries_rec.geometry,
2954           p_imp_source_line_id  => x_list_entries_rec.imp_source_line_id,
2955           p_usage_restriction  => x_list_entries_rec.usage_restriction,
2956           p_next_call_time  => x_list_entries_rec.next_call_time,
2957           p_callback_flag  => x_list_entries_rec.callback_flag,
2958           p_do_not_use_flag  => x_list_entries_rec.do_not_use_flag,
2959           p_do_not_use_reason  => x_list_entries_rec.do_not_use_reason,
2960           p_record_out_flag  => x_list_entries_rec.record_out_flag,
2961           p_record_release_time  => x_list_entries_rec.record_release_time,
2962           p_group_code => p_list_entries_rec.group_code,
2963           p_newly_updated_flag => p_list_entries_rec.newly_updated_flag,
2964           p_outcome_id => p_list_entries_rec.outcome_id,
2965           p_result_id => p_list_entries_rec.result_id ,
2966           p_reason_id => p_list_entries_rec.reason_id,
2967       p_notes =>  p_list_entries_rec.notes ,
2968       p_VEHICLE_RESPONSE_CODE => p_list_entries_rec.VEHICLE_RESPONSE_CODE ,
2969       p_SALES_AGENT_EMAIL_ADDRESS => p_list_entries_rec.SALES_AGENT_EMAIL_ADDRESS ,
2970       p_RESOURCE_ID  => p_list_entries_rec.RESOURCE_ID ,
2971       p_LOCATION_ID       => p_list_entries_rec.location_id,
2972       p_CONTACT_POINT_ID  => p_list_entries_rec.contact_point_id,
2973       p_last_contacted_date => p_list_entries_rec.last_contacted_date
2974 	  );
2975       --
2976       -- End of API body.
2977       --
2978 
2979       -- Standard check for p_commit
2980       IF FND_API.to_Boolean( p_commit )
2981       THEN
2982          COMMIT WORK;
2983       END IF;
2984 
2985 
2986       -- Debug Message
2987       IF (AMS_DEBUG_HIGH_ON) THEN
2988 
2989       AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
2990       END IF;
2991 
2992       -- Standard call to get message count and if count is 1, get message info.
2993       FND_MSG_PUB.Count_And_Get
2994         (p_count          =>   x_msg_count,
2995          p_data           =>   x_msg_data
2996       );
2997 EXCEPTION
2998 
2999    WHEN AMS_Utility_PVT.resource_locked THEN
3000      x_return_status := FND_API.g_ret_sts_error;
3001  AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
3002 
3003    WHEN FND_API.G_EXC_ERROR THEN
3004      ROLLBACK TO UPDATE_List_Entries_PVT;
3005      x_return_status := FND_API.G_RET_STS_ERROR;
3006      -- Standard call to get message count and if count=1, get the message
3007      FND_MSG_PUB.Count_And_Get (
3008             p_encoded => FND_API.G_FALSE,
3009             p_count   => x_msg_count,
3010             p_data    => x_msg_data
3011      );
3012 
3013    WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3014      ROLLBACK TO UPDATE_List_Entries_PVT;
3015      x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3016      -- Standard call to get message count and if count=1, get the message
3017      FND_MSG_PUB.Count_And_Get (
3018             p_encoded => FND_API.G_FALSE,
3019             p_count => x_msg_count,
3020             p_data  => x_msg_data
3021      );
3022 
3023    WHEN OTHERS THEN
3024      ROLLBACK TO UPDATE_List_Entries_PVT;
3025      x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3026      IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3027      THEN
3028         FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3029      END IF;
3030      -- Standard call to get message count and if count=1, get the message
3031      FND_MSG_PUB.Count_And_Get (
3032             p_encoded => FND_API.G_FALSE,
3033             p_count => x_msg_count,
3034             p_data  => x_msg_data
3035      );
3036 End Update_List_Entries;
3037 
3038 
3039 PROCEDURE Delete_List_Entries(
3040     p_api_version_number         IN   NUMBER,
3041     p_init_msg_list              IN   VARCHAR2     := FND_API.G_FALSE,
3042     p_commit                     IN   VARCHAR2     := FND_API.G_FALSE,
3043     p_validation_level           IN   NUMBER       := FND_API.G_VALID_LEVEL_FULL,
3044     x_return_status              OUT NOCOPY  VARCHAR2,
3045     x_msg_count                  OUT NOCOPY  NUMBER,
3046     x_msg_data                   OUT NOCOPY  VARCHAR2,
3047     p_list_entry_id                   IN  NUMBER,
3048     p_object_version_number      IN   NUMBER
3049     )
3050 
3051  IS
3052 L_API_NAME                  CONSTANT VARCHAR2(30) := 'Delete_List_Entries';
3053 L_API_VERSION_NUMBER        CONSTANT NUMBER   := 1.0;
3054 l_object_version_number     NUMBER;
3055 
3056  BEGIN
3057       -- Standard Start of API savepoint
3058       SAVEPOINT DELETE_List_Entries_PVT;
3059 
3060       -- Standard call to check for call compatibility.
3061       IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3062                                            p_api_version_number,
3063                                            l_api_name,
3064                                            G_PKG_NAME)
3065       THEN
3066           RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3067       END IF;
3068 
3069       -- Initialize message list if p_init_msg_list is set to TRUE.
3070       IF FND_API.to_Boolean( p_init_msg_list )
3071       THEN
3072          FND_MSG_PUB.initialize;
3073       END IF;
3074 
3075       -- Debug Message
3076       IF (AMS_DEBUG_HIGH_ON) THEN
3077 
3078       AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
3079       END IF;
3080 
3081 
3082       -- Initialize API return status to SUCCESS
3083       x_return_status := FND_API.G_RET_STS_SUCCESS;
3084 
3085       --
3086       -- Api body
3087       --
3088       -- Debug Message
3089       IF (AMS_DEBUG_HIGH_ON) THEN
3090 
3091       AMS_UTILITY_PVT.debug_message( 'Private API: Calling delete table handler');
3092       END IF;
3093 
3094       -- Invoke table handler(AMS_LIST_ENTRIES_PKG.Delete_Row)
3095       AMS_LIST_ENTRIES_PKG.Delete_Row(
3096           p_LIST_ENTRY_ID  => p_LIST_ENTRY_ID);
3097       --
3098       -- End of API body
3099       --
3100 
3101       -- Standard check for p_commit
3102       IF FND_API.to_Boolean( p_commit )
3103       THEN
3104          COMMIT WORK;
3105       END IF;
3106 
3107 
3108       -- Debug Message
3109       IF (AMS_DEBUG_HIGH_ON) THEN
3110 
3111       AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
3112       END IF;
3113 
3114       -- Standard call to get message count and if count is 1, get message info.
3115       FND_MSG_PUB.Count_And_Get
3116         (p_count          =>   x_msg_count,
3117          p_data           =>   x_msg_data
3118       );
3119 EXCEPTION
3120 
3121    WHEN AMS_Utility_PVT.resource_locked THEN
3122      x_return_status := FND_API.g_ret_sts_error;
3123  AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
3124 
3125    WHEN FND_API.G_EXC_ERROR THEN
3126      ROLLBACK TO DELETE_List_Entries_PVT;
3127      x_return_status := FND_API.G_RET_STS_ERROR;
3128      -- Standard call to get message count and if count=1, get the message
3129      FND_MSG_PUB.Count_And_Get (
3130             p_encoded => FND_API.G_FALSE,
3131             p_count   => x_msg_count,
3132             p_data    => x_msg_data
3133      );
3134 
3135    WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3136      ROLLBACK TO DELETE_List_Entries_PVT;
3137      x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3138      -- Standard call to get message count and if count=1, get the message
3139      FND_MSG_PUB.Count_And_Get (
3140             p_encoded => FND_API.G_FALSE,
3141             p_count => x_msg_count,
3142             p_data  => x_msg_data
3143      );
3144 
3145    WHEN OTHERS THEN
3146      ROLLBACK TO DELETE_List_Entries_PVT;
3147      x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3148      IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3149      THEN
3150         FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3151      END IF;
3152      -- Standard call to get message count and if count=1, get the message
3153      FND_MSG_PUB.Count_And_Get (
3154             p_encoded => FND_API.G_FALSE,
3155             p_count => x_msg_count,
3156             p_data  => x_msg_data
3157      );
3158 End Delete_List_Entries;
3159 
3160 
3161 
3162 -- Hint: Primary key needs to be returned.
3163 PROCEDURE Lock_List_Entries(
3164     p_api_version_number         IN   NUMBER,
3165     p_init_msg_list              IN   VARCHAR2     := FND_API.G_FALSE,
3166 
3167     x_return_status              OUT NOCOPY  VARCHAR2,
3168     x_msg_count                  OUT NOCOPY  NUMBER,
3169     x_msg_data                   OUT NOCOPY  VARCHAR2,
3170 
3171     p_list_entry_id                   IN  NUMBER,
3172     p_object_version             IN  NUMBER
3173     )
3174 
3175  IS
3176 L_API_NAME                  CONSTANT VARCHAR2(30) := 'Lock_List_Entries';
3177 L_API_VERSION_NUMBER        CONSTANT NUMBER   := 1.0;
3178 L_FULL_NAME                 CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
3179 l_LIST_ENTRY_ID                  NUMBER;
3180 
3181 CURSOR c_List_Entries IS
3182    SELECT LIST_ENTRY_ID
3183    FROM AMS_LIST_ENTRIES
3184    WHERE LIST_ENTRY_ID = p_LIST_ENTRY_ID
3185    AND object_version_number = p_object_version
3186    FOR UPDATE NOWAIT;
3187 
3188 BEGIN
3189 
3190       -- Debug Message
3191       IF (AMS_DEBUG_HIGH_ON) THEN
3192 
3193       AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
3194       END IF;
3195 
3196       -- Initialize message list if p_init_msg_list is set to TRUE.
3197       IF FND_API.to_Boolean( p_init_msg_list )
3198       THEN
3199          FND_MSG_PUB.initialize;
3200       END IF;
3201 
3202       -- Standard call to check for call compatibility.
3203       IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3204                                            p_api_version_number,
3205                                            l_api_name,
3206                                            G_PKG_NAME)
3207       THEN
3208           RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3209       END IF;
3210 
3211 
3212       -- Initialize API return status to SUCCESS
3213       x_return_status := FND_API.G_RET_STS_SUCCESS;
3214 
3215 
3216 ------------------------ lock -------------------------
3217 
3218   IF (AMS_DEBUG_HIGH_ON) THEN
3219 
3220 
3221 
3222   AMS_Utility_PVT.debug_message(l_full_name||': start');
3223 
3224   END IF;
3225   OPEN c_List_Entries;
3226 
3227   FETCH c_List_Entries INTO l_LIST_ENTRY_ID;
3228 
3229   IF (c_List_Entries%NOTFOUND) THEN
3230     CLOSE c_List_Entries;
3231     IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3232        FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
3233        FND_MSG_PUB.add;
3234     END IF;
3235     RAISE FND_API.g_exc_error;
3236   END IF;
3237 
3238   CLOSE c_List_Entries;
3239 
3240  -------------------- finish --------------------------
3241   FND_MSG_PUB.count_and_get(
3242     p_encoded => FND_API.g_false,
3243     p_count   => x_msg_count,
3244     p_data    => x_msg_data);
3245   IF (AMS_DEBUG_HIGH_ON) THEN
3246 
3247   AMS_Utility_PVT.debug_message(l_full_name ||': end');
3248   END IF;
3249 EXCEPTION
3250 
3251    WHEN AMS_Utility_PVT.resource_locked THEN
3252      x_return_status := FND_API.g_ret_sts_error;
3253  AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
3254 
3255    WHEN FND_API.G_EXC_ERROR THEN
3256      ROLLBACK TO LOCK_List_Entries_PVT;
3257      x_return_status := FND_API.G_RET_STS_ERROR;
3258      -- Standard call to get message count and if count=1, get the message
3259      FND_MSG_PUB.Count_And_Get (
3260             p_encoded => FND_API.G_FALSE,
3261             p_count   => x_msg_count,
3262             p_data    => x_msg_data
3263      );
3264 
3265    WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3266      ROLLBACK TO LOCK_List_Entries_PVT;
3267      x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3268      -- Standard call to get message count and if count=1, get the message
3269      FND_MSG_PUB.Count_And_Get (
3270             p_encoded => FND_API.G_FALSE,
3271             p_count => x_msg_count,
3272             p_data  => x_msg_data
3273      );
3274 
3275    WHEN OTHERS THEN
3276      ROLLBACK TO LOCK_List_Entries_PVT;
3277      x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3278      IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3279      THEN
3280         FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3281      END IF;
3282      -- Standard call to get message count and if count=1, get the message
3283      FND_MSG_PUB.Count_And_Get (
3284             p_encoded => FND_API.G_FALSE,
3285             p_count => x_msg_count,
3286             p_data  => x_msg_data
3287      );
3288 End Lock_List_Entries;
3289 
3290 
3291 PROCEDURE check_list_entries_uk_items(
3292     p_list_entries_rec               IN   list_entries_rec_type,
3293     p_validation_mode            IN  VARCHAR2 := JTF_PLSQL_API.g_create,
3294     x_return_status              OUT NOCOPY VARCHAR2)
3295 IS
3296 l_valid_flag  VARCHAR2(1);
3297 
3298 BEGIN
3299       x_return_status := FND_API.g_ret_sts_success;
3300       IF p_validation_mode = JTF_PLSQL_API.g_create THEN
3301          l_valid_flag := AMS_Utility_PVT.check_uniqueness(
3302          'AMS_LIST_ENTRIES',
3303          'LIST_ENTRY_ID = ''' || p_list_entries_rec.LIST_ENTRY_ID ||''''
3304          );
3305       ELSE
3306          l_valid_flag := AMS_Utility_PVT.check_uniqueness(
3307          'AMS_LIST_ENTRIES',
3308          'LIST_ENTRY_ID = ''' || p_list_entries_rec.LIST_ENTRY_ID ||
3309          ''' AND LIST_ENTRY_ID <> ' || p_list_entries_rec.LIST_ENTRY_ID
3310          );
3311       END IF;
3312 
3313       IF l_valid_flag = FND_API.g_false THEN
3314  AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_LIST_ENTRY_ID_DUPLICATE');
3315          x_return_status := FND_API.g_ret_sts_error;
3316          RETURN;
3317       END IF;
3318 
3319 END check_list_entries_uk_items;
3320 
3321 PROCEDURE check_list_entries_req_items(
3322     p_list_entries_rec               IN  list_entries_rec_type,
3323     p_validation_mode IN VARCHAR2 := JTF_PLSQL_API.g_create,
3324     x_return_status	         OUT NOCOPY VARCHAR2
3325 )
3326 IS
3327 BEGIN
3328    x_return_status := FND_API.g_ret_sts_success;
3329 
3330    IF p_validation_mode = JTF_PLSQL_API.g_create THEN
3331 
3332 
3333       IF p_list_entries_rec.list_header_id = FND_API.g_miss_num OR p_list_entries_rec.list_header_id IS NULL THEN
3334          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'list_header_id');
3335          x_return_status := FND_API.g_ret_sts_error;
3336       END IF;
3337 
3338 
3339       IF p_list_entries_rec.list_select_action_id = FND_API.g_miss_num OR p_list_entries_rec.list_select_action_id IS NULL THEN
3340          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'list_select_action_id');
3341          x_return_status := FND_API.g_ret_sts_error;
3342       END IF;
3343 
3344 
3345       IF p_list_entries_rec.arc_list_select_action_from = FND_API.g_miss_char OR p_list_entries_rec.arc_list_select_action_from IS NULL THEN
3346          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'arc_list_select_action_from');
3347          x_return_status := FND_API.g_ret_sts_error;
3348       END IF;
3349 
3350 
3351       IF p_list_entries_rec.list_select_action_from_name = FND_API.g_miss_char OR p_list_entries_rec.list_select_action_from_name IS NULL THEN
3352          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'list_select_action_from_name');
3353          x_return_status := FND_API.g_ret_sts_error;
3354       END IF;
3355 
3356 
3357       IF p_list_entries_rec.source_code = FND_API.g_miss_char OR p_list_entries_rec.source_code IS NULL THEN
3358          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'source_code');
3359          x_return_status := FND_API.g_ret_sts_error;
3360       END IF;
3361 
3362 
3363       IF p_list_entries_rec.arc_list_used_by_source = FND_API.g_miss_char OR p_list_entries_rec.arc_list_used_by_source IS NULL THEN
3364          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'arc_list_used_by_source');
3365          x_return_status := FND_API.g_ret_sts_error;
3366       END IF;
3367 
3368 
3369       IF p_list_entries_rec.source_code_for_id = FND_API.g_miss_num OR p_list_entries_rec.source_code_for_id IS NULL THEN
3370          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'source_code_for_id');
3371          x_return_status := FND_API.g_ret_sts_error;
3372       END IF;
3373 
3374       -- no validation for creation, pin_code uses list_entry_id
3375       /*
3376       IF p_list_entries_rec.pin_code = FND_API.g_miss_char OR p_list_entries_rec.pin_code IS NULL THEN
3377          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'pin_code');
3378          x_return_status := FND_API.g_ret_sts_error;
3379       END IF;
3380       */
3381 
3382       IF p_list_entries_rec.list_entry_source_system_id = FND_API.g_miss_num OR p_list_entries_rec.list_entry_source_system_id IS NULL THEN
3383          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'list_entry_source_system_id');
3384          x_return_status := FND_API.g_ret_sts_error;
3385       END IF;
3386 
3387 
3388       IF p_list_entries_rec.list_entry_source_system_type = FND_API.g_miss_char OR p_list_entries_rec.list_entry_source_system_type IS NULL THEN
3389          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'list_entry_source_system_type');
3390          x_return_status := FND_API.g_ret_sts_error;
3391       END IF;
3392 
3393 
3394       IF p_list_entries_rec.view_application_id = FND_API.g_miss_num OR p_list_entries_rec.view_application_id IS NULL THEN
3395          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'view_application_id');
3396          x_return_status := FND_API.g_ret_sts_error;
3397       END IF;
3398 
3399 
3400       IF p_list_entries_rec.manually_entered_flag = FND_API.g_miss_char OR p_list_entries_rec.manually_entered_flag IS NULL THEN
3401          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'manually_entered_flag');
3402          x_return_status := FND_API.g_ret_sts_error;
3403       END IF;
3404 
3405 
3406       IF p_list_entries_rec.marked_as_duplicate_flag = FND_API.g_miss_char OR p_list_entries_rec.marked_as_duplicate_flag IS NULL THEN
3407          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'marked_as_duplicate_flag');
3408          x_return_status := FND_API.g_ret_sts_error;
3409       END IF;
3410 
3411 
3412       IF p_list_entries_rec.marked_as_random_flag = FND_API.g_miss_char OR p_list_entries_rec.marked_as_random_flag IS NULL THEN
3413          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'marked_as_random_flag');
3414          x_return_status := FND_API.g_ret_sts_error;
3415       END IF;
3416 
3417 
3418       IF p_list_entries_rec.part_of_control_group_flag = FND_API.g_miss_char OR p_list_entries_rec.part_of_control_group_flag IS NULL THEN
3419          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'part_of_control_group_flag');
3420          x_return_status := FND_API.g_ret_sts_error;
3421       END IF;
3422 
3423 
3424       IF p_list_entries_rec.exclude_in_triggered_list_flag = FND_API.g_miss_char OR p_list_entries_rec.exclude_in_triggered_list_flag IS NULL THEN
3425          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'exclude_in_triggered_list_flag');
3426          x_return_status := FND_API.g_ret_sts_error;
3427       END IF;
3428 
3429 
3430       IF p_list_entries_rec.enabled_flag = FND_API.g_miss_char OR p_list_entries_rec.enabled_flag IS NULL THEN
3431          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'enabled_flag');
3432          x_return_status := FND_API.g_ret_sts_error;
3433       END IF;
3434    ELSE
3435 
3436 
3437       IF p_list_entries_rec.list_entry_id IS NULL THEN
3438          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'list_entry_id');
3439          x_return_status := FND_API.g_ret_sts_error;
3440       END IF;
3441 
3442 
3443       IF p_list_entries_rec.list_header_id IS NULL THEN
3444          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'list_header_id');
3445          x_return_status := FND_API.g_ret_sts_error;
3446       END IF;
3447 
3448 
3449       IF p_list_entries_rec.last_update_date IS NULL THEN
3450          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'last_update_date');
3451          x_return_status := FND_API.g_ret_sts_error;
3452       END IF;
3453 
3454 
3455       IF p_list_entries_rec.last_updated_by IS NULL THEN
3456          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'last_updated_by');
3457          x_return_status := FND_API.g_ret_sts_error;
3458       END IF;
3459 
3460 
3461       IF p_list_entries_rec.creation_date IS NULL THEN
3462          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'creation_date');
3463          x_return_status := FND_API.g_ret_sts_error;
3464       END IF;
3465 
3466 
3467       IF p_list_entries_rec.created_by IS NULL THEN
3468          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'created_by');
3469          x_return_status := FND_API.g_ret_sts_error;
3470       END IF;
3471 
3472 
3473       IF p_list_entries_rec.list_select_action_id IS NULL THEN
3474          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'list_select_action_id');
3475          x_return_status := FND_API.g_ret_sts_error;
3476       END IF;
3477 
3478 
3479       IF p_list_entries_rec.arc_list_select_action_from IS NULL THEN
3480          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'arc_list_select_action_from');
3481          x_return_status := FND_API.g_ret_sts_error;
3482       END IF;
3483 
3484 
3485       IF p_list_entries_rec.list_select_action_from_name IS NULL THEN
3486          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'list_select_action_from_name');
3487          x_return_status := FND_API.g_ret_sts_error;
3488       END IF;
3489 
3490 
3491       IF p_list_entries_rec.source_code IS NULL THEN
3492          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'source_code');
3493          x_return_status := FND_API.g_ret_sts_error;
3494       END IF;
3495 
3496 
3497       IF p_list_entries_rec.arc_list_used_by_source IS NULL THEN
3498          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'arc_list_used_by_source');
3499          x_return_status := FND_API.g_ret_sts_error;
3500       END IF;
3501 
3502 
3503       IF p_list_entries_rec.source_code_for_id IS NULL THEN
3504          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'source_code_for_id');
3505          x_return_status := FND_API.g_ret_sts_error;
3506       END IF;
3507 
3508       IF p_list_entries_rec.pin_code IS NULL THEN
3509          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'pin_code');
3510          x_return_status := FND_API.g_ret_sts_error;
3511       END IF;
3512 
3513 
3514       IF p_list_entries_rec.list_entry_source_system_id IS NULL THEN
3515          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'list_entry_source_system_id');
3516          x_return_status := FND_API.g_ret_sts_error;
3517       END IF;
3518 
3519 
3520       IF p_list_entries_rec.list_entry_source_system_type IS NULL THEN
3521          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'list_entry_source_system_type');
3522          x_return_status := FND_API.g_ret_sts_error;
3523       END IF;
3524 
3525 
3526       IF p_list_entries_rec.view_application_id IS NULL THEN
3527          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'view_application_id');
3528          x_return_status := FND_API.g_ret_sts_error;
3529       END IF;
3530 
3531 
3532       IF p_list_entries_rec.manually_entered_flag IS NULL THEN
3533          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'manually_entered_flag');
3534          x_return_status := FND_API.g_ret_sts_error;
3535       END IF;
3536 
3537 
3538       IF p_list_entries_rec.marked_as_duplicate_flag IS NULL THEN
3539          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'marked_as_duplicate_flag');
3540          x_return_status := FND_API.g_ret_sts_error;
3541       END IF;
3542 
3543 
3544       IF p_list_entries_rec.marked_as_random_flag IS NULL THEN
3545          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'marked_as_random_flag');
3546          x_return_status := FND_API.g_ret_sts_error;
3547       END IF;
3548 
3549 
3550       IF p_list_entries_rec.part_of_control_group_flag IS NULL THEN
3551          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'part_of_control_group_flag');
3552          x_return_status := FND_API.g_ret_sts_error;
3553       END IF;
3554 
3555 
3556       IF p_list_entries_rec.exclude_in_triggered_list_flag IS NULL THEN
3557          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'exclude_in_triggered_list_flag');
3558          x_return_status := FND_API.g_ret_sts_error;
3559       END IF;
3560 
3561 
3562       IF p_list_entries_rec.enabled_flag IS NULL THEN
3563          AMS_Utility_PVT.error_message ('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'enabled_flag');
3564          x_return_status := FND_API.g_ret_sts_error;
3565       END IF;
3566    END IF;
3567 
3568 END check_list_entries_req_items;
3569 
3570 PROCEDURE check_list_entries_FK_items(
3571     p_list_entries_rec IN list_entries_rec_type,
3572     x_return_status OUT NOCOPY VARCHAR2
3573 )
3574 IS
3575 BEGIN
3576    x_return_status := FND_API.g_ret_sts_success;
3577 
3578    -- Enter custom code here
3579 
3580 END check_list_entries_FK_items;
3581 
3582 PROCEDURE check_list_entries_Lookup_item(
3583     p_list_entries_rec IN list_entries_rec_type,
3584     x_return_status OUT NOCOPY VARCHAR2
3585 )
3586 IS
3587 BEGIN
3588    x_return_status := FND_API.g_ret_sts_success;
3589 
3590    -- Enter custom code here
3591 
3592 END check_list_entries_Lookup_item;
3593 
3594 PROCEDURE check_list_entries_Business(
3595     p_list_entries_rec IN list_entries_rec_type,
3596     p_validation_mode IN VARCHAR2 := JTF_PLSQL_API.g_create,
3597     x_return_status OUT NOCOPY VARCHAR2
3598 )
3599 IS
3600 l_dummy varchar2(1);
3601 cursor check_outcome (cur_outcome_id number)
3602 is
3603 select 'x'
3604 from jtf_ih_outcomes_vl
3605 where outcome_id = cur_outcome_id ;
3606 cursor check_result (cur_outcome_id number, cur_result_id number)
3607 is
3608 select 'x'
3609 from jtf_ih_outcome_results
3610 where outcome_id = cur_outcome_id
3611 and result_id = cur_result_id;
3612 cursor check_reason (cur_reason_id number, cur_result_id number)
3613 is
3614 select 'x'
3615 from jtf_ih_result_reasons
3616 where reason_id = cur_reason_id
3617 and result_id = cur_result_id;
3618 
3619 l varchar2(40);
3620 BEGIN
3621 
3622    x_return_status := FND_API.g_ret_sts_success;
3623 
3624    IF ( p_list_entries_rec.newly_updated_flag = 'Y' OR
3625         p_list_entries_rec.newly_updated_flag = 'N' OR
3626 	p_list_entries_rec.newly_updated_flag is NULL OR
3627 	p_list_entries_rec.newly_updated_flag  = fnd_api.g_miss_char
3628       )
3629    THEN
3630      null;
3631    else
3632         AMS_Utility_PVT.Error_Message('AMS_API_INVALID_FLAG','INVALID_FLAG','newly_updated_flag');
3633         x_return_status := FND_API.g_ret_sts_error;
3634    END IF;
3635 
3636    IF ( p_list_entries_rec.manually_entered_flag = 'Y' OR
3637         p_list_entries_rec.manually_entered_flag = 'N' OR
3638 	p_list_entries_rec.manually_entered_flag is NULL OR
3639 	p_list_entries_rec.manually_entered_flag  = fnd_api.g_miss_char
3640       )
3641    THEN
3642      null;
3643    else
3644         AMS_Utility_PVT.Error_Message('AMS_API_INVALID_FLAG','INVALID_FLAG','manually_entered_flag');
3645         x_return_status := FND_API.g_ret_sts_error;
3646    END IF;
3647 
3648    IF ( p_list_entries_rec.marked_as_duplicate_flag = 'Y' OR
3649         p_list_entries_rec.marked_as_duplicate_flag = 'N' OR
3650 	p_list_entries_rec.marked_as_duplicate_flag is NULL OR
3651 	p_list_entries_rec.marked_as_duplicate_flag  = fnd_api.g_miss_char
3652       )
3653    THEN
3654      null;
3655    else
3656         AMS_Utility_PVT.Error_Message('AMS_API_INVALID_FLAG','INVALID_FLAG','marked_as_duplicate_flag');
3657         x_return_status := FND_API.g_ret_sts_error;
3658    END IF;
3659 
3660    IF ( p_list_entries_rec.marked_as_random_flag = 'Y' OR
3661         p_list_entries_rec.marked_as_random_flag = 'N' OR
3662 	p_list_entries_rec.marked_as_random_flag is NULL OR
3663 	p_list_entries_rec.marked_as_random_flag  = fnd_api.g_miss_char
3664       )
3665    THEN
3666      null;
3667    else
3668         AMS_Utility_PVT.Error_Message('AMS_API_INVALID_FLAG','INVALID_FLAG','marked_as_random_flag');
3669         x_return_status := FND_API.g_ret_sts_error;
3670    END IF;
3671 
3672    IF ( p_list_entries_rec.part_of_control_group_flag = 'Y' OR
3673         p_list_entries_rec.part_of_control_group_flag = 'N' OR
3674 	p_list_entries_rec.part_of_control_group_flag is NULL OR
3675 	p_list_entries_rec.part_of_control_group_flag  = fnd_api.g_miss_char
3676       )
3677    THEN
3678      null;
3679    else
3680         AMS_Utility_PVT.Error_Message('AMS_API_INVALID_FLAG','INVALID_FLAG','part_of_control_group_flag');
3681         x_return_status := FND_API.g_ret_sts_error;
3682    END IF;
3683 
3684    IF ( p_list_entries_rec.exclude_in_triggered_list_flag = 'Y' OR
3685         p_list_entries_rec.exclude_in_triggered_list_flag = 'N' OR
3686 	p_list_entries_rec.exclude_in_triggered_list_flag is NULL OR
3687 	p_list_entries_rec.exclude_in_triggered_list_flag  = fnd_api.g_miss_char
3688       )
3689    THEN
3690      null;
3691    else
3692         AMS_Utility_PVT.Error_Message('AMS_API_INVALID_FLAG','INVALID_FLAG','exclude_in_triggered_list_flag');
3693         x_return_status := FND_API.g_ret_sts_error;
3694    END IF;
3695 
3696    IF ( p_list_entries_rec.enabled_flag = 'Y' OR
3697         p_list_entries_rec.enabled_flag = 'N' OR
3698 	p_list_entries_rec.enabled_flag is NULL OR
3699 	p_list_entries_rec.enabled_flag  = fnd_api.g_miss_char
3700       )
3701    THEN
3702      null;
3703    else
3704         AMS_Utility_PVT.Error_Message('AMS_API_INVALID_FLAG','INVALID_FLAG','enabled_flag');
3705         x_return_status := FND_API.g_ret_sts_error;
3706    END IF;
3707 
3708    IF ( p_list_entries_rec.outcome_id is not null AND
3709         p_list_entries_rec.outcome_id <> FND_API.g_miss_num) THEN
3710        open check_outcome(p_list_entries_rec.outcome_id);
3711        fetch check_outcome into l_dummy;
3712        if check_outcome%notfound then
3713            AMS_Utility_PVT.Error_Message(p_message_name=>'AMS_BAD_OUTCOME_ID');
3714            x_return_status := FND_API.g_ret_sts_error;
3715 	   return;
3716        end if;
3717        close check_outcome;
3718    END IF;
3719    IF ( p_list_entries_rec.result_id is NOT NULL   AND
3720         p_list_entries_rec.result_id <> FND_API.g_miss_num) THEN
3721        open check_result(p_list_entries_rec.outcome_id,p_list_entries_rec.result_id);
3722        fetch check_result into l_dummy;
3723        if check_result%notfound then
3724            AMS_Utility_PVT.Error_Message(p_message_name=>'AMS_BAD_RESULT_ID');
3725            x_return_status := FND_API.g_ret_sts_error;
3726 	   return;
3727        end if;
3728        close check_result;
3729    END IF;
3730    IF ( p_list_entries_rec.reason_id is NOT NULL  AND
3731         p_list_entries_rec.reason_id <> fnd_api.g_miss_num) THEN
3732        open check_reason(p_list_entries_rec.reason_id,p_list_entries_rec.result_id);
3733        fetch check_reason into l_dummy;
3734        if check_reason%notfound then
3735            AMS_Utility_PVT.Error_Message(p_message_name=>'AMS_BAD_REASON_ID');
3736            x_return_status := FND_API.g_ret_sts_error;
3737 	   return;
3738        end if;
3739        close check_reason;
3740    END IF;
3741 
3742 
3743 END check_list_entries_Business;
3744 
3745 PROCEDURE Check_list_entries_Items (
3746     P_list_entries_rec     IN    list_entries_rec_type,
3747     p_validation_mode  IN    VARCHAR2,
3748     x_return_status    OUT NOCOPY   VARCHAR2
3749     )
3750 IS
3751 BEGIN
3752 
3753    -- Check Items Uniqueness API calls
3754 
3755    check_list_entries_uk_items(
3756       p_list_entries_rec => p_list_entries_rec,
3757       p_validation_mode => p_validation_mode,
3758       x_return_status => x_return_status);
3759    IF x_return_status <> FND_API.g_ret_sts_success THEN
3760       RETURN;
3761    END IF;
3762 
3763    -- Check Items Required/NOT NULL API calls
3764 
3765    check_list_entries_req_items(
3766       p_list_entries_rec => p_list_entries_rec,
3767       p_validation_mode => p_validation_mode,
3768       x_return_status => x_return_status);
3769    IF x_return_status <> FND_API.g_ret_sts_success THEN
3770       RETURN;
3771    END IF;
3772    -- Check Items Foreign Keys API calls
3773 
3774    check_list_entries_FK_items(
3775       p_list_entries_rec => p_list_entries_rec,
3776       x_return_status => x_return_status);
3777    IF x_return_status <> FND_API.g_ret_sts_success THEN
3778       RETURN;
3779    END IF;
3780    -- Check Items Lookups
3781 
3782    check_list_entries_Lookup_item(
3783       p_list_entries_rec => p_list_entries_rec,
3784       x_return_status => x_return_status);
3785    IF x_return_status <> FND_API.g_ret_sts_success THEN
3786       RETURN;
3787    END IF;
3788 
3789    IF (AMS_DEBUG_HIGH_ON) THEN
3790 
3791 
3792 
3793    AMS_UTILITY_PVT.debug_message('Private API: ' || 'before check_list_entries_Business');
3794 
3795    END IF;
3796    check_list_entries_Business(
3797       p_list_entries_rec => p_list_entries_rec,
3798       p_validation_mode => p_validation_mode,
3799       x_return_status => x_return_status);
3800    IF x_return_status <> FND_API.g_ret_sts_success THEN
3801       RETURN;
3802    END IF;
3803    IF (AMS_DEBUG_HIGH_ON) THEN
3804 
3805    AMS_UTILITY_PVT.debug_message('Private API: ' || 'after check_list_entries_Business');
3806    END IF;
3807 
3808 END Check_list_entries_Items;
3809 
3810 
3811 PROCEDURE Validate_list_entries(
3812     p_api_version_number         IN   NUMBER,
3813     p_init_msg_list              IN   VARCHAR2     := FND_API.G_FALSE,
3814     p_validation_level           IN   NUMBER := FND_API.G_VALID_LEVEL_FULL,
3815     p_validation_mode            IN   VARCHAR2     := JTF_PLSQL_API.g_update,
3816     p_list_entries_rec           IN   list_entries_rec_type,
3817     x_return_status              OUT NOCOPY  VARCHAR2,
3818     x_msg_count                  OUT NOCOPY  NUMBER,
3819     x_msg_data                   OUT NOCOPY  VARCHAR2
3820     )
3821  IS
3822 L_API_NAME                  CONSTANT VARCHAR2(30) := 'Validate_List_Entries';
3823 L_API_VERSION_NUMBER        CONSTANT NUMBER   := 1.0;
3824 l_object_version_number     NUMBER;
3825 l_list_entries_rec  AMS_List_Entries_PVT.list_entries_rec_type;
3826 
3827  BEGIN
3828       -- Standard Start of API savepoint
3829       SAVEPOINT VALIDATE_List_Entries_;
3830 
3831       -- Standard call to check for call compatibility.
3832       IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3833                                            p_api_version_number,
3834                                            l_api_name,
3835                                            G_PKG_NAME)
3836       THEN
3837           RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3838       END IF;
3839 
3840       -- Initialize message list if p_init_msg_list is set to TRUE.
3841       IF FND_API.to_Boolean( p_init_msg_list )
3842       THEN
3843          FND_MSG_PUB.initialize;
3844       END IF;
3845       IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
3846               Check_list_entries_Items(
3847                  p_list_entries_rec        => p_list_entries_rec,
3848                  p_validation_mode   => p_validation_mode,
3849                  x_return_status     => x_return_status
3850               );
3851 
3852               IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3853                   RAISE FND_API.G_EXC_ERROR;
3854               ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3855                   RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3856               END IF;
3857       END IF;
3858 
3859 
3860       IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
3861       IF (AMS_DEBUG_HIGH_ON) THEN
3862 
3863       AMS_UTILITY_PVT.debug_message('complete rec');
3864       END IF;
3865          Validate_list_entries_Rec(
3866            p_api_version_number     => 1.0,
3867            p_init_msg_list          => FND_API.G_FALSE,
3868            x_return_status          => x_return_status,
3869            x_msg_count              => x_msg_count,
3870            x_msg_data               => x_msg_data,
3871            p_list_entries_rec           =>    l_list_entries_rec);
3872 
3873               IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3874                  RAISE FND_API.G_EXC_ERROR;
3875               ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3876                  RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3877               END IF;
3878       END IF;
3879 
3880 
3881       -- Debug Message
3882       IF (AMS_DEBUG_HIGH_ON) THEN
3883 
3884       AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
3885       END IF;
3886 
3887 
3888       -- Initialize API return status to SUCCESS
3889       x_return_status := FND_API.G_RET_STS_SUCCESS;
3890 
3891 
3892       -- Debug Message
3893       IF (AMS_DEBUG_HIGH_ON) THEN
3894 
3895       AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
3896       END IF;
3897 
3898       -- Standard call to get message count and if count is 1, get message info.
3899       FND_MSG_PUB.Count_And_Get
3900         (p_count          =>   x_msg_count,
3901          p_data           =>   x_msg_data
3902       );
3903 EXCEPTION
3904 
3905    WHEN AMS_Utility_PVT.resource_locked THEN
3906      x_return_status := FND_API.g_ret_sts_error;
3907  AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
3908 
3909    WHEN FND_API.G_EXC_ERROR THEN
3910      ROLLBACK TO VALIDATE_List_Entries_;
3911      x_return_status := FND_API.G_RET_STS_ERROR;
3912      -- Standard call to get message count and if count=1, get the message
3913      FND_MSG_PUB.Count_And_Get (
3914             p_encoded => FND_API.G_FALSE,
3915             p_count   => x_msg_count,
3916             p_data    => x_msg_data
3917      );
3918 
3919    WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3920      ROLLBACK TO VALIDATE_List_Entries_;
3921      x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3922      -- Standard call to get message count and if count=1, get the message
3923      FND_MSG_PUB.Count_And_Get (
3924             p_encoded => FND_API.G_FALSE,
3925             p_count => x_msg_count,
3926             p_data  => x_msg_data
3927      );
3928 
3929    WHEN OTHERS THEN
3930      ROLLBACK TO VALIDATE_List_Entries_;
3931      x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3932      IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3933      THEN
3934         FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3935      END IF;
3936      -- Standard call to get message count and if count=1, get the message
3937      FND_MSG_PUB.Count_And_Get (
3938             p_encoded => FND_API.G_FALSE,
3939             p_count => x_msg_count,
3940             p_data  => x_msg_data
3941      );
3942 End Validate_List_Entries;
3943 
3944 
3945 PROCEDURE Validate_list_entries_rec(
3946     p_api_version_number         IN   NUMBER,
3947     p_init_msg_list              IN   VARCHAR2     := FND_API.G_FALSE,
3948     x_return_status              OUT NOCOPY  VARCHAR2,
3949     x_msg_count                  OUT NOCOPY  NUMBER,
3950     x_msg_data                   OUT NOCOPY  VARCHAR2,
3951     p_list_entries_rec               IN    list_entries_rec_type
3952     )
3953 IS
3954 BEGIN
3955       -- Initialize message list if p_init_msg_list is set to TRUE.
3956       IF FND_API.to_Boolean( p_init_msg_list )
3957       THEN
3958          FND_MSG_PUB.initialize;
3959       END IF;
3960 
3961       -- Initialize API return status to SUCCESS
3962       x_return_status := FND_API.G_RET_STS_SUCCESS;
3963 
3964       -- Hint: Validate data
3965       -- If data not valid
3966       -- THEN
3967       -- x_return_status := FND_API.G_RET_STS_ERROR;
3968 
3969       -- Debug Message
3970       IF (AMS_DEBUG_HIGH_ON) THEN
3971 
3972       AMS_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
3973       END IF;
3974       -- Standard call to get message count and if count is 1, get message info.
3975       FND_MSG_PUB.Count_And_Get
3976         (p_count          =>   x_msg_count,
3977          p_data           =>   x_msg_data
3978       );
3979 END Validate_list_entries_Rec;
3980 
3981 PROCEDURE init_entry_rec(
3982    x_entry_rec         OUT NOCOPY list_entries_rec_type
3983 ) IS
3984 
3985 Begin
3986  x_entry_rec.LIST_ENTRY_ID                   := FND_API.g_miss_num;
3987  x_entry_rec.LIST_HEADER_ID                  := FND_API.g_miss_num;
3988  x_entry_rec.LAST_UPDATE_DATE                := FND_API.g_miss_date;
3989  x_entry_rec.LAST_UPDATED_BY                 := FND_API.g_miss_num;
3990  x_entry_rec.CREATION_DATE                   := FND_API.g_miss_date;
3991  x_entry_rec.CREATED_BY                      := FND_API.g_miss_num;
3992  x_entry_rec.LAST_UPDATE_LOGIN               := FND_API.g_miss_num;
3993  x_entry_rec.OBJECT_VERSION_NUMBER           := FND_API.g_miss_num;
3994  x_entry_rec.LIST_SELECT_ACTION_ID           := FND_API.g_miss_num;
3995  x_entry_rec.ARC_LIST_SELECT_ACTION_FROM     := FND_API.g_miss_char;
3996  x_entry_rec.LIST_SELECT_ACTION_FROM_NAME    := FND_API.g_miss_char;
3997  x_entry_rec.SOURCE_CODE                     := FND_API.g_miss_char;
3998  x_entry_rec.SOURCE_CODE_FOR_ID              := FND_API.g_miss_num;
3999  x_entry_rec.ARC_LIST_USED_BY_SOURCE         := FND_API.g_miss_char;
4000  x_entry_rec.PIN_CODE                        := FND_API.g_miss_char;
4001  x_entry_rec.LIST_ENTRY_SOURCE_SYSTEM_ID     := FND_API.g_miss_num;
4002  x_entry_rec.LIST_ENTRY_SOURCE_SYSTEM_TYPE   := FND_API.g_miss_char;
4003  x_entry_rec.VIEW_APPLICATION_ID             := FND_API.g_miss_num;
4004  x_entry_rec.MANUALLY_ENTERED_FLAG           := FND_API.g_miss_char;
4005  x_entry_rec.MARKED_AS_DUPLICATE_FLAG        := FND_API.g_miss_char;
4006  x_entry_rec.MARKED_AS_RANDOM_FLAG           := FND_API.g_miss_char;
4007  x_entry_rec.PART_OF_CONTROL_GROUP_FLAG      := FND_API.g_miss_char;
4008  x_entry_rec.EXCLUDE_IN_TRIGGERED_LIST_FLAG  := FND_API.g_miss_char;
4009  x_entry_rec.ENABLED_FLAG                    := FND_API.g_miss_char;
4010  x_entry_rec.CELL_CODE                       := FND_API.g_miss_char;
4011  x_entry_rec.DEDUPE_KEY                      := FND_API.g_miss_char;
4012 
4013  x_entry_rec.RANDOMLY_GENERATED_NUMBER       := FND_API.g_miss_num;
4014  x_entry_rec.CAMPAIGN_ID                     := FND_API.g_miss_num;
4015  x_entry_rec.MEDIA_ID                        := FND_API.g_miss_num;
4016  x_entry_rec.CHANNEL_ID                      := FND_API.g_miss_num;
4017  x_entry_rec.CHANNEL_SCHEDULE_ID             := FND_API.g_miss_num;
4018  x_entry_rec.EVENT_OFFER_ID                  := FND_API.g_miss_num;
4019  x_entry_rec.CUSTOMER_ID                     := FND_API.g_miss_num;
4020  x_entry_rec.MARKET_SEGMENT_ID               := FND_API.g_miss_num;
4021  x_entry_rec.VENDOR_ID                       := FND_API.g_miss_num;
4022  x_entry_rec.TRANSFER_FLAG                   := FND_API.g_miss_char;
4023  x_entry_rec.TRANSFER_STATUS                 := FND_API.g_miss_char;
4024  x_entry_rec.LIST_SOURCE                     := FND_API.g_miss_char;
4025  x_entry_rec.DUPLICATE_MASTER_ENTRY_ID       := FND_API.g_miss_num;
4026  x_entry_rec.MARKED_FLAG                     := FND_API.g_miss_char;
4027  x_entry_rec.LEAD_ID                         := FND_API.g_miss_num;
4028  x_entry_rec.LETTER_ID                       := FND_API.g_miss_num;
4029  x_entry_rec.PICKING_HEADER_ID               := FND_API.g_miss_num;
4030  x_entry_rec.BATCH_ID                        := FND_API.g_miss_num;
4031 
4032 
4033  x_entry_rec.COL1                            := FND_API.g_miss_char;
4034  x_entry_rec.COL2                            := FND_API.g_miss_char;
4035  x_entry_rec.COL3                            := FND_API.g_miss_char;
4036  x_entry_rec.COL4                            := FND_API.g_miss_char;
4037  x_entry_rec.COL5                            := FND_API.g_miss_char;
4038  x_entry_rec.COL6                            := FND_API.g_miss_char;
4039  x_entry_rec.COL7                            := FND_API.g_miss_char;
4040  x_entry_rec.COL8                            := FND_API.g_miss_char;
4041  x_entry_rec.COL9                            := FND_API.g_miss_char;
4042  x_entry_rec.COL10                           := FND_API.g_miss_char;
4043  x_entry_rec.COL11                           := FND_API.g_miss_char;
4044  x_entry_rec.COL12                           := FND_API.g_miss_char;
4045  x_entry_rec.COL13                           := FND_API.g_miss_char;
4046  x_entry_rec.COL14                           := FND_API.g_miss_char;
4047  x_entry_rec.COL15                           := FND_API.g_miss_char;
4048  x_entry_rec.COL16                           := FND_API.g_miss_char;
4049  x_entry_rec.COL17                           := FND_API.g_miss_char;
4050  x_entry_rec.COL18                           := FND_API.g_miss_char;
4051  x_entry_rec.COL19                           := FND_API.g_miss_char;
4052  x_entry_rec.COL20                           := FND_API.g_miss_char;
4053  x_entry_rec.COL21                           := FND_API.g_miss_char;
4054  x_entry_rec.COL22                           := FND_API.g_miss_char;
4055  x_entry_rec.COL23                           := FND_API.g_miss_char;
4056  x_entry_rec.COL24                           := FND_API.g_miss_char;
4057  x_entry_rec.COL25                           := FND_API.g_miss_char;
4058  x_entry_rec.COL26                           := FND_API.g_miss_char;
4059  x_entry_rec.COL27                           := FND_API.g_miss_char;
4060  x_entry_rec.COL28                           := FND_API.g_miss_char;
4061  x_entry_rec.COL29                           := FND_API.g_miss_char;
4062  x_entry_rec.COL30                           := FND_API.g_miss_char;
4063  x_entry_rec.COL31                           := FND_API.g_miss_char;
4064  x_entry_rec.COL32                           := FND_API.g_miss_char;
4065  x_entry_rec.COL33                           := FND_API.g_miss_char;
4066  x_entry_rec.COL34                           := FND_API.g_miss_char;
4067  x_entry_rec.COL35                           := FND_API.g_miss_char;
4068  x_entry_rec.COL36                           := FND_API.g_miss_char;
4069  x_entry_rec.COL37                           := FND_API.g_miss_char;
4070  x_entry_rec.COL38                           := FND_API.g_miss_char;
4071  x_entry_rec.COL39                           := FND_API.g_miss_char;
4072  x_entry_rec.COL40                           := FND_API.g_miss_char;
4073  x_entry_rec.COL41                           := FND_API.g_miss_char;
4074  x_entry_rec.COL42                           := FND_API.g_miss_char;
4075  x_entry_rec.COL43                           := FND_API.g_miss_char;
4076  x_entry_rec.COL44                           := FND_API.g_miss_char;
4077  x_entry_rec.COL45                           := FND_API.g_miss_char;
4078  x_entry_rec.COL46                           := FND_API.g_miss_char;
4079  x_entry_rec.COL47                           := FND_API.g_miss_char;
4080  x_entry_rec.COL48                           := FND_API.g_miss_char;
4081  x_entry_rec.COL49                           := FND_API.g_miss_char;
4082  x_entry_rec.COL50                           := FND_API.g_miss_char;
4083  x_entry_rec.COL51                           := FND_API.g_miss_char;
4084  x_entry_rec.COL52                           := FND_API.g_miss_char;
4085  x_entry_rec.COL53                           := FND_API.g_miss_char;
4086  x_entry_rec.COL54                           := FND_API.g_miss_char;
4087  x_entry_rec.COL55                           := FND_API.g_miss_char;
4088  x_entry_rec.COL56                           := FND_API.g_miss_char;
4089  x_entry_rec.COL57                           := FND_API.g_miss_char;
4090  x_entry_rec.COL58                           := FND_API.g_miss_char;
4091  x_entry_rec.COL59                           := FND_API.g_miss_char;
4092  x_entry_rec.COL60                           := FND_API.g_miss_char;
4093  x_entry_rec.COL61                           := FND_API.g_miss_char;
4094  x_entry_rec.COL62                           := FND_API.g_miss_char;
4095  x_entry_rec.COL63                           := FND_API.g_miss_char;
4096  x_entry_rec.COL64                           := FND_API.g_miss_char;
4097  x_entry_rec.COL65                           := FND_API.g_miss_char;
4098  x_entry_rec.COL66                           := FND_API.g_miss_char;
4099  x_entry_rec.COL67                           := FND_API.g_miss_char;
4100  x_entry_rec.COL68                           := FND_API.g_miss_char;
4101  x_entry_rec.COL69                           := FND_API.g_miss_char;
4102  x_entry_rec.COL70                           := FND_API.g_miss_char;
4103  x_entry_rec.COL71                           := FND_API.g_miss_char;
4104  x_entry_rec.COL72                           := FND_API.g_miss_char;
4105  x_entry_rec.COL73                           := FND_API.g_miss_char;
4106  x_entry_rec.COL74                           := FND_API.g_miss_char;
4107  x_entry_rec.COL75                           := FND_API.g_miss_char;
4108  x_entry_rec.COL76                           := FND_API.g_miss_char;
4109  x_entry_rec.COL77                           := FND_API.g_miss_char;
4110  x_entry_rec.COL78                           := FND_API.g_miss_char;
4111  x_entry_rec.COL79                           := FND_API.g_miss_char;
4112  x_entry_rec.COL80                           := FND_API.g_miss_char;
4113  x_entry_rec.COL81                           := FND_API.g_miss_char;
4114  x_entry_rec.COL82                           := FND_API.g_miss_char;
4115  x_entry_rec.COL83                           := FND_API.g_miss_char;
4116  x_entry_rec.COL84                           := FND_API.g_miss_char;
4117  x_entry_rec.COL85                           := FND_API.g_miss_char;
4118  x_entry_rec.COL86                           := FND_API.g_miss_char;
4119  x_entry_rec.COL87                           := FND_API.g_miss_char;
4120  x_entry_rec.COL88                           := FND_API.g_miss_char;
4121  x_entry_rec.COL89                           := FND_API.g_miss_char;
4122  x_entry_rec.COL90                           := FND_API.g_miss_char;
4123  x_entry_rec.COL91                           := FND_API.g_miss_char;
4124  x_entry_rec.COL92                           := FND_API.g_miss_char;
4125  x_entry_rec.COL93                           := FND_API.g_miss_char;
4126  x_entry_rec.COL94                           := FND_API.g_miss_char;
4127  x_entry_rec.COL95                           := FND_API.g_miss_char;
4128  x_entry_rec.COL96                           := FND_API.g_miss_char;
4129  x_entry_rec.COL97                           := FND_API.g_miss_char;
4130  x_entry_rec.COL98                           := FND_API.g_miss_char;
4131  x_entry_rec.COL99                           := FND_API.g_miss_char;
4132  x_entry_rec.COL100                          := FND_API.g_miss_char;
4133  x_entry_rec.COL101                          := FND_API.g_miss_char;
4134  x_entry_rec.COL102                          := FND_API.g_miss_char;
4135  x_entry_rec.COL103                          := FND_API.g_miss_char;
4136  x_entry_rec.COL104                          := FND_API.g_miss_char;
4137  x_entry_rec.COL105                          := FND_API.g_miss_char;
4138  x_entry_rec.COL106                          := FND_API.g_miss_char;
4139  x_entry_rec.COL107                          := FND_API.g_miss_char;
4140  x_entry_rec.COL108                          := FND_API.g_miss_char;
4141  x_entry_rec.COL109                          := FND_API.g_miss_char;
4142  x_entry_rec.COL110                          := FND_API.g_miss_char;
4143  x_entry_rec.COL111                          := FND_API.g_miss_char;
4144  x_entry_rec.COL112                          := FND_API.g_miss_char;
4145  x_entry_rec.COL113                          := FND_API.g_miss_char;
4146  x_entry_rec.COL114                          := FND_API.g_miss_char;
4147  x_entry_rec.COL115                          := FND_API.g_miss_char;
4148  x_entry_rec.COL116                          := FND_API.g_miss_char;
4149  x_entry_rec.COL117                          := FND_API.g_miss_char;
4150  x_entry_rec.COL118                          := FND_API.g_miss_char;
4151  x_entry_rec.COL119                          := FND_API.g_miss_char;
4152  x_entry_rec.COL120                          := FND_API.g_miss_char;
4153  x_entry_rec.COL121                          := FND_API.g_miss_char;
4154  x_entry_rec.COL122                          := FND_API.g_miss_char;
4155  x_entry_rec.COL123                          := FND_API.g_miss_char;
4156  x_entry_rec.COL124                          := FND_API.g_miss_char;
4157  x_entry_rec.COL125                          := FND_API.g_miss_char;
4158  x_entry_rec.COL126                          := FND_API.g_miss_char;
4159  x_entry_rec.COL127                          := FND_API.g_miss_char;
4160  x_entry_rec.COL128                          := FND_API.g_miss_char;
4161  x_entry_rec.COL129                          := FND_API.g_miss_char;
4162  x_entry_rec.COL130                          := FND_API.g_miss_char;
4163  x_entry_rec.COL131                          := FND_API.g_miss_char;
4164  x_entry_rec.COL132                          := FND_API.g_miss_char;
4165  x_entry_rec.COL133                          := FND_API.g_miss_char;
4166  x_entry_rec.COL134                          := FND_API.g_miss_char;
4167  x_entry_rec.COL135                          := FND_API.g_miss_char;
4168  x_entry_rec.COL136                          := FND_API.g_miss_char;
4169  x_entry_rec.COL137                          := FND_API.g_miss_char;
4170  x_entry_rec.COL138                          := FND_API.g_miss_char;
4171  x_entry_rec.COL139                          := FND_API.g_miss_char;
4172  x_entry_rec.COL140                          := FND_API.g_miss_char;
4173  x_entry_rec.COL141                          := FND_API.g_miss_char;
4174  x_entry_rec.COL142                          := FND_API.g_miss_char;
4175  x_entry_rec.COL143                          := FND_API.g_miss_char;
4176  x_entry_rec.COL144                          := FND_API.g_miss_char;
4177  x_entry_rec.COL145                          := FND_API.g_miss_char;
4178  x_entry_rec.COL146                          := FND_API.g_miss_char;
4179  x_entry_rec.COL147                          := FND_API.g_miss_char;
4180  x_entry_rec.COL148                          := FND_API.g_miss_char;
4181  x_entry_rec.COL149                          := FND_API.g_miss_char;
4182  x_entry_rec.COL150                          := FND_API.g_miss_char;
4183  x_entry_rec.COL151                          := FND_API.g_miss_char;
4184  x_entry_rec.COL152                          := FND_API.g_miss_char;
4185  x_entry_rec.COL153                          := FND_API.g_miss_char;
4186  x_entry_rec.COL154                          := FND_API.g_miss_char;
4187  x_entry_rec.COL155                          := FND_API.g_miss_char;
4188  x_entry_rec.COL156                          := FND_API.g_miss_char;
4189  x_entry_rec.COL157                          := FND_API.g_miss_char;
4190  x_entry_rec.COL158                          := FND_API.g_miss_char;
4191  x_entry_rec.COL159                          := FND_API.g_miss_char;
4192  x_entry_rec.COL160                          := FND_API.g_miss_char;
4193  x_entry_rec.COL161                          := FND_API.g_miss_char;
4194  x_entry_rec.COL162                          := FND_API.g_miss_char;
4195  x_entry_rec.COL163                          := FND_API.g_miss_char;
4196  x_entry_rec.COL164                          := FND_API.g_miss_char;
4197  x_entry_rec.COL165                          := FND_API.g_miss_char;
4198  x_entry_rec.COL166                          := FND_API.g_miss_char;
4199  x_entry_rec.COL167                          := FND_API.g_miss_char;
4200  x_entry_rec.COL168                          := FND_API.g_miss_char;
4201  x_entry_rec.COL169                          := FND_API.g_miss_char;
4202  x_entry_rec.COL170                          := FND_API.g_miss_char;
4203  x_entry_rec.COL171                          := FND_API.g_miss_char;
4204  x_entry_rec.COL172                          := FND_API.g_miss_char;
4205  x_entry_rec.COL173                          := FND_API.g_miss_char;
4206  x_entry_rec.COL174                          := FND_API.g_miss_char;
4207  x_entry_rec.COL175                          := FND_API.g_miss_char;
4208  x_entry_rec.COL176                          := FND_API.g_miss_char;
4209  x_entry_rec.COL177                          := FND_API.g_miss_char;
4210  x_entry_rec.COL178                          := FND_API.g_miss_char;
4211  x_entry_rec.COL179                          := FND_API.g_miss_char;
4212  x_entry_rec.COL180                          := FND_API.g_miss_char;
4213  x_entry_rec.COL181                          := FND_API.g_miss_char;
4214  x_entry_rec.COL182                          := FND_API.g_miss_char;
4215  x_entry_rec.COL183                          := FND_API.g_miss_char;
4216  x_entry_rec.COL184                          := FND_API.g_miss_char;
4217  x_entry_rec.COL185                          := FND_API.g_miss_char;
4218  x_entry_rec.COL186                          := FND_API.g_miss_char;
4219  x_entry_rec.COL187                          := FND_API.g_miss_char;
4220  x_entry_rec.COL188                          := FND_API.g_miss_char;
4221  x_entry_rec.COL189                          := FND_API.g_miss_char;
4222  x_entry_rec.COL190                          := FND_API.g_miss_char;
4223  x_entry_rec.COL191                          := FND_API.g_miss_char;
4224  x_entry_rec.COL192                          := FND_API.g_miss_char;
4225  x_entry_rec.COL193                          := FND_API.g_miss_char;
4226  x_entry_rec.COL194                          := FND_API.g_miss_char;
4227  x_entry_rec.COL195                          := FND_API.g_miss_char;
4228  x_entry_rec.COL196                          := FND_API.g_miss_char;
4229  x_entry_rec.COL197                          := FND_API.g_miss_char;
4230  x_entry_rec.COL198                          := FND_API.g_miss_char;
4231  x_entry_rec.COL199                          := FND_API.g_miss_char;
4232  x_entry_rec.COL200                          := FND_API.g_miss_char;
4233  x_entry_rec.COL201                          := FND_API.g_miss_char;
4234  x_entry_rec.COL202                          := FND_API.g_miss_char;
4235  x_entry_rec.COL203                          := FND_API.g_miss_char;
4236  x_entry_rec.COL204                          := FND_API.g_miss_char;
4237  x_entry_rec.COL205                          := FND_API.g_miss_char;
4238  x_entry_rec.COL206                          := FND_API.g_miss_char;
4239  x_entry_rec.COL207                          := FND_API.g_miss_char;
4240  x_entry_rec.COL208                          := FND_API.g_miss_char;
4241  x_entry_rec.COL209                          := FND_API.g_miss_char;
4242  x_entry_rec.COL210                          := FND_API.g_miss_char;
4243  x_entry_rec.COL211                          := FND_API.g_miss_char;
4244  x_entry_rec.COL212                          := FND_API.g_miss_char;
4245  x_entry_rec.COL213                          := FND_API.g_miss_char;
4246  x_entry_rec.COL214                          := FND_API.g_miss_char;
4247  x_entry_rec.COL215                          := FND_API.g_miss_char;
4248  x_entry_rec.COL216                          := FND_API.g_miss_char;
4249  x_entry_rec.COL217                          := FND_API.g_miss_char;
4250  x_entry_rec.COL218                          := FND_API.g_miss_char;
4251  x_entry_rec.COL219                          := FND_API.g_miss_char;
4252  x_entry_rec.COL220                          := FND_API.g_miss_char;
4253  x_entry_rec.COL221                          := FND_API.g_miss_char;
4254  x_entry_rec.COL222                          := FND_API.g_miss_char;
4255  x_entry_rec.COL223                          := FND_API.g_miss_char;
4256  x_entry_rec.COL224                          := FND_API.g_miss_char;
4257  x_entry_rec.COL225                          := FND_API.g_miss_char;
4258  x_entry_rec.COL226                          := FND_API.g_miss_char;
4259  x_entry_rec.COL227                          := FND_API.g_miss_char;
4260  x_entry_rec.COL228                          := FND_API.g_miss_char;
4261  x_entry_rec.COL229                          := FND_API.g_miss_char;
4262  x_entry_rec.COL230                          := FND_API.g_miss_char;
4263  x_entry_rec.COL231                          := FND_API.g_miss_char;
4264  x_entry_rec.COL232                          := FND_API.g_miss_char;
4265  x_entry_rec.COL233                          := FND_API.g_miss_char;
4266  x_entry_rec.COL234                          := FND_API.g_miss_char;
4267  x_entry_rec.COL235                          := FND_API.g_miss_char;
4268  x_entry_rec.COL236                          := FND_API.g_miss_char;
4269  x_entry_rec.COL237                          := FND_API.g_miss_char;
4270  x_entry_rec.COL238                          := FND_API.g_miss_char;
4271  x_entry_rec.COL239                          := FND_API.g_miss_char;
4272  x_entry_rec.COL240                          := FND_API.g_miss_char;
4273  x_entry_rec.COL241                          := FND_API.g_miss_char;
4274  x_entry_rec.COL242                          := FND_API.g_miss_char;
4275  x_entry_rec.COL243                          := FND_API.g_miss_char;
4276  x_entry_rec.COL244                          := FND_API.g_miss_char;
4277  x_entry_rec.COL245                          := FND_API.g_miss_char;
4278  x_entry_rec.COL246                          := FND_API.g_miss_char;
4279  x_entry_rec.COL247                          := FND_API.g_miss_char;
4280  x_entry_rec.COL248                          := FND_API.g_miss_char;
4281  x_entry_rec.COL249                          := FND_API.g_miss_char;
4282  x_entry_rec.COL250                          := FND_API.g_miss_char;
4283  x_entry_rec.COL251                          := FND_API.g_miss_char;
4284  x_entry_rec.COL252                          := FND_API.g_miss_char;
4285  x_entry_rec.COL253                          := FND_API.g_miss_char;
4286  x_entry_rec.COL254                          := FND_API.g_miss_char;
4287  x_entry_rec.COL255                          := FND_API.g_miss_char;
4288  x_entry_rec.COL256                          := FND_API.g_miss_char;
4289  x_entry_rec.COL257                          := FND_API.g_miss_char;
4290  x_entry_rec.COL258                          := FND_API.g_miss_char;
4291  x_entry_rec.COL259                          := FND_API.g_miss_char;
4292  x_entry_rec.COL260                          := FND_API.g_miss_char;
4293  x_entry_rec.COL261                          := FND_API.g_miss_char;
4294  x_entry_rec.COL262                          := FND_API.g_miss_char;
4295  x_entry_rec.COL263                          := FND_API.g_miss_char;
4296  x_entry_rec.COL264                          := FND_API.g_miss_char;
4297  x_entry_rec.COL265                          := FND_API.g_miss_char;
4298  x_entry_rec.COL266                          := FND_API.g_miss_char;
4299  x_entry_rec.COL267                          := FND_API.g_miss_char;
4300  x_entry_rec.COL268                          := FND_API.g_miss_char;
4301  x_entry_rec.COL269                          := FND_API.g_miss_char;
4302  x_entry_rec.COL270                          := FND_API.g_miss_char;
4303  x_entry_rec.COL271                          := FND_API.g_miss_char;
4304  x_entry_rec.COL272                          := FND_API.g_miss_char;
4305  x_entry_rec.COL273                          := FND_API.g_miss_char;
4306  x_entry_rec.COL274                          := FND_API.g_miss_char;
4307  x_entry_rec.COL275                          := FND_API.g_miss_char;
4308  x_entry_rec.COL276                          := FND_API.g_miss_char;
4309  x_entry_rec.COL277                          := FND_API.g_miss_char;
4310  x_entry_rec.COL278                          := FND_API.g_miss_char;
4311  x_entry_rec.COL279                          := FND_API.g_miss_char;
4312  x_entry_rec.COL280                          := FND_API.g_miss_char;
4313  x_entry_rec.COL281                          := FND_API.g_miss_char;
4314  x_entry_rec.COL282                          := FND_API.g_miss_char;
4315  x_entry_rec.COL283                          := FND_API.g_miss_char;
4316  x_entry_rec.COL284                          := FND_API.g_miss_char;
4317  x_entry_rec.COL285                          := FND_API.g_miss_char;
4318  x_entry_rec.COL286                          := FND_API.g_miss_char;
4319  x_entry_rec.COL287                          := FND_API.g_miss_char;
4320  x_entry_rec.COL288                          := FND_API.g_miss_char;
4321  x_entry_rec.COL289                          := FND_API.g_miss_char;
4322  x_entry_rec.COL290                          := FND_API.g_miss_char;
4323  x_entry_rec.COL291                          := FND_API.g_miss_char;
4324  x_entry_rec.COL292                          := FND_API.g_miss_char;
4325  x_entry_rec.COL293                          := FND_API.g_miss_char;
4326  x_entry_rec.COL294                          := FND_API.g_miss_char;
4327  x_entry_rec.COL295                          := FND_API.g_miss_char;
4328  x_entry_rec.COL296                          := FND_API.g_miss_char;
4329  x_entry_rec.COL297                          := FND_API.g_miss_char;
4330  x_entry_rec.COL298                          := FND_API.g_miss_char;
4331  x_entry_rec.COL299                          := FND_API.g_miss_char;
4332  x_entry_rec.COL300                          := FND_API.g_miss_char;
4333  x_entry_rec.first_name                      := FND_API.G_MISS_CHAR;
4334  x_entry_rec.last_name                       := FND_API.G_MISS_CHAR;
4335  x_entry_rec.customer_name                   := FND_API.G_MISS_CHAR;
4336  x_entry_rec.title                           := FND_API.G_MISS_CHAR;
4337  x_entry_rec.PARTY_ID                        := FND_API.g_miss_num;
4338  x_entry_rec.ADDRESS_LINE1                   := FND_API.g_miss_char;
4339  x_entry_rec.ADDRESS_LINE2                   := FND_API.g_miss_char;
4340  x_entry_rec.CALLBACK_FLAG                   := FND_API.g_miss_char;
4341  x_entry_rec.CITY                            := FND_API.g_miss_char;
4342  x_entry_rec.COUNTRY                         := FND_API.g_miss_char;
4343  x_entry_rec.DO_NOT_USE_FLAG                 := FND_API.g_miss_char;
4344  x_entry_rec.DO_NOT_USE_REASON               := FND_API.g_miss_char;
4345  x_entry_rec.EMAIL_ADDRESS                   := FND_API.g_miss_char;
4346  x_entry_rec.FAX                             := FND_API.g_miss_char;
4347  x_entry_rec.PHONE                           := FND_API.g_miss_char;
4348  x_entry_rec.RECORD_OUT_FLAG                 := FND_API.g_miss_char;
4349  x_entry_rec.STATE                           := FND_API.g_miss_char;
4350  x_entry_rec.SUFFIX                          := FND_API.g_miss_char;
4351  x_entry_rec.TITLE                           := FND_API.g_miss_char;
4352  x_entry_rec.USAGE_RESTRICTION               := FND_API.g_miss_char;
4353  x_entry_rec.ZIPCODE                         := FND_API.g_miss_char;
4354  x_entry_rec.CURR_CP_COUNTRY_CODE            := FND_API.g_miss_char;
4355  x_entry_rec.CURR_CP_PHONE_NUMBER            := FND_API.g_miss_char;
4356  x_entry_rec.CURR_CP_RAW_PHONE_NUMBER        := FND_API.g_miss_char;
4357  x_entry_rec.CURR_CP_AREA_CODE               := FND_API.g_miss_num;
4358  x_entry_rec.CURR_CP_ID                      := FND_API.g_miss_num;
4359  x_entry_rec.CURR_CP_INDEX                   := FND_API.g_miss_num;
4360  x_entry_rec.CURR_CP_TIME_ZONE               := FND_API.g_miss_num;
4361  x_entry_rec.CURR_CP_TIME_ZONE_AUX           := FND_API.g_miss_num;
4362  x_entry_rec.IMP_SOURCE_LINE_ID              := FND_API.g_miss_num;
4363  x_entry_rec.NEXT_CALL_TIME                  := FND_API.g_miss_date;
4364  x_entry_rec.RECORD_RELEASE_TIME             := FND_API.g_miss_date;
4365  x_entry_rec.PARENT_PARTY_ID                 := FND_API.g_miss_num;
4366  x_entry_rec.GROUP_CODE                      := FND_API.g_miss_char;
4367  x_entry_rec.NEWLY_UPDATED_FLAG              := FND_API.g_miss_char;
4368  x_entry_rec.outcome_id                      := FND_API.g_miss_num;
4369  x_entry_rec.result_id                       := FND_API.g_miss_num;
4370  x_entry_rec.reason_id                       := FND_API.g_miss_num;
4371  x_entry_rec.notes                           := FND_API.g_miss_char;
4372  x_entry_rec.VEHICLE_RESPONSE_CODE           := FND_API.g_miss_char;
4373  x_entry_rec.SALES_AGENT_EMAIL_ADDRESS       := FND_API.g_miss_char;
4374  x_entry_rec.RESOURCE_ID                     := FND_API.g_miss_num;
4375  x_entry_rec.LOCATION_ID                     := FND_API.g_miss_num;
4376  x_entry_rec.CONTACT_POINT_ID                := FND_API.g_miss_num;
4377  x_entry_rec.last_contacted_date             := FND_API.g_miss_date;
4378 
4379 
4380 END init_entry_rec;
4381 
4382 
4383 
4384 PROCEDURE Copy_List_Entries
4385 (
4386   p_api_version_number      IN   NUMBER,
4387   p_init_msg_list           IN   VARCHAR2     := FND_API.G_FALSE,
4388   p_commit                  IN   VARCHAR2     := FND_API.G_FALSE,
4389   p_validation_level        IN   NUMBER       := FND_API.G_VALID_LEVEL_FULL,
4390   x_return_status           OUT NOCOPY  VARCHAR2,
4391   x_msg_count               OUT NOCOPY  NUMBER,
4392   x_msg_data                OUT NOCOPY  VARCHAR2,
4393   p_list_header_id        IN   NUMBER,
4394   p_new_list_header_id    IN NUMBER
4395 )IS
4396 l_api_name            CONSTANT VARCHAR2(30)  := 'Copy_List';
4397 l_api_version         CONSTANT NUMBER        := 1.0;
4398 -- Status Local Variables
4399 l_return_status                VARCHAR2(1);  -- Return value from procedures
4400 
4401 l_listheader_id                number :=p_list_header_id;
4402 
4403 x_rowid VARCHAR2(30);
4404 
4405 l_sqlerrm varchar2(600);
4406 l_sqlcode varchar2(100);
4407 
4408 l_init_msg_list    VARCHAR2(2000)    := FND_API.G_FALSE;
4409 
4410 BEGIN
4411   -- Standard Start of API savepoint
4412   SAVEPOINT Copy_List_Entries_PVT;
4413 
4414   x_return_status := FND_API.G_RET_STS_SUCCESS;
4415 
4416 
4417 
4418 
4419   -- Standard call to check for call compatibility.
4420   IF NOT FND_API.Compatible_API_Call ( l_api_version,
4421                                        p_api_version_number,
4422                                        l_api_name,
4423                                        G_PKG_NAME) THEN
4424      RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4425   END IF;
4426 
4427 
4428   -- Initialize message list IF p_init_msg_list is set to TRUE.
4429   IF FND_API.to_Boolean( p_init_msg_list ) THEN
4430      FND_MSG_PUB.initialize;
4431   END IF;
4432 
4433   -- Debug Message
4434   IF (AMS_DEBUG_HIGH_ON) THEN
4435      FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
4436      FND_MESSAGE.Set_Token('ROW', 'AMS_ListHeaders_PVT.Copy_List_Entries: Start', TRUE);
4437      FND_MSG_PUB.Add;
4438   END IF;
4439 
4440   --  Initialize API return status to success
4441   x_return_status := FND_API.G_RET_STS_SUCCESS;
4442 
4443   INSERT INTO AMS_lIST_ENTRIES(list_entry_id                ,
4444        list_header_id                  ,
4445        last_update_date                ,
4446        last_updated_by                 ,
4447        creation_date                   ,
4448        created_by                      ,
4449        last_update_login               ,
4450        object_version_number           ,
4451        list_select_action_id           ,
4452        arc_list_select_action_from     ,
4453        list_select_action_from_name    ,
4454        source_code                     ,
4455        arc_list_used_by_source         ,
4456        source_code_for_id              ,
4457        pin_code                        ,
4458        list_entry_source_system_id     ,
4459        list_entry_source_system_type   ,
4460        view_application_id             ,
4461        manually_entered_flag           ,
4462        marked_as_duplicate_flag        ,
4463        marked_as_random_flag           ,
4464        part_of_control_group_flag      ,
4465        exclude_in_triggered_list_flag  ,
4466        enabled_flag                    ,
4467        cell_code                       ,
4468        dedupe_key                      ,
4469        randomly_generated_number       ,
4470        campaign_id                     ,
4471        media_id                        ,
4472        channel_id                      ,
4473        channel_schedule_id             ,
4474        event_offer_id                  ,
4475        customer_id                     ,
4476        market_segment_id               ,
4477        vendor_id                       ,
4478        transfer_flag                   ,
4479        transfer_status                 ,
4480        list_source                     ,
4481        duplicate_master_entry_id       ,
4482        marked_flag                     ,
4483        lead_id                         ,
4484        letter_id                       ,
4485        picking_header_id               ,
4486        batch_id                        ,
4487        suffix                          ,
4488        first_name                      ,
4489        last_name                       ,
4490        customer_name                   ,
4491        title                           ,
4492        address_line1                   ,
4493        address_line2                   ,
4494        city                            ,
4495        state                           ,
4496        zipcode                         ,
4497        country                         ,
4498        fax                             ,
4499        phone                           ,
4500        email_address                   ,
4501        col1                            ,
4502        col2                            ,
4503        col3                            ,
4504        col4                            ,
4505        col5                            ,
4506        col6                            ,
4507        col7                            ,
4508        col8                            ,
4509        col9                            ,
4510        col10                           ,
4511        col11                           ,
4512        col12                           ,
4513        col13                           ,
4514        col14                           ,
4515        col15                           ,
4516        col16                           ,
4517        col17                           ,
4518        col18                           ,
4519        col19                           ,
4520        col20                           ,
4521        col21                           ,
4522        col22                           ,
4523        col23                           ,
4524        col24                           ,
4525        col25                           ,
4526        col26                           ,
4527        col27                           ,
4528        col28                           ,
4529        col29                           ,
4530        col30                           ,
4531        col31                           ,
4532        col32                           ,
4533        col33                           ,
4534        col34                           ,
4535        col35                           ,
4536        col36                           ,
4537        col37                           ,
4538        col38                           ,
4539        col39                           ,
4540        col40                           ,
4541        col41                           ,
4542        col42                           ,
4543        col43                           ,
4544        col44                           ,
4545        col45                           ,
4546        col46                           ,
4547        col47                           ,
4548        col48                           ,
4549        col49                           ,
4550        col50                           ,
4551        col51                           ,
4552        col52                           ,
4553        col53                           ,
4554        col54                           ,
4555        col55                           ,
4556        col56                           ,
4557        col57                           ,
4558        col58                           ,
4559        col59                           ,
4560        col60                           ,
4561        col61                           ,
4562        col62                           ,
4563        col63                           ,
4564        col64                           ,
4565        col65                           ,
4566        col66                           ,
4567        col67                           ,
4568        col68                           ,
4569        col69                           ,
4570        col70                           ,
4571        col71                           ,
4572        col72                           ,
4573        col73                           ,
4574        col74                           ,
4575        col75                           ,
4576        col76                           ,
4577        col77                           ,
4578        col78                           ,
4579        col79                           ,
4580        col80                           ,
4581        col81                           ,
4582        col82                           ,
4583        col83                           ,
4584        col84                           ,
4585        col85                           ,
4586        col86                           ,
4587        col87                           ,
4588        col88                           ,
4589        col89                           ,
4590        col90                           ,
4591        col91                           ,
4592        col92                           ,
4593        col93                           ,
4594        col94                           ,
4595        col95                           ,
4596        col96                           ,
4597        col97                           ,
4598        col98                           ,
4599        col99                           ,
4600        col100                          ,
4601        col101                          ,
4602        col102                          ,
4603        col103                          ,
4604        col104                          ,
4605        col105                          ,
4606        col106                          ,
4607        col107                          ,
4608        col108                          ,
4609        col109                          ,
4610        col110                          ,
4611        col111                          ,
4612        col112                          ,
4613        col113                          ,
4614        col114                          ,
4615        col115                          ,
4616        col116                          ,
4617        col117                          ,
4618        col118                          ,
4619        col119                          ,
4620        col120                          ,
4621        col121                          ,
4622        col122                          ,
4623        col123                          ,
4624        col124                          ,
4625        col125                          ,
4626        col126                          ,
4627        col127                          ,
4628        col128                          ,
4629        col129                          ,
4630        col130                          ,
4631        col131                          ,
4632        col132                          ,
4633        col133                          ,
4634        col134                          ,
4635        col135                          ,
4636        col136                          ,
4637        col137                          ,
4638        col138                          ,
4639        col139                          ,
4640        col140                          ,
4641        col141                          ,
4642        col142                          ,
4643        col143                          ,
4644        col144                          ,
4645        col145                          ,
4646        col146                          ,
4647        col147                          ,
4648        col148                          ,
4649        col149                          ,
4650        col150                          ,
4651        col151                          ,
4652        col152                          ,
4653        col153                          ,
4654        col154                          ,
4655        col155                          ,
4656        col156                          ,
4657        col157                          ,
4658        col158                          ,
4659        col159                          ,
4660        col160                          ,
4661        col161                          ,
4662        col162                          ,
4663        col163                          ,
4664        col164                          ,
4665        col165                          ,
4666        col166                          ,
4667        col167                          ,
4668        col168                          ,
4669        col169                          ,
4670        col170                          ,
4671        col171                          ,
4672        col172                          ,
4673        col173                          ,
4674        col174                          ,
4675        col175                          ,
4676        col176                          ,
4677        col177                          ,
4678        col178                          ,
4679        col179                          ,
4680        col180                          ,
4681        col181                          ,
4682        col182                          ,
4683        col183                          ,
4684        col184                          ,
4685        col185                          ,
4686        col186                          ,
4687        col187                          ,
4688        col188                          ,
4689        col189                          ,
4690        col190                          ,
4691        col191                          ,
4692        col192                          ,
4693        col193                          ,
4694        col194                          ,
4695        col195                          ,
4696        col196                          ,
4697        col197                          ,
4698        col198                          ,
4699        col199                          ,
4700        col200                          ,
4701        col201                          ,
4702        col202                          ,
4703        col203                          ,
4704        col204                          ,
4705        col205                          ,
4706        col206                          ,
4707        col207                          ,
4708        col208                          ,
4709        col209                          ,
4710        col210                          ,
4711        col211                          ,
4712        col212                          ,
4713        col213                          ,
4714        col214                          ,
4715        col215                          ,
4716        col216                          ,
4717        col217                          ,
4718        col218                          ,
4719        col219                          ,
4720        col220                          ,
4721        col221                          ,
4722        col222                          ,
4723        col223                          ,
4724        col224                          ,
4725        col225                          ,
4726        col226                          ,
4727        col227                          ,
4728        col228                          ,
4729        col229                          ,
4730        col230                          ,
4731        col231                          ,
4732        col232                          ,
4733        col233                          ,
4734        col234                          ,
4735        col235                          ,
4736        col236                          ,
4737        col237                          ,
4738        col238                          ,
4739        col239                          ,
4740        col240                          ,
4741        col241                          ,
4742        col242                          ,
4743        col243                          ,
4744        col244                          ,
4745        col245                          ,
4746        col246                          ,
4747        col247                          ,
4748        col248                          ,
4749        col249                          ,
4750        col250                          ,
4751        col251                          ,
4752        col252                          ,
4753        col253                          ,
4754        col254                          ,
4755        col255                          ,
4756        col256                          ,
4757        col257                          ,
4758        col258                          ,
4759        col259                          ,
4760        col260                          ,
4761        col261                          ,
4762        col262                          ,
4763        col263                          ,
4764        col264                          ,
4765        col265                          ,
4766        col266                          ,
4767        col267                          ,
4768        col268                          ,
4769        col269                          ,
4770        col270                          ,
4771        col271                          ,
4772        col272                          ,
4773        col273                          ,
4774        col274                          ,
4775        col275                          ,
4776        col276                          ,
4777        col277                          ,
4778        col278                          ,
4779        col279                          ,
4780        col280                          ,
4781        col281                          ,
4782        col282                          ,
4783        col283                          ,
4784        col284                          ,
4785        col285                          ,
4786        col286                          ,
4787        col287                          ,
4788        col288                          ,
4789        col289                          ,
4790        col290                          ,
4791        col291                          ,
4792        col292                          ,
4793        col293                          ,
4794        col294                          ,
4795        col295                          ,
4796        col296                          ,
4797        col297                          ,
4798        col298                          ,
4799        col299                          ,
4800        col300                          ,
4801        party_id                        ,
4802        parent_party_id                 ,
4803        -- geometry                     ,
4804        imp_source_line_id              ,
4805        group_code		       ,
4806        newly_updated_flag	       ,
4807        outcome_id		       ,
4808        result_id 	       ,
4809        reason_id
4810   )
4811    select ams_list_entries_s.nextval   ,
4812        p_new_list_header_id            ,
4813        SYSDATE                         ,
4814        FND_GLOBAL.user_id              ,
4815        SYSDATE                         ,
4816        FND_GLOBAL.user_id              ,
4817        FND_GLOBAL.conc_login_id        ,
4818        1                               ,
4819        0                               ,--put select action id as 0 for now
4820        arc_list_select_action_from     ,
4821        list_select_action_from_name    ,
4822        'NONE'                          ,
4823        'NONE'                          ,
4824        0                               ,
4825        ams_list_entries_s.currval      ,
4826        list_entry_source_system_id     ,
4827        list_entry_source_system_type   ,
4828        view_application_id             ,
4829        manually_entered_flag           ,
4830        marked_as_duplicate_flag        ,
4831        marked_as_random_flag           ,
4832        part_of_control_group_flag      ,
4833        exclude_in_triggered_list_flag  ,
4834        enabled_flag                    ,
4835        cell_code                       ,
4836        dedupe_key                      ,
4837        randomly_generated_number       ,
4838        campaign_id                     ,
4839        media_id                        ,
4840        channel_id                      ,
4841        channel_schedule_id             ,
4842        event_offer_id                  ,
4843        customer_id                     ,
4844        market_segment_id               ,
4845        vendor_id                       ,
4846        transfer_flag                   ,
4847        transfer_status                 ,
4848        list_source                     ,
4849        duplicate_master_entry_id       ,
4850        marked_flag                     ,
4851        lead_id                         ,
4852        letter_id                       ,
4853        picking_header_id               ,
4854        batch_id                        ,
4855        suffix                          ,
4856        first_name                      ,
4857        last_name                       ,
4858        customer_name                   ,
4859        title                           ,
4860        address_line1                   ,
4861        address_line2                   ,
4862        city                            ,
4863        state                           ,
4864        zipcode                         ,
4865        country                         ,
4866        fax                             ,
4867        phone                           ,
4868        email_address                   ,
4869        col1                            ,
4870        col2                            ,
4871        col3                            ,
4872        col4                            ,
4873        col5                            ,
4874        col6                            ,
4875        col7                            ,
4876        col8                            ,
4877        col9                            ,
4878        col10                           ,
4879        col11                           ,
4880        col12                           ,
4881        col13                           ,
4882        col14                           ,
4883        col15                           ,
4884        col16                           ,
4885        col17                           ,
4886        col18                           ,
4887        col19                           ,
4888        col20                           ,
4889        col21                           ,
4890        col22                           ,
4891        col23                           ,
4892        col24                           ,
4893        col25                           ,
4894        col26                           ,
4895        col27                           ,
4896        col28                           ,
4897        col29                           ,
4898        col30                           ,
4899        col31                           ,
4900        col32                           ,
4901        col33                           ,
4902        col34                           ,
4903        col35                           ,
4904        col36                           ,
4905        col37                           ,
4906        col38                           ,
4907        col39                           ,
4908        col40                           ,
4909        col41                           ,
4910        col42                           ,
4911        col43                           ,
4912        col44                           ,
4913        col45                           ,
4914        col46                           ,
4915        col47                           ,
4916        col48                           ,
4917        col49                           ,
4918        col50                           ,
4919        col51                           ,
4920        col52                           ,
4921        col53                           ,
4922        col54                           ,
4923        col55                           ,
4924        col56                           ,
4925        col57                           ,
4926        col58                           ,
4927        col59                           ,
4928        col60                           ,
4929        col61                           ,
4930        col62                           ,
4931        col63                           ,
4932        col64                           ,
4933        col65                           ,
4934        col66                           ,
4935        col67                           ,
4936        col68                           ,
4937        col69                           ,
4938        col70                           ,
4939        col71                           ,
4940        col72                           ,
4941        col73                           ,
4942        col74                           ,
4943        col75                           ,
4944        col76                           ,
4945        col77                           ,
4946        col78                           ,
4947        col79                           ,
4948        col80                           ,
4949        col81                           ,
4950        col82                           ,
4951        col83                           ,
4952        col84                           ,
4953        col85                           ,
4954        col86                           ,
4955        col87                           ,
4956        col88                           ,
4957        col89                           ,
4958        col90                           ,
4959        col91                           ,
4960        col92                           ,
4961        col93                           ,
4962        col94                           ,
4963        col95                           ,
4964        col96                           ,
4965        col97                           ,
4966        col98                           ,
4967        col99                           ,
4968        col100                          ,
4969        col101                          ,
4970        col102                          ,
4971        col103                          ,
4972        col104                          ,
4973        col105                          ,
4974        col106                          ,
4975        col107                          ,
4976        col108                          ,
4977        col109                          ,
4978        col110                          ,
4979        col111                          ,
4980        col112                          ,
4981        col113                          ,
4982        col114                          ,
4983        col115                          ,
4984        col116                          ,
4985        col117                          ,
4986        col118                          ,
4987        col119                          ,
4988        col120                          ,
4989        col121                          ,
4990        col122                          ,
4991        col123                          ,
4992        col124                          ,
4993        col125                          ,
4994        col126                          ,
4995        col127                          ,
4996        col128                          ,
4997        col129                          ,
4998        col130                          ,
4999        col131                          ,
5000        col132                          ,
5001        col133                          ,
5002        col134                          ,
5003        col135                          ,
5004        col136                          ,
5005        col137                          ,
5006        col138                          ,
5007        col139                          ,
5008        col140                          ,
5009        col141                          ,
5010        col142                          ,
5011        col143                          ,
5012        col144                          ,
5013        col145                          ,
5014        col146                          ,
5015        col147                          ,
5016        col148                          ,
5017        col149                          ,
5018        col150                          ,
5019        col151                          ,
5020        col152                          ,
5021        col153                          ,
5022        col154                          ,
5023        col155                          ,
5024        col156                          ,
5025        col157                          ,
5026        col158                          ,
5027        col159                          ,
5028        col160                          ,
5029        col161                          ,
5030        col162                          ,
5031        col163                          ,
5032        col164                          ,
5033        col165                          ,
5034        col166                          ,
5035        col167                          ,
5036        col168                          ,
5037        col169                          ,
5038        col170                          ,
5039        col171                          ,
5040        col172                          ,
5041        col173                          ,
5042        col174                          ,
5043        col175                          ,
5044        col176                          ,
5045        col177                          ,
5046        col178                          ,
5047        col179                          ,
5048        col180                          ,
5049        col181                          ,
5050        col182                          ,
5051        col183                          ,
5052        col184                          ,
5053        col185                          ,
5054        col186                          ,
5055        col187                          ,
5056        col188                          ,
5057        col189                          ,
5058        col190                          ,
5059        col191                          ,
5060        col192                          ,
5061        col193                          ,
5062        col194                          ,
5063        col195                          ,
5064        col196                          ,
5065        col197                          ,
5066        col198                          ,
5067        col199                          ,
5068        col200                          ,
5069        col201                          ,
5070        col202                          ,
5071        col203                          ,
5072        col204                          ,
5073        col205                          ,
5074        col206                          ,
5075        col207                          ,
5076        col208                          ,
5077        col209                          ,
5078        col210                          ,
5079        col211                          ,
5080        col212                          ,
5081        col213                          ,
5082        col214                          ,
5083        col215                          ,
5084        col216                          ,
5085        col217                          ,
5086        col218                          ,
5087        col219                          ,
5088        col220                          ,
5089        col221                          ,
5090        col222                          ,
5091        col223                          ,
5092        col224                          ,
5093        col225                          ,
5094        col226                          ,
5095        col227                          ,
5096        col228                          ,
5097        col229                          ,
5098        col230                          ,
5099        col231                          ,
5100        col232                          ,
5101        col233                          ,
5102        col234                          ,
5103        col235                          ,
5104        col236                          ,
5105        col237                          ,
5106        col238                          ,
5107        col239                          ,
5108        col240                          ,
5109        col241                          ,
5110        col242                          ,
5111        col243                          ,
5112        col244                          ,
5113        col245                          ,
5114        col246                          ,
5115        col247                          ,
5116        col248                          ,
5117        col249                          ,
5118        col250                          ,
5119        col251                          ,
5120        col252                          ,
5121        col253                          ,
5122        col254                          ,
5123        col255                          ,
5124        col256                          ,
5125        col257                          ,
5126        col258                          ,
5127        col259                          ,
5128        col260                          ,
5129        col261                          ,
5130        col262                          ,
5131        col263                          ,
5132        col264                          ,
5133        col265                          ,
5134        col266                          ,
5135        col267                          ,
5136        col268                          ,
5137        col269                          ,
5138        col270                          ,
5139        col271                          ,
5140        col272                          ,
5141        col273                          ,
5142        col274                          ,
5143        col275                          ,
5144        col276                          ,
5145        col277                          ,
5146        col278                          ,
5147        col279                          ,
5148        col280                          ,
5149        col281                          ,
5150        col282                          ,
5151        col283                          ,
5152        col284                          ,
5153        col285                          ,
5154        col286                          ,
5155        col287                          ,
5156        col288                          ,
5157        col289                          ,
5158        col290                          ,
5159        col291                          ,
5160        col292                          ,
5161        col293                          ,
5162        col294                          ,
5163        col295                          ,
5164        col296                          ,
5165        col297                          ,
5166        col298                          ,
5167        col299                          ,
5168        col300                          ,
5169        party_id                        ,
5170        parent_party_id                 ,
5171        -- geometry                     ,
5172        imp_source_line_id              ,
5173        group_code		       ,
5174        newly_updated_flag	       ,
5175        outcome_id ,
5176        result_id	       ,
5177        reason_id
5178        FROM ams_list_entries
5179        WHERE list_header_id = p_list_header_id  ;
5180 
5181 
5182 
5183     IF x_return_status = FND_API.G_RET_STS_ERROR THEN
5184             RAISE FND_API.G_EXC_ERROR;
5185     ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5186            RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5187     END IF;
5188 
5189       -- Standard check of p_commit.
5190       IF FND_API.To_Boolean ( p_commit ) THEN
5191            COMMIT WORK;
5192       END IF;
5193 
5194       -- Success Message
5195       IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
5196       THEN
5197             FND_MESSAGE.Set_Name('AMS', 'API_SUCCESS');
5198             FND_MESSAGE.Set_Token('ROW', 'AMS_listheaders_PVT.Copy_List_Entries', TRUE);
5199             FND_MSG_PUB.Add;
5200       END IF;
5201 
5202       IF (AMS_DEBUG_HIGH_ON) THEN
5203             FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
5204             FND_MESSAGE.Set_Token('ROW', 'AMS_listheaders_PVT.Copy_List_Entries: END', TRUE);
5205             FND_MSG_PUB.Add;
5206       END IF;
5207 
5208 
5209       -- Standard call to get message count AND IF count is 1, get message info.
5210       FND_MSG_PUB.Count_AND_Get
5211           ( p_count        =>      x_msg_count,
5212             p_data         =>      x_msg_data,
5213             p_encoded      =>        FND_API.G_FALSE
5214           );
5215 
5216 EXCEPTION
5217    WHEN FND_API.G_EXC_ERROR THEN
5218       ROLLBACK TO Copy_List_Entries_PVT;
5219       x_return_status := FND_API.G_RET_STS_ERROR ;
5220 
5221       FND_MSG_PUB.Count_AND_Get
5222           ( p_count           =>      x_msg_count,
5223             p_data            =>      x_msg_data,
5224             p_encoded         =>      FND_API.G_FALSE
5225            );
5226 
5227 
5228    WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5229       ROLLBACK TO Copy_List_Entries_PVT;
5230       x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5231       FND_MSG_PUB.Count_AND_Get
5232       ( p_count      =>      x_msg_count,
5233         p_data       =>      x_msg_data,
5234         p_encoded    =>      FND_API.G_FALSE
5235       );
5236 
5237    WHEN OTHERS THEN
5238       ROLLBACK TO Copy_List_Entries_PVT;
5239       FND_MESSAGE.set_name('AMS','SQL ERROR ->' || sqlerrm );
5240       FND_MSG_PUB.Add;
5241       x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5242       IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
5243          FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5244       END IF;
5245 
5246       FND_MSG_PUB.Count_AND_Get
5247                 ( p_count           =>      x_msg_count,
5248                   p_data            =>      x_msg_data,
5249                   p_encoded         =>      FND_API.G_FALSE
5250                 );
5251 
5252 
5253 END Copy_List_Entries;
5254 
5255 
5256 END AMS_List_Entries_PVT;