[Home] [Help]
193:
194: CURSOR c_interface_orphan_acct_lines IS
195: SELECT ICALI.interface_header_id,
196: ICALI.interface_acct_line_id
197: FROM igc_cc_acct_lines_interface ICALI
198: WHERE ICALI.batch_id = g_batch_Id
199: AND NOT EXISTS (SELECT ICALI1.interface_header_id
200: FROM igc_cc_headers_interface ICALI1
201: WHERE ICALI1.batch_id = g_batch_id
207: FROM igc_cc_det_pf_interface ICDPI
208: WHERE ICDPI.batch_id = g_batch_id
209: AND NOT EXISTS (SELECT ICALI.interface_acct_line_id
210: FROM igc_cc_headers_interface ICHI,
211: igc_cc_acct_lines_interface ICALI
212: WHERE ICHI.batch_id = g_batch_id
213: AND ICHI.batch_id = ICALI.batch_id
214: AND ICHI.interface_header_id = ICALI.interface_header_id
215: AND ICDPI.interface_acct_line_id = ICALI.interface_acct_line_id);
289: END IF;
290: IF P_Interface_Parent_AcctLine_Id IS NOT NULL AND P_Parent_Acct_Line_Id IS NULL THEN
291: BEGIN
292: SELECT cca.cc_acct_line_id INTO P_Parent_Acct_Line_Id
293: FROM igc_cc_acct_lines cca, igc_cc_acct_lines_interface ccai
294: WHERE ccai.interface_acct_line_id = P_Interface_Parent_AcctLine_Id
295: AND cca.cc_header_id = P_Parent_Header_Id
296: AND ccai.cc_acct_line_num = cca.cc_acct_line_num;
297: EXCEPTION WHEN OTHERS THEN RAISE;
1735: INTO l_curr_year_pf_lines
1736: FROM igc_cc_det_pf_interface b
1737: WHERE b.cc_det_pf_date <= l_end_date
1738: AND b.interface_acct_line_id IN (SELECT interface_acct_line_id
1739: FROM igc_cc_acct_lines_interface a
1740: WHERE a.interface_header_id = l_interface_header_record.Interface_Header_Id);
1741: EXCEPTION
1742: WHEN NO_DATA_FOUND
1743: THEN
2416:
2417: /*
2418: DELETE IGC.igc_cc_headers_interface
2419: WHERE batch_id = P_Batch_Id;
2420: DELETE IGC.igc_cc_acct_lines_interface
2421: WHERE batch_id = P_Batch_Id;
2422: DELETE IGC.igc_cc_det_pf_interface
2423: WHERE batch_id = P_Batch_Id;
2424:
3407: l_return_status VARCHAR2(1);
3408: l_msg_count NUMBER;
3409: l_msg_data VARCHAR2(2000);
3410: l_msg_buf VARCHAR2(2000);
3411: l_interface_acct_line_record igc_cc_acct_lines_interface%ROWTYPE;
3412:
3413: CURSOR c_interface_acct_line_records IS
3414: SELECT * FROM igc_cc_acct_lines_interface
3415: WHERE batch_id = g_batch_id
3410: l_msg_buf VARCHAR2(2000);
3411: l_interface_acct_line_record igc_cc_acct_lines_interface%ROWTYPE;
3412:
3413: CURSOR c_interface_acct_line_records IS
3414: SELECT * FROM igc_cc_acct_lines_interface
3415: WHERE batch_id = g_batch_id
3416: AND interface_header_id = P_Interface_Header_Id;
3417: BEGIN
3418: -- Process the acct line records one by one
3763: ELSE
3764: BEGIN
3765: SELECT interface_acct_line_id
3766: INTO l_interface_parent_acctline_id
3767: FROM igc_cc_acct_lines_interface
3768: WHERE interface_acct_line_id = P_Interface_Parent_AcctLine_Id
3769: AND interface_header_id = P_Interface_Parent_Header_Id;
3770: EXCEPTION WHEN NO_DATA_FOUND THEN
3771: l_error_message := NULL;
3990: -- be less than the sum of Acct_Func_Amt of its Releases.
3991: BEGIN
3992: IF P_Cc_Type = 'C' THEN
3993: SELECT NVL(SUM(cc_acct_func_amt), 0) INTO l_func_amt
3994: FROM igc_cc_acct_lines_interface
3995: WHERE interface_parent_acct_line_id = P_Interface_Acct_Line_Id;
3996: IF NVL(P_Cc_Acct_Func_Amt, 0) < NVL(l_func_amt, 0) THEN
3997: l_error_message := NULL;
3998: FND_MESSAGE.SET_NAME('IGC', 'IGC_CC_FUNC_AMT_COV_DIFFERS');
4305: project_id, task_id, expenditure_type,
4306: expenditure_org_id, expenditure_item_date
4307: INTO l_charge_ccid, l_budget_ccid, l_cov_project_id, l_cov_task_id,
4308: l_cov_expenditure_type, l_cov_expenditure_org_id, l_cov_expenditure_item_date
4309: FROM igc_cc_acct_lines_interface
4310: WHERE interface_acct_line_id = P_Interface_Parent_AcctLine_Id;
4311: IF (P_Charge_Code_Combination_Id IS NULL AND l_charge_ccid IS NOT NULL) OR
4312: (P_Charge_Code_Combination_Id IS NOT NULL AND l_charge_ccid IS NULL) OR
4313: (P_Charge_Code_Combination_Id <> l_charge_ccid) THEN