4804: AP_IMPORT_INVOICES_PKG.g_debug_switch,
4805: 'No invoice_id<- '||current_calling_sequence);
4806: END IF;
4807:
4808: FND_MESSAGE.Set_Name('SQLAP', 'AP_IMP_NO_INVOICE_ID');
4809: x_msg_data := FND_MESSAGE.Get;
4810:
4811: x_return_status := 'F';
4812: return;
4805: 'No invoice_id<- '||current_calling_sequence);
4806: END IF;
4807:
4808: FND_MESSAGE.Set_Name('SQLAP', 'AP_IMP_NO_INVOICE_ID');
4809: x_msg_data := FND_MESSAGE.Get;
4810:
4811: x_return_status := 'F';
4812: return;
4813:
4930: g_invoice_id := null;
4931:
4932: EXCEPTION
4933: WHEN no_data_found THEN
4934: FND_MESSAGE.Set_Name('SQLAP', 'AP_IMP_NO_INVOICE_ID');
4935: x_msg_data := FND_MESSAGE.Get;
4936: x_return_status := 'F';
4937:
4938: WHEN OTHERS THEN
4931:
4932: EXCEPTION
4933: WHEN no_data_found THEN
4934: FND_MESSAGE.Set_Name('SQLAP', 'AP_IMP_NO_INVOICE_ID');
4935: x_msg_data := FND_MESSAGE.Get;
4936: x_return_status := 'F';
4937:
4938: WHEN OTHERS THEN
4939: IF (SQLCODE < 0) THEN