1828: l_approversOut ame_util.approversTable2;
1829: l_temp NUMBER; -- for fix 9395270
1830:
1831:
1832: -- Fetch telephone no from per_addresses
1833: CURSOR per_addresses_csr( p_person_id NUMBER)IS
1834: SELECT telephone_number_1
1835: FROM per_addresses
1836: WHERE person_id = p_person_id
1829: l_temp NUMBER; -- for fix 9395270
1830:
1831:
1832: -- Fetch telephone no from per_addresses
1833: CURSOR per_addresses_csr( p_person_id NUMBER)IS
1834: SELECT telephone_number_1
1835: FROM per_addresses
1836: WHERE person_id = p_person_id
1837: AND sysdate BETWEEN date_from AND date_to
1831:
1832: -- Fetch telephone no from per_addresses
1833: CURSOR per_addresses_csr( p_person_id NUMBER)IS
1834: SELECT telephone_number_1
1835: FROM per_addresses
1836: WHERE person_id = p_person_id
1837: AND sysdate BETWEEN date_from AND date_to
1838: AND primary_flag = 'Y';
1839:
1836: WHERE person_id = p_person_id
1837: AND sysdate BETWEEN date_from AND date_to
1838: AND primary_flag = 'Y';
1839:
1840: -- Fetch telephone no from per_addresses with employee_id from fnd_user
1841: CURSOR per_addresses_fnd_csr(p_user_id NUMBER) IS
1842: SELECT telephone_number_1
1843: FROM per_addresses
1844: WHERE sysdate BETWEEN date_from AND date_to
1837: AND sysdate BETWEEN date_from AND date_to
1838: AND primary_flag = 'Y';
1839:
1840: -- Fetch telephone no from per_addresses with employee_id from fnd_user
1841: CURSOR per_addresses_fnd_csr(p_user_id NUMBER) IS
1842: SELECT telephone_number_1
1843: FROM per_addresses
1844: WHERE sysdate BETWEEN date_from AND date_to
1845: AND primary_flag = 'Y'
1839:
1840: -- Fetch telephone no from per_addresses with employee_id from fnd_user
1841: CURSOR per_addresses_fnd_csr(p_user_id NUMBER) IS
1842: SELECT telephone_number_1
1843: FROM per_addresses
1844: WHERE sysdate BETWEEN date_from AND date_to
1845: AND primary_flag = 'Y'
1846: AND person_id = (SELECT employee_id
1847: FROM fnd_user
1941: x_workflow_table(i).status := l_approversOut(i).approval_status;
1942: -- x_workflow_table(i).status_date:=
1943:
1944: IF (l_approversOut(i).orig_system = AME_UTIL.PERORIGSYSTEM) THEN
1945: OPEN per_addresses_csr(l_approversOut(i).orig_system_id);
1946: FETCH per_addresses_csr INTO x_workflow_table(i).telephone;
1947: CLOSE per_addresses_csr;
1948:
1949: OPEN per_all_people_csr(l_approversOut(i).orig_system_id);
1942: -- x_workflow_table(i).status_date:=
1943:
1944: IF (l_approversOut(i).orig_system = AME_UTIL.PERORIGSYSTEM) THEN
1945: OPEN per_addresses_csr(l_approversOut(i).orig_system_id);
1946: FETCH per_addresses_csr INTO x_workflow_table(i).telephone;
1947: CLOSE per_addresses_csr;
1948:
1949: OPEN per_all_people_csr(l_approversOut(i).orig_system_id);
1950: FETCH per_all_people_csr INTO x_workflow_table(i).email;
1943:
1944: IF (l_approversOut(i).orig_system = AME_UTIL.PERORIGSYSTEM) THEN
1945: OPEN per_addresses_csr(l_approversOut(i).orig_system_id);
1946: FETCH per_addresses_csr INTO x_workflow_table(i).telephone;
1947: CLOSE per_addresses_csr;
1948:
1949: OPEN per_all_people_csr(l_approversOut(i).orig_system_id);
1950: FETCH per_all_people_csr INTO x_workflow_table(i).email;
1951: CLOSE per_all_people_csr;
1950: FETCH per_all_people_csr INTO x_workflow_table(i).email;
1951: CLOSE per_all_people_csr;
1952:
1953: ELSIF (l_approversOut(i).orig_system = AME_UTIL.FNDUSERORIGSYSTEM) THEN
1954: OPEN per_addresses_fnd_csr(l_approversOut(i).orig_system_id);
1955: FETCH per_addresses_fnd_csr INTO x_workflow_table(i).telephone;
1956: CLOSE per_addresses_fnd_csr;
1957:
1958: OPEN per_all_people_fnd_csr(l_approversOut(i).orig_system_id);
1951: CLOSE per_all_people_csr;
1952:
1953: ELSIF (l_approversOut(i).orig_system = AME_UTIL.FNDUSERORIGSYSTEM) THEN
1954: OPEN per_addresses_fnd_csr(l_approversOut(i).orig_system_id);
1955: FETCH per_addresses_fnd_csr INTO x_workflow_table(i).telephone;
1956: CLOSE per_addresses_fnd_csr;
1957:
1958: OPEN per_all_people_fnd_csr(l_approversOut(i).orig_system_id);
1959: FETCH per_all_people_fnd_csr INTO x_workflow_table(i).email;
1952:
1953: ELSIF (l_approversOut(i).orig_system = AME_UTIL.FNDUSERORIGSYSTEM) THEN
1954: OPEN per_addresses_fnd_csr(l_approversOut(i).orig_system_id);
1955: FETCH per_addresses_fnd_csr INTO x_workflow_table(i).telephone;
1956: CLOSE per_addresses_fnd_csr;
1957:
1958: OPEN per_all_people_fnd_csr(l_approversOut(i).orig_system_id);
1959: FETCH per_all_people_fnd_csr INTO x_workflow_table(i).email;
1960: IF per_all_people_fnd_csr%NOTFOUND THEN