128:
129: EXCEPTION
130: WHEN OTHERS THEN
131: IF (SQLCODE <> -20001) THEN
132: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
133: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
134: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
135: FND_MESSAGE.SET_TOKEN('PARAMETERS',
136: ' tax_category_id = ' || X_tax_category_id ||
129: EXCEPTION
130: WHEN OTHERS THEN
131: IF (SQLCODE <> -20001) THEN
132: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
133: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
134: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
135: FND_MESSAGE.SET_TOKEN('PARAMETERS',
136: ' tax_category_id = ' || X_tax_category_id ||
137: ' tax_categ_dtl_id= ' || X_tax_categ_dtl_id ||
130: WHEN OTHERS THEN
131: IF (SQLCODE <> -20001) THEN
132: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
133: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
134: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
135: FND_MESSAGE.SET_TOKEN('PARAMETERS',
136: ' tax_category_id = ' || X_tax_category_id ||
137: ' tax_categ_dtl_id= ' || X_tax_categ_dtl_id ||
138: ' end_date_active = ' || X_end_date_active );
131: IF (SQLCODE <> -20001) THEN
132: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
133: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
134: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
135: FND_MESSAGE.SET_TOKEN('PARAMETERS',
136: ' tax_category_id = ' || X_tax_category_id ||
137: ' tax_categ_dtl_id= ' || X_tax_categ_dtl_id ||
138: ' end_date_active = ' || X_end_date_active );
139: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
135: FND_MESSAGE.SET_TOKEN('PARAMETERS',
136: ' tax_category_id = ' || X_tax_category_id ||
137: ' tax_categ_dtl_id= ' || X_tax_categ_dtl_id ||
138: ' end_date_active = ' || X_end_date_active );
139: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
140: END IF;
141: APP_EXCEPTION.RAISE_EXCEPTION;
142:
143: END Insert_Row;
230: FETCH C INTO Recinfo;
231: IF (C%NOTFOUND) THEN
232: debug_info := 'Close cursor C - DATA NOTFOUND';
233: CLOSE C;
234: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
235: APP_EXCEPTION.Raise_Exception;
236: END IF;
237: debug_info := 'Close cursor C';
238: CLOSE C;
319: ((Recinfo.attribute15 IS NULL) AND
320: (X_attribute15 IS NULL)))) THEN
321: return;
322: ELSE
323: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
324: APP_EXCEPTION.Raise_Exception;
325: END IF;
326:
327: EXCEPTION
327: EXCEPTION
328: WHEN OTHERS THEN
329: IF (SQLCODE <> -20001) THEN
330: IF (SQLCODE = -54) THEN
331: FND_MESSAGE.SET_NAME('SQLAR','AR_RESOURCE_BUSY');
332: ELSE
333: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
334: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
335: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
329: IF (SQLCODE <> -20001) THEN
330: IF (SQLCODE = -54) THEN
331: FND_MESSAGE.SET_NAME('SQLAR','AR_RESOURCE_BUSY');
332: ELSE
333: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
334: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
335: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
336: FND_MESSAGE.SET_TOKEN('PARAMETERS',
337: ' tax_category_id = ' || X_tax_category_id ||
330: IF (SQLCODE = -54) THEN
331: FND_MESSAGE.SET_NAME('SQLAR','AR_RESOURCE_BUSY');
332: ELSE
333: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
334: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
335: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
336: FND_MESSAGE.SET_TOKEN('PARAMETERS',
337: ' tax_category_id = ' || X_tax_category_id ||
338: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
331: FND_MESSAGE.SET_NAME('SQLAR','AR_RESOURCE_BUSY');
332: ELSE
333: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
334: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
335: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
336: FND_MESSAGE.SET_TOKEN('PARAMETERS',
337: ' tax_category_id = ' || X_tax_category_id ||
338: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
339: ' end_date_active = ' || X_end_date_active );
332: ELSE
333: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
334: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
335: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
336: FND_MESSAGE.SET_TOKEN('PARAMETERS',
337: ' tax_category_id = ' || X_tax_category_id ||
338: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
339: ' end_date_active = ' || X_end_date_active );
340: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
336: FND_MESSAGE.SET_TOKEN('PARAMETERS',
337: ' tax_category_id = ' || X_tax_category_id ||
338: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
339: ' end_date_active = ' || X_end_date_active );
340: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
341: END IF;
342: END IF;
343: APP_EXCEPTION.RAISE_EXCEPTION;
344: END Lock_Row;
423: EXCEPTION
424: WHEN OTHERS THEN
425: IF (SQLCODE <> -20001) THEN
426: IF (SQLCODE = -54) THEN
427: FND_MESSAGE.SET_NAME('AR','AR_RESOURCE_BUSY');
428: ELSE
429: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
430: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
431: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
425: IF (SQLCODE <> -20001) THEN
426: IF (SQLCODE = -54) THEN
427: FND_MESSAGE.SET_NAME('AR','AR_RESOURCE_BUSY');
428: ELSE
429: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
430: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
431: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
432: FND_MESSAGE.SET_TOKEN('PARAMETERS',
433: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
426: IF (SQLCODE = -54) THEN
427: FND_MESSAGE.SET_NAME('AR','AR_RESOURCE_BUSY');
428: ELSE
429: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
430: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
431: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
432: FND_MESSAGE.SET_TOKEN('PARAMETERS',
433: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
434: ' tax_category_id = ' || X_tax_category_id ||
427: FND_MESSAGE.SET_NAME('AR','AR_RESOURCE_BUSY');
428: ELSE
429: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
430: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
431: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
432: FND_MESSAGE.SET_TOKEN('PARAMETERS',
433: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
434: ' tax_category_id = ' || X_tax_category_id ||
435: ' end_date_active = ' || X_end_date_active );
428: ELSE
429: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
430: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
431: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
432: FND_MESSAGE.SET_TOKEN('PARAMETERS',
433: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
434: ' tax_category_id = ' || X_tax_category_id ||
435: ' end_date_active = ' || X_end_date_active );
436: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
432: FND_MESSAGE.SET_TOKEN('PARAMETERS',
433: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
434: ' tax_category_id = ' || X_tax_category_id ||
435: ' end_date_active = ' || X_end_date_active );
436: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
437: END IF;
438: END IF;
439: APP_EXCEPTION.RAISE_EXCEPTION;
440: END UpDate_Row;
462: EXCEPTION
463: WHEN OTHERS THEN
464: IF (SQLCODE <> -20001) THEN
465: IF (SQLCODE = -54) THEN
466: FND_MESSAGE.SET_NAME('AR','AR_RESOURCE_BUSY');
467: ELSE
468: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
469: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
470: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
464: IF (SQLCODE <> -20001) THEN
465: IF (SQLCODE = -54) THEN
466: FND_MESSAGE.SET_NAME('AR','AR_RESOURCE_BUSY');
467: ELSE
468: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
469: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
470: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
471: FND_MESSAGE.SET_TOKEN('PARAMETERS',
472: ' tax_categ_dtl_id = '|| X_tax_categ_dtl_id ||
465: IF (SQLCODE = -54) THEN
466: FND_MESSAGE.SET_NAME('AR','AR_RESOURCE_BUSY');
467: ELSE
468: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
469: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
470: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
471: FND_MESSAGE.SET_TOKEN('PARAMETERS',
472: ' tax_categ_dtl_id = '|| X_tax_categ_dtl_id ||
473: ' tax_category_id = ' || X_tax_category_id ||
466: FND_MESSAGE.SET_NAME('AR','AR_RESOURCE_BUSY');
467: ELSE
468: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
469: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
470: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
471: FND_MESSAGE.SET_TOKEN('PARAMETERS',
472: ' tax_categ_dtl_id = '|| X_tax_categ_dtl_id ||
473: ' tax_category_id = ' || X_tax_category_id ||
474: ' end_date_active = ' || X_end_date_active );
467: ELSE
468: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
469: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
470: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
471: FND_MESSAGE.SET_TOKEN('PARAMETERS',
472: ' tax_categ_dtl_id = '|| X_tax_categ_dtl_id ||
473: ' tax_category_id = ' || X_tax_category_id ||
474: ' end_date_active = ' || X_end_date_active );
475: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
471: FND_MESSAGE.SET_TOKEN('PARAMETERS',
472: ' tax_categ_dtl_id = '|| X_tax_categ_dtl_id ||
473: ' tax_category_id = ' || X_tax_category_id ||
474: ' end_date_active = ' || X_end_date_active );
475: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
476: END IF;
477: END IF;
478: APP_EXCEPTION.RAISE_EXCEPTION;
479: END Delete_Row;
502: AND end_date_active = X_end_date_active
503: AND ((X_rowid IS NULL) OR (rowid <> X_rowid));
504:
505: IF (l_dummy >=1) THEN
506: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
507: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
508: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
509: FND_MESSAGE.SET_TOKEN('PARAMETERS',
510: ' tax_category_id = ' || X_tax_category_id ||
503: AND ((X_rowid IS NULL) OR (rowid <> X_rowid));
504:
505: IF (l_dummy >=1) THEN
506: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
507: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
508: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
509: FND_MESSAGE.SET_TOKEN('PARAMETERS',
510: ' tax_category_id = ' || X_tax_category_id ||
511: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
504:
505: IF (l_dummy >=1) THEN
506: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
507: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
508: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
509: FND_MESSAGE.SET_TOKEN('PARAMETERS',
510: ' tax_category_id = ' || X_tax_category_id ||
511: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
512: ' end_date_active = ' || X_end_date_active );
505: IF (l_dummy >=1) THEN
506: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
507: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
508: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
509: FND_MESSAGE.SET_TOKEN('PARAMETERS',
510: ' tax_category_id = ' || X_tax_category_id ||
511: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
512: ' end_date_active = ' || X_end_date_active );
513: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
509: FND_MESSAGE.SET_TOKEN('PARAMETERS',
510: ' tax_category_id = ' || X_tax_category_id ||
511: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
512: ' end_date_active = ' || X_end_date_active );
513: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
514: APP_EXCEPTION.RAISE_EXCEPTION;
515: END IF;
516: END Check_Unique;
517:
542: (a.start_date_active <= X_start_date_active AND a.end_date_active >= X_end_date_active))
543: AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid));
544:
545: IF (l_dummy >=1) THEN
546: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
547: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
548: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
549: FND_MESSAGE.SET_TOKEN('PARAMETERS',
550: ' tax_category_id = ' || to_char(X_tax_category_id) ||
543: AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid));
544:
545: IF (l_dummy >=1) THEN
546: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
547: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
548: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
549: FND_MESSAGE.SET_TOKEN('PARAMETERS',
550: ' tax_category_id = ' || to_char(X_tax_category_id) ||
551: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
544:
545: IF (l_dummy >=1) THEN
546: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
547: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
548: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
549: FND_MESSAGE.SET_TOKEN('PARAMETERS',
550: ' tax_category_id = ' || to_char(X_tax_category_id) ||
551: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
552: ' end_date_active = ' || X_end_date_active ||
545: IF (l_dummy >=1) THEN
546: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
547: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
548: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
549: FND_MESSAGE.SET_TOKEN('PARAMETERS',
550: ' tax_category_id = ' || to_char(X_tax_category_id) ||
551: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
552: ' end_date_active = ' || X_end_date_active ||
553: ' start_date_active = ' || X_start_date_active );
550: ' tax_category_id = ' || to_char(X_tax_category_id) ||
551: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
552: ' end_date_active = ' || X_end_date_active ||
553: ' start_date_active = ' || X_start_date_active );
554: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
555: APP_EXCEPTION.RAISE_EXCEPTION;
556: END IF;
557: END Check_Overlapped_Dates;
558:
612: AND tax_categ_dtl_id = X_tax_categ_dtl_id
613: AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid));
614:
615: IF (l_dummy2 <> 0) THEN
616: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
617: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
618: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
619: FND_MESSAGE.SET_TOKEN('PARAMETERS',
620: ' tax_category_id = ' || to_char(X_tax_category_id) ||
613: AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid));
614:
615: IF (l_dummy2 <> 0) THEN
616: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
617: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
618: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
619: FND_MESSAGE.SET_TOKEN('PARAMETERS',
620: ' tax_category_id = ' || to_char(X_tax_category_id) ||
621: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
614:
615: IF (l_dummy2 <> 0) THEN
616: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
617: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
618: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
619: FND_MESSAGE.SET_TOKEN('PARAMETERS',
620: ' tax_category_id = ' || to_char(X_tax_category_id) ||
621: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
622: ' end_date_active = ' || X_end_date_active ||
615: IF (l_dummy2 <> 0) THEN
616: FND_MESSAGE.SET_NAME('SQLAR','AR_DEBUG');
617: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
618: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
619: FND_MESSAGE.SET_TOKEN('PARAMETERS',
620: ' tax_category_id = ' || to_char(X_tax_category_id) ||
621: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
622: ' end_date_active = ' || X_end_date_active ||
623: ' start_date_active = ' || X_start_date_active );
620: ' tax_category_id = ' || to_char(X_tax_category_id) ||
621: ' tax_categ_dtl_id = ' || X_tax_categ_dtl_id ||
622: ' end_date_active = ' || X_end_date_active ||
623: ' start_date_active = ' || X_start_date_active );
624: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
625: APP_EXCEPTION.RAISE_EXCEPTION;
626: END IF;
627: END;
628: END IF;