DBA Data[Home] [Help]

APPS.PA_PURGE_VALIDATE_CAPITAL SQL Statements

The following lines contain the word 'select', 'insert', 'update' or 'delete':

Line: 15

      SELECT 'VENDOR INVOICE PENDING'
      FROM   dual
      WHERE EXISTS ( SELECT aid.invoice_id
                     FROM   ap_invoice_distributions_all aid
                     WHERE  aid.project_id = p_project_id
                     AND    (p_active_flag = 'C' or
                            aid.expenditure_item_date < trunc(p_purge_to_date))
                     AND    aid.pa_addition_flag <> 'Y');
Line: 32

      SELECT 'VENDOR INVOICE PENDING'
      FROM   dual
      WHERE EXISTS ( SELECT aid.invoice_id
                     FROM   ap_invoice_distributions_all aid,
                            ap_invoices_all ai
                     WHERE  aid.project_id = p_project_id
                     AND    aid.invoice_id = ai.invoice_id
                     AND    ai.invoice_type_lookup_code <> 'EXPENSE REPORT'
                     AND    (p_active_flag = 'C' or
                            trunc(aid.expenditure_item_date) <= trunc(p_purge_to_date))
    -- Bug 2767507 Added 'G' to the list of values which pa_addition_flag
    -- shouldnot check when looking for pending invoices.
                     AND    aid.pa_addition_flag NOT IN ('Z','T','E','Y','G', 'F') --bug# 4351752
    -- Bug# 2407499
                     AND    nvl(aid.reversal_flag, 'N') <> 'Y');
Line: 52

      SELECT 'ASSET LINE NOT TRANSFERRED'
      FROM   dual
      WHERE EXISTS ( SELECT pal.project_asset_line_id
                     FROM   pa_project_asset_lines_all pal
                     WHERE  pal.project_id = p_project_id
                     AND    pal.transfer_status_code <> 'T');
Line: 63

      SELECT 'ADJ NOT TRANSFERRED TO AP'
      FROM dual
      WHERE EXISTS (SELECT ei.expenditure_item_id
  		    FROM   pa_cost_distribution_lines_all  cdl,
    			   pa_expenditure_items_all        ei
  		    WHERE  ei.expenditure_item_id = cdl.expenditure_item_id
                    AND    ((cdl.transfer_status_code in ('P','R','X')
                             and ei.system_linkage_function = 'VI') or
                            (cdl.transfer_status_code in ('P','R','X','T')
                             and ei.system_linkage_function = 'ER'))
                    AND    cdl.line_type  = 'R'
                    AND    (p_active_flag = 'C' or
                            trunc(ei.expenditure_item_date)<= trunc(p_purge_to_date))
                    AND    ei.project_id = p_project_id);
Line: 86

      SELECT 'EI NOT COSTED'
      FROM   dual
      WHERE EXISTS ( SELECT ei.expenditure_item_id
                     FROM   pa_expenditure_items_all   ei,
                            pa_tasks                   pt
                     WHERE  ei.system_linkage_function in ( 'VI', 'ER' )
                     AND    ei.task_id = pt.task_id
                     AND    pt.project_id = p_project_id
                     AND    (p_active_flag = 'C' or ei.expenditure_item_date < trunc(p_purge_to_date))
                     AND    ei.cost_distributed_flag||'' = 'N');
Line: 101

      SELECT 'EXP ITEM NOT CAPITALIZED'
      FROM   dual
      WHERE EXISTS ( SELECT pcdl.expenditure_item_id
                     FROM pa_cost_distribution_lines_all pcdl,
	                  pa_expenditure_items_all pei,
	                  pa_tasks pt,
	                  pa_projects pp,
	                  pa_project_types ppt
                     WHERE pcdl.expenditure_item_id = pei.expenditure_item_id
                     AND   pei.revenue_distributed_flag||'' = 'N'
                     AND   pcdl.line_type = DECODE(ppt.capital_cost_type_code,'B','D','R')
                     AND   pcdl.billable_flag = 'Y'
                     AND   pei.task_id = pt.task_id
                     AND   pt.project_id = pp.project_id
                     AND   pp.project_id = p_project_id
                     AND   (p_active_flag = 'C' or
                           trunc(pei.expenditure_item_date) <= trunc(p_purge_to_date))
                     AND   pp.project_type = ppt.project_type
                     AND   pei.task_id IN
                         ( select task_id
                           from pa_tasks pt2
                           where project_id = pp.project_id
                           and ( exists
                                 (SELECT task_id
                                  FROM pa_project_asset_assignments paa
                                  WHERE paa.project_id = pp.project_id
                                  and (paa.task_id = pt2.task_id or
                                       paa.task_id = pt2.top_task_id))
                           or exists       --- Return all common tasks
                              (SELECT task_id
                               FROM pa_project_asset_assignments paa
                               WHERE paa.project_id = pp.project_id
                               and task_id = pt2.task_id
                               AND paa.project_asset_id = 0))
                            UNION
                            SELECT task_id
                            FROM   pa_tasks
                            WHERE project_id IN
                               (SELECT project_id            --- project level asset assignment
                                  FROM pa_project_asset_assignments paa
                                 WHERE project_id = pp.project_id
                                   AND NVL(task_id, 0) = 0
                                 UNION
                                 SELECT project_id              --- return all common tasks
                                   FROM pa_project_asset_assignments paa
                                  WHERE paa.project_id = pp.project_id
	                                 and NVL(paa.task_id,0) = 0
                                    AND paa.project_asset_id = 0))
                     AND NOT EXISTS
	                    (
	                      SELECT 'This CDL was summarized before'
	                      FROM pa_project_asset_line_details pald
	                      WHERE pald.expenditure_item_id = pcdl.expenditure_item_id
	                      AND   pald.line_num = pcdl.line_num
	                      AND   pald.reversed_flag||'' = 'N'
	                    ));
Line: 162

      SELECT 'COMMITMENT EXISTS'
      FROM   dual
      WHERE EXISTS ( SELECT pctv.project_id
                     FROM   pa_commitment_txns_v pctv
                     WHERE  pctv.project_id = p_project_id
                     AND    pctv.expenditure_item_date is not null
                     AND    (p_active_flag = 'C' or
                            trunc(pctv.expenditure_item_date) <= trunc(p_purge_to_date))
                     AND    pctv.line_type not in  ('P','I') /* Bug 2503781.*/
           UNION     /*  Below lines added for bug 2503781 */
                     SELECT pctv1.project_id
                     FROM   pa_commitment_txns_v pctv1
                     WHERE  pctv1.project_id = p_project_id
                     AND    pctv1.expenditure_item_date is not null
                     AND    (p_active_flag = 'C' or
                            trunc(pctv1.expenditure_item_date) <= trunc(p_purge_to_date))
                     AND    pctv1.line_type = 'P'
                     AND    pctv1.tot_cmt_quantity > 0
                     AND    nvl(pctv1.quantity_cancelled,0) =0
           UNION     /* Added for bug 2553822 */
		   /* Bug 2598071  SELECT aid.invoice_id */
		     SELECT aid.invoice_id
		     FROM   ap_invoice_distributions_all aid,
			    ap_invoices_all ai
		     WHERE  aid.project_id = p_project_id
		     AND    aid.invoice_id = ai.invoice_id
                     AND    ai.source    <> 'Oracle Project Accounting'
		     AND    ai.invoice_type_lookup_code = 'EXPENSE REPORT'
		     AND    (p_active_flag = 'C' or
			    trunc(aid.expenditure_item_date) <= trunc(p_purge_to_date))
		     AND    aid.pa_addition_flag NOT IN ('Z','T','E','Y')
		     AND    nvl(aid.reversal_flag, 'N') <> 'Y');