[Home] [Help]
186:
187: CURSOR c_access_level(cp_list_id NUMBER) IS -- Bug 2717635
188: SELECT MAX(access_level) access_level FROM (
189: SELECT access_level
190: FROM pa_dist_list_items i,
191: pa_project_parties p -- Bug 2717635
192: WHERE i.list_id = cp_list_id
193: AND i.recipient_type = 'PROJECT_PARTY'
194: AND p.project_party_id = i.recipient_id
196: AND p.object_type = l_object_type
197: AND p.object_id = l_object_id
198: UNION ALL
199: SELECT access_level
200: FROM pa_dist_list_items i,
201: pa_project_parties p -- Bug 2717635
202: /* fnd_user u */ -- Bug 2717635
203: WHERE i.list_id = cp_list_id
204: AND i.recipient_type = 'PROJECT_ROLE'
207: AND p.object_type = l_object_type
208: AND p.object_id = l_object_id
209: UNION ALL
210: SELECT access_level
211: FROM pa_dist_list_items
212: WHERE list_id = cp_list_id
213: AND recipient_type = 'ALL_PROJECT_PARTIES'
214: AND EXISTS (SELECT 'Y' FROM pa_project_parties -- Bug 2717635
215: WHERE resource_id = l_resource_id -- Bug 2717635
216: AND object_type = l_object_type
217: AND object_id = l_object_id)
218: UNION ALL
219: SELECT access_level
220: FROM pa_dist_list_items
221: WHERE list_id = cp_list_id
222: AND recipient_type = 'HZ_PARTY'
223: AND recipient_id = l_party_id);
224:
287: SELECT DISTINCT user_name, full_name, email_address FROM (
288: SELECT p.user_name user_name,
289: p.resource_source_name full_name,
290: p.email_address email_address
291: FROM pa_dist_list_items i,
292: pa_project_parties_v p,
293: fnd_user u
294: WHERE i.list_id = cp_list_id
295: AND i.access_level >= p_access_level
303: UNION ALL
304: SELECT p.user_name user_name,
305: p.resource_source_name full_name,
306: p.email_address email_address
307: FROM pa_dist_list_items i,
308: pa_project_parties_v p,
309: fnd_user u
310: WHERE i.list_id = cp_list_id
311: AND i.access_level >= p_access_level
321: p.resource_source_name full_name,
322: p.email_address email_address
323: FROM pa_project_parties_v p,
324: fnd_user u
325: WHERE EXISTS (SELECT 1 FROM pa_dist_list_items i
326: WHERE i.list_id = cp_list_id
327: AND i.access_level >= p_access_level
328: AND i.recipient_type = 'ALL_PROJECT_PARTIES')
329: AND p.object_type = l_object_type
334: UNION ALL
335: SELECT u.user_name user_name,
336: hzp.party_name full_name,
337: hzp.email_address email_address
338: FROM pa_dist_list_items i,
339: hz_parties hzp,
340: fnd_user u
341: WHERE i.list_id = cp_list_id
342: AND i.access_level >= p_access_level
349: UNION ALL
350: SELECT u.user_name user_name,
351: per.full_name full_name,
352: per.email_address email_address
353: FROM pa_dist_list_items i,
354: per_all_people_f per,
355: fnd_user u
356: WHERE i.list_id = cp_list_id
357: AND i.access_level >= p_access_level
365: UNION ALL
366: SELECT NULL user_name,
367: NULL full_name,
368: recipient_id email_address
369: FROM pa_dist_list_items i
370: WHERE i.list_id = cp_list_id
371: AND i.access_level >= p_access_level
372: AND i.recipient_type = 'EMAIL_ADDRESS');
373:
454: AND object_id = p_object_id;
455:
456: /*
457: * 1. Modified this cursor to filter out records based on the value of the email column
458: * in pa_dist_list_items.
459: * 2. Retrieve all team members if 'Send Status Report by email to all project team members'
460: * is selected.
461: * 3. Removed the condition SELECT for ALL_PROJECT_PARTIES as this has nothing to do with
462: * email notifications.
466: SELECT DISTINCT user_name, full_name, email_address FROM (
467: SELECT p.user_name user_name,
468: p.resource_source_name full_name,
469: p.email_address email_address
470: FROM pa_dist_list_items i,
471: pa_project_parties_v p,
472: fnd_user u
473: WHERE i.list_id = cp_list_id
474: AND i.access_level >= p_access_level
483: UNION ALL
484: SELECT p.user_name user_name,
485: p.resource_source_name full_name,
486: p.email_address email_address
487: FROM pa_dist_list_items i,
488: pa_project_parties_v p,
489: fnd_user u
490: WHERE i.list_id = cp_list_id
491: AND i.access_level >= p_access_level
500: UNION ALL
501: SELECT u.user_name user_name,
502: hzp.party_name full_name,
503: hzp.email_address email_address
504: FROM pa_dist_list_items i,
505: hz_parties hzp,
506: fnd_user u
507: WHERE i.list_id = cp_list_id
508: AND i.access_level >= p_access_level
516: UNION ALL
517: SELECT u.user_name user_name,
518: per.full_name full_name,
519: per.email_address email_address
520: FROM pa_dist_list_items i,
521: per_all_people_f per,
522: fnd_user u
523: WHERE i.list_id = cp_list_id
524: AND i.access_level >= p_access_level
533: UNION ALL
534: SELECT NULL user_name,
535: NULL full_name,
536: recipient_id email_address
537: FROM pa_dist_list_items i
538: WHERE i.list_id = cp_list_id
539: AND i.access_level >= p_access_level
540: AND i.recipient_type = 'EMAIL_ADDRESS'
541: AND nvl(i.email, 'Y') <> 'N'
546: p.email_address email_address
547: FROM pa_project_parties_v p,
548: fnd_user u
549: WHERE EXISTS ( SELECT 1
550: FROM pa_dist_list_items i
551: WHERE i.list_id = cp_list_id
552: AND i.access_level >= p_access_level
553: AND i.recipient_type = 'EMAIL_ALL'
554: )
672: AND b.resource_source_id = a.resource_source_id
673: AND b.project_role_id = a.project_role_id;
674:
675: CURSOR get_list_items IS SELECT recipient_type, recipient_id, access_level, email, menu_id
676: FROM pa_dist_list_items
677: WHERE list_id = l_list_id_from;
678:
679:
680: BEGIN
745: l_recipient_id := l_project_party_id;
746: END IF;
747:
748:
749: select pa_dist_list_items_s.nextVal into l_list_item_id from dual;
750:
751: PA_DISTRIBUTION_LISTS_PVT.CREATE_DIST_LIST_ITEM(P_VALIDATE_ONLY => 'F',
752: P_LIST_ITEM_ID => l_list_item_id,
753: P_LIST_ID => l_list_id_to,
770: p_list_item_id in Number )
771: return VARCHAR2
772: IS
773: Cursor C1 is
774: Select 'X' from pa_dist_list_items
775: where list_item_id = p_list_item_id;
776:
777: l_dummy varchar2(1);
778: l_return_status varchar2(1) := 'T';