27:
28: Cursor Exp_Items is
29: SELECT expenditure_item_id from pa_expenditure_items_all where expenditure_item_id in
30: (SELECT ei.expenditure_item_id
31: FROM pa_cc_dist_lines ccd,
32: Pa_expenditure_items ei,
33: Pa_expenditures exp
34: WHERE ccd.transfer_status_code in ('P','R')
35: AND (p_gl_category is null OR ccd.line_type = p_gl_category)
50: AND p_EXPENDITURE_BATCH is NOT NULL
51: UNION ALL
52: SELECT expenditure_item_id from pa_expenditure_items_all where expenditure_item_id in
53: (SELECT ei.expenditure_item_id
54: FROM pa_cc_dist_lines ccd,
55: pa_expenditure_items ei,
56: pa_projects_all proj
57: WHERE ccd.transfer_status_code in ('P','R')
58: AND (p_gl_category is null OR ccd.line_type = p_gl_category)
80: AND p_EXPENDITURE_BATCH is NULL
81: UNION ALL
82: SELECT expenditure_item_id from pa_expenditure_items_all where expenditure_item_id in
83: (SELECT ccd.expenditure_item_id
84: FROM pa_cc_dist_lines ccd
85: WHERE ccd.transfer_status_code in ('P','R')
86: AND (p_gl_category is null OR ccd.line_type = p_gl_category)
87: AND (ccd.line_type = 'BL' OR
88: (ccd.line_type = 'PC' AND EXISTS (SELECT 'X'
149:
150: log_message('40 : EI locked with '||sql%rowcount ||' records');
151:
152: FORALL i IN 1..EiidTab.count
153: UPDATE pa_cc_dist_lines ccd
154: SET ccd.transfer_status_code = 'X',
155: ccd.transfer_rejection_code = NULL,
156: ccd.request_id = G_conc_request_id
157: WHERE ccd.expenditure_item_id = EiidTab (i)