134:
135: EXCEPTION
136: WHEN OTHERS THEN
137: IF (SQLCODE <> -20001) THEN
138: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
139: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
140: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
141: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
142: X_fiscal_classification_code ||
135: EXCEPTION
136: WHEN OTHERS THEN
137: IF (SQLCODE <> -20001) THEN
138: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
139: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
140: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
141: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
142: X_fiscal_classification_code ||
143: 'tax_category_id = ' || X_tax_category_id ||
136: WHEN OTHERS THEN
137: IF (SQLCODE <> -20001) THEN
138: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
139: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
140: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
141: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
142: X_fiscal_classification_code ||
143: 'tax_category_id = ' || X_tax_category_id ||
144: 'end_date_active = ' || X_end_date_active );
137: IF (SQLCODE <> -20001) THEN
138: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
139: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
140: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
141: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
142: X_fiscal_classification_code ||
143: 'tax_category_id = ' || X_tax_category_id ||
144: 'end_date_active = ' || X_end_date_active );
145: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
141: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
142: X_fiscal_classification_code ||
143: 'tax_category_id = ' || X_tax_category_id ||
144: 'end_date_active = ' || X_end_date_active );
145: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
146: END IF;
147: APP_EXCEPTION.RAISE_EXCEPTION;
148: END Insert_Row;
149:
234: FETCH C INTO Recinfo;
235: IF (C%NOTFOUND) THEN
236: debug_info := 'Close cursor C - DATA NOTFOUND';
237: CLOSE C;
238: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
239: APP_EXCEPTION.Raise_Exception;
240: END IF;
241:
242: debug_info := 'Close cursor C';
305: ((Recinfo.attribute15 IS NULL) AND
306: (X_attribute15 IS NULL)))) THEN
307: return;
308: ELSE
309: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
310: APP_EXCEPTION.Raise_Exception;
311: END IF;
312:
313: EXCEPTION
313: EXCEPTION
314: WHEN OTHERS THEN
315: IF (SQLCODE <> -20001) THEN
316: IF (SQLCODE = -54) THEN
317: FND_MESSAGE.SET_NAME('AR','AR_RESOURCE_BUSY');
318: ELSE
319: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
320: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
321: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
315: IF (SQLCODE <> -20001) THEN
316: IF (SQLCODE = -54) THEN
317: FND_MESSAGE.SET_NAME('AR','AR_RESOURCE_BUSY');
318: ELSE
319: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
320: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
321: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
322: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
323: X_fiscal_classification_code ||
316: IF (SQLCODE = -54) THEN
317: FND_MESSAGE.SET_NAME('AR','AR_RESOURCE_BUSY');
318: ELSE
319: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
320: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
321: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
322: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
323: X_fiscal_classification_code ||
324: 'tax_category_id = ' || X_tax_category_id ||
317: FND_MESSAGE.SET_NAME('AR','AR_RESOURCE_BUSY');
318: ELSE
319: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
320: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
321: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
322: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
323: X_fiscal_classification_code ||
324: 'tax_category_id = ' || X_tax_category_id ||
325: 'end_date_active = ' || X_end_date_active );
318: ELSE
319: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
320: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
321: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
322: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
323: X_fiscal_classification_code ||
324: 'tax_category_id = ' || X_tax_category_id ||
325: 'end_date_active = ' || X_end_date_active );
326: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
322: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
323: X_fiscal_classification_code ||
324: 'tax_category_id = ' || X_tax_category_id ||
325: 'end_date_active = ' || X_end_date_active );
326: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
327: END IF;
328: END IF;
329: APP_EXCEPTION.RAISE_EXCEPTION;
330: END Lock_Row;
411:
412: EXCEPTION
413: WHEN OTHERS THEN
414: IF (SQLCODE <> -20001) THEN
415: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
416: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
417: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
418: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
419: X_fiscal_classification_code ||
412: EXCEPTION
413: WHEN OTHERS THEN
414: IF (SQLCODE <> -20001) THEN
415: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
416: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
417: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
418: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
419: X_fiscal_classification_code ||
420: 'tax_category_id = ' || X_tax_category_id ||
413: WHEN OTHERS THEN
414: IF (SQLCODE <> -20001) THEN
415: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
416: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
417: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
418: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
419: X_fiscal_classification_code ||
420: 'tax_category_id = ' || X_tax_category_id ||
421: 'end_date_active = ' || X_end_date_active );
414: IF (SQLCODE <> -20001) THEN
415: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
416: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
417: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
418: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
419: X_fiscal_classification_code ||
420: 'tax_category_id = ' || X_tax_category_id ||
421: 'end_date_active = ' || X_end_date_active );
422: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
418: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
419: X_fiscal_classification_code ||
420: 'tax_category_id = ' || X_tax_category_id ||
421: 'end_date_active = ' || X_end_date_active );
422: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
423: END IF;
424: APP_EXCEPTION.RAISE_EXCEPTION;
425: END Update_Row;
426:
447:
448: EXCEPTION
449: WHEN OTHERS THEN
450: IF (SQLCODE <> -20001) THEN
451: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
452: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
453: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
454: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
455: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
448: EXCEPTION
449: WHEN OTHERS THEN
450: IF (SQLCODE <> -20001) THEN
451: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
452: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
453: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
454: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
455: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
456: END IF;
449: WHEN OTHERS THEN
450: IF (SQLCODE <> -20001) THEN
451: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
452: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
453: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
454: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
455: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
456: END IF;
457: APP_EXCEPTION.RAISE_EXCEPTION;
450: IF (SQLCODE <> -20001) THEN
451: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
452: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
453: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
454: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
455: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
456: END IF;
457: APP_EXCEPTION.RAISE_EXCEPTION;
458:
451: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
452: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
453: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
454: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
455: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
456: END IF;
457: APP_EXCEPTION.RAISE_EXCEPTION;
458:
459: END Delete_Row;
485: AND org_id = X_org_id
486: AND ((X_rowid IS NULL) OR (rowid <> X_rowid));
487:
488: IF (l_dummy >=1) THEN
489: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
490: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
491: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
492: FND_MESSAGE.SET_TOKEN('PARAMETERS',
493: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
486: AND ((X_rowid IS NULL) OR (rowid <> X_rowid));
487:
488: IF (l_dummy >=1) THEN
489: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
490: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
491: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
492: FND_MESSAGE.SET_TOKEN('PARAMETERS',
493: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
494: ' tax_category_id = ' || X_tax_category_id ||
487:
488: IF (l_dummy >=1) THEN
489: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
490: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
491: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
492: FND_MESSAGE.SET_TOKEN('PARAMETERS',
493: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
494: ' tax_category_id = ' || X_tax_category_id ||
495: ' end_date_active = ' || X_end_date_active);
488: IF (l_dummy >=1) THEN
489: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
490: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
491: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
492: FND_MESSAGE.SET_TOKEN('PARAMETERS',
493: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
494: ' tax_category_id = ' || X_tax_category_id ||
495: ' end_date_active = ' || X_end_date_active);
496: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
492: FND_MESSAGE.SET_TOKEN('PARAMETERS',
493: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
494: ' tax_category_id = ' || X_tax_category_id ||
495: ' end_date_active = ' || X_end_date_active);
496: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
497: APP_EXCEPTION.RAISE_EXCEPTION;
498: END IF;
499: END Check_Unique;
500:
530: AND org_id = X_org_id
531: AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid));
532:
533: IF (l_dummy >=1) THEN
534: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
535: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
536: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
537: FND_MESSAGE.SET_TOKEN('PARAMETERS',
538: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
531: AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid));
532:
533: IF (l_dummy >=1) THEN
534: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
535: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
536: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
537: FND_MESSAGE.SET_TOKEN('PARAMETERS',
538: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
539: ' tax_category_id = ' || X_tax_category_id ||
532:
533: IF (l_dummy >=1) THEN
534: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
535: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
536: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
537: FND_MESSAGE.SET_TOKEN('PARAMETERS',
538: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
539: ' tax_category_id = ' || X_tax_category_id ||
540: ' end_date_active = ' || X_end_date_active );
533: IF (l_dummy >=1) THEN
534: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
535: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
536: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
537: FND_MESSAGE.SET_TOKEN('PARAMETERS',
538: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
539: ' tax_category_id = ' || X_tax_category_id ||
540: ' end_date_active = ' || X_end_date_active );
541: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
537: FND_MESSAGE.SET_TOKEN('PARAMETERS',
538: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
539: ' tax_category_id = ' || X_tax_category_id ||
540: ' end_date_active = ' || X_end_date_active );
541: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
542: APP_EXCEPTION.RAISE_EXCEPTION;
543: END IF;
544: END Check_Overlapped_Dates;
545:
605: AND org_id = X_org_id
606: AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid));
607:
608: IF (l_dummy2 <> 0) THEN
609: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
610: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
611: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
612: FND_MESSAGE.SET_TOKEN('PARAMETERS',
613: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
606: AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid));
607:
608: IF (l_dummy2 <> 0) THEN
609: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
610: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
611: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
612: FND_MESSAGE.SET_TOKEN('PARAMETERS',
613: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
614: ' tax_category_id = ' || X_tax_category_id ||
607:
608: IF (l_dummy2 <> 0) THEN
609: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
610: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
611: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
612: FND_MESSAGE.SET_TOKEN('PARAMETERS',
613: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
614: ' tax_category_id = ' || X_tax_category_id ||
615: ' end_date_active = ' || X_end_date_active );
608: IF (l_dummy2 <> 0) THEN
609: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
610: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
611: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
612: FND_MESSAGE.SET_TOKEN('PARAMETERS',
613: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
614: ' tax_category_id = ' || X_tax_category_id ||
615: ' end_date_active = ' || X_end_date_active );
616: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
612: FND_MESSAGE.SET_TOKEN('PARAMETERS',
613: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
614: ' tax_category_id = ' || X_tax_category_id ||
615: ' end_date_active = ' || X_end_date_active );
616: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
617: APP_EXCEPTION.RAISE_EXCEPTION;
618: END IF;
619: END;
620: END IF;
721: );
722:
723: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
724: IF l_msg_count > 0 THEN
725: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
726: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
727: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
728: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' || X_segment1 ||
729: 'structure_id = ' || X_structure_id ||
722:
723: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
724: IF l_msg_count > 0 THEN
725: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
726: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
727: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
728: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' || X_segment1 ||
729: 'structure_id = ' || X_structure_id ||
730: 'end_date_active = ' || X_end_date_active );
723: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
724: IF l_msg_count > 0 THEN
725: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
726: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
727: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
728: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' || X_segment1 ||
729: 'structure_id = ' || X_structure_id ||
730: 'end_date_active = ' || X_end_date_active );
731: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
724: IF l_msg_count > 0 THEN
725: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
726: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
727: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
728: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' || X_segment1 ||
729: 'structure_id = ' || X_structure_id ||
730: 'end_date_active = ' || X_end_date_active );
731: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
732: END IF;
727: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
728: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' || X_segment1 ||
729: 'structure_id = ' || X_structure_id ||
730: 'end_date_active = ' || X_end_date_active );
731: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
732: END IF;
733: APP_EXCEPTION.RAISE_EXCEPTION;
734: END IF;
735:
749: END IF;
750: END IF;
751:
752: ELSE
753: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
754: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
755: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
756: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' || X_segment1 ||
757: 'structure_id = ' || X_structure_id ||
750: END IF;
751:
752: ELSE
753: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
754: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
755: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
756: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' || X_segment1 ||
757: 'structure_id = ' || X_structure_id ||
758: 'end_date_active = ' || X_end_date_active );
751:
752: ELSE
753: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
754: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
755: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
756: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' || X_segment1 ||
757: 'structure_id = ' || X_structure_id ||
758: 'end_date_active = ' || X_end_date_active );
759: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
752: ELSE
753: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
754: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
755: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
756: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' || X_segment1 ||
757: 'structure_id = ' || X_structure_id ||
758: 'end_date_active = ' || X_end_date_active );
759: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
760: APP_EXCEPTION.RAISE_EXCEPTION;
755: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
756: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' || X_segment1 ||
757: 'structure_id = ' || X_structure_id ||
758: 'end_date_active = ' || X_end_date_active );
759: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
760: APP_EXCEPTION.RAISE_EXCEPTION;
761: END IF;
762:
763: EXCEPTION
762:
763: EXCEPTION
764: WHEN OTHERS THEN
765: IF (SQLCODE <> -20001) THEN
766: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
767: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
768: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
769: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
770: X_segment1 ||
763: EXCEPTION
764: WHEN OTHERS THEN
765: IF (SQLCODE <> -20001) THEN
766: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
767: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
768: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
769: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
770: X_segment1 ||
771: 'structure_id = ' || X_structure_id ||
764: WHEN OTHERS THEN
765: IF (SQLCODE <> -20001) THEN
766: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
767: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
768: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
769: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
770: X_segment1 ||
771: 'structure_id = ' || X_structure_id ||
772: 'end_date_active = ' || X_end_date_active );
765: IF (SQLCODE <> -20001) THEN
766: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
767: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
768: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
769: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
770: X_segment1 ||
771: 'structure_id = ' || X_structure_id ||
772: 'end_date_active = ' || X_end_date_active );
773: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
769: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
770: X_segment1 ||
771: 'structure_id = ' || X_structure_id ||
772: 'end_date_active = ' || X_end_date_active );
773: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
774: END IF;
775: APP_EXCEPTION.RAISE_EXCEPTION;
776: END Create_category;
777:
904: );
905:
906: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
907: IF l_msg_count > 0 THEN
908: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
909: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
910: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
911: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
912: X_segment1 ||
905:
906: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
907: IF l_msg_count > 0 THEN
908: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
909: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
910: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
911: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
912: X_segment1 ||
913: 'structure_id = ' || X_structure_id ||
906: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
907: IF l_msg_count > 0 THEN
908: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
909: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
910: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
911: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
912: X_segment1 ||
913: 'structure_id = ' || X_structure_id ||
914: 'end_date_active = ' || X_end_date_active );
907: IF l_msg_count > 0 THEN
908: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
909: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
910: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
911: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
912: X_segment1 ||
913: 'structure_id = ' || X_structure_id ||
914: 'end_date_active = ' || X_end_date_active );
915: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
911: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
912: X_segment1 ||
913: 'structure_id = ' || X_structure_id ||
914: 'end_date_active = ' || X_end_date_active );
915: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
916: END IF;
917: APP_EXCEPTION.RAISE_EXCEPTION;
918: END IF;
919:
920:
921: EXCEPTION
922: WHEN OTHERS THEN
923: IF (SQLCODE <> -20001) THEN
924: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
925: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
926: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
927: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
928: X_segment1 ||
921: EXCEPTION
922: WHEN OTHERS THEN
923: IF (SQLCODE <> -20001) THEN
924: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
925: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
926: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
927: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
928: X_segment1 ||
929: 'structure_id = ' || X_structure_id ||
922: WHEN OTHERS THEN
923: IF (SQLCODE <> -20001) THEN
924: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
925: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
926: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
927: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
928: X_segment1 ||
929: 'structure_id = ' || X_structure_id ||
930: 'category_id = ' || X_category_id );
923: IF (SQLCODE <> -20001) THEN
924: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
925: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
926: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
927: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
928: X_segment1 ||
929: 'structure_id = ' || X_structure_id ||
930: 'category_id = ' || X_category_id );
931: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
927: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
928: X_segment1 ||
929: 'structure_id = ' || X_structure_id ||
930: 'category_id = ' || X_category_id );
931: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
932: END IF;
933: APP_EXCEPTION.RAISE_EXCEPTION;
934: END Update_Category;
935: