PA Delete Revaluated Funding for a Range of Projects

select p.project_name, p.budget_type_code,p. request_id,
          substr(p.customer_name,1,24) || '-' || substr(to_char(p.customer_number),1,5) customer_name,
          substr(p.agreement_num,1,20) agreement_num,
          substr(p.task_name,1,20) task_name,
          substr(p.projfunc_rate_type_name,1,15) projfunc_rate_type_name,
          to_char(p.revaluation_projfunc_rate, fnd_currency.get_format_mask(projfunc_currency_code,22))
                     revaluation_projfunc_rate,
          substr(p.invproc_rate_type_name,1,15) invproc_rate_type_name,
          to_char(p.revaluation_invproc_rate, fnd_currency.get_format_mask(invproc_currency_code,22))
                     revaluation_invproc_rate,
          substr( p.funding_currency_code,1,3) funding_currency_code,
          to_char(p.funding_baselined_amount, fnd_currency.get_format_mask(funding_currency_code,22))
                     funding_baselined_amount,
          substr(p.projfunc_currency_code,1,3) projfunc_currency_code,
          to_char(p.projfunc_revld_baselined_amt, fnd_currency.get_format_mask(projfunc_currency_code,22))
                      projfunc_revld_baselined_amt,
          to_char(p.projfunc_baselined_amount, fnd_currency.get_format_mask(projfunc_currency_code,22))
                      projfunc_baselined_amount,
          to_char((p.projfunc_baselined_amount + p.projfunc_adjustment_amount),
                                fnd_currency.get_format_mask(projfunc_currency_code,22)) projfunc_reval_funding,
          to_char(p.projfunc_adjustment_amount, fnd_currency.get_format_mask(projfunc_currency_code,22))
                      projfunc_adjustment_amount,
          substr(d1.warning_message,1,75) pfc_warning_message,
          substr(p.invproc_currency_code,1,3) invproc_currency_code,
          to_char(p.invproc_revld_baselined_amt, fnd_currency.get_format_mask(invproc_currency_code,22))
                      invproc_revld_baselined_amt,
          to_char(p.invproc_baselined_amount, fnd_currency.get_format_mask(invproc_currency_code,22))
                      invproc_baselined_amount,
          to_char((p.invproc_baselined_amount+p.invproc_adjustment_amount),
                                 fnd_currency.get_format_mask(invproc_currency_code,22)) invproc_reval_funding,
          to_char(p.invproc_adjustment_amount, fnd_currency.get_format_mask(invproc_currency_code,22))
                      invproc_adjustment_amount,
         substr(d2.warning_message,1,75) ipc_warning_message
from pa_proj_fund_reval_v p, pa_distribution_warnings d1, pa_distribution_warnings d2
where p.request_id = :p_conc_request_id
and :p_run_mode in ('SINGLE', 'RANGE')
and d1.project_id (+) = p.project_id
and d1.agreement_id (+) = p.agreement_id
and nvl(d1.task_id (+),0) = nvl(p.task_id,0)
and d1.warning_message_code (+) = 'PA_FR_ACCRUED_LT_BASELINED_AMT'
and d2.project_id (+) = p.project_id
and d2.agreement_id (+) = p.agreement_id
and nvl(d2.task_id (+),0) = nvl(p.task_id,0)
and d2.warning_message_code (+) = 'PA_FR_BILLED_LT_BASELINED_AMT'
order by p.project_id, p.customer_id, p.agreement_id, p.task_id