158:
159: EXCEPTION
160: WHEN OTHERS THEN
161: IF (SQLCODE <> -20001) THEN
162: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
163: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
164: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
165: FND_MESSAGE.SET_TOKEN('PARAMETERS','select_account_id = ' ||
166: X_select_account_id );
159: EXCEPTION
160: WHEN OTHERS THEN
161: IF (SQLCODE <> -20001) THEN
162: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
163: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
164: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
165: FND_MESSAGE.SET_TOKEN('PARAMETERS','select_account_id = ' ||
166: X_select_account_id );
167: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
160: WHEN OTHERS THEN
161: IF (SQLCODE <> -20001) THEN
162: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
163: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
164: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
165: FND_MESSAGE.SET_TOKEN('PARAMETERS','select_account_id = ' ||
166: X_select_account_id );
167: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
168: END IF;
161: IF (SQLCODE <> -20001) THEN
162: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
163: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
164: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
165: FND_MESSAGE.SET_TOKEN('PARAMETERS','select_account_id = ' ||
166: X_select_account_id );
167: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
168: END IF;
169: APP_EXCEPTION.RAISE_EXCEPTION;
163: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
164: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
165: FND_MESSAGE.SET_TOKEN('PARAMETERS','select_account_id = ' ||
166: X_select_account_id );
167: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
168: END IF;
169: APP_EXCEPTION.RAISE_EXCEPTION;
170:
171: END Insert_Row;
236: FETCH C INTO Recinfo;
237: if (C%NOTFOUND) then
238: debug_info := 'Close cursor C - DATA NOTFOUND';
239: CLOSE C;
240: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
241: APP_EXCEPTION.Raise_Exception;
242: end if;
243: debug_info := 'Close cursor C';
244: CLOSE C;
341: AND (X_ATTRIBUTE15 IS NULL)))
342: ) then
343: return;
344: else
345: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
346: APP_EXCEPTION.Raise_Exception;
347: end if;
348:
349: EXCEPTION
349: EXCEPTION
350: WHEN OTHERS THEN
351: IF (SQLCODE <> -20001) THEN
352: IF (SQLCODE = -54) THEN
353: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
354: ELSE
355: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
356: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
357: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
351: IF (SQLCODE <> -20001) THEN
352: IF (SQLCODE = -54) THEN
353: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
354: ELSE
355: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
356: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
357: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
358: FND_MESSAGE.SET_TOKEN('PARAMETERS','select_account_id = ' ||
359: X_select_account_id );
352: IF (SQLCODE = -54) THEN
353: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
354: ELSE
355: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
356: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
357: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
358: FND_MESSAGE.SET_TOKEN('PARAMETERS','select_account_id = ' ||
359: X_select_account_id );
360: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
353: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
354: ELSE
355: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
356: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
357: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
358: FND_MESSAGE.SET_TOKEN('PARAMETERS','select_account_id = ' ||
359: X_select_account_id );
360: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
361: END IF;
354: ELSE
355: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
356: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
357: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
358: FND_MESSAGE.SET_TOKEN('PARAMETERS','select_account_id = ' ||
359: X_select_account_id );
360: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
361: END IF;
362: END IF;
356: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
357: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
358: FND_MESSAGE.SET_TOKEN('PARAMETERS','select_account_id = ' ||
359: X_select_account_id );
360: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
361: END IF;
362: END IF;
363: APP_EXCEPTION.RAISE_EXCEPTION;
364:
467:
468: EXCEPTION
469: WHEN OTHERS THEN
470: IF (SQLCODE <> -20001) THEN
471: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
472: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
473: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
474: FND_MESSAGE.SET_TOKEN('PARAMETERS','select_account_id = ' ||
475: X_select_account_id );
468: EXCEPTION
469: WHEN OTHERS THEN
470: IF (SQLCODE <> -20001) THEN
471: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
472: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
473: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
474: FND_MESSAGE.SET_TOKEN('PARAMETERS','select_account_id = ' ||
475: X_select_account_id );
476: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
469: WHEN OTHERS THEN
470: IF (SQLCODE <> -20001) THEN
471: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
472: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
473: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
474: FND_MESSAGE.SET_TOKEN('PARAMETERS','select_account_id = ' ||
475: X_select_account_id );
476: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
477: END IF;
470: IF (SQLCODE <> -20001) THEN
471: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
472: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
473: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
474: FND_MESSAGE.SET_TOKEN('PARAMETERS','select_account_id = ' ||
475: X_select_account_id );
476: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
477: END IF;
478: APP_EXCEPTION.RAISE_EXCEPTION;
472: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
473: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
474: FND_MESSAGE.SET_TOKEN('PARAMETERS','select_account_id = ' ||
475: X_select_account_id );
476: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
477: END IF;
478: APP_EXCEPTION.RAISE_EXCEPTION;
479:
480: END Update_Row;
499:
500: EXCEPTION
501: WHEN OTHERS THEN
502: IF (SQLCODE <> -20001) THEN
503: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
504: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
505: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
506: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
507: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
500: EXCEPTION
501: WHEN OTHERS THEN
502: IF (SQLCODE <> -20001) THEN
503: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
504: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
505: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
506: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
507: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
508: END IF;
501: WHEN OTHERS THEN
502: IF (SQLCODE <> -20001) THEN
503: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
504: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
505: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
506: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
507: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
508: END IF;
509: APP_EXCEPTION.RAISE_EXCEPTION;
502: IF (SQLCODE <> -20001) THEN
503: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
504: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
505: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
506: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
507: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
508: END IF;
509: APP_EXCEPTION.RAISE_EXCEPTION;
510:
503: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
504: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
505: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
506: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
507: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
508: END IF;
509: APP_EXCEPTION.RAISE_EXCEPTION;
510:
511: END Delete_Row;