143: fnd_msg_pub.initialize;
144: END IF;
145:
146: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
147: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
148: fnd_message.Set_Token('TEXT', 'In ' || l_api_name || ' , access > ' || p_access_id || ', lead_id > ' || p_lead_id || ', salesforce > ' || l_salesforce_id || ', api version > ' || p_api_version_number);
149: fnd_msg_pub.Add;
150: END IF;
151:
144: END IF;
145:
146: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
147: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
148: fnd_message.Set_Token('TEXT', 'In ' || l_api_name || ' , access > ' || p_access_id || ', lead_id > ' || p_lead_id || ', salesforce > ' || l_salesforce_id || ', api version > ' || p_api_version_number);
149: fnd_msg_pub.Add;
150: END IF;
151:
152: -- Initialize API return status to success
152: -- Initialize API return status to success
153: x_return_status := FND_API.G_RET_STS_SUCCESS;
154:
155: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
156: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
157: fnd_message.Set_Token('TEXT', 'before pv_assignment_pvt.GetWorkflowID');
158: fnd_msg_pub.Add;
159: END IF;
160:
153: x_return_status := FND_API.G_RET_STS_SUCCESS;
154:
155: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
156: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
157: fnd_message.Set_Token('TEXT', 'before pv_assignment_pvt.GetWorkflowID');
158: fnd_msg_pub.Add;
159: END IF;
160:
161: -- if its a customer, lead_id will be null
183: END IF;
184:
185: -- Debug Message
186: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
187: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
188: fnd_message.Set_Token('TEXT', 'After pv_assignment_pvt.GetWorkflowID : wf status : ' || l_wf_status);
189: fnd_msg_pub.Add;
190: END IF;
191:
184:
185: -- Debug Message
186: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
187: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
188: fnd_message.Set_Token('TEXT', 'After pv_assignment_pvt.GetWorkflowID : wf status : ' || l_wf_status);
189: fnd_msg_pub.Add;
190: END IF;
191:
192: OPEN lc_get_rel_type (pc_salesforce_id => l_salesforce_id);
194: INTO l_relationship_type;
195: CLOSE lc_get_rel_type;
196:
197: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
198: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
199: fnd_message.Set_Token('TEXT', 'Relationship Type : ' || l_relationship_type);
200: fnd_msg_pub.Add;
201: END IF;
202:
195: CLOSE lc_get_rel_type;
196:
197: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
198: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
199: fnd_message.Set_Token('TEXT', 'Relationship Type : ' || l_relationship_type);
200: fnd_msg_pub.Add;
201: END IF;
202:
203: -- wf_status could be OPEN and routing_status ACTIVE in case of Joint
210: INTO l_relationship_type;
211: CLOSE lc_get_rel_type;
212:
213: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
214: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
215: fnd_message.Set_Token('TEXT', 'Relationship Type : ' || l_relationship_type);
216: fnd_msg_pub.Add;
217: END IF;
218: */
211: CLOSE lc_get_rel_type;
212:
213: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
214: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
215: fnd_message.Set_Token('TEXT', 'Relationship Type : ' || l_relationship_type);
216: fnd_msg_pub.Add;
217: END IF;
218: */
219: IF (l_relationship_type IS NULL) THEN
217: END IF;
218: */
219: IF (l_relationship_type IS NULL) THEN
220: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
221: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
222: fnd_message.Set_Token('TEXT', 'Resource id: ' || l_salesforce_id || ' is not a partner user. Returning');
223: fnd_msg_pub.Add;
224: END IF;
225: return;
218: */
219: IF (l_relationship_type IS NULL) THEN
220: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
221: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
222: fnd_message.Set_Token('TEXT', 'Resource id: ' || l_salesforce_id || ' is not a partner user. Returning');
223: fnd_msg_pub.Add;
224: END IF;
225: return;
226: ELSIF l_relationship_type = 'PARTNER_OF' THEN
223: fnd_msg_pub.Add;
224: END IF;
225: return;
226: ELSIF l_relationship_type = 'PARTNER_OF' THEN
227: fnd_message.SET_NAME('PV', 'PV_ADDSLSTEAM_NOT_ALLOWED'); -- Change message 1 ********************
228: fnd_msg_pub.ADD;
229: RAISE FND_API.G_EXC_ERROR;
230: END IF;
231:
231:
232: ELSIF p_mode = 'DELETE' or p_mode = 'UPDATE' then
233:
234: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
235: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
236: fnd_message.Set_Token('TEXT', 'In Delete / Update block ');
237: fnd_msg_pub.Add;
238: END IF;
239:
232: ELSIF p_mode = 'DELETE' or p_mode = 'UPDATE' then
233:
234: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
235: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
236: fnd_message.Set_Token('TEXT', 'In Delete / Update block ');
237: fnd_msg_pub.Add;
238: END IF;
239:
240: OPEN lc_get_prm_flag(pc_access_id => p_access_id);
242: INTO l_prm_keep_flag;
243: CLOSE lc_get_prm_flag;
244:
245: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
246: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
247: fnd_message.Set_Token('TEXT', 'After PRM KEEP FLAG check : ' || l_prm_keep_flag);
248: fnd_msg_pub.Add;
249: END IF;
250:
243: CLOSE lc_get_prm_flag;
244:
245: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
246: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
247: fnd_message.Set_Token('TEXT', 'After PRM KEEP FLAG check : ' || l_prm_keep_flag);
248: fnd_msg_pub.Add;
249: END IF;
250:
251: IF (l_prm_keep_flag = 'Y') THEN
248: fnd_msg_pub.Add;
249: END IF;
250:
251: IF (l_prm_keep_flag = 'Y') THEN
252: fnd_message.SET_NAME('PV', 'PV_UPDSLSTEAM_NOT_ALLOWED'); -- Change message 1 ********************
253: fnd_msg_pub.ADD;
254: RAISE FND_API.G_EXC_ERROR;
255: END IF;
256:
254: RAISE FND_API.G_EXC_ERROR;
255: END IF;
256:
257: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
258: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
259: fnd_message.Set_Token('TEXT', 'Success ..... ');
260: fnd_msg_pub.Add;
261: END IF;
262:
255: END IF;
256:
257: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
258: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
259: fnd_message.Set_Token('TEXT', 'Success ..... ');
260: fnd_msg_pub.Add;
261: END IF;
262:
263: END IF;
297:
298: then
299:
300: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
301: FND_MESSAGE.Set_Name('PV', 'PV_USER_NOT_UPD_DEL_EXT_SLSTM');
302: --FND_MESSAGE.Set_Token('ATTRIBUTE_NAME',p_attribute_rec.name );
303: --FND_MESSAGE.Set_Token('RESPONSIBILITY_LIST',substr(l_being_used_list,2) );
304: FND_MSG_PUB.Add;
305: END IF;
298: then
299:
300: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
301: FND_MESSAGE.Set_Name('PV', 'PV_USER_NOT_UPD_DEL_EXT_SLSTM');
302: --FND_MESSAGE.Set_Token('ATTRIBUTE_NAME',p_attribute_rec.name );
303: --FND_MESSAGE.Set_Token('RESPONSIBILITY_LIST',substr(l_being_used_list,2) );
304: FND_MSG_PUB.Add;
305: END IF;
306: RAISE FND_API.G_EXC_ERROR;
299:
300: IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
301: FND_MESSAGE.Set_Name('PV', 'PV_USER_NOT_UPD_DEL_EXT_SLSTM');
302: --FND_MESSAGE.Set_Token('ATTRIBUTE_NAME',p_attribute_rec.name );
303: --FND_MESSAGE.Set_Token('RESPONSIBILITY_LIST',substr(l_being_used_list,2) );
304: FND_MSG_PUB.Add;
305: END IF;
306: RAISE FND_API.G_EXC_ERROR;
307: end if;
317: EXCEPTION
318:
319: WHEN NO_DATA_FOUND THEN
320: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
321: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
322: fnd_message.Set_Token('TEXT', 'NO Data found ..');
323: fnd_msg_pub.Add;
324: END IF;
325:
318:
319: WHEN NO_DATA_FOUND THEN
320: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
321: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
322: fnd_message.Set_Token('TEXT', 'NO Data found ..');
323: fnd_msg_pub.Add;
324: END IF;
325:
326: WHEN FND_API.G_EXC_ERROR THEN
380: fnd_msg_pub.initialize;
381: END IF;
382:
383: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
384: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
385: fnd_message.Set_Token('TEXT', 'In ' || l_api_name || ' ' || p_lead_id || ' ' || p_salesforce_id || ' ' || p_api_version_number);
386: fnd_msg_pub.Add;
387: END IF;
388:
381: END IF;
382:
383: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
384: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
385: fnd_message.Set_Token('TEXT', 'In ' || l_api_name || ' ' || p_lead_id || ' ' || p_salesforce_id || ' ' || p_api_version_number);
386: fnd_msg_pub.Add;
387: END IF;
388:
389: -- Initialize API return status to success
472: fnd_msg_pub.initialize;
473: END IF;
474:
475: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
476: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
477: fnd_message.Set_Token('TEXT', 'In ' || l_api_name || ' , access id : ' || p_access_id );
478: fnd_msg_pub.Add;
479: END IF;
480:
473: END IF;
474:
475: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
476: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
477: fnd_message.Set_Token('TEXT', 'In ' || l_api_name || ' , access id : ' || p_access_id );
478: fnd_msg_pub.Add;
479: END IF;
480:
481: -- Initialize API return status to success
564: END IF;
565:
566:
567: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
568: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
569: fnd_message.Set_Token('TEXT', 'In ' || l_api_name || ' , access id : ' || p_access_id );
570: fnd_msg_pub.Add;
571: END IF;
572:
565:
566:
567: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
568: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
569: fnd_message.Set_Token('TEXT', 'In ' || l_api_name || ' , access id : ' || p_access_id );
570: fnd_msg_pub.Add;
571: END IF;
572:
573: -- Initialize API return status to success