766: p_transaction_flow_header_id IN NUMBER --
767: ) RETURN VARCHAR2 IS
768:
769: x_valid_flag VARCHAR2(2);
770: x_expense_accrual_code po_system_parameters.expense_accrual_code%TYPE;
771: x_progress VARCHAR(4) := NULL;
772:
773: BEGIN
774:
775: x_progress := '001';
776:
777: SELECT expense_accrual_code
778: INTO x_expense_accrual_code
779: FROM po_system_parameters;
780:
781: -- Business Rules
782: -- item status
783: -- 'O' = outside processing item