383:
384: EXCEPTION
385: WHEN OTHERS THEN
386: IF (SQLCODE <> -20001) THEN
387: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
388: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
389: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'VALIDATE');
390: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
391: END IF;
384: EXCEPTION
385: WHEN OTHERS THEN
386: IF (SQLCODE <> -20001) THEN
387: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
388: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
389: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'VALIDATE');
390: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
391: END IF;
392: APP_EXCEPTION.RAISE_EXCEPTION;
385: WHEN OTHERS THEN
386: IF (SQLCODE <> -20001) THEN
387: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
388: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
389: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'VALIDATE');
390: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
391: END IF;
392: APP_EXCEPTION.RAISE_EXCEPTION;
393:
386: IF (SQLCODE <> -20001) THEN
387: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
388: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
389: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'VALIDATE');
390: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
391: END IF;
392: APP_EXCEPTION.RAISE_EXCEPTION;
393:
394: END;
531: 'GL#',
532: l_chart_of_accounts_id);
533:
534: IF (l_flex_segment_delimiter IS NULL) THEN
535: p_return_error_message := l_debug_info||': '||FND_MESSAGE.GET;
536: return;
537: END IF;
538:
539: -----------------------------------------------
545: 'GL#',
546: l_chart_of_accounts_id,
547: 'FA_COST_CTR',
548: l_cc_flex_segment_number)) THEN
549: p_return_error_message := l_debug_info||': '||FND_MESSAGE.GET;
550: return;
551: END IF;
552:
553: -----------------------------------------------
559: 'GL#',
560: l_chart_of_accounts_id,
561: 'GL_ACCOUNT',
562: l_flex_segment_number)) THEN
563: p_return_error_message := l_debug_info||': '||FND_MESSAGE.GET;
564: return;
565: END IF;
566:
567: OPEN lines_cursor;
615: l_default_emp_ccid,
616: l_num_segments,
617: l_default_emp_segments)) THEN
618:
619: p_return_error_message := l_debug_info||': '||FND_MESSAGE.GET;
620: raise INVALID_ACCT_EXCEPTION;
621: END IF;
622:
623: else --9553865 added else clause
620: raise INVALID_ACCT_EXCEPTION;
621: END IF;
622:
623: else --9553865 added else clause
624: p_return_error_message := l_debug_info||': '||FND_MESSAGE.GET;
625: raise INVALID_ACCT_EXCEPTION;
626:
627: end if;
628:
675: l_num_segments,
676: l_exp_line_acct_segs_array,
677: l_exp_line_ccid)) THEN
678:
679: p_return_error_message := l_debug_info||': '||FND_MESSAGE.GET;
680: raise INVALID_ACCT_EXCEPTION;
681: END IF;
682:
683: EXCEPTION
717: l_exp_line_ccid,
718: l_num_segments,
719: l_final_segments)) THEN
720:
721: p_return_error_message := l_debug_info||': '||FND_MESSAGE.GET;
722: return;
723: END IF;
724:
725: --
780:
781: EXCEPTION
782: WHEN OTHERS THEN
783: IF (SQLCODE <> -20001) THEN
784: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
785: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
786: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'CREATE_DISTRIBUTIONS');
787: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
788: END IF;
781: EXCEPTION
782: WHEN OTHERS THEN
783: IF (SQLCODE <> -20001) THEN
784: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
785: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
786: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'CREATE_DISTRIBUTIONS');
787: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
788: END IF;
789: APP_EXCEPTION.RAISE_EXCEPTION;
782: WHEN OTHERS THEN
783: IF (SQLCODE <> -20001) THEN
784: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
785: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
786: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'CREATE_DISTRIBUTIONS');
787: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
788: END IF;
789: APP_EXCEPTION.RAISE_EXCEPTION;
790:
783: IF (SQLCODE <> -20001) THEN
784: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
785: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
786: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'CREATE_DISTRIBUTIONS');
787: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
788: END IF;
789: APP_EXCEPTION.RAISE_EXCEPTION;
790:
791: END;
820:
821: EXCEPTION
822: WHEN OTHERS THEN
823: IF (SQLCODE <> -20001) THEN
824: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
825: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
826: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'CREATE_INTERFACE_RECORDS');
827: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
828: END IF;
821: EXCEPTION
822: WHEN OTHERS THEN
823: IF (SQLCODE <> -20001) THEN
824: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
825: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
826: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'CREATE_INTERFACE_RECORDS');
827: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
828: END IF;
829: APP_EXCEPTION.RAISE_EXCEPTION;
822: WHEN OTHERS THEN
823: IF (SQLCODE <> -20001) THEN
824: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
825: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
826: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'CREATE_INTERFACE_RECORDS');
827: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
828: END IF;
829: APP_EXCEPTION.RAISE_EXCEPTION;
830:
823: IF (SQLCODE <> -20001) THEN
824: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
825: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
826: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'CREATE_INTERFACE_RECORDS');
827: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
828: END IF;
829: APP_EXCEPTION.RAISE_EXCEPTION;
830:
831: END;