259:
260: EXCEPTION
261: WHEN OTHERS THEN
262: IF (SQLCODE <> -20001) THEN
263: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
264: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
265: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
266: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'file_control = ' ||
267: X_file_control ||
260: EXCEPTION
261: WHEN OTHERS THEN
262: IF (SQLCODE <> -20001) THEN
263: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
264: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
265: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
266: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'file_control = ' ||
267: X_file_control ||
268: ' entry_sequential_number = ' ||
261: WHEN OTHERS THEN
262: IF (SQLCODE <> -20001) THEN
263: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
264: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
265: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
266: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'file_control = ' ||
267: X_file_control ||
268: ' entry_sequential_number = ' ||
269: X_entry_sequential_number);
262: IF (SQLCODE <> -20001) THEN
263: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
264: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
265: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
266: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'file_control = ' ||
267: X_file_control ||
268: ' entry_sequential_number = ' ||
269: X_entry_sequential_number);
270: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
266: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'file_control = ' ||
267: X_file_control ||
268: ' entry_sequential_number = ' ||
269: X_entry_sequential_number);
270: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
271: END IF;
272:
273: APP_EXCEPTION.RAISE_EXCEPTION;
274:
374:
375: IF (C%NOTFOUND) THEN
376: debug_info := 'Close cursor C - DATA NOTFOUND';
377: CLOSE C;
378: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
379: APP_EXCEPTION.Raise_Exception;
380: END IF;
381:
382: debug_info := 'Close cursor C';
566: AND (x_electronic_format_flag IS NULL)))
567: ) THEN
568: RETURN;
569: ELSE
570: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
571: APP_EXCEPTION.Raise_Exception;
572: END IF;
573:
574: EXCEPTION
574: EXCEPTION
575: WHEN OTHERS THEN
576: IF (SQLCODE <> -20001) THEN
577: IF (SQLCODE = -54) THEN
578: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
579: ELSE
580: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
581: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
582: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
576: IF (SQLCODE <> -20001) THEN
577: IF (SQLCODE = -54) THEN
578: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
579: ELSE
580: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
581: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
582: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
583: FND_MESSAGE.SET_TOKEN('PARAMETERS','file_control = ' ||
584: X_file_control ||
577: IF (SQLCODE = -54) THEN
578: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
579: ELSE
580: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
581: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
582: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
583: FND_MESSAGE.SET_TOKEN('PARAMETERS','file_control = ' ||
584: X_file_control ||
585: ' entry_sequential_number = ' ||
578: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
579: ELSE
580: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
581: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
582: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
583: FND_MESSAGE.SET_TOKEN('PARAMETERS','file_control = ' ||
584: X_file_control ||
585: ' entry_sequential_number = ' ||
586: X_entry_sequential_number);
579: ELSE
580: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
581: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
582: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
583: FND_MESSAGE.SET_TOKEN('PARAMETERS','file_control = ' ||
584: X_file_control ||
585: ' entry_sequential_number = ' ||
586: X_entry_sequential_number);
587: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
583: FND_MESSAGE.SET_TOKEN('PARAMETERS','file_control = ' ||
584: X_file_control ||
585: ' entry_sequential_number = ' ||
586: X_entry_sequential_number);
587: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
588: END IF;
589: END IF;
590:
591: APP_EXCEPTION.RAISE_EXCEPTION;
760:
761: EXCEPTION
762: WHEN OTHERS THEN
763: IF (SQLCODE <> -20001) THEN
764: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
765: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
766: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
767: FND_MESSAGE.SET_TOKEN('PARAMETERS','file_control = ' ||
768: X_file_control ||
761: EXCEPTION
762: WHEN OTHERS THEN
763: IF (SQLCODE <> -20001) THEN
764: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
765: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
766: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
767: FND_MESSAGE.SET_TOKEN('PARAMETERS','file_control = ' ||
768: X_file_control ||
769: ' entry_sequential_number = ' ||
762: WHEN OTHERS THEN
763: IF (SQLCODE <> -20001) THEN
764: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
765: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
766: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
767: FND_MESSAGE.SET_TOKEN('PARAMETERS','file_control = ' ||
768: X_file_control ||
769: ' entry_sequential_number = ' ||
770: X_entry_sequential_number);
763: IF (SQLCODE <> -20001) THEN
764: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
765: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
766: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
767: FND_MESSAGE.SET_TOKEN('PARAMETERS','file_control = ' ||
768: X_file_control ||
769: ' entry_sequential_number = ' ||
770: X_entry_sequential_number);
771: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
767: FND_MESSAGE.SET_TOKEN('PARAMETERS','file_control = ' ||
768: X_file_control ||
769: ' entry_sequential_number = ' ||
770: X_entry_sequential_number);
771: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
772: END IF;
773: APP_EXCEPTION.RAISE_EXCEPTION;
774:
775: END Update_Row;
793:
794: EXCEPTION
795: WHEN OTHERS THEN
796: IF (SQLCODE <> -20001) THEN
797: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
798: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
799: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
800: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
801: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
794: EXCEPTION
795: WHEN OTHERS THEN
796: IF (SQLCODE <> -20001) THEN
797: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
798: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
799: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
800: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
801: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
802: END IF;
795: WHEN OTHERS THEN
796: IF (SQLCODE <> -20001) THEN
797: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
798: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
799: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
800: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
801: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
802: END IF;
803: APP_EXCEPTION.RAISE_EXCEPTION;
796: IF (SQLCODE <> -20001) THEN
797: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
798: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
799: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
800: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
801: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
802: END IF;
803: APP_EXCEPTION.RAISE_EXCEPTION;
804:
797: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
798: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
799: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
800: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
801: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
802: END IF;
803: APP_EXCEPTION.RAISE_EXCEPTION;
804:
805: END Delete_Row;