113:
114: EXCEPTION
115: WHEN OTHERS THEN
116: IF (SQLCODE <> -20001) THEN
117: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
118: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
119: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
120: FND_MESSAGE.SET_TOKEN('PARAMETERS','bordero_id = ' ||
121: X_bordero_id );
114: EXCEPTION
115: WHEN OTHERS THEN
116: IF (SQLCODE <> -20001) THEN
117: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
118: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
119: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
120: FND_MESSAGE.SET_TOKEN('PARAMETERS','bordero_id = ' ||
121: X_bordero_id );
122: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
115: WHEN OTHERS THEN
116: IF (SQLCODE <> -20001) THEN
117: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
118: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
119: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
120: FND_MESSAGE.SET_TOKEN('PARAMETERS','bordero_id = ' ||
121: X_bordero_id );
122: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
123: END IF;
116: IF (SQLCODE <> -20001) THEN
117: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
118: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
119: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
120: FND_MESSAGE.SET_TOKEN('PARAMETERS','bordero_id = ' ||
121: X_bordero_id );
122: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
123: END IF;
124: APP_EXCEPTION.RAISE_EXCEPTION;
118: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
119: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
120: FND_MESSAGE.SET_TOKEN('PARAMETERS','bordero_id = ' ||
121: X_bordero_id );
122: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
123: END IF;
124: APP_EXCEPTION.RAISE_EXCEPTION;
125:
126: END Insert_Row;
176: FETCH C INTO Recinfo;
177: if (C%NOTFOUND) then
178: debug_info := 'Close cursor C - DATA NOTFOUND';
179: CLOSE C;
180: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
181: APP_EXCEPTION.Raise_Exception;
182: end if;
183: debug_info := 'Close cursor C';
184: CLOSE C;
234: AND (X_OUTPUT_FORMAT IS NULL)))
235: ) then
236: return;
237: else
238: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
239: APP_EXCEPTION.Raise_Exception;
240: end if;
241:
242: EXCEPTION
242: EXCEPTION
243: WHEN OTHERS THEN
244: IF (SQLCODE <> -20001) THEN
245: IF (SQLCODE = -54) THEN
246: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
247: ELSE
248: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
249: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
250: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
244: IF (SQLCODE <> -20001) THEN
245: IF (SQLCODE = -54) THEN
246: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
247: ELSE
248: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
249: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
250: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
251: FND_MESSAGE.SET_TOKEN('PARAMETERS','bordero_id = ' ||
252: X_bordero_id );
245: IF (SQLCODE = -54) THEN
246: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
247: ELSE
248: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
249: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
250: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
251: FND_MESSAGE.SET_TOKEN('PARAMETERS','bordero_id = ' ||
252: X_bordero_id );
253: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
246: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
247: ELSE
248: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
249: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
250: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
251: FND_MESSAGE.SET_TOKEN('PARAMETERS','bordero_id = ' ||
252: X_bordero_id );
253: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
254: END IF;
247: ELSE
248: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
249: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
250: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
251: FND_MESSAGE.SET_TOKEN('PARAMETERS','bordero_id = ' ||
252: X_bordero_id );
253: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
254: END IF;
255: END IF;
249: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
250: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
251: FND_MESSAGE.SET_TOKEN('PARAMETERS','bordero_id = ' ||
252: X_bordero_id );
253: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
254: END IF;
255: END IF;
256: APP_EXCEPTION.RAISE_EXCEPTION;
257:
330:
331: EXCEPTION
332: WHEN OTHERS THEN
333: IF (SQLCODE <> -20001) THEN
334: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
335: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
336: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
337: FND_MESSAGE.SET_TOKEN('PARAMETERS','bordero_id = ' ||
338: X_bordero_id );
331: EXCEPTION
332: WHEN OTHERS THEN
333: IF (SQLCODE <> -20001) THEN
334: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
335: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
336: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
337: FND_MESSAGE.SET_TOKEN('PARAMETERS','bordero_id = ' ||
338: X_bordero_id );
339: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
332: WHEN OTHERS THEN
333: IF (SQLCODE <> -20001) THEN
334: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
335: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
336: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
337: FND_MESSAGE.SET_TOKEN('PARAMETERS','bordero_id = ' ||
338: X_bordero_id );
339: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
340: END IF;
333: IF (SQLCODE <> -20001) THEN
334: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
335: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
336: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
337: FND_MESSAGE.SET_TOKEN('PARAMETERS','bordero_id = ' ||
338: X_bordero_id );
339: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
340: END IF;
341: APP_EXCEPTION.RAISE_EXCEPTION;
335: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
336: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
337: FND_MESSAGE.SET_TOKEN('PARAMETERS','bordero_id = ' ||
338: X_bordero_id );
339: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
340: END IF;
341: APP_EXCEPTION.RAISE_EXCEPTION;
342:
343: END Update_Row;
362:
363: EXCEPTION
364: WHEN OTHERS THEN
365: IF (SQLCODE <> -20001) THEN
366: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
367: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
368: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
369: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
370: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
363: EXCEPTION
364: WHEN OTHERS THEN
365: IF (SQLCODE <> -20001) THEN
366: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
367: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
368: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
369: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
370: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
371: END IF;
364: WHEN OTHERS THEN
365: IF (SQLCODE <> -20001) THEN
366: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
367: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
368: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
369: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
370: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
371: END IF;
372: APP_EXCEPTION.RAISE_EXCEPTION;
365: IF (SQLCODE <> -20001) THEN
366: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
367: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
368: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
369: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
370: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
371: END IF;
372: APP_EXCEPTION.RAISE_EXCEPTION;
373:
366: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
367: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
368: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
369: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
370: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
371: END IF;
372: APP_EXCEPTION.RAISE_EXCEPTION;
373:
374: END Delete_Row;