56: where pa.incurred_by_person_id = P_PERSON_ID;
57:
58: cursor trans_control( p_person_id number ) is
59: select null
60: from pa_transaction_controls pa
61: where pa.project_id > -1
62: and pa.person_id = P_PERSON_ID;
63: BEGIN
64: Error_Message := 'PA_HR_PER_TRANS_INTERFACE';