24:
25: debug_info := 'Count for same vendor_id,party_site_id and invoice_num'; /*Bug9105666*/
26: SELECT count(1)
27: INTO dummy_a
28: FROM ap_invoices_all
29: WHERE invoice_num = p_INVOICE_NUM
30: AND vendor_id = p_VENDOR_ID
31: AND org_id = p_ORG_ID -- Bug 5407785
32: AND (party_site_id = P_PARTY_SITE_ID /*Bug9105666*/
250: )
251: IS
252:
253: CURSOR C IS
254: SELECT rowid FROM ap_invoices_all
255: WHERE invoice_id = p_Invoice_Id;
256:
257: CURSOR C2 IS
258: SELECT ap_invoices_s.nextval FROM sys.dual;
284: debug_info := 'hello Close cursor C2';
285: CLOSE C2;
286: END IF;
287:
288: debug_info := 'Insert into ap_invoices_all';
289:
290: INSERT INTO ap_invoices_all(
291: invoice_id,
292: last_update_date,
286: END IF;
287:
288: debug_info := 'Insert into ap_invoices_all';
289:
290: INSERT INTO ap_invoices_all(
291: invoice_id,
292: last_update_date,
293: last_updated_by,
294: vendor_id,
837: P_VENDOR_SITE_ID, /*Bug9105666*/
838: current_calling_sequence);
839:
840: debug_info := 'Update ap_invoices';
841: UPDATE ap_invoices_all
842: SET
843: invoice_id = p_Invoice_Id,
844: last_update_date = p_Last_Update_Date,
845: last_updated_by = p_Last_Updated_By,
1003: END IF;
1004:
1005: SELECT invoice_id
1006: INTO l_invoice_id
1007: FROM ap_invoices_all
1008: WHERE rowid = p_rowid;
1009:
1010: --Bug 4539462 DBI logging
1011: AP_DBI_PKG.Maintain_DBI_Summary
1151:
1152: --End of 7388641 --
1153:
1154: debug_info := 'Delete from ap_invoices';
1155: DELETE FROM ap_invoices_all
1156: WHERE rowid = p_Rowid;
1157:
1158: --Bug 4539462 DBI logging
1159: AP_DBI_PKG.Maintain_DBI_Summary