538: cursor c_prev_entry_level_code is used to get the entry_level_code of the previous budget version. */
539:
540: CURSOR c_budctrl_exists ( p_budget_version_id NUMBER) IS
541: SELECT 'Y'
542: FROM DUAL
543: WHERE EXISTS (SELECT 1
544: FROM pa_budgetary_controls bc,
545: PA_BUDGET_VERSIONS pbv
546: WHERE BUDGET_VERSION_ID = p_budget_version_id
921: -- check whether budgetary Controls set up for this project
922: if l_fck_req_flag = 'Y' then
923: -- Check whether BC records exist for this project and budget type
924:
925: select 'Y' into bc_rec_exists from SYS.DUAL
926: where exists
927: (select' Y'
928: from pa_budgetary_controls
929: where project_id = x_project_id and