1: PACKAGE BODY AP_WEB_OA_ACTIVE_PKG AS
2: /* $Header: apwoaacb.pls 120.21.12020000.2 2012/09/20 07:13:32 meesubra ship $ */
3:
4: -- Cache for AP Approver and Expenses Administrator
5: g_ApApprover ap_lookup_codes.displayed_field%TYPE := NULL;
475: FROM ap_credit_card_trxns cct, ap_expense_report_headers erh
476: WHERE trx_id = p_trx_id
477: AND cct.report_header_id = erh.report_header_id;
478:
479: l_status := AP_WEB_OA_ACTIVE_PKG.GetReportStatusCode(l_source,
480: l_workflow_approved_flag,
481: l_report_header_id);
482:
483: IF l_status not in ('UNUSED','SAVED', 'EMPAPPR', 'REJECTED', 'RESOLUTN','WITHDRAWN',
625: RETURN l_final_status_code;
626:
627: END GetBothPayStatusCode;
628:
629: END AP_WEB_OA_ACTIVE_PKG;