127:
128: EXCEPTION
129: WHEN OTHERS THEN
130: IF (SQLCODE <> -20001) THEN
131: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
132: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
133: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
134: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
135: X_fiscal_classification_code ||
128: EXCEPTION
129: WHEN OTHERS THEN
130: IF (SQLCODE <> -20001) THEN
131: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
132: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
133: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
134: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
135: X_fiscal_classification_code ||
136: 'tax_category_id = ' || X_tax_category_id ||
129: WHEN OTHERS THEN
130: IF (SQLCODE <> -20001) THEN
131: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
132: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
133: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
134: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
135: X_fiscal_classification_code ||
136: 'tax_category_id = ' || X_tax_category_id ||
137: 'end_date_active = ' || X_end_date_active );
130: IF (SQLCODE <> -20001) THEN
131: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
132: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
133: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
134: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
135: X_fiscal_classification_code ||
136: 'tax_category_id = ' || X_tax_category_id ||
137: 'end_date_active = ' || X_end_date_active );
138: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
134: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
135: X_fiscal_classification_code ||
136: 'tax_category_id = ' || X_tax_category_id ||
137: 'end_date_active = ' || X_end_date_active );
138: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
139: END IF;
140: APP_EXCEPTION.RAISE_EXCEPTION;
141: END Insert_Row;
142:
227: FETCH C INTO Recinfo;
228: IF (C%NOTFOUND) THEN
229: debug_info := 'Close cursor C - DATA NOTFOUND';
230: CLOSE C;
231: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
232: APP_EXCEPTION.Raise_Exception;
233: END IF;
234:
235: debug_info := 'Close cursor C';
298: ((Recinfo.attribute15 IS NULL) AND
299: (X_attribute15 IS NULL)))) THEN
300: return;
301: ELSE
302: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
303: APP_EXCEPTION.Raise_Exception;
304: END IF;
305:
306: EXCEPTION
306: EXCEPTION
307: WHEN OTHERS THEN
308: IF (SQLCODE <> -20001) THEN
309: IF (SQLCODE = -54) THEN
310: FND_MESSAGE.SET_NAME('AR','AR_RESOURCE_BUSY');
311: ELSE
312: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
313: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
314: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
308: IF (SQLCODE <> -20001) THEN
309: IF (SQLCODE = -54) THEN
310: FND_MESSAGE.SET_NAME('AR','AR_RESOURCE_BUSY');
311: ELSE
312: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
313: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
314: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
315: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
316: X_fiscal_classification_code ||
309: IF (SQLCODE = -54) THEN
310: FND_MESSAGE.SET_NAME('AR','AR_RESOURCE_BUSY');
311: ELSE
312: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
313: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
314: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
315: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
316: X_fiscal_classification_code ||
317: 'tax_category_id = ' || X_tax_category_id ||
310: FND_MESSAGE.SET_NAME('AR','AR_RESOURCE_BUSY');
311: ELSE
312: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
313: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
314: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
315: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
316: X_fiscal_classification_code ||
317: 'tax_category_id = ' || X_tax_category_id ||
318: 'end_date_active = ' || X_end_date_active );
311: ELSE
312: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
313: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
314: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
315: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
316: X_fiscal_classification_code ||
317: 'tax_category_id = ' || X_tax_category_id ||
318: 'end_date_active = ' || X_end_date_active );
319: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
315: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
316: X_fiscal_classification_code ||
317: 'tax_category_id = ' || X_tax_category_id ||
318: 'end_date_active = ' || X_end_date_active );
319: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
320: END IF;
321: END IF;
322: APP_EXCEPTION.RAISE_EXCEPTION;
323: END Lock_Row;
404:
405: EXCEPTION
406: WHEN OTHERS THEN
407: IF (SQLCODE <> -20001) THEN
408: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
409: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
410: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
411: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
412: X_fiscal_classification_code ||
405: EXCEPTION
406: WHEN OTHERS THEN
407: IF (SQLCODE <> -20001) THEN
408: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
409: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
410: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
411: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
412: X_fiscal_classification_code ||
413: 'tax_category_id = ' || X_tax_category_id ||
406: WHEN OTHERS THEN
407: IF (SQLCODE <> -20001) THEN
408: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
409: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
410: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
411: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
412: X_fiscal_classification_code ||
413: 'tax_category_id = ' || X_tax_category_id ||
414: 'end_date_active = ' || X_end_date_active );
407: IF (SQLCODE <> -20001) THEN
408: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
409: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
410: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
411: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
412: X_fiscal_classification_code ||
413: 'tax_category_id = ' || X_tax_category_id ||
414: 'end_date_active = ' || X_end_date_active );
415: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
411: FND_MESSAGE.SET_TOKEN('PARAMETERS','fiscal_classification_code = ' ||
412: X_fiscal_classification_code ||
413: 'tax_category_id = ' || X_tax_category_id ||
414: 'end_date_active = ' || X_end_date_active );
415: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
416: END IF;
417: APP_EXCEPTION.RAISE_EXCEPTION;
418: END Update_Row;
419:
440:
441: EXCEPTION
442: WHEN OTHERS THEN
443: IF (SQLCODE <> -20001) THEN
444: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
445: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
446: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
447: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
448: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
441: EXCEPTION
442: WHEN OTHERS THEN
443: IF (SQLCODE <> -20001) THEN
444: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
445: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
446: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
447: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
448: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
449: END IF;
442: WHEN OTHERS THEN
443: IF (SQLCODE <> -20001) THEN
444: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
445: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
446: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
447: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
448: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
449: END IF;
450: APP_EXCEPTION.RAISE_EXCEPTION;
443: IF (SQLCODE <> -20001) THEN
444: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
445: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
446: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
447: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
448: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
449: END IF;
450: APP_EXCEPTION.RAISE_EXCEPTION;
451:
444: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
445: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
446: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
447: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
448: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
449: END IF;
450: APP_EXCEPTION.RAISE_EXCEPTION;
451:
452: END Delete_Row;
478: AND org_id = X_org_id
479: AND ((X_rowid IS NULL) OR (rowid <> X_rowid));
480:
481: IF (l_dummy >=1) THEN
482: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
483: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
484: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
485: FND_MESSAGE.SET_TOKEN('PARAMETERS',
486: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
479: AND ((X_rowid IS NULL) OR (rowid <> X_rowid));
480:
481: IF (l_dummy >=1) THEN
482: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
483: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
484: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
485: FND_MESSAGE.SET_TOKEN('PARAMETERS',
486: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
487: ' tax_category_id = ' || X_tax_category_id ||
480:
481: IF (l_dummy >=1) THEN
482: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
483: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
484: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
485: FND_MESSAGE.SET_TOKEN('PARAMETERS',
486: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
487: ' tax_category_id = ' || X_tax_category_id ||
488: ' end_date_active = ' || X_end_date_active);
481: IF (l_dummy >=1) THEN
482: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
483: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
484: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
485: FND_MESSAGE.SET_TOKEN('PARAMETERS',
486: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
487: ' tax_category_id = ' || X_tax_category_id ||
488: ' end_date_active = ' || X_end_date_active);
489: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
485: FND_MESSAGE.SET_TOKEN('PARAMETERS',
486: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
487: ' tax_category_id = ' || X_tax_category_id ||
488: ' end_date_active = ' || X_end_date_active);
489: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
490: APP_EXCEPTION.RAISE_EXCEPTION;
491: END IF;
492: END Check_Unique;
493:
523: AND org_id = X_org_id
524: AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid));
525:
526: IF (l_dummy >=1) THEN
527: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
528: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
529: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
530: FND_MESSAGE.SET_TOKEN('PARAMETERS',
531: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
524: AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid));
525:
526: IF (l_dummy >=1) THEN
527: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
528: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
529: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
530: FND_MESSAGE.SET_TOKEN('PARAMETERS',
531: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
532: ' tax_category_id = ' || X_tax_category_id ||
525:
526: IF (l_dummy >=1) THEN
527: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
528: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
529: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
530: FND_MESSAGE.SET_TOKEN('PARAMETERS',
531: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
532: ' tax_category_id = ' || X_tax_category_id ||
533: ' end_date_active = ' || X_end_date_active );
526: IF (l_dummy >=1) THEN
527: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
528: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
529: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
530: FND_MESSAGE.SET_TOKEN('PARAMETERS',
531: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
532: ' tax_category_id = ' || X_tax_category_id ||
533: ' end_date_active = ' || X_end_date_active );
534: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
530: FND_MESSAGE.SET_TOKEN('PARAMETERS',
531: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
532: ' tax_category_id = ' || X_tax_category_id ||
533: ' end_date_active = ' || X_end_date_active );
534: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
535: APP_EXCEPTION.RAISE_EXCEPTION;
536: END IF;
537: END Check_Overlapped_Dates;
538:
598: AND org_id = X_org_id
599: AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid));
600:
601: IF (l_dummy2 <> 0) THEN
602: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
603: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
604: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
605: FND_MESSAGE.SET_TOKEN('PARAMETERS',
606: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
599: AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid));
600:
601: IF (l_dummy2 <> 0) THEN
602: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
603: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
604: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
605: FND_MESSAGE.SET_TOKEN('PARAMETERS',
606: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
607: ' tax_category_id = ' || X_tax_category_id ||
600:
601: IF (l_dummy2 <> 0) THEN
602: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
603: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
604: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
605: FND_MESSAGE.SET_TOKEN('PARAMETERS',
606: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
607: ' tax_category_id = ' || X_tax_category_id ||
608: ' end_date_active = ' || X_end_date_active );
601: IF (l_dummy2 <> 0) THEN
602: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
603: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
604: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
605: FND_MESSAGE.SET_TOKEN('PARAMETERS',
606: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
607: ' tax_category_id = ' || X_tax_category_id ||
608: ' end_date_active = ' || X_end_date_active );
609: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
605: FND_MESSAGE.SET_TOKEN('PARAMETERS',
606: ' fiscal_classification_code = ' || X_fiscal_classification_code ||
607: ' tax_category_id = ' || X_tax_category_id ||
608: ' end_date_active = ' || X_end_date_active );
609: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
610: APP_EXCEPTION.RAISE_EXCEPTION;
611: END IF;
612: END;
613: END IF;
700: );
701:
702: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
703: IF l_msg_count > 0 THEN
704: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
705: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
706: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
707: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
708: X_segment1 ||
701:
702: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
703: IF l_msg_count > 0 THEN
704: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
705: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
706: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
707: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
708: X_segment1 ||
709: 'structure_id = ' || X_structure_id ||
702: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
703: IF l_msg_count > 0 THEN
704: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
705: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
706: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
707: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
708: X_segment1 ||
709: 'structure_id = ' || X_structure_id ||
710: 'end_date_active = ' || X_end_date_active );
703: IF l_msg_count > 0 THEN
704: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
705: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
706: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
707: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
708: X_segment1 ||
709: 'structure_id = ' || X_structure_id ||
710: 'end_date_active = ' || X_end_date_active );
711: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
707: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
708: X_segment1 ||
709: 'structure_id = ' || X_structure_id ||
710: 'end_date_active = ' || X_end_date_active );
711: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
712: END IF;
713: APP_EXCEPTION.RAISE_EXCEPTION;
714: END IF;
715:
716:
717: EXCEPTION
718: WHEN OTHERS THEN
719: IF (SQLCODE <> -20001) THEN
720: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
721: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
722: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
723: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
724: X_segment1 ||
717: EXCEPTION
718: WHEN OTHERS THEN
719: IF (SQLCODE <> -20001) THEN
720: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
721: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
722: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
723: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
724: X_segment1 ||
725: 'structure_id = ' || X_structure_id ||
718: WHEN OTHERS THEN
719: IF (SQLCODE <> -20001) THEN
720: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
721: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
722: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
723: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
724: X_segment1 ||
725: 'structure_id = ' || X_structure_id ||
726: 'end_date_active = ' || X_end_date_active );
719: IF (SQLCODE <> -20001) THEN
720: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
721: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
722: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
723: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
724: X_segment1 ||
725: 'structure_id = ' || X_structure_id ||
726: 'end_date_active = ' || X_end_date_active );
727: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
723: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
724: X_segment1 ||
725: 'structure_id = ' || X_structure_id ||
726: 'end_date_active = ' || X_end_date_active );
727: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
728: END IF;
729: APP_EXCEPTION.RAISE_EXCEPTION;
730: END Create_category;
731:
858: );
859:
860: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
861: IF l_msg_count > 0 THEN
862: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
863: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
864: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
865: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
866: X_segment1 ||
859:
860: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
861: IF l_msg_count > 0 THEN
862: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
863: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
864: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
865: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
866: X_segment1 ||
867: 'structure_id = ' || X_structure_id ||
860: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
861: IF l_msg_count > 0 THEN
862: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
863: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
864: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
865: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
866: X_segment1 ||
867: 'structure_id = ' || X_structure_id ||
868: 'end_date_active = ' || X_end_date_active );
861: IF l_msg_count > 0 THEN
862: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
863: FND_MESSAGE.SET_TOKEN('ERROR', l_msg_data);
864: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
865: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
866: X_segment1 ||
867: 'structure_id = ' || X_structure_id ||
868: 'end_date_active = ' || X_end_date_active );
869: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
865: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
866: X_segment1 ||
867: 'structure_id = ' || X_structure_id ||
868: 'end_date_active = ' || X_end_date_active );
869: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
870: END IF;
871: APP_EXCEPTION.RAISE_EXCEPTION;
872: END IF;
873:
874:
875: EXCEPTION
876: WHEN OTHERS THEN
877: IF (SQLCODE <> -20001) THEN
878: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
879: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
880: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
881: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
882: X_segment1 ||
875: EXCEPTION
876: WHEN OTHERS THEN
877: IF (SQLCODE <> -20001) THEN
878: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
879: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
880: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
881: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
882: X_segment1 ||
883: 'structure_id = ' || X_structure_id ||
876: WHEN OTHERS THEN
877: IF (SQLCODE <> -20001) THEN
878: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
879: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
880: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
881: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
882: X_segment1 ||
883: 'structure_id = ' || X_structure_id ||
884: 'category_id = ' || X_category_id );
877: IF (SQLCODE <> -20001) THEN
878: FND_MESSAGE.SET_NAME('AR','AR_DEBUG');
879: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
880: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
881: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
882: X_segment1 ||
883: 'structure_id = ' || X_structure_id ||
884: 'category_id = ' || X_category_id );
885: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
881: FND_MESSAGE.SET_TOKEN('PARAMETERS','segment1 = ' ||
882: X_segment1 ||
883: 'structure_id = ' || X_structure_id ||
884: 'category_id = ' || X_category_id );
885: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
886: END IF;
887: APP_EXCEPTION.RAISE_EXCEPTION;
888: END Update_Category;
889: