[Home] [Help]
81: -- changes for performance pbarman 7.5.2003
82: SELECT party_id
83: FROM hz_parties
84: WHERE upper(PARTY_NAME) = upper(c_approved_by_pty_name)
85: AND AHL_DI_DOC_INDEX_PVT.GET_PRODUCT_INSTALL_STATUS('PER') IN ('N','L')
86: AND party_type = 'PERSON'
87: UNION
88: SELECT person_id
89: FROM per_people_f ppf,per_person_types ppt
91: AND trunc(sysdate) BETWEEN effective_start_date AND effective_end_date
92: AND nvl(current_employee_flag, 'X') = 'Y'
93: AND ppf.person_type_id = ppt.person_type_id
94: AND system_person_type = 'EMP'
95: AND AHL_DI_DOC_INDEX_PVT.GET_PRODUCT_INSTALL_STATUS('PER') IN ('I','S');
96:
97: -- Check for ID
98: CURSOR approved_by_party_id(c_approved_by_pty_id IN NUMBER)
99: IS
183:
184:
185:
186:
187: IF ahl_di_doc_index_pvt.get_product_install_status('PER') in ('N','L')
188: THEN
189:
190: OPEN approved_by_party_desc(p_x_revision_tbl(i).approved_by_pty_name);
191: FETCH approved_by_party_desc INTO l_approved_by_party_id;
197: FND_MESSAGE.SET_NAME('AHL','AHL_DI_APP_BY_PTY_ID_NOT_EXIST');
198: FND_MSG_PUB.ADD;
199: END IF;
200: CLOSE approved_by_party_desc;
201: ELSIF ahl_di_doc_index_pvt.get_product_install_status('PER') in ('I','S')
202: THEN
203: -- modified for bugfix 2193744
204:
205: OPEN get_party_name_id (p_x_revision_tbl(i).approved_by_pty_name, p_x_revision_tbl(i).approved_by_party_id);
805: --changes due to performance pbarman 7.5.2003
806: SELECT party_id
807: FROM hz_parties
808: WHERE upper(PARTY_NAME) = upper(c_approved_by_pty_name)
809: AND AHL_DI_DOC_INDEX_PVT.GET_PRODUCT_INSTALL_STATUS('PER') IN ('N','L')
810: AND party_type = 'PERSON'
811: UNION
812: SELECT person_id
813: FROM per_people_f ppf,per_person_types ppt
815: AND trunc(sysdate) BETWEEN effective_start_date AND effective_end_date
816: AND nvl(current_employee_flag, 'X') = 'Y'
817: AND ppf.person_type_id = ppt.person_type_id
818: AND system_person_type = 'EMP'
819: AND AHL_DI_DOC_INDEX_PVT.GET_PRODUCT_INSTALL_STATUS('PER') IN ('I','S');
820:
821: -- Check for ID
822: CURSOR approved_by_party_id(c_approved_by_pty_id IN NUMBER)
823: IS
903: THEN
904:
905:
906:
907: IF ahl_di_doc_index_pvt.get_product_install_status('PER') in ('N','L')
908: THEN
909: OPEN approved_by_party_desc(p_x_revision_tbl(i).approved_by_pty_name);
910: FETCH approved_by_party_desc INTO l_approved_by_party_id;
911: IF approved_by_party_desc%FOUND
917: END IF;
918: CLOSE approved_by_party_desc;
919:
920:
921: ELSIF ahl_di_doc_index_pvt.get_product_install_status('PER') in ('I','S')
922: THEN
923:
924: -- modified for bugfix 2193744
925: