1827: l_approvalProcessCompleteYNOut VARCHAR2(1);
1828: l_approversOut ame_util.approversTable2;
1829:
1830:
1831: -- Fetch telephone no from per_addresses
1832: CURSOR per_addresses_csr( p_person_id NUMBER)IS
1833: SELECT telephone_number_1
1834: FROM per_addresses
1835: WHERE person_id = p_person_id
1828: l_approversOut ame_util.approversTable2;
1829:
1830:
1831: -- Fetch telephone no from per_addresses
1832: CURSOR per_addresses_csr( p_person_id NUMBER)IS
1833: SELECT telephone_number_1
1834: FROM per_addresses
1835: WHERE person_id = p_person_id
1836: AND sysdate BETWEEN date_from AND date_to
1830:
1831: -- Fetch telephone no from per_addresses
1832: CURSOR per_addresses_csr( p_person_id NUMBER)IS
1833: SELECT telephone_number_1
1834: FROM per_addresses
1835: WHERE person_id = p_person_id
1836: AND sysdate BETWEEN date_from AND date_to
1837: AND primary_flag = 'Y';
1838:
1835: WHERE person_id = p_person_id
1836: AND sysdate BETWEEN date_from AND date_to
1837: AND primary_flag = 'Y';
1838:
1839: -- Fetch telephone no from per_addresses with employee_id from fnd_user
1840: CURSOR per_addresses_fnd_csr(p_user_id NUMBER) IS
1841: SELECT telephone_number_1
1842: FROM per_addresses
1843: WHERE sysdate BETWEEN date_from AND date_to
1836: AND sysdate BETWEEN date_from AND date_to
1837: AND primary_flag = 'Y';
1838:
1839: -- Fetch telephone no from per_addresses with employee_id from fnd_user
1840: CURSOR per_addresses_fnd_csr(p_user_id NUMBER) IS
1841: SELECT telephone_number_1
1842: FROM per_addresses
1843: WHERE sysdate BETWEEN date_from AND date_to
1844: AND primary_flag = 'Y'
1838:
1839: -- Fetch telephone no from per_addresses with employee_id from fnd_user
1840: CURSOR per_addresses_fnd_csr(p_user_id NUMBER) IS
1841: SELECT telephone_number_1
1842: FROM per_addresses
1843: WHERE sysdate BETWEEN date_from AND date_to
1844: AND primary_flag = 'Y'
1845: AND person_id = (SELECT employee_id
1846: FROM fnd_user
1892: x_workflow_table(i).status := l_approversOut(i).approval_status;
1893: -- x_workflow_table(i).status_date:=
1894:
1895: IF (l_approversOut(i).orig_system = AME_UTIL.PERORIGSYSTEM) THEN
1896: OPEN per_addresses_csr(l_approversOut(i).orig_system_id);
1897: FETCH per_addresses_csr INTO x_workflow_table(i).telephone;
1898: CLOSE per_addresses_csr;
1899:
1900: OPEN per_all_people_csr(l_approversOut(i).orig_system_id);
1893: -- x_workflow_table(i).status_date:=
1894:
1895: IF (l_approversOut(i).orig_system = AME_UTIL.PERORIGSYSTEM) THEN
1896: OPEN per_addresses_csr(l_approversOut(i).orig_system_id);
1897: FETCH per_addresses_csr INTO x_workflow_table(i).telephone;
1898: CLOSE per_addresses_csr;
1899:
1900: OPEN per_all_people_csr(l_approversOut(i).orig_system_id);
1901: FETCH per_all_people_csr INTO x_workflow_table(i).email;
1894:
1895: IF (l_approversOut(i).orig_system = AME_UTIL.PERORIGSYSTEM) THEN
1896: OPEN per_addresses_csr(l_approversOut(i).orig_system_id);
1897: FETCH per_addresses_csr INTO x_workflow_table(i).telephone;
1898: CLOSE per_addresses_csr;
1899:
1900: OPEN per_all_people_csr(l_approversOut(i).orig_system_id);
1901: FETCH per_all_people_csr INTO x_workflow_table(i).email;
1902: CLOSE per_all_people_csr;
1901: FETCH per_all_people_csr INTO x_workflow_table(i).email;
1902: CLOSE per_all_people_csr;
1903:
1904: ELSIF (l_approversOut(i).orig_system = AME_UTIL.FNDUSERORIGSYSTEM) THEN
1905: OPEN per_addresses_fnd_csr(l_approversOut(i).orig_system_id);
1906: FETCH per_addresses_fnd_csr INTO x_workflow_table(i).telephone;
1907: CLOSE per_addresses_fnd_csr;
1908:
1909: OPEN per_all_people_fnd_csr(l_approversOut(i).orig_system_id);
1902: CLOSE per_all_people_csr;
1903:
1904: ELSIF (l_approversOut(i).orig_system = AME_UTIL.FNDUSERORIGSYSTEM) THEN
1905: OPEN per_addresses_fnd_csr(l_approversOut(i).orig_system_id);
1906: FETCH per_addresses_fnd_csr INTO x_workflow_table(i).telephone;
1907: CLOSE per_addresses_fnd_csr;
1908:
1909: OPEN per_all_people_fnd_csr(l_approversOut(i).orig_system_id);
1910: FETCH per_all_people_fnd_csr INTO x_workflow_table(i).email;
1903:
1904: ELSIF (l_approversOut(i).orig_system = AME_UTIL.FNDUSERORIGSYSTEM) THEN
1905: OPEN per_addresses_fnd_csr(l_approversOut(i).orig_system_id);
1906: FETCH per_addresses_fnd_csr INTO x_workflow_table(i).telephone;
1907: CLOSE per_addresses_fnd_csr;
1908:
1909: OPEN per_all_people_fnd_csr(l_approversOut(i).orig_system_id);
1910: FETCH per_all_people_fnd_csr INTO x_workflow_table(i).email;
1911: IF per_all_people_fnd_csr%NOTFOUND THEN