110:
111: EXCEPTION
112: WHEN OTHERS THEN
113: IF (SQLCODE <> -20001) THEN
114: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
115: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
116: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
117: FND_MESSAGE.SET_TOKEN('PARAMETERS',
118: 'appraisal_id = ' || X_appraisal_id);
111: EXCEPTION
112: WHEN OTHERS THEN
113: IF (SQLCODE <> -20001) THEN
114: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
115: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
116: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
117: FND_MESSAGE.SET_TOKEN('PARAMETERS',
118: 'appraisal_id = ' || X_appraisal_id);
119: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
112: WHEN OTHERS THEN
113: IF (SQLCODE <> -20001) THEN
114: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
115: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
116: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
117: FND_MESSAGE.SET_TOKEN('PARAMETERS',
118: 'appraisal_id = ' || X_appraisal_id);
119: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
120: END IF;
113: IF (SQLCODE <> -20001) THEN
114: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
115: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
116: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
117: FND_MESSAGE.SET_TOKEN('PARAMETERS',
118: 'appraisal_id = ' || X_appraisal_id);
119: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
120: END IF;
121: APP_EXCEPTION.RAISE_EXCEPTION;
115: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
116: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
117: FND_MESSAGE.SET_TOKEN('PARAMETERS',
118: 'appraisal_id = ' || X_appraisal_id);
119: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
120: END IF;
121: APP_EXCEPTION.RAISE_EXCEPTION;
122:
123: END Insert_Row;
175: IF (C%NOTFOUND)
176: THEN
177: debug_info := 'Close cursor C - DATA NOTFOUND';
178: CLOSE C;
179: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
180: APP_EXCEPTION.Raise_Exception;
181: END IF;
182: debug_info := 'Close cursor C';
183: CLOSE C;
224: )
225: THEN
226: return;
227: ELSE
228: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
229: APP_EXCEPTION.Raise_Exception;
230: END IF;
231:
232: EXCEPTION
232: EXCEPTION
233: WHEN OTHERS THEN
234: IF (SQLCODE <> -20001) THEN
235: IF (SQLCODE = -54) THEN
236: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
237: ELSE
238: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
239: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
240: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
234: IF (SQLCODE <> -20001) THEN
235: IF (SQLCODE = -54) THEN
236: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
237: ELSE
238: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
239: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
240: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
241: FND_MESSAGE.SET_TOKEN('PARAMETERS',
242: 'appraisal_id = ' || X_appraisal_id);
235: IF (SQLCODE = -54) THEN
236: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
237: ELSE
238: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
239: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
240: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
241: FND_MESSAGE.SET_TOKEN('PARAMETERS',
242: 'appraisal_id = ' || X_appraisal_id);
243: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
236: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
237: ELSE
238: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
239: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
240: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
241: FND_MESSAGE.SET_TOKEN('PARAMETERS',
242: 'appraisal_id = ' || X_appraisal_id);
243: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
244: END IF;
237: ELSE
238: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
239: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
240: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
241: FND_MESSAGE.SET_TOKEN('PARAMETERS',
242: 'appraisal_id = ' || X_appraisal_id);
243: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
244: END IF;
245: END IF;
239: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
240: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
241: FND_MESSAGE.SET_TOKEN('PARAMETERS',
242: 'appraisal_id = ' || X_appraisal_id);
243: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
244: END IF;
245: END IF;
246: APP_EXCEPTION.RAISE_EXCEPTION;
247: END Lock_Row;