103: return( v_nextVal );
104:
105: exception
106: when others then
107: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
108: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
109: fnd_message.set_token( 'ROUTINE', 'get_next_auto_seq', FALSE );
110: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
111: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
104:
105: exception
106: when others then
107: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
108: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
109: fnd_message.set_token( 'ROUTINE', 'get_next_auto_seq', FALSE );
110: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
111: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
112: fnd_message.set_token( 'SQLSTMT', v_proc_stmt, FALSE );
105: exception
106: when others then
107: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
108: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
109: fnd_message.set_token( 'ROUTINE', 'get_next_auto_seq', FALSE );
110: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
111: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
112: fnd_message.set_token( 'SQLSTMT', v_proc_stmt, FALSE );
113: app_exception.raise_exception;
106: when others then
107: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
108: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
109: fnd_message.set_token( 'ROUTINE', 'get_next_auto_seq', FALSE );
110: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
111: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
112: fnd_message.set_token( 'SQLSTMT', v_proc_stmt, FALSE );
113: app_exception.raise_exception;
114: return( NULL );
107: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
108: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
109: fnd_message.set_token( 'ROUTINE', 'get_next_auto_seq', FALSE );
110: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
111: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
112: fnd_message.set_token( 'SQLSTMT', v_proc_stmt, FALSE );
113: app_exception.raise_exception;
114: return( NULL );
115:
108: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
109: fnd_message.set_token( 'ROUTINE', 'get_next_auto_seq', FALSE );
110: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
111: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
112: fnd_message.set_token( 'SQLSTMT', v_proc_stmt, FALSE );
113: app_exception.raise_exception;
114: return( NULL );
115:
116: end get_next_auto_seq;
179: return (val);
180:
181: exception
182: when NO_DATA_FOUND then
183: fnd_message.set_name('FND', 'GET_NEXT_SEQ_VALUE_ERROR');
184: fnd_message.set_token('SEQUENCE', dbseqnm, FALSE);
185: app_exception.raise_exception;
186:
187: end get_next_auto_sequence;
180:
181: exception
182: when NO_DATA_FOUND then
183: fnd_message.set_name('FND', 'GET_NEXT_SEQ_VALUE_ERROR');
184: fnd_message.set_token('SEQUENCE', dbseqnm, FALSE);
185: app_exception.raise_exception;
186:
187: end get_next_auto_sequence;
188:
229: return (val);
230:
231: exception
232: when NO_DATA_FOUND then
233: fnd_message.set_name('FND', 'GET_NEXT_SEQ_VALUE_ERROR');
234: fnd_message.set_token('SEQUENCE', dbseqnm, FALSE);
235: app_exception.raise_exception;
236:
237: end get_next_auto_sequence;
230:
231: exception
232: when NO_DATA_FOUND then
233: fnd_message.set_name('FND', 'GET_NEXT_SEQ_VALUE_ERROR');
234: fnd_message.set_token('SEQUENCE', dbseqnm, FALSE);
235: app_exception.raise_exception;
236:
237: end get_next_auto_sequence;
238:
264: commit;
265:
266: exception
267: when others then
268: fnd_message.set_name('FND', 'SQL-GENERIC ERROR');
269: fnd_message.set_token('ERRNO', sqlcode, FALSE);
270: fnd_message.set_token('ROUTINE', 'create_gapless_sequence', FALSE);
271: fnd_message.set_token('REASON', sqlerrm, FALSE);
272: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
265:
266: exception
267: when others then
268: fnd_message.set_name('FND', 'SQL-GENERIC ERROR');
269: fnd_message.set_token('ERRNO', sqlcode, FALSE);
270: fnd_message.set_token('ROUTINE', 'create_gapless_sequence', FALSE);
271: fnd_message.set_token('REASON', sqlerrm, FALSE);
272: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
273: fnd_message.set_token('SQLSTMT', 'select seq.doc_Sequence_id ...', FALSE);
266: exception
267: when others then
268: fnd_message.set_name('FND', 'SQL-GENERIC ERROR');
269: fnd_message.set_token('ERRNO', sqlcode, FALSE);
270: fnd_message.set_token('ROUTINE', 'create_gapless_sequence', FALSE);
271: fnd_message.set_token('REASON', sqlerrm, FALSE);
272: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
273: fnd_message.set_token('SQLSTMT', 'select seq.doc_Sequence_id ...', FALSE);
274: app_exception.raise_exception;
267: when others then
268: fnd_message.set_name('FND', 'SQL-GENERIC ERROR');
269: fnd_message.set_token('ERRNO', sqlcode, FALSE);
270: fnd_message.set_token('ROUTINE', 'create_gapless_sequence', FALSE);
271: fnd_message.set_token('REASON', sqlerrm, FALSE);
272: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
273: fnd_message.set_token('SQLSTMT', 'select seq.doc_Sequence_id ...', FALSE);
274: app_exception.raise_exception;
275:
268: fnd_message.set_name('FND', 'SQL-GENERIC ERROR');
269: fnd_message.set_token('ERRNO', sqlcode, FALSE);
270: fnd_message.set_token('ROUTINE', 'create_gapless_sequence', FALSE);
271: fnd_message.set_token('REASON', sqlerrm, FALSE);
272: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
273: fnd_message.set_token('SQLSTMT', 'select seq.doc_Sequence_id ...', FALSE);
274: app_exception.raise_exception;
275:
276: end create_gapless_sequences;
269: fnd_message.set_token('ERRNO', sqlcode, FALSE);
270: fnd_message.set_token('ROUTINE', 'create_gapless_sequence', FALSE);
271: fnd_message.set_token('REASON', sqlerrm, FALSE);
272: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
273: fnd_message.set_token('SQLSTMT', 'select seq.doc_Sequence_id ...', FALSE);
274: app_exception.raise_exception;
275:
276: end create_gapless_sequences;
277:
329: return(1);
330:
331: exception
332: when others then
333: fnd_message.set_name('FND', 'SQL-GENERIC ERROR');
334: fnd_message.set_token('ERRNO', sqlcode, FALSE);
335: fnd_message.set_token('ROUTINE', 'create_gapless_sequence( '|| seqid || ' )', FALSE);
336: fnd_message.set_token('REASON', sqlerrm, FALSE);
337: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
330:
331: exception
332: when others then
333: fnd_message.set_name('FND', 'SQL-GENERIC ERROR');
334: fnd_message.set_token('ERRNO', sqlcode, FALSE);
335: fnd_message.set_token('ROUTINE', 'create_gapless_sequence( '|| seqid || ' )', FALSE);
336: fnd_message.set_token('REASON', sqlerrm, FALSE);
337: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
338: fnd_message.set_token('SQLSTMT', 'insert into fnd_doc_sequence_users ...', FALSE);
331: exception
332: when others then
333: fnd_message.set_name('FND', 'SQL-GENERIC ERROR');
334: fnd_message.set_token('ERRNO', sqlcode, FALSE);
335: fnd_message.set_token('ROUTINE', 'create_gapless_sequence( '|| seqid || ' )', FALSE);
336: fnd_message.set_token('REASON', sqlerrm, FALSE);
337: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
338: fnd_message.set_token('SQLSTMT', 'insert into fnd_doc_sequence_users ...', FALSE);
339: app_exception.raise_exception;
332: when others then
333: fnd_message.set_name('FND', 'SQL-GENERIC ERROR');
334: fnd_message.set_token('ERRNO', sqlcode, FALSE);
335: fnd_message.set_token('ROUTINE', 'create_gapless_sequence( '|| seqid || ' )', FALSE);
336: fnd_message.set_token('REASON', sqlerrm, FALSE);
337: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
338: fnd_message.set_token('SQLSTMT', 'insert into fnd_doc_sequence_users ...', FALSE);
339: app_exception.raise_exception;
340: return(0);
333: fnd_message.set_name('FND', 'SQL-GENERIC ERROR');
334: fnd_message.set_token('ERRNO', sqlcode, FALSE);
335: fnd_message.set_token('ROUTINE', 'create_gapless_sequence( '|| seqid || ' )', FALSE);
336: fnd_message.set_token('REASON', sqlerrm, FALSE);
337: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
338: fnd_message.set_token('SQLSTMT', 'insert into fnd_doc_sequence_users ...', FALSE);
339: app_exception.raise_exception;
340: return(0);
341:
334: fnd_message.set_token('ERRNO', sqlcode, FALSE);
335: fnd_message.set_token('ROUTINE', 'create_gapless_sequence( '|| seqid || ' )', FALSE);
336: fnd_message.set_token('REASON', sqlerrm, FALSE);
337: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
338: fnd_message.set_token('SQLSTMT', 'insert into fnd_doc_sequence_users ...', FALSE);
339: app_exception.raise_exception;
340: return(0);
341:
342: end create_gapless_sequence;
367: return(v_nextVal);
368:
369: exception
370: when no_data_found then
371: fnd_message.set_name( 'FND','SQL-ERROR SELECTING' );
372: fnd_message.set_token( 'TABLENAME', 'FND_DOC_SEQUENCE_USERS' ,FALSE);
373: app_exception.raise_exception;
374: return(0);
375:
368:
369: exception
370: when no_data_found then
371: fnd_message.set_name( 'FND','SQL-ERROR SELECTING' );
372: fnd_message.set_token( 'TABLENAME', 'FND_DOC_SEQUENCE_USERS' ,FALSE);
373: app_exception.raise_exception;
374: return(0);
375:
376: when others then
373: app_exception.raise_exception;
374: return(0);
375:
376: when others then
377: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
378: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
379: fnd_message.set_token( 'ROUTINE', 'get_next_user_sequence', FALSE );
380: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
381: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
374: return(0);
375:
376: when others then
377: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
378: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
379: fnd_message.set_token( 'ROUTINE', 'get_next_user_sequence', FALSE );
380: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
381: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
382: fnd_message.set_token( 'SQLSTMT', 'update fnd_doc_sequence_users ... nextval', FALSE );
375:
376: when others then
377: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
378: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
379: fnd_message.set_token( 'ROUTINE', 'get_next_user_sequence', FALSE );
380: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
381: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
382: fnd_message.set_token( 'SQLSTMT', 'update fnd_doc_sequence_users ... nextval', FALSE );
383: app_exception.raise_exception;
376: when others then
377: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
378: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
379: fnd_message.set_token( 'ROUTINE', 'get_next_user_sequence', FALSE );
380: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
381: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
382: fnd_message.set_token( 'SQLSTMT', 'update fnd_doc_sequence_users ... nextval', FALSE );
383: app_exception.raise_exception;
384: return(0);
377: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
378: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
379: fnd_message.set_token( 'ROUTINE', 'get_next_user_sequence', FALSE );
380: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
381: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
382: fnd_message.set_token( 'SQLSTMT', 'update fnd_doc_sequence_users ... nextval', FALSE );
383: app_exception.raise_exception;
384: return(0);
385: end get_next_user_sequence;
378: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
379: fnd_message.set_token( 'ROUTINE', 'get_next_user_sequence', FALSE );
380: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
381: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
382: fnd_message.set_token( 'SQLSTMT', 'update fnd_doc_sequence_users ... nextval', FALSE );
383: app_exception.raise_exception;
384: return(0);
385: end get_next_user_sequence;
386:
427: v_ddl_sql, db_seq_name );
428:
429: exception
430: when others then
431: fnd_message.set_name('FND', 'SQL-GENERIC ERROR');
432: fnd_message.set_token('ERRNO', sqlcode, FALSE);
433: fnd_message.set_token('ROUTINE', 'create_db_seq', FALSE);
434: fnd_message.set_token('REASON', sqlerrm, FALSE);
435: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
428:
429: exception
430: when others then
431: fnd_message.set_name('FND', 'SQL-GENERIC ERROR');
432: fnd_message.set_token('ERRNO', sqlcode, FALSE);
433: fnd_message.set_token('ROUTINE', 'create_db_seq', FALSE);
434: fnd_message.set_token('REASON', sqlerrm, FALSE);
435: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
436: IF v_stage = 0 THEN
429: exception
430: when others then
431: fnd_message.set_name('FND', 'SQL-GENERIC ERROR');
432: fnd_message.set_token('ERRNO', sqlcode, FALSE);
433: fnd_message.set_token('ROUTINE', 'create_db_seq', FALSE);
434: fnd_message.set_token('REASON', sqlerrm, FALSE);
435: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
436: IF v_stage = 0 THEN
437: fnd_message.set_token('SQLSTMT', 'SELECT fou.oracle_username into v_fnd_schema ...', FALSE);
430: when others then
431: fnd_message.set_name('FND', 'SQL-GENERIC ERROR');
432: fnd_message.set_token('ERRNO', sqlcode, FALSE);
433: fnd_message.set_token('ROUTINE', 'create_db_seq', FALSE);
434: fnd_message.set_token('REASON', sqlerrm, FALSE);
435: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
436: IF v_stage = 0 THEN
437: fnd_message.set_token('SQLSTMT', 'SELECT fou.oracle_username into v_fnd_schema ...', FALSE);
438: ELSE
431: fnd_message.set_name('FND', 'SQL-GENERIC ERROR');
432: fnd_message.set_token('ERRNO', sqlcode, FALSE);
433: fnd_message.set_token('ROUTINE', 'create_db_seq', FALSE);
434: fnd_message.set_token('REASON', sqlerrm, FALSE);
435: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
436: IF v_stage = 0 THEN
437: fnd_message.set_token('SQLSTMT', 'SELECT fou.oracle_username into v_fnd_schema ...', FALSE);
438: ELSE
439: fnd_message.set_token('SQLSTMT', ad_ddl.error_buf, FALSE);
433: fnd_message.set_token('ROUTINE', 'create_db_seq', FALSE);
434: fnd_message.set_token('REASON', sqlerrm, FALSE);
435: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
436: IF v_stage = 0 THEN
437: fnd_message.set_token('SQLSTMT', 'SELECT fou.oracle_username into v_fnd_schema ...', FALSE);
438: ELSE
439: fnd_message.set_token('SQLSTMT', ad_ddl.error_buf, FALSE);
440: END IF;
441: app_exception.raise_exception;
435: fnd_message.set_token('ERRFILE', 'AFSQNUMB.pls', FALSE);
436: IF v_stage = 0 THEN
437: fnd_message.set_token('SQLSTMT', 'SELECT fou.oracle_username into v_fnd_schema ...', FALSE);
438: ELSE
439: fnd_message.set_token('SQLSTMT', ad_ddl.error_buf, FALSE);
440: END IF;
441: app_exception.raise_exception;
442:
443: end create_db_seq;
512: v_SeqInfoCache.retStat := FND_SEQNUM.NOTUSED;
513: return( v_SeqInfoCache.retStat );
514: ELSIF v_profVal <> 'P' AND v_profVal <> 'A' THEN
515: v_SeqInfoCache.retStat := FND_SEQNUM.BADPROF;
516: fnd_message.set_name( 'FND', 'PROFILES-VALUES' ); -- this should never happen, BUT...
517: app_exception.raise_exception;
518: return( v_SeqInfoCache.retStat );
519: END IF; /* v_profVal */
520:
557: /* 'A' = Always Used, 'N' = Not Used, 'P' = Partially Used */
558: IF v_profVal = 'P' THEN
559: v_SeqInfoCache.retStat := FND_SEQNUM.NOASSIGN;
560: IF upper(suppress_warn) = 'N' THEN
561: fnd_message.set_name( 'FND', 'UNIQUE-NO ASSIGNMENT' );
562: app_exception.raise_exception;
563: END IF;
564: ELSIF v_profVal = 'A' THEN
565: v_SeqInfoCache.retStat := FND_SEQNUM.ALWAYS;
563: END IF;
564: ELSIF v_profVal = 'A' THEN
565: v_SeqInfoCache.retStat := FND_SEQNUM.ALWAYS;
566: IF upper(suppress_error) = 'N' THEN
567: fnd_message.set_name( 'FND', 'UNIQUE-ALWAYS USED' );
568: app_exception.raise_exception;
569: END IF;
570: END IF;
571: return( v_SeqInfoCache.retStat );
571: return( v_SeqInfoCache.retStat );
572:
573: when others then
574: v_SeqInfoCache.retStat := FND_SEQNUM.ORAFAIL;
575: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
576: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
577: fnd_message.set_token( 'ROUTINE', 'get_seq_info', FALSE );
578: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
579: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
572:
573: when others then
574: v_SeqInfoCache.retStat := FND_SEQNUM.ORAFAIL;
575: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
576: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
577: fnd_message.set_token( 'ROUTINE', 'get_seq_info', FALSE );
578: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
579: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
580: fnd_message.set_token( 'SQLSTMT', 'select SEQ.DOC_SEQUENCE_ID, SEQ.TYPE, SEQ.NAME ...', FALSE );
573: when others then
574: v_SeqInfoCache.retStat := FND_SEQNUM.ORAFAIL;
575: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
576: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
577: fnd_message.set_token( 'ROUTINE', 'get_seq_info', FALSE );
578: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
579: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
580: fnd_message.set_token( 'SQLSTMT', 'select SEQ.DOC_SEQUENCE_ID, SEQ.TYPE, SEQ.NAME ...', FALSE );
581: app_exception.raise_exception;
574: v_SeqInfoCache.retStat := FND_SEQNUM.ORAFAIL;
575: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
576: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
577: fnd_message.set_token( 'ROUTINE', 'get_seq_info', FALSE );
578: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
579: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
580: fnd_message.set_token( 'SQLSTMT', 'select SEQ.DOC_SEQUENCE_ID, SEQ.TYPE, SEQ.NAME ...', FALSE );
581: app_exception.raise_exception;
582: return( v_SeqInfoCache.retStat );
575: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
576: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
577: fnd_message.set_token( 'ROUTINE', 'get_seq_info', FALSE );
578: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
579: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
580: fnd_message.set_token( 'SQLSTMT', 'select SEQ.DOC_SEQUENCE_ID, SEQ.TYPE, SEQ.NAME ...', FALSE );
581: app_exception.raise_exception;
582: return( v_SeqInfoCache.retStat );
583:
576: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
577: fnd_message.set_token( 'ROUTINE', 'get_seq_info', FALSE );
578: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
579: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
580: fnd_message.set_token( 'SQLSTMT', 'select SEQ.DOC_SEQUENCE_ID, SEQ.TYPE, SEQ.NAME ...', FALSE );
581: app_exception.raise_exception;
582: return( v_SeqInfoCache.retStat );
583:
584: end get_seq_info;
606: return( FND_SEQNUM.SEQSUCC );
607:
608: exception
609: when dup_val_on_index then
610: fnd_message.set_name( 'FND', 'UNIQUE-DUPLICATE SEQUENCE' );
611: app_exception.raise_exception;
612: return( FND_SEQNUM.NOTUNIQ );
613: when others then
614: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
610: fnd_message.set_name( 'FND', 'UNIQUE-DUPLICATE SEQUENCE' );
611: app_exception.raise_exception;
612: return( FND_SEQNUM.NOTUNIQ );
613: when others then
614: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
615: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
616: fnd_message.set_token( 'ROUTINE', 'create_audit_rec', FALSE );
617: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
618: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
611: app_exception.raise_exception;
612: return( FND_SEQNUM.NOTUNIQ );
613: when others then
614: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
615: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
616: fnd_message.set_token( 'ROUTINE', 'create_audit_rec', FALSE );
617: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
618: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
619: fnd_message.set_token( 'SQLSTMT', v_proc_stmt, FALSE );
612: return( FND_SEQNUM.NOTUNIQ );
613: when others then
614: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
615: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
616: fnd_message.set_token( 'ROUTINE', 'create_audit_rec', FALSE );
617: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
618: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
619: fnd_message.set_token( 'SQLSTMT', v_proc_stmt, FALSE );
620: app_exception.raise_exception;
613: when others then
614: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
615: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
616: fnd_message.set_token( 'ROUTINE', 'create_audit_rec', FALSE );
617: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
618: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
619: fnd_message.set_token( 'SQLSTMT', v_proc_stmt, FALSE );
620: app_exception.raise_exception;
621: return( FND_SEQNUM.ORAFAIL );
614: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
615: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
616: fnd_message.set_token( 'ROUTINE', 'create_audit_rec', FALSE );
617: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
618: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
619: fnd_message.set_token( 'SQLSTMT', v_proc_stmt, FALSE );
620: app_exception.raise_exception;
621: return( FND_SEQNUM.ORAFAIL );
622:
615: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
616: fnd_message.set_token( 'ROUTINE', 'create_audit_rec', FALSE );
617: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
618: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
619: fnd_message.set_token( 'SQLSTMT', v_proc_stmt, FALSE );
620: app_exception.raise_exception;
621: return( FND_SEQNUM.ORAFAIL );
622:
623: end create_audit_rec;
668:
669: /* This call will retrieve the value of the "USER_ID" profile option */
670: FND_PROFILE.GET( 'USER_ID', v_profVal );
671: IF v_profVal IS NULL THEN
672: fnd_message.set_name( 'FND', 'USER' ); -- this should never happen, BUT...
673: app_exception.raise_exception;
674: return( FND_SEQNUM.BADPROF );
675: END IF;
676: /* we found a good Doc_Seq assignment so we proceed ...
684: ELSIF v_seqType = 'U' THEN
685: seq_val := get_next_user_sequence( to_number(v_profVal), v_seqAssID, v_docSeqId );
686: ELSIF v_seqType = 'M' THEN
687: IF seq_val IS NULL THEN
688: fnd_message.set_name( 'FND', 'UNIQUE-NO VALUE' );
689: fnd_message.set_token( 'SEQUENCE', v_seqName, FALSE );
690: app_exception.raise_exception;
691: return( FND_SEQNUM.NOVALUE );
692: END IF;
685: seq_val := get_next_user_sequence( to_number(v_profVal), v_seqAssID, v_docSeqId );
686: ELSIF v_seqType = 'M' THEN
687: IF seq_val IS NULL THEN
688: fnd_message.set_name( 'FND', 'UNIQUE-NO VALUE' );
689: fnd_message.set_token( 'SEQUENCE', v_seqName, FALSE );
690: app_exception.raise_exception;
691: return( FND_SEQNUM.NOVALUE );
692: END IF;
693: /* i don't actually have a routine to check the uniqueness of the Manual DocSeq
735: return ( FND_SEQNUM.BADAPPID );
736: END IF;
737: exception
738: when others then
739: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
740: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
741: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
742: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
743: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
736: END IF;
737: exception
738: when others then
739: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
740: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
741: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
742: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
743: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
744: fnd_message.set_token( 'SQLSTMT', 'select count from FND_APPLICATION where APPLICATION_ID = ' || to_char(app_id), FALSE );
737: exception
738: when others then
739: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
740: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
741: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
742: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
743: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
744: fnd_message.set_token( 'SQLSTMT', 'select count from FND_APPLICATION where APPLICATION_ID = ' || to_char(app_id), FALSE );
745: app_exception.raise_exception;
738: when others then
739: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
740: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
741: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
742: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
743: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
744: fnd_message.set_token( 'SQLSTMT', 'select count from FND_APPLICATION where APPLICATION_ID = ' || to_char(app_id), FALSE );
745: app_exception.raise_exception;
746: return( FND_SEQNUM.ORAFAIL );
739: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
740: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
741: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
742: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
743: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
744: fnd_message.set_token( 'SQLSTMT', 'select count from FND_APPLICATION where APPLICATION_ID = ' || to_char(app_id), FALSE );
745: app_exception.raise_exception;
746: return( FND_SEQNUM.ORAFAIL );
747: end; /* APPLICATION_ID check block */
740: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
741: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
742: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
743: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
744: fnd_message.set_token( 'SQLSTMT', 'select count from FND_APPLICATION where APPLICATION_ID = ' || to_char(app_id), FALSE );
745: app_exception.raise_exception;
746: return( FND_SEQNUM.ORAFAIL );
747: end; /* APPLICATION_ID check block */
748:
753: return ( FND_SEQNUM.DUPNAME );
754: END IF;
755: exception
756: when others then
757: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
758: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
759: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
760: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
761: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
754: END IF;
755: exception
756: when others then
757: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
758: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
759: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
760: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
761: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
762: fnd_message.set_token( 'SQLSTMT', 'select count from FND_DOCUMENT_SEQUENCES where NAME = ' || docseq_name, FALSE );
755: exception
756: when others then
757: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
758: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
759: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
760: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
761: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
762: fnd_message.set_token( 'SQLSTMT', 'select count from FND_DOCUMENT_SEQUENCES where NAME = ' || docseq_name, FALSE );
763: app_exception.raise_exception;
756: when others then
757: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
758: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
759: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
760: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
761: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
762: fnd_message.set_token( 'SQLSTMT', 'select count from FND_DOCUMENT_SEQUENCES where NAME = ' || docseq_name, FALSE );
763: app_exception.raise_exception;
764: return( FND_SEQNUM.ORAFAIL );
757: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
758: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
759: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
760: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
761: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
762: fnd_message.set_token( 'SQLSTMT', 'select count from FND_DOCUMENT_SEQUENCES where NAME = ' || docseq_name, FALSE );
763: app_exception.raise_exception;
764: return( FND_SEQNUM.ORAFAIL );
765: end; /* NAME check block */
758: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
759: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
760: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
761: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
762: fnd_message.set_token( 'SQLSTMT', 'select count from FND_DOCUMENT_SEQUENCES where NAME = ' || docseq_name, FALSE );
763: app_exception.raise_exception;
764: return( FND_SEQNUM.ORAFAIL );
765: end; /* NAME check block */
766: /* validate the type */
790: 803,'DT', 804,'SSP', 7000,'JA', 7002,'JE', 7003,'JG', 7004,'JL',
791: 'FND') || '_DOC_SEQUENCE_AUDIT' into v_audTabNm from dual;
792: exception
793: when others then
794: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
795: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
796: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
797: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
798: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
791: 'FND') || '_DOC_SEQUENCE_AUDIT' into v_audTabNm from dual;
792: exception
793: when others then
794: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
795: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
796: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
797: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
798: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
799: fnd_message.set_token( 'SQLSTMT', 'select DECODE(' || to_char(app_id) || '...) from dual', FALSE );
792: exception
793: when others then
794: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
795: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
796: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
797: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
798: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
799: fnd_message.set_token( 'SQLSTMT', 'select DECODE(' || to_char(app_id) || '...) from dual', FALSE );
800: app_exception.raise_exception;
793: when others then
794: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
795: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
796: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
797: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
798: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
799: fnd_message.set_token( 'SQLSTMT', 'select DECODE(' || to_char(app_id) || '...) from dual', FALSE );
800: app_exception.raise_exception;
801: return( FND_SEQNUM.ORAFAIL );
794: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
795: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
796: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
797: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
798: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
799: fnd_message.set_token( 'SQLSTMT', 'select DECODE(' || to_char(app_id) || '...) from dual', FALSE );
800: app_exception.raise_exception;
801: return( FND_SEQNUM.ORAFAIL );
802: end; /* Audit Table name block */
795: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
796: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
797: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
798: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
799: fnd_message.set_token( 'SQLSTMT', 'select DECODE(' || to_char(app_id) || '...) from dual', FALSE );
800: app_exception.raise_exception;
801: return( FND_SEQNUM.ORAFAIL );
802: end; /* Audit Table name block */
803:
805: begin /* get next DOC_SEQUENCE_ID block */
806: select FND_DOCUMENT_SEQUENCES_S.nextval into v_docSeqId from dual;
807: exception
808: when others then
809: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
810: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
811: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
812: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
813: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
806: select FND_DOCUMENT_SEQUENCES_S.nextval into v_docSeqId from dual;
807: exception
808: when others then
809: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
810: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
811: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
812: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
813: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
814: fnd_message.set_token( 'SQLSTMT', 'select FND_DOCUMENT_SEQUENCES_S.nextval from dual', FALSE );
807: exception
808: when others then
809: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
810: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
811: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
812: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
813: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
814: fnd_message.set_token( 'SQLSTMT', 'select FND_DOCUMENT_SEQUENCES_S.nextval from dual', FALSE );
815: app_exception.raise_exception;
808: when others then
809: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
810: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
811: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
812: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
813: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
814: fnd_message.set_token( 'SQLSTMT', 'select FND_DOCUMENT_SEQUENCES_S.nextval from dual', FALSE );
815: app_exception.raise_exception;
816: return( FND_SEQNUM.ORAFAIL );
809: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
810: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
811: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
812: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
813: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
814: fnd_message.set_token( 'SQLSTMT', 'select FND_DOCUMENT_SEQUENCES_S.nextval from dual', FALSE );
815: app_exception.raise_exception;
816: return( FND_SEQNUM.ORAFAIL );
817: end; /* FND_DOCUMENT_SEQUENCES_S block */
810: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
811: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
812: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
813: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
814: fnd_message.set_token( 'SQLSTMT', 'select FND_DOCUMENT_SEQUENCES_S.nextval from dual', FALSE );
815: app_exception.raise_exception;
816: return( FND_SEQNUM.ORAFAIL );
817: end; /* FND_DOCUMENT_SEQUENCES_S block */
818:
835: return( FND_SEQNUM.SEQSUCC );
836:
837: exception
838: when others then
839: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
840: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
841: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
842: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
843: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
836:
837: exception
838: when others then
839: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
840: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
841: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
842: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
843: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
844: fnd_message.set_token( 'SQLSTMT', 'insert into FND_DOCUMENT_SEQUENCES ..' || docseq_name || '...', FALSE );
837: exception
838: when others then
839: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
840: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
841: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
842: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
843: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
844: fnd_message.set_token( 'SQLSTMT', 'insert into FND_DOCUMENT_SEQUENCES ..' || docseq_name || '...', FALSE );
845: app_exception.raise_exception;
838: when others then
839: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
840: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
841: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
842: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
843: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
844: fnd_message.set_token( 'SQLSTMT', 'insert into FND_DOCUMENT_SEQUENCES ..' || docseq_name || '...', FALSE );
845: app_exception.raise_exception;
846: return( FND_SEQNUM.ORAFAIL );
839: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
840: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
841: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
842: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
843: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
844: fnd_message.set_token( 'SQLSTMT', 'insert into FND_DOCUMENT_SEQUENCES ..' || docseq_name || '...', FALSE );
845: app_exception.raise_exception;
846: return( FND_SEQNUM.ORAFAIL );
847:
840: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
841: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
842: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
843: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
844: fnd_message.set_token( 'SQLSTMT', 'insert into FND_DOCUMENT_SEQUENCES ..' || docseq_name || '...', FALSE );
845: app_exception.raise_exception;
846: return( FND_SEQNUM.ORAFAIL );
847:
848: end define_doc_seq;
878: return ( FND_SEQNUM.BADAPPID );
879: END IF;
880: exception
881: when others then
882: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
883: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
884: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
885: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
886: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
879: END IF;
880: exception
881: when others then
882: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
883: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
884: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
885: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
886: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
887: fnd_message.set_token( 'SQLSTMT', 'select count from FND_APPLICATION where APPLICATION_ID = ' || to_char(app_id), FALSE );
880: exception
881: when others then
882: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
883: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
884: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
885: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
886: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
887: fnd_message.set_token( 'SQLSTMT', 'select count from FND_APPLICATION where APPLICATION_ID = ' || to_char(app_id), FALSE );
888: app_exception.raise_exception;
881: when others then
882: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
883: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
884: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
885: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
886: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
887: fnd_message.set_token( 'SQLSTMT', 'select count from FND_APPLICATION where APPLICATION_ID = ' || to_char(app_id), FALSE );
888: app_exception.raise_exception;
889: return( FND_SEQNUM.ORAFAIL );
882: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
883: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
884: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
885: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
886: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
887: fnd_message.set_token( 'SQLSTMT', 'select count from FND_APPLICATION where APPLICATION_ID = ' || to_char(app_id), FALSE );
888: app_exception.raise_exception;
889: return( FND_SEQNUM.ORAFAIL );
890: end; /* APPLICATION_ID check block */
883: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
884: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
885: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
886: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
887: fnd_message.set_token( 'SQLSTMT', 'select count from FND_APPLICATION where APPLICATION_ID = ' || to_char(app_id), FALSE );
888: app_exception.raise_exception;
889: return( FND_SEQNUM.ORAFAIL );
890: end; /* APPLICATION_ID check block */
891:
895: exception
896: when NO_DATA_FOUND then
897: return( FND_SEQNUM.BADNAME );
898: when others then
899: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
900: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
901: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
902: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
903: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
896: when NO_DATA_FOUND then
897: return( FND_SEQNUM.BADNAME );
898: when others then
899: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
900: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
901: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
902: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
903: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
904: fnd_message.set_token( 'SQLSTMT', 'select DOC_SEQUENCE_ID from FND_DOCUMENT_SEQUENCES where NAME = ' || docseq_name, FALSE );
897: return( FND_SEQNUM.BADNAME );
898: when others then
899: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
900: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
901: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
902: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
903: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
904: fnd_message.set_token( 'SQLSTMT', 'select DOC_SEQUENCE_ID from FND_DOCUMENT_SEQUENCES where NAME = ' || docseq_name, FALSE );
905: app_exception.raise_exception;
898: when others then
899: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
900: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
901: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
902: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
903: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
904: fnd_message.set_token( 'SQLSTMT', 'select DOC_SEQUENCE_ID from FND_DOCUMENT_SEQUENCES where NAME = ' || docseq_name, FALSE );
905: app_exception.raise_exception;
906: return( FND_SEQNUM.ORAFAIL );
899: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
900: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
901: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
902: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
903: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
904: fnd_message.set_token( 'SQLSTMT', 'select DOC_SEQUENCE_ID from FND_DOCUMENT_SEQUENCES where NAME = ' || docseq_name, FALSE );
905: app_exception.raise_exception;
906: return( FND_SEQNUM.ORAFAIL );
907: end; /* NAME check block */
900: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
901: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
902: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
903: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
904: fnd_message.set_token( 'SQLSTMT', 'select DOC_SEQUENCE_ID from FND_DOCUMENT_SEQUENCES where NAME = ' || docseq_name, FALSE );
905: app_exception.raise_exception;
906: return( FND_SEQNUM.ORAFAIL );
907: end; /* NAME check block */
908:
912: exception
913: when NO_DATA_FOUND then
914: return( FND_SEQNUM.BADCODE );
915: when others then
916: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
917: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
918: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
919: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
920: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
913: when NO_DATA_FOUND then
914: return( FND_SEQNUM.BADCODE );
915: when others then
916: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
917: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
918: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
919: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
920: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
921: fnd_message.set_token( 'SQLSTMT', 'select TABLE_NAME from FND_DOC_SEQUENCE_CATEGORIES where CODE = ' || cat_code, FALSE );
914: return( FND_SEQNUM.BADCODE );
915: when others then
916: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
917: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
918: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
919: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
920: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
921: fnd_message.set_token( 'SQLSTMT', 'select TABLE_NAME from FND_DOC_SEQUENCE_CATEGORIES where CODE = ' || cat_code, FALSE );
922: app_exception.raise_exception;
915: when others then
916: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
917: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
918: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
919: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
920: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
921: fnd_message.set_token( 'SQLSTMT', 'select TABLE_NAME from FND_DOC_SEQUENCE_CATEGORIES where CODE = ' || cat_code, FALSE );
922: app_exception.raise_exception;
923: return( FND_SEQNUM.ORAFAIL );
916: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
917: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
918: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
919: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
920: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
921: fnd_message.set_token( 'SQLSTMT', 'select TABLE_NAME from FND_DOC_SEQUENCE_CATEGORIES where CODE = ' || cat_code, FALSE );
922: app_exception.raise_exception;
923: return( FND_SEQNUM.ORAFAIL );
924: end; /* table name for category_code block */
917: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
918: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
919: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
920: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
921: fnd_message.set_token( 'SQLSTMT', 'select TABLE_NAME from FND_DOC_SEQUENCE_CATEGORIES where CODE = ' || cat_code, FALSE );
922: app_exception.raise_exception;
923: return( FND_SEQNUM.ORAFAIL );
924: end; /* table name for category_code block */
925:
936: return ( FND_SEQNUM.BADSOB );
937: END IF;
938: exception
939: when others then
940: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
941: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
942: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
943: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
944: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
937: END IF;
938: exception
939: when others then
940: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
941: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
942: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
943: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
944: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
945: fnd_message.set_token( 'SQLSTMT', 'select count from GL_SETS_OF_BOOKS where SET_OF_BOOKS_ID = ' || to_char( sob_id ), FALSE );
938: exception
939: when others then
940: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
941: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
942: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
943: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
944: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
945: fnd_message.set_token( 'SQLSTMT', 'select count from GL_SETS_OF_BOOKS where SET_OF_BOOKS_ID = ' || to_char( sob_id ), FALSE );
946: app_exception.raise_exception;
939: when others then
940: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
941: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
942: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
943: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
944: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
945: fnd_message.set_token( 'SQLSTMT', 'select count from GL_SETS_OF_BOOKS where SET_OF_BOOKS_ID = ' || to_char( sob_id ), FALSE );
946: app_exception.raise_exception;
947: return( FND_SEQNUM.ORAFAIL );
940: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
941: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
942: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
943: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
944: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
945: fnd_message.set_token( 'SQLSTMT', 'select count from GL_SETS_OF_BOOKS where SET_OF_BOOKS_ID = ' || to_char( sob_id ), FALSE );
946: app_exception.raise_exception;
947: return( FND_SEQNUM.ORAFAIL );
948: end; /* SOB block */
941: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
942: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
943: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
944: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
945: fnd_message.set_token( 'SQLSTMT', 'select count from GL_SETS_OF_BOOKS where SET_OF_BOOKS_ID = ' || to_char( sob_id ), FALSE );
946: app_exception.raise_exception;
947: return( FND_SEQNUM.ORAFAIL );
948: end; /* SOB block */
949: END IF;
948: end; /* SOB block */
949: END IF;
950: exception
951: when others then
952: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
953: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
954: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
955: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
956: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
949: END IF;
950: exception
951: when others then
952: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
953: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
954: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
955: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
956: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
957: fnd_message.set_token( 'SQLSTMT', 'select ENABLED_FLAG from ... SET_OF_BOOKS_ID', FALSE );
950: exception
951: when others then
952: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
953: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
954: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
955: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
956: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
957: fnd_message.set_token( 'SQLSTMT', 'select ENABLED_FLAG from ... SET_OF_BOOKS_ID', FALSE );
958: app_exception.raise_exception;
951: when others then
952: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
953: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
954: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
955: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
956: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
957: fnd_message.set_token( 'SQLSTMT', 'select ENABLED_FLAG from ... SET_OF_BOOKS_ID', FALSE );
958: app_exception.raise_exception;
959: return( FND_SEQNUM.ORAFAIL );
952: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
953: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
954: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
955: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
956: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
957: fnd_message.set_token( 'SQLSTMT', 'select ENABLED_FLAG from ... SET_OF_BOOKS_ID', FALSE );
958: app_exception.raise_exception;
959: return( FND_SEQNUM.ORAFAIL );
960: end; /* Document Flexfield block */
953: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
954: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
955: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
956: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
957: fnd_message.set_token( 'SQLSTMT', 'select ENABLED_FLAG from ... SET_OF_BOOKS_ID', FALSE );
958: app_exception.raise_exception;
959: return( FND_SEQNUM.ORAFAIL );
960: end; /* Document Flexfield block */
961:
970: END IF;
971: END IF;
972: exception
973: when others then
974: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
975: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
976: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
977: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
978: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
971: END IF;
972: exception
973: when others then
974: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
975: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
976: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
977: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
978: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
979: fnd_message.set_token( 'SQLSTMT', 'select ENABLED_FLAG from ... METHOD_CODE', FALSE );
972: exception
973: when others then
974: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
975: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
976: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
977: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
978: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
979: fnd_message.set_token( 'SQLSTMT', 'select ENABLED_FLAG from ... METHOD_CODE', FALSE );
980: app_exception.raise_exception;
973: when others then
974: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
975: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
976: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
977: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
978: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
979: fnd_message.set_token( 'SQLSTMT', 'select ENABLED_FLAG from ... METHOD_CODE', FALSE );
980: app_exception.raise_exception;
981: return( FND_SEQNUM.ORAFAIL );
974: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
975: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
976: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
977: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
978: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
979: fnd_message.set_token( 'SQLSTMT', 'select ENABLED_FLAG from ... METHOD_CODE', FALSE );
980: app_exception.raise_exception;
981: return( FND_SEQNUM.ORAFAIL );
982: end; /* Document Flexfield block */
975: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
976: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
977: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
978: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
979: fnd_message.set_token( 'SQLSTMT', 'select ENABLED_FLAG from ... METHOD_CODE', FALSE );
980: app_exception.raise_exception;
981: return( FND_SEQNUM.ORAFAIL );
982: end; /* Document Flexfield block */
983:
995: and NVL( SET_OF_BOOKS_ID, 0 ) = NVL( sob_id, 0 )
996: and END_DATE IS NULL;
997: IF v_numRows > 0 THEN
998: -- ERROR! there is another row with a null end_date!
999: FND_MESSAGE.SET_NAME('FND','UNIQUE-NULL END DATE');
1000: return( FND_SEQNUM.BADDATE ); /* comment out this line and uncomment the next for debugging */
1001: -- app_exception.raise_exception;
1002: ELSE
1003: -- See if there is another row for this document with dates that overlap
1009: and NVL( SET_OF_BOOKS_ID, 0 ) = NVL( sob_id, 0 )
1010: and v_startDate <= END_DATE;
1011: IF v_numRows > 0 THEN
1012: -- ERROR! there is a date overlap problem.
1013: FND_MESSAGE.SET_NAME('FND','UNIQUE-DATE OVERLAP');
1014: return( FND_SEQNUM.BADDATE ); /* comment out this line and uncomment the next for debugging */
1015: -- app_exception.raise_exception;
1016: END IF;
1017: END IF;
1035: or ( v_endDate >= START_DATE and v_endDate <= NVL(END_DATE, v_endDate) )
1036: or ( v_endDate <= START_DATE and v_endDate >= NVL(END_DATE, v_endDate + 1) ) );
1037: IF v_numRows > 0 THEN
1038: -- ERROR! there is a date overlap problem.
1039: FND_MESSAGE.SET_NAME('FND','UNIQUE-DATE OVERLAP');
1040: return( FND_SEQNUM.BADDATE ); /* comment out this line and uncomment the next for debugging */
1041: -- app_exception.raise_exception;
1042: END IF;
1043: END IF;
1043: END IF;
1044: END IF;
1045: exception
1046: when others then
1047: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1048: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1049: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1050: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1051: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1044: END IF;
1045: exception
1046: when others then
1047: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1048: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1049: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1050: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1051: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1052: fnd_message.set_token( 'SQLSTMT', 'select count( DOC_SEQUENCE_ASSIGNMENT_ID ) .. DATE checks', FALSE );
1045: exception
1046: when others then
1047: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1048: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1049: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1050: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1051: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1052: fnd_message.set_token( 'SQLSTMT', 'select count( DOC_SEQUENCE_ASSIGNMENT_ID ) .. DATE checks', FALSE );
1053: app_exception.raise_exception;
1046: when others then
1047: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1048: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1049: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1050: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1051: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1052: fnd_message.set_token( 'SQLSTMT', 'select count( DOC_SEQUENCE_ASSIGNMENT_ID ) .. DATE checks', FALSE );
1053: app_exception.raise_exception;
1054: return( FND_SEQNUM.ORAFAIL );
1047: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1048: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1049: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1050: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1051: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1052: fnd_message.set_token( 'SQLSTMT', 'select count( DOC_SEQUENCE_ASSIGNMENT_ID ) .. DATE checks', FALSE );
1053: app_exception.raise_exception;
1054: return( FND_SEQNUM.ORAFAIL );
1055: end; /* DATE check block */
1048: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1049: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1050: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1051: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1052: fnd_message.set_token( 'SQLSTMT', 'select count( DOC_SEQUENCE_ASSIGNMENT_ID ) .. DATE checks', FALSE );
1053: app_exception.raise_exception;
1054: return( FND_SEQNUM.ORAFAIL );
1055: end; /* DATE check block */
1056:
1058: begin /* get next DOC_SEQUENCE_ASSIGNMENT_ID block */
1059: select FND_DOC_SEQUENCE_ASSIGNMENTS_S.nextval into v_seqAssID from dual;
1060: exception
1061: when others then
1062: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1063: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1064: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
1065: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1066: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1059: select FND_DOC_SEQUENCE_ASSIGNMENTS_S.nextval into v_seqAssID from dual;
1060: exception
1061: when others then
1062: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1063: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1064: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
1065: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1066: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1067: fnd_message.set_token( 'SQLSTMT', 'select FND_DOC_SEQUENCE_ASSIGNMENTS_S.nextval from dual', FALSE );
1060: exception
1061: when others then
1062: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1063: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1064: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
1065: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1066: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1067: fnd_message.set_token( 'SQLSTMT', 'select FND_DOC_SEQUENCE_ASSIGNMENTS_S.nextval from dual', FALSE );
1068: app_exception.raise_exception;
1061: when others then
1062: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1063: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1064: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
1065: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1066: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1067: fnd_message.set_token( 'SQLSTMT', 'select FND_DOC_SEQUENCE_ASSIGNMENTS_S.nextval from dual', FALSE );
1068: app_exception.raise_exception;
1069: return( FND_SEQNUM.ORAFAIL );
1062: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1063: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1064: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
1065: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1066: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1067: fnd_message.set_token( 'SQLSTMT', 'select FND_DOC_SEQUENCE_ASSIGNMENTS_S.nextval from dual', FALSE );
1068: app_exception.raise_exception;
1069: return( FND_SEQNUM.ORAFAIL );
1070: end; /* FND_DOC_SEQUENCE_ASSIGNMENTS_S block */
1063: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1064: fnd_message.set_token( 'ROUTINE', 'define_doc_seq', FALSE );
1065: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1066: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1067: fnd_message.set_token( 'SQLSTMT', 'select FND_DOC_SEQUENCE_ASSIGNMENTS_S.nextval from dual', FALSE );
1068: app_exception.raise_exception;
1069: return( FND_SEQNUM.ORAFAIL );
1070: end; /* FND_DOC_SEQUENCE_ASSIGNMENTS_S block */
1071:
1080: set TABLE_NAME = v_prdTabNm
1081: where DOC_SEQUENCE_ID = v_docSeqId;
1082: exception
1083: when others then
1084: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1085: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1086: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1087: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1088: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1081: where DOC_SEQUENCE_ID = v_docSeqId;
1082: exception
1083: when others then
1084: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1085: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1086: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1087: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1088: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1089: fnd_message.set_token( 'SQLSTMT', 'update FND_DOCUMENT_SEQUENCES set TABLE_NAME (..' || docseq_name || '..)', FALSE );
1082: exception
1083: when others then
1084: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1085: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1086: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1087: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1088: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1089: fnd_message.set_token( 'SQLSTMT', 'update FND_DOCUMENT_SEQUENCES set TABLE_NAME (..' || docseq_name || '..)', FALSE );
1090: app_exception.raise_exception;
1083: when others then
1084: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1085: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1086: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1087: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1088: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1089: fnd_message.set_token( 'SQLSTMT', 'update FND_DOCUMENT_SEQUENCES set TABLE_NAME (..' || docseq_name || '..)', FALSE );
1090: app_exception.raise_exception;
1091: return( FND_SEQNUM.ORAFAIL );
1084: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1085: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1086: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1087: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1088: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1089: fnd_message.set_token( 'SQLSTMT', 'update FND_DOCUMENT_SEQUENCES set TABLE_NAME (..' || docseq_name || '..)', FALSE );
1090: app_exception.raise_exception;
1091: return( FND_SEQNUM.ORAFAIL );
1092: end; /* Doc_Seq update block */
1085: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1086: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1087: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1088: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1089: fnd_message.set_token( 'SQLSTMT', 'update FND_DOCUMENT_SEQUENCES set TABLE_NAME (..' || docseq_name || '..)', FALSE );
1090: app_exception.raise_exception;
1091: return( FND_SEQNUM.ORAFAIL );
1092: end; /* Doc_Seq update block */
1093:
1102: END IF;
1103: END IF;
1104: exception
1105: when others then
1106: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1107: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1108: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1109: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1110: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1103: END IF;
1104: exception
1105: when others then
1106: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1107: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1108: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1109: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1110: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1111: fnd_message.set_token( 'SQLSTMT', 'select count(DOC_SEQUENCE_ID) from FND_DOC_SEQUENCE_USERS', FALSE );
1104: exception
1105: when others then
1106: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1107: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1108: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1109: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1110: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1111: fnd_message.set_token( 'SQLSTMT', 'select count(DOC_SEQUENCE_ID) from FND_DOC_SEQUENCE_USERS', FALSE );
1112: app_exception.raise_exception;
1105: when others then
1106: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1107: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1108: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1109: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1110: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1111: fnd_message.set_token( 'SQLSTMT', 'select count(DOC_SEQUENCE_ID) from FND_DOC_SEQUENCE_USERS', FALSE );
1112: app_exception.raise_exception;
1113: return( FND_SEQNUM.ORAFAIL );
1106: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1107: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1108: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1109: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1110: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1111: fnd_message.set_token( 'SQLSTMT', 'select count(DOC_SEQUENCE_ID) from FND_DOC_SEQUENCE_USERS', FALSE );
1112: app_exception.raise_exception;
1113: return( FND_SEQNUM.ORAFAIL );
1114: end; /* Gapless check block */
1107: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1108: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1109: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1110: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1111: fnd_message.set_token( 'SQLSTMT', 'select count(DOC_SEQUENCE_ID) from FND_DOC_SEQUENCE_USERS', FALSE );
1112: app_exception.raise_exception;
1113: return( FND_SEQNUM.ORAFAIL );
1114: end; /* Gapless check block */
1115: END IF;
1118: return( FND_SEQNUM.SEQSUCC );
1119:
1120: exception
1121: when others then
1122: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1123: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1124: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1125: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1126: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1119:
1120: exception
1121: when others then
1122: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1123: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1124: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1125: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1126: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1127: fnd_message.set_token( 'SQLSTMT', 'insert into FND_DOC_SEQUENCE_ASSIGNMENTS (..' || docseq_name || '..)', FALSE );
1120: exception
1121: when others then
1122: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1123: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1124: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1125: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1126: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1127: fnd_message.set_token( 'SQLSTMT', 'insert into FND_DOC_SEQUENCE_ASSIGNMENTS (..' || docseq_name || '..)', FALSE );
1128: app_exception.raise_exception;
1121: when others then
1122: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1123: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1124: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1125: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1126: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1127: fnd_message.set_token( 'SQLSTMT', 'insert into FND_DOC_SEQUENCE_ASSIGNMENTS (..' || docseq_name || '..)', FALSE );
1128: app_exception.raise_exception;
1129: return( FND_SEQNUM.ORAFAIL );
1122: fnd_message.set_name( 'FND', 'SQL-GENERIC ERROR' );
1123: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1124: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1125: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1126: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1127: fnd_message.set_token( 'SQLSTMT', 'insert into FND_DOC_SEQUENCE_ASSIGNMENTS (..' || docseq_name || '..)', FALSE );
1128: app_exception.raise_exception;
1129: return( FND_SEQNUM.ORAFAIL );
1130:
1123: fnd_message.set_token( 'ERRNO', sqlcode, FALSE );
1124: fnd_message.set_token( 'ROUTINE', 'assign_doc_seq', FALSE );
1125: fnd_message.set_token( 'REASON', sqlerrm, FALSE );
1126: fnd_message.set_token( 'ERRFILE', 'AFSQNUMB.pls', FALSE );
1127: fnd_message.set_token( 'SQLSTMT', 'insert into FND_DOC_SEQUENCE_ASSIGNMENTS (..' || docseq_name || '..)', FALSE );
1128: app_exception.raise_exception;
1129: return( FND_SEQNUM.ORAFAIL );
1130:
1131: end assign_doc_seq;