22:
23: vg_sob_id Gl_Sets_Of_Books.set_of_books_id%TYPE;
24: vg_doc_id Fv_Be_Trx_Hdrs.doc_id%TYPE;
25: vg_to_rpr_doc_id Fv_Be_Trx_Hdrs.doc_id%TYPE;
26: vg_user_id fnd_user.user_id%TYPE;
27: vg_resp_id fnd_responsibility.responsibility_id%TYPE;
28: vg_response_note VARCHAR2(240);
29: vg_doc_type VARCHAR2(40);
30: vg_event_type VARCHAR2(40);
74: vl_submitter_dispname VARCHAR2(80);
75: vl_approver_dispname VARCHAR2(80);
76: vl_item_seq NUMBER;
77: vl_orig_system VARCHAR2(14);
78: vl_user_id Fnd_User.user_id%TYPE;
79: vl_owner Fnd_User.user_name%TYPE;
80: vl_rev_total NUMBER;
81: vl_curr_code VARCHAR2(15);
82:
75: vl_approver_dispname VARCHAR2(80);
76: vl_item_seq NUMBER;
77: vl_orig_system VARCHAR2(14);
78: vl_user_id Fnd_User.user_id%TYPE;
79: vl_owner Fnd_User.user_name%TYPE;
80: vl_rev_total NUMBER;
81: vl_curr_code VARCHAR2(15);
82:
83:
677: l_module_name VARCHAR2(200) := g_module_name || 'ApproveDoc';
678: l_errbuf VARCHAR2(1024);
679:
680: vl_packet_id NUMBER;
681: vl_approver_id Fnd_User.user_id%TYPE;
682: x_return_status VARCHAR2(1);
683: x_status_code VARCHAR2(100);
684: vg_doc_type VARCHAR2(25);
685: vg_event_type VARCHAR2(25);
959: retcode OUT NOCOPY NUMBER) IS
960: l_module_name VARCHAR2(200) := g_module_name || 'Get_Orig_System';
961: l_errbuf VARCHAR2(1024);
962:
963: CURSOR get_empid_cur(c_user_id Fnd_User.user_id%TYPE) IS
964: SELECT employee_id
965: FROM Fnd_User
966: WHERE user_id = c_user_id;
967:
961: l_errbuf VARCHAR2(1024);
962:
963: CURSOR get_empid_cur(c_user_id Fnd_User.user_id%TYPE) IS
964: SELECT employee_id
965: FROM Fnd_User
966: WHERE user_id = c_user_id;
967:
968: vl_emp_id Fnd_User.employee_id%TYPE;
969: BEGIN
964: SELECT employee_id
965: FROM Fnd_User
966: WHERE user_id = c_user_id;
967:
968: vl_emp_id Fnd_User.employee_id%TYPE;
969: BEGIN
970:
971: OPEN get_empid_cur(p_user_id);
972: FETCH get_empid_cur INTO vl_emp_id;