DBA Data[Home] [Help]

PACKAGE BODY: APPS.IGR_INQUIRY_PKG

Source


1 PACKAGE BODY igr_inquiry_pkg AS
2 /* $Header: IGSRT03B.pls 120.1 2005/11/23 13:26:39 appldev noship $ */
3 
4   l_rowid VARCHAR2(25);
5 
6   PROCEDURE insert_row (
7     x_rowid                             IN OUT NOCOPY VARCHAR2,
8     x_person_id                         IN     NUMBER,
9     x_enquiry_appl_number               OUT NOCOPY NUMBER,
10     x_sales_lead_id                     OUT NOCOPY NUMBER,
11     x_acad_cal_type                     IN     VARCHAR2,
12     x_acad_ci_sequence_number           IN     NUMBER,
13     x_adm_cal_type                      IN     VARCHAR2,
14     x_adm_ci_sequence_number            IN     NUMBER,
15     x_enquiry_dt                        IN     DATE,
16     x_registering_person_id             IN     NUMBER,
17     x_override_process_ind              IN     VARCHAR2,
18     x_indicated_mailing_dt              IN     DATE,
19     x_last_process_dt                   IN     DATE,
20     x_comments                          IN     VARCHAR2,
21     x_org_id                            IN     NUMBER,
22     x_inq_entry_level_id                IN     NUMBER,
23     x_edu_goal_id                       IN     NUMBER,
24     x_party_id                          IN     NUMBER,
25     x_how_knowus_id                     IN     NUMBER,
26     x_who_influenced_id                 IN     NUMBER,
27     x_attribute_category                IN     VARCHAR2,
28     x_attribute1                        IN     VARCHAR2,
29     x_attribute2                        IN     VARCHAR2,
30     x_attribute3                        IN     VARCHAR2,
31     x_attribute4                        IN     VARCHAR2,
32     x_attribute5                        IN     VARCHAR2,
33     x_attribute6                        IN     VARCHAR2,
34     x_attribute7                        IN     VARCHAR2,
35     x_attribute8                        IN     VARCHAR2,
36     x_attribute9                        IN     VARCHAR2,
37     x_attribute10                       IN     VARCHAR2,
38     x_attribute11                       IN     VARCHAR2,
39     x_attribute12                       IN     VARCHAR2,
40     x_attribute13                       IN     VARCHAR2,
41     x_attribute14                       IN     VARCHAR2,
42     x_attribute15                       IN     VARCHAR2,
43     x_attribute16                       IN     VARCHAR2,
44     x_attribute17                       IN     VARCHAR2,
45     x_attribute18                       IN     VARCHAR2,
46     x_attribute19                       IN     VARCHAR2,
47     x_attribute20                       IN     VARCHAR2,
48     x_s_enquiry_status                  IN     VARCHAR2,
49     x_enabled_flag                      IN     VARCHAR2,
50     x_inquiry_method_code               IN     VARCHAR2,
51     x_mode                              IN     VARCHAR2 ,
52     x_action                            IN     VARCHAR2,
53     x_person_type_code                  IN     VARCHAR2,
54     x_funnel_status                     IN     VARCHAR2,
55     x_source_promotion_id               IN     VARCHAR2,
56     x_ret_status                        OUT NOCOPY VARCHAR2,
57     x_msg_data                          OUT NOCOPY VARCHAR2,
58     x_msg_count                         OUT NOCOPY NUMBER,
59     x_pkg_reduct_ind                    IN      VARCHAR2 DEFAULT NULL
60 
61   ) AS
62   /*
63   ||  Created By : hreddych
64   ||  Created On : 22-JAN-2003
65   ||  Purpose : Handles the INSERT DML logic for the table.
66   ||  Known limitations, enhancements or remarks :
67   ||  Change History :
68   ||  Who             When            What
69   ||  (reverse chronological order - newest change first)
70   */
71 
72     x_last_update_date           DATE;
73     x_last_updated_by            NUMBER;
74     x_last_update_login          NUMBER;
75     x_request_id                 NUMBER;
76     x_program_id                 NUMBER;
77     x_program_application_id     NUMBER;
78     x_program_update_date        DATE;
79     l_lead_proc_ret_status       VARCHAR2(1);
80     l_lead_proc_msg_count        NUMBER;
81     l_lead_proc_msg_data         VARCHAR2(2000);
82 
83     l_tmp_var VARCHAR2(2000);
84     l_employee_id     as_sales_leads.assign_to_person_id%TYPE;
85     l_resource_id     as_sales_leads.assign_to_Salesforce_id%TYPE;
86     l_sales_lead_id   as_sales_leads.sales_lead_id%TYPE;
87     l_address_id      as_sales_leads.address_id%TYPE;
88     l_sales_lead_rec  as_sales_leads_pub.G_MISS_SALES_LEAD_REC%TYPE ;
89 
90 
91     ddx_sales_lead_line_out_tbl as_sales_leads_pub.sales_lead_line_out_tbl_type;
92     ddx_sales_lead_cnt_out_tbl  as_sales_leads_pub.sales_lead_cnt_out_tbl_type;
93     ddp_sales_lead_profile_tbl  as_utility_pub.profile_tbl_type;
94     ddp_sales_lead_line_tbl     as_sales_leads_pub.sales_lead_line_tbl_type;
95     ddp_sales_lead_contact_tbl  as_sales_leads_pub.sales_lead_contact_tbl_type;
96 
97     CURSOR c_primary_address IS
98     SELECT party_site_id
99     FROM   hz_party_sites
100     WHERE  identifying_address_flag = 'Y'
101     AND    status = 'A'
102     AND    party_id = x_person_id;
103 
104   BEGIN
105 
106       OPEN  c_primary_address;
107       FETCH c_primary_address INTO l_address_id;
108       CLOSE c_primary_address;
109 
110       l_sales_lead_rec.status_code                   :=x_s_enquiry_status;
111       l_sales_lead_rec.vehicle_response_code         :=x_inquiry_method_code;
112       l_sales_lead_rec.lead_number                   :=NULL;
113       l_sales_lead_rec.customer_id                   :=x_person_id;
114       l_sales_lead_rec.address_id                    :=l_address_id;
115       l_sales_lead_rec.source_promotion_id           :=x_source_promotion_id ;
116 
117 
118    AS_SALES_LEADS_PUB.CREATE_SALES_LEAD(
119 	P_API_VERSION_NUMBER      => 2.0,
120 	P_INIT_MSG_LIST           => FND_API.G_TRUE,
121 	P_COMMIT                  => FND_API.G_FALSE,
122         P_VALIDATION_LEVEL        => AS_UTILITY_PUB.G_VALID_LEVEL_ITEM,
123         P_CHECK_ACCESS_FLAG       => FND_API.G_MISS_CHAR,
124         P_ADMIN_FLAG              => 'Y',
125         P_ADMIN_GROUP_ID          => FND_API.G_MISS_NUM,
126 	P_SALES_LEAD_PROFILE_TBL  => ddp_sales_lead_profile_tbl,
127 	P_SALES_LEAD_LINE_TBL     => ddp_sales_lead_line_tbl,
128 	P_SALES_LEAD_CONTACT_TBL  => ddp_sales_lead_contact_tbl,
129 	X_SALES_LEAD_ID           => l_sales_lead_id,
130 	X_SALES_LEAD_LINE_OUT_TBL => ddx_sales_lead_line_out_tbl,
131 	X_SALES_LEAD_CNT_OUT_TBL  => ddx_sales_lead_cnt_out_tbl,
132 	P_SALES_LEAD_REC          => L_SALES_LEAD_REC ,
133 	X_RETURN_STATUS           => x_ret_status,
134 	X_MSG_COUNT               => x_msg_count,
135 	X_MSG_DATA                => x_msg_data);
136 
137    IF x_ret_status  IN ('E','U') THEN
138       IF x_msg_count > 1 THEN
139          FOR i IN 1..x_msg_count LOOP
140            l_tmp_var := l_tmp_var || ' '||fnd_msg_pub.get(p_encoded => fnd_api.g_false);
141          END LOOP;
142          x_msg_data := trim(l_tmp_var);
143        END IF;
144    END IF;
145 
146   IF x_ret_status = 'S' then  -- lead properly created
147 
148    X_sales_lead_id := l_sales_lead_id ;
149 
150    IGR_I_APPL_Pkg.insert_row (
151         X_Mode                              => 'R',
152         X_RowId                             =>X_RowId                   ,
153         X_Person_Id                         =>X_Person_Id               ,
154         X_sales_lead_id                     =>l_sales_lead_id           ,
155         X_Enquiry_Appl_Number               =>X_Enquiry_Appl_Number     ,
156         X_Acad_Cal_Type                     =>X_Acad_Cal_Type           ,
157         X_Acad_Ci_Sequence_Number           =>X_Acad_Ci_Sequence_Number ,
158         X_Adm_Cal_Type                      =>X_Adm_Cal_Type            ,
159         X_Adm_Ci_Sequence_Number            =>X_Adm_Ci_Sequence_Number  ,
160         X_Enquiry_Dt                        =>X_Enquiry_Dt              ,
161         X_Registering_Person_Id             =>X_Registering_Person_Id   ,
162         X_Override_Process_Ind              =>X_Override_Process_Ind    ,
163         X_Indicated_Mailing_Dt              =>X_Indicated_Mailing_Dt    ,
164         X_Last_Process_Dt                   =>X_Last_Process_Dt         ,
165         X_Comments                          =>X_Comments                ,
166         X_INQ_ENTRY_LEVEL_ID                =>X_INQ_ENTRY_LEVEL_ID      ,
167         X_EDU_GOAL_ID                       =>X_EDU_GOAL_ID             ,
168         X_PARTY_ID                          =>X_PARTY_ID                ,
169         X_HOW_KNOWUS_ID                     =>X_HOW_KNOWUS_ID           ,
170         X_WHO_INFLUENCED_ID                 =>X_WHO_INFLUENCED_ID       ,
171         X_ATTRIBUTE_CATEGORY                =>X_ATTRIBUTE_CATEGORY      ,
172         X_ATTRIBUTE1                        =>X_ATTRIBUTE1              ,
173         X_ATTRIBUTE2                        =>X_ATTRIBUTE2              ,
174         X_ATTRIBUTE3                        =>X_ATTRIBUTE3              ,
175         X_ATTRIBUTE4                        =>X_ATTRIBUTE4              ,
176         X_ATTRIBUTE5                        =>X_ATTRIBUTE5              ,
177         X_ATTRIBUTE6                        =>X_ATTRIBUTE6              ,
178         X_ATTRIBUTE7                        =>X_ATTRIBUTE7              ,
179         X_ATTRIBUTE8                        =>X_ATTRIBUTE8              ,
180         X_ATTRIBUTE9                        =>X_ATTRIBUTE9              ,
181         X_ATTRIBUTE10                       =>X_ATTRIBUTE10             ,
182         X_ATTRIBUTE11                       =>X_ATTRIBUTE11             ,
183         X_ATTRIBUTE12                       =>X_ATTRIBUTE12             ,
184         X_ATTRIBUTE13                       =>X_ATTRIBUTE13             ,
185         X_ATTRIBUTE14                       =>X_ATTRIBUTE14             ,
186         X_ATTRIBUTE15                       =>X_ATTRIBUTE15             ,
187         X_ATTRIBUTE16                       =>X_ATTRIBUTE16             ,
188         X_ATTRIBUTE17                       =>X_ATTRIBUTE17             ,
189         X_ATTRIBUTE18                       =>X_ATTRIBUTE18             ,
190         X_ATTRIBUTE19                       =>X_ATTRIBUTE19             ,
191         X_ATTRIBUTE20                       =>X_ATTRIBUTE20             ,
192         X_Org_Id                            =>X_Org_Id                  ,
193         X_PKG_REDUCT_IND                    =>x_pkg_reduct_ind
194     );
195   Igr_in_jtf_interactions_pkg.start_int_and_act (     p_doc_ref	=>  'LEAD',
196                          p_person_id      =>  X_PERSON_ID,
197 			 p_sales_lead_id  =>  l_sales_lead_id,
198                          p_item_id	  =>  NULL,
199 			 p_doc_id         =>  l_sales_lead_id,
200                          p_action         =>  X_ACTION ,
201                          p_action_item    => 'INQUIRY',
202 	                 p_ret_status     =>  x_ret_status,
203 	 		 p_msg_data       =>  x_msg_data,
204 	                 p_msg_count      =>  x_msg_count);
205 
206        IF NVL(x_ret_status,'S') NOT IN ('E','U') THEN
207            igr_person_type_pkg.update_persontype_funnel(
208              p_person_id           =>  x_person_id,
209              p_person_type_code    =>  x_person_type_code,
210 	     p_funnel_status       =>  x_funnel_status,
211 	     p_return_status       =>  x_ret_status,
212 	     p_message_text        =>  x_msg_data) ;
213        END IF;
214 
215     -- call Sales Real Time lead assignment API, passing in local ret/msg
216     -- variables, as failure of this API should not preclude lead
217     -- or inquiry creation.
218 
219        AS_SALES_LEADS_PUB.Lead_Process_After_Create (
220           P_Api_Version_Number	=> 2.0,
221           P_Init_Msg_List       => FND_API.G_FALSE,
222           P_Commit              => FND_API.G_FALSE,
223           P_Validation_Level    => AS_UTILITY_PUB.G_VALID_LEVEL_ITEM,
224           P_Check_Access_Flag   => FND_API.G_MISS_CHAR,
225           P_Admin_Flag          => FND_API.G_MISS_CHAR,
226           P_Admin_Group_Id      => FND_API.G_MISS_NUM,
227           P_identity_salesforce_id => FND_API.G_MISS_NUM,
228           P_Salesgroup_id       => FND_API.G_MISS_NUM,
229           P_Sales_Lead_Id       => l_sales_lead_id,
233        );
230           X_Return_Status       => l_lead_proc_ret_status,
231           X_Msg_Count           => l_lead_proc_msg_count,
232           X_Msg_Data            => l_lead_proc_msg_data
234 
235        IF NVL(l_lead_proc_ret_status,'S') IN ('E','U') THEN
236 	 fnd_file.put_line(fnd_file.log, 'AS_SALES_LEADS_PUB.Lead_Process_After_Create failed.');
237        END IF;
238 
239   END IF; -- end lead properly created
240 
241 
242   END insert_row;
243 
244 
245   PROCEDURE update_row (
246     x_rowid                             IN     VARCHAR2,
247     x_person_id                         IN     NUMBER,
248     x_enquiry_appl_number               IN     NUMBER,
249     x_sales_lead_id                     IN     NUMBER,
250     x_acad_cal_type                     IN     VARCHAR2,
251     x_acad_ci_sequence_number           IN     NUMBER,
252     x_adm_cal_type                      IN     VARCHAR2,
253     x_adm_ci_sequence_number            IN     NUMBER,
254     x_enquiry_dt                        IN     DATE,
255     x_registering_person_id             IN     NUMBER,
256     x_override_process_ind              IN     VARCHAR2,
257     x_indicated_mailing_dt              IN     DATE,
258     x_last_process_dt                   IN     DATE,
259     x_comments                          IN     VARCHAR2,
260     x_org_id                            IN     NUMBER,
261     x_inq_entry_level_id                IN     NUMBER,
262     x_edu_goal_id                       IN     NUMBER,
263     x_party_id                          IN     NUMBER,
264     x_how_knowus_id                     IN     NUMBER,
265     x_who_influenced_id                 IN     NUMBER,
266     x_attribute_category                IN     VARCHAR2,
267     x_attribute1                        IN     VARCHAR2,
268     x_attribute2                        IN     VARCHAR2,
269     x_attribute3                        IN     VARCHAR2,
270     x_attribute4                        IN     VARCHAR2,
271     x_attribute5                        IN     VARCHAR2,
272     x_attribute6                        IN     VARCHAR2,
273     x_attribute7                        IN     VARCHAR2,
274     x_attribute8                        IN     VARCHAR2,
275     x_attribute9                        IN     VARCHAR2,
276     x_attribute10                       IN     VARCHAR2,
277     x_attribute11                       IN     VARCHAR2,
278     x_attribute12                       IN     VARCHAR2,
279     x_attribute13                       IN     VARCHAR2,
280     x_attribute14                       IN     VARCHAR2,
281     x_attribute15                       IN     VARCHAR2,
282     x_attribute16                       IN     VARCHAR2,
283     x_attribute17                       IN     VARCHAR2,
284     x_attribute18                       IN     VARCHAR2,
285     x_attribute19                       IN     VARCHAR2,
286     x_attribute20                       IN     VARCHAR2,
287     x_s_enquiry_status                  IN     VARCHAR2,
288     x_enabled_flag                      IN     VARCHAR2,
289     x_inquiry_method_code               IN     VARCHAR2,
290     x_mode                              IN     VARCHAR2,
291     x_action                            IN     VARCHAR2,
292     x_source_promotion_id               IN     VARCHAR2,
293     x_ret_status                        OUT NOCOPY VARCHAR2,
294     x_msg_data                          OUT NOCOPY VARCHAR2,
295     x_msg_count                         OUT NOCOPY NUMBER,
296     x_pkg_reduct_ind                    IN      VARCHAR2 DEFAULT NULL
297   ) AS
298   /*
299   ||  Created By : hreddych
300   ||  Created On : 22-JAN-2003
301   ||  Purpose : Handles the UPDATE DML logic for the table.
302   ||  Known limitations, enhancements or remarks :
303   ||  Change History :
304   ||  Who             When            What
305   ||  (reverse chronological order - newest change first)
306   */
307     x_last_update_date           DATE ;
308     x_last_updated_by            NUMBER;
309     x_last_update_login          NUMBER;
310     x_request_id                 NUMBER;
311     x_program_id                 NUMBER;
312     x_program_application_id     NUMBER;
313     x_program_update_date        DATE;
314 
315     l_lead_proc_ret_status       VARCHAR2(1);
316     l_lead_proc_msg_count        NUMBER;
317     l_lead_proc_msg_data         VARCHAR2(2000);
318 
319     l_tmp_var VARCHAR2(2000);
320     l_employee_id     as_sales_leads.assign_to_person_id%TYPE;
321     l_resource_id     as_sales_leads.assign_to_Salesforce_id%TYPE;
322     ddp_sales_lead_profile_tbl  as_utility_pub.profile_tbl_type;
323     ddp_sales_lead_line_tbl     as_sales_leads_pub.sales_lead_line_tbl_type;
324     ddp_sales_lead_contact_tbl  as_sales_leads_pub.sales_lead_contact_tbl_type;
325     l_sales_lead_rec  as_sales_leads_pub.G_MISS_SALES_LEAD_REC%TYPE ;
326 
327     CURSOR cur_last_update_date IS
328     SELECT last_update_date
329     FROM   as_sales_leads
330     WHERE  sales_lead_id = x_sales_lead_id;
331 
332     CURSOR cur_sales_lead_rec IS
333     SELECT assign_to_person_id, assign_to_salesforce_id
334     FROM   as_sales_leads
335     WHERE  sales_lead_id = x_sales_lead_id;
336 
337   BEGIN
338       OPEN cur_sales_lead_rec ;
339       FETCH cur_sales_lead_rec INTO l_employee_id,l_resource_id ;
340       CLOSE cur_sales_lead_rec ;
341 
342       l_sales_lead_rec.assign_to_person_id           :=l_employee_id ;
343       l_sales_lead_rec.assign_to_Salesforce_id       :=l_resource_id ;
344       l_sales_lead_rec.source_promotion_id           :=x_source_promotion_id ;
345 
346       l_sales_lead_rec.status_code                   :=x_s_enquiry_status;
347       l_sales_lead_rec.vehicle_response_code         :=x_inquiry_method_code;
348       l_sales_lead_rec.customer_id                   :=x_person_id;
349       l_sales_lead_rec.sales_lead_id                 :=x_sales_lead_id;
350 
351       OPEN cur_last_update_date ;
352       FETCH cur_last_update_date INTO l_sales_lead_rec.last_update_date ;
353       CLOSE cur_last_update_date;
354 
355  as_sales_leads_pub.update_sales_lead(
356     P_Api_Version_Number     => 2.0  ,
357     P_Init_Msg_List          => FND_API.G_FALSE,
358     P_Commit                 => FND_API.G_FALSE,
359     P_Validation_Level       => AS_UTILITY_PUB.G_VALID_LEVEL_ITEM,
360     P_Check_Access_Flag      => FND_API.G_MISS_CHAR,
361     P_Admin_Flag             => 'Y',
362     P_Admin_Group_Id         => FND_API.G_MISS_NUM,
363     P_identity_salesforce_id => FND_API.G_MISS_NUM,
364     P_Sales_Lead_Profile_Tbl => ddp_sales_lead_profile_tbl,
365     P_SALES_LEAD_Rec         => l_sales_lead_rec,
366     X_Return_Status          => x_ret_status ,
367     X_Msg_Count              => x_msg_count,
368     X_Msg_Data               => x_msg_data);
369 
370    IF x_ret_status  IN ('E','U') THEN
371       IF x_msg_count > 1 THEN
372          FOR i IN 1..x_msg_count LOOP
373            l_tmp_var := l_tmp_var || ' '||fnd_msg_pub.get(p_encoded => fnd_api.g_false);
374          END LOOP;
375          x_msg_data := trim(l_tmp_var);
376        END IF;
377   ELSE
378   igr_i_appl_pkg.update_row (
379   X_ROWID			=>  X_ROWID ,
380   X_PERSON_ID			=>  X_PERSON_ID ,
381   X_SALES_LEAD_ID		=>  X_SALES_LEAD_ID ,
382   X_ENQUIRY_APPL_NUMBER		=>  X_ENQUIRY_APPL_NUMBER ,
383   X_ACAD_CAL_TYPE		=>  X_ACAD_CAL_TYPE ,
384   X_ACAD_CI_SEQUENCE_NUMBER	=>  X_ACAD_CI_SEQUENCE_NUMBER ,
385   X_ADM_CAL_TYPE		=>  X_ADM_CAL_TYPE ,
386   X_ADM_CI_SEQUENCE_NUMBER	=>  X_ADM_CI_SEQUENCE_NUMBER ,
387   X_ENQUIRY_DT			=>  X_ENQUIRY_DT ,
388   X_REGISTERING_PERSON_ID	=>  X_REGISTERING_PERSON_ID ,
389   X_OVERRIDE_PROCESS_IND	=>  X_OVERRIDE_PROCESS_IND ,
390   X_INDICATED_MAILING_DT	=>  X_INDICATED_MAILING_DT ,
391   X_LAST_PROCESS_DT		=>  X_LAST_PROCESS_DT ,
392   X_COMMENTS			=>  X_COMMENTS ,
393   X_INQ_ENTRY_LEVEL_ID		=>  X_INQ_ENTRY_LEVEL_ID ,
394   X_EDU_GOAL_ID			=>  X_EDU_GOAL_ID ,
395   X_PARTY_ID			=>  X_PARTY_ID ,
396   X_HOW_KNOWUS_ID		=>  X_HOW_KNOWUS_ID ,
397   X_WHO_INFLUENCED_ID		=>  X_WHO_INFLUENCED_ID ,
398   X_ATTRIBUTE_CATEGORY		=>  X_ATTRIBUTE_CATEGORY ,
399   X_ATTRIBUTE1			=>  X_ATTRIBUTE1 ,
400   X_ATTRIBUTE2			=>  X_ATTRIBUTE2 ,
401   X_ATTRIBUTE3			=>  X_ATTRIBUTE3 ,
402   X_ATTRIBUTE4			=>  X_ATTRIBUTE4 ,
403   X_ATTRIBUTE5			=>  X_ATTRIBUTE5 ,
404   X_ATTRIBUTE6			=>  X_ATTRIBUTE6 ,
405   X_ATTRIBUTE7			=>  X_ATTRIBUTE7 ,
406   X_ATTRIBUTE8			=>  X_ATTRIBUTE8 ,
407   X_ATTRIBUTE9			=>  X_ATTRIBUTE9 ,
408   X_ATTRIBUTE10			=>  X_ATTRIBUTE10 ,
409   X_ATTRIBUTE11			=>  X_ATTRIBUTE11 ,
410   X_ATTRIBUTE12			=>  X_ATTRIBUTE12 ,
411   X_ATTRIBUTE13			=>  X_ATTRIBUTE13 ,
412   X_ATTRIBUTE14			=>  X_ATTRIBUTE14 ,
413   X_ATTRIBUTE15			=>  X_ATTRIBUTE15 ,
414   X_ATTRIBUTE16			=>  X_ATTRIBUTE16 ,
415   X_ATTRIBUTE17			=>  X_ATTRIBUTE17 ,
416   X_ATTRIBUTE18			=>  X_ATTRIBUTE18 ,
417   X_ATTRIBUTE19			=>  X_ATTRIBUTE19 ,
418   X_ATTRIBUTE20			=>  X_ATTRIBUTE20 ,
419   X_MODE                        =>   'R'          ,
420   X_PKG_REDUCT_IND              => x_pkg_reduct_ind
421 
422   );
423   Igr_in_jtf_interactions_pkg.start_int_and_act (     p_doc_ref	=>  'LEAD',
424                          p_person_id      =>  X_PERSON_ID,
425 			 p_sales_lead_id  =>  X_SALES_LEAD_ID,
426                          p_item_id	  =>  NULL,
427 			 p_doc_id         =>  X_SALES_LEAD_ID,
428                          p_action         =>  X_ACTION ,
429                          p_action_item    => 'INQUIRY',
430 	                 p_ret_status     =>  x_ret_status,
431 	 		 p_msg_data       =>  x_msg_data,
432 	                 p_msg_count      =>  x_msg_count);
433 
434 
435     -- call Sales Real Time lead assignment API, passing in local ret/msg
436     -- variables, as failure of this API should not preclude lead
437     -- or inquiry creation.
438 
439        AS_SALES_LEADS_PUB.Lead_Process_After_Update (
440           P_Api_Version_Number	=> 2.0,
441           P_Init_Msg_List       => FND_API.G_FALSE,
442           P_Commit              => FND_API.G_FALSE,
443           P_Validation_Level    => AS_UTILITY_PUB.G_VALID_LEVEL_ITEM,
444           P_Check_Access_Flag   => FND_API.G_MISS_CHAR,
445           P_Admin_Flag          => FND_API.G_MISS_CHAR,
446           P_Admin_Group_Id      => FND_API.G_MISS_NUM,
447           P_identity_salesforce_id => FND_API.G_MISS_NUM,
448           P_Salesgroup_id       => FND_API.G_MISS_NUM,
449           P_Sales_Lead_Id       => x_sales_lead_id,
450           X_Return_Status       => l_lead_proc_ret_status,
451           X_Msg_Count           => l_lead_proc_msg_count,
452           X_Msg_Data            => l_lead_proc_msg_data
453        );
454 
455        IF NVL(l_lead_proc_ret_status,'S') IN ('E','U') THEN
456          fnd_file.put_line(fnd_file.log, 'AS_SALES_LEADS_PUB.Lead_Process_After_Update failed.');
457        END IF;
458 
459     END IF;
460 
461   END update_row;
462 
463 END igr_inquiry_pkg;