266:
267: EXCEPTION
268: WHEN OTHERS THEN
269: IF (SQLCODE <> -20001) THEN
270: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
271: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
272: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
273: FND_MESSAGE.SET_TOKEN('PARAMETERS','bank_collection_id = ' ||
274: X_bank_collection_id);
267: EXCEPTION
268: WHEN OTHERS THEN
269: IF (SQLCODE <> -20001) THEN
270: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
271: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
272: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
273: FND_MESSAGE.SET_TOKEN('PARAMETERS','bank_collection_id = ' ||
274: X_bank_collection_id);
275: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
268: WHEN OTHERS THEN
269: IF (SQLCODE <> -20001) THEN
270: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
271: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
272: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
273: FND_MESSAGE.SET_TOKEN('PARAMETERS','bank_collection_id = ' ||
274: X_bank_collection_id);
275: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
276: END IF;
269: IF (SQLCODE <> -20001) THEN
270: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
271: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
272: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
273: FND_MESSAGE.SET_TOKEN('PARAMETERS','bank_collection_id = ' ||
274: X_bank_collection_id);
275: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
276: END IF;
277: APP_EXCEPTION.RAISE_EXCEPTION;
271: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
272: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
273: FND_MESSAGE.SET_TOKEN('PARAMETERS','bank_collection_id = ' ||
274: X_bank_collection_id);
275: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
276: END IF;
277: APP_EXCEPTION.RAISE_EXCEPTION;
278:
279: END Insert_Row;
380: FETCH C INTO Recinfo;
381: if (C%NOTFOUND) then
382: debug_info := 'Close cursor C - DATA NOTFOUND';
383: CLOSE C;
384: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
385: APP_EXCEPTION.Raise_Exception;
386: end if;
387: debug_info := 'Close cursor C';
388: CLOSE C;
587: AND (Recinfo.BRANCH_PARTY_ID = X_BRANCH_PARTY_ID)
588: ) then
589: return;
590: else
591: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
592: APP_EXCEPTION.Raise_Exception;
593: end if;
594:
595: EXCEPTION
595: EXCEPTION
596: WHEN OTHERS THEN
597: IF (SQLCODE <> -20001) THEN
598: IF (SQLCODE = -54) THEN
599: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
600: ELSE
601: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
602: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
603: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
597: IF (SQLCODE <> -20001) THEN
598: IF (SQLCODE = -54) THEN
599: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
600: ELSE
601: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
602: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
603: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
604: FND_MESSAGE.SET_TOKEN('PARAMETERS','bank_collection_id = ' ||
605: X_bank_collection_id);
598: IF (SQLCODE = -54) THEN
599: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
600: ELSE
601: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
602: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
603: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
604: FND_MESSAGE.SET_TOKEN('PARAMETERS','bank_collection_id = ' ||
605: X_bank_collection_id);
606: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
599: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
600: ELSE
601: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
602: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
603: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
604: FND_MESSAGE.SET_TOKEN('PARAMETERS','bank_collection_id = ' ||
605: X_bank_collection_id);
606: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
607: END IF;
600: ELSE
601: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
602: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
603: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
604: FND_MESSAGE.SET_TOKEN('PARAMETERS','bank_collection_id = ' ||
605: X_bank_collection_id);
606: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
607: END IF;
608: END IF;
602: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
603: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
604: FND_MESSAGE.SET_TOKEN('PARAMETERS','bank_collection_id = ' ||
605: X_bank_collection_id);
606: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
607: END IF;
608: END IF;
609: APP_EXCEPTION.RAISE_EXCEPTION;
610: