[Home] [Help]
25: BEGIN
26: IF G_user_id <> p_user_id THEN
27: G_user_id := p_user_id;
28: G_resp_id := p_resp_id;
29: G_party_id := pa_control_items_utils.getPartyId(p_user_id);
30: G_proj_auth_tab.DELETE;
31: G_view_proj_i_tab.DELETE;
32: G_view_proj_cr_tab.DELETE;
33: G_view_proj_co_tab.DELETE;
43:
44: SELECT ci_type_class_code
45: INTO l_class_code
46: FROM pa_ci_types_b cit,
47: pa_control_items ci
48: WHERE ci.ci_id = p_ci_id
49: AND cit.ci_type_id = ci.ci_type_id;
50:
51: IF l_class_code = 'ISSUE' THEN
92: BEGIN
93: IF G_user_id <> p_user_id THEN
94: G_user_id := p_user_id;
95: G_resp_id := p_resp_id;
96: G_party_id := pa_control_items_utils.getPartyId(p_user_id);
97: G_proj_auth_tab.DELETE;
98: G_view_proj_i_tab.DELETE;
99: G_view_proj_cr_tab.DELETE;
100: G_view_proj_co_tab.DELETE;
153: --mthai_debug_msg('a('||p_project_id||', '||p_user_id||', '||p_resp_id||')');
154: IF G_user_id <> p_user_id THEN
155: G_user_id := p_user_id;
156: G_resp_id := p_resp_id;
157: G_party_id := pa_control_items_utils.getPartyId(p_user_id);
158: G_proj_auth_tab.DELETE;
159: G_view_proj_i_tab.DELETE;
160: G_view_proj_cr_tab.DELETE;
161: G_view_proj_co_tab.DELETE;
195: --Clearing cache if user_id is changed
196: IF G_user_id <> p_user_id THEN
197: G_user_id := p_user_id;
198: G_resp_id := -999;
199: G_party_id := pa_control_items_utils.getPartyId(p_user_id);
200: G_proj_auth_tab.DELETE;
201: G_view_proj_i_tab.DELETE;
202: G_view_proj_cr_tab.DELETE;
203: G_view_proj_co_tab.DELETE;
206: END IF;
207:
208: SELECT s.project_system_status_code, ci.owner_id, ci.created_by
209: INTO l_status_code, l_owner_party_id, l_creator_user_id
210: FROM pa_control_items ci,
211: pa_project_statuses s
212: WHERE ci.ci_id = p_ci_id
213: AND s.status_type = 'CONTROL_ITEM'
214: AND s.project_status_code = ci.status_code;
232: l_tmp NUMBER;
233: BEGIN
234: SELECT ci.project_id, s.project_system_status_code
235: INTO l_project_id, l_status_code
236: FROM pa_control_items ci,
237: pa_project_statuses s
238: WHERE ci.ci_id = p_ci_id
239: AND s.status_type = 'CONTROL_ITEM'
240: AND s.project_status_code = ci.status_code;
322: -- document gets locked.
323:
324: select nvl(locked_flag,'N')
325: INTO l_locked_flag
326: from pa_control_items
327: where ci_id = p_ci_id;
328:
329: if(l_locked_flag = 'Y') then
330: RETURN 'F';
331: end if;
332:
333: SELECT ci.project_id, ppa.org_id
334: INTO l_project_id, l_project_org_id
335: FROM pa_control_items ci,
336: pa_projects_all ppa
337: WHERE ppa.project_id=ci.project_id
338: AND ci.ci_id=p_ci_id;
339:
360: AND s.project_status_code = a.status_code
361: AND s.status_type = 'CI_ACTION'
362: AND s.project_system_status_code = 'CI_ACTION_OPEN'
363: AND a.type_code = 'UPDATE'
364: -- AND a.assigned_to = pa_control_items_utils.getPartyId(p_user_id)
365: AND a.assigned_to = G_party_id
366: AND ROWNUM = 1;
367:
368: RETURN 'T';
388: BEGIN
389: /*
390: SELECT ci.project_id, ppa.org_id
391: INTO l_project_id, l_project_org_id
392: FROM pa_control_items ci,
393: pa_projects_all ppa
394: WHERE ppa.project_id=ci.project_id
395: AND ci.ci_id=p_ci_id;
396: */
421: AND s.project_status_code = a.status_code
422: AND s.status_type = 'CI_ACTION'
423: AND s.project_system_status_code = 'CI_ACTION_OPEN'
424: AND a.type_code = 'UPDATE'
425: -- AND a.assigned_to = pa_control_items_utils.getPartyId(p_user_id)
426: AND a.assigned_to = G_party_id
427: AND ROWNUM = 1;
428:
429: RETURN 'T';
446: l_project_org_id NUMBER;
447: BEGIN
448: SELECT ci.project_id, ppa.org_id
449: INTO l_project_id, l_project_org_id
450: FROM pa_control_items ci, pa_projects_all ppa
451: WHERE ci.project_id=ppa.project_id
452: AND ci.ci_id = p_ci_id;
453:
454: --Bug#9791886
491: BEGIN
492: IF p_ci_id > 0 THEN
493: SELECT project_id
494: INTO l_project_id
495: FROM pa_control_items
496: WHERE ci_id = p_ci_id;
497: END IF;
498:
499: --Only Project Authorities can highlight the item
540: and s.project_system_status_code = 'CI_ACTION_OPEN';
541:
542: BEGIN
543:
544: l_party_id := PA_CONTROL_ITEMS_UTILS.GetPartyId(p_user_id);
545:
546: if(l_party_id IS NULL) then
547: return 'F';
548: end if;
549:
550: --Bug 5676037. Added the if condition to identify the AMG context. From AMG context
551: -- CheckCIActionAllowed should not be called.
552: if(p_calling_context <> 'AMG') then
553: l_status_result := PA_CONTROL_ITEMS_UTILS.CheckCIActionAllowed(null,null,'CONTROL_ITEM_ALLOW_ACTION', p_ci_id);
554: if (l_status_result = 'N') then
555: return 'F';
556: end if;
557: end if;-- if(p_calling_context <> 'AMG') then
557: end if;-- if(p_calling_context <> 'AMG') then
558:
559: SELECT ci.project_id, ppa.org_id
560: INTO l_project_id, l_project_org_id
561: FROM pa_control_items ci, pa_projects_all ppa
562: WHERE ci.project_id=ppa.project_id
563: AND ci.ci_id = p_ci_id;
564:
565: --Control item cannot be updated across OU
596:
597: BEGIN
598: SELECT ci.project_id, ppa.org_id
599: INTO l_project_id, l_project_org_id
600: FROM pa_control_items ci, pa_projects_all ppa
601: WHERE ci.project_id=ppa.project_id
602: AND ci.ci_id = p_ci_id;
603:
604: --Control item cannot be updated across OU
635: AND s.status_type = 'CI_ACTION'
636: and s.project_system_status_code = 'CI_ACTION_OPEN';
637:
638: BEGIN
639: l_party_id := PA_CONTROL_ITEMS_UTILS.GetPartyId(p_user_id);
640:
641: if(l_party_id IS NULL) then
642: return 'F';
643: end if;
720:
721: IF G_user_id<>p_user_id OR G_resp_id<>p_resp_id THEN
722: G_user_id := p_user_id;
723: G_resp_id := p_resp_id;
724: G_party_id := pa_control_items_utils.getPartyId(p_user_id);
725: G_project_id := p_project_id;
726: G_proj_auth_tab.DELETE;
727: G_view_proj_i_tab.DELETE;
728: G_view_proj_cr_tab.DELETE;
819: BEGIN
820:
821: SELECT project_id
822: INTO l_project_id
823: FROM pa_control_items
824: WHERE ci_id = p_ci_id;
825:
826: open c_owner(l_project_id);
827: fetch c_owner into l_owner_id;