297:
298: CURSOR val_pareq_app
299: IS
300: SELECT 1
301: FROM GHR_PA_REQUESTS par
302: WHERE (NVL(AUTHORIZED_BY_PERSON_ID,-1) = p_person_id OR NVL(REQUESTED_BY_PERSON_ID,-1) = p_person_id
303: OR NVL(APPROVING_OFFICIAL_FULL_NAME,'@') = p_full_name)
304: AND PA_NOTIFICATION_ID IS NOT NULL
305: AND NOT EXISTS(SELECT 1 FROM GHR_PA_REQUESTS
301: FROM GHR_PA_REQUESTS par
302: WHERE (NVL(AUTHORIZED_BY_PERSON_ID,-1) = p_person_id OR NVL(REQUESTED_BY_PERSON_ID,-1) = p_person_id
303: OR NVL(APPROVING_OFFICIAL_FULL_NAME,'@') = p_full_name)
304: AND PA_NOTIFICATION_ID IS NOT NULL
305: AND NOT EXISTS(SELECT 1 FROM GHR_PA_REQUESTS
306: WHERE ALTERED_PA_REQUEST_ID = par.PA_REQUEST_ID
307: AND PA_NOTIFICATION_ID IS NOT NULL
308: AND FIRST_NOA_CODE = '001');
309:
490:
491: CURSOR FETCH_RPA_ACTIONS
492: IS
493: SELECT PA_REQUEST_ID FROM
494: GHR_PA_REQUESTS
495: WHERE PERSON_ID = p_person_id;
496:
497: CURSOR FETCH_COMPL_PPL
498: IS
534: END LOOP;
535:
536: /* Deleting all the person records from GHR Tables*/
537:
538: DELETE FROM GHR_PA_REQUESTS
539: WHERE PERSON_ID = p_person_id;
540:
541: FOR compl_ppl in FETCH_COMPL_PPL
542: LOOP
561: END;
562:
563: PROCEDURE UpdGhrTables(p_person_id in NUMBER, p_full_name in VARCHAR2) IS
564: BEGIN
565: UPDATE GHR_PA_REQUESTS
566: SET REQUESTED_BY_FULL_NAME = p_full_name,
567: REQUESTED_BY_PERSON_ID = NULL
568: WHERE REQUESTED_BY_PERSON_ID = p_person_id;
569:
566: SET REQUESTED_BY_FULL_NAME = p_full_name,
567: REQUESTED_BY_PERSON_ID = NULL
568: WHERE REQUESTED_BY_PERSON_ID = p_person_id;
569:
570: UPDATE GHR_PA_REQUESTS
571: SET AUTHORIZED_BY_FULL_NAME = p_full_name,
572: AUTHORIZED_BY_PERSON_ID = NULL
573: WHERE AUTHORIZED_BY_PERSON_ID = p_person_id;
574: END;