147: ELSE
148: --
149: -- Error message.
150: --
151: fnd_message.set_encoded(g_cache_value.varchar2_1);
152: RETURN(fnd_plsql_cache.CACHE_INVALID);
153: END IF;
154: END IF;
155: RETURN(g_cache_return_code);
173: p_id_flex_num || '.' ||
174: p_ccid);
175:
176: IF (NOT p_is_valid) THEN
177: l_enc_err_msg := fnd_message.get_encoded;
178: fnd_message.set_encoded(l_enc_err_msg);
179: END IF;
180:
181: fnd_plsql_cache.generic_cache_new_value
174: p_ccid);
175:
176: IF (NOT p_is_valid) THEN
177: l_enc_err_msg := fnd_message.get_encoded;
178: fnd_message.set_encoded(l_enc_err_msg);
179: END IF;
180:
181: fnd_plsql_cache.generic_cache_new_value
182: (x_value => g_cache_value,
213: g_encoded_message := '';
214: g_message := '';
215: END init_message;
216:
217: PROCEDURE get_from_fnd_message
218: IS
219: BEGIN
220: IF (NOT g_is_message_get) THEN
221: --
218: IS
219: BEGIN
220: IF (NOT g_is_message_get) THEN
221: --
222: -- fnd_message.get_* removes message from stack.
223: -- put it back.
224: --
225: g_encoded_message := fnd_message.get_encoded;
226: fnd_message.set_encoded(g_encoded_message);
221: --
222: -- fnd_message.get_* removes message from stack.
223: -- put it back.
224: --
225: g_encoded_message := fnd_message.get_encoded;
226: fnd_message.set_encoded(g_encoded_message);
227:
228: g_message := fnd_message.get;
229: fnd_message.set_encoded(g_encoded_message);
222: -- fnd_message.get_* removes message from stack.
223: -- put it back.
224: --
225: g_encoded_message := fnd_message.get_encoded;
226: fnd_message.set_encoded(g_encoded_message);
227:
228: g_message := fnd_message.get;
229: fnd_message.set_encoded(g_encoded_message);
230:
224: --
225: g_encoded_message := fnd_message.get_encoded;
226: fnd_message.set_encoded(g_encoded_message);
227:
228: g_message := fnd_message.get;
229: fnd_message.set_encoded(g_encoded_message);
230:
231: g_is_message_get := TRUE;
232: END IF;
225: g_encoded_message := fnd_message.get_encoded;
226: fnd_message.set_encoded(g_encoded_message);
227:
228: g_message := fnd_message.get;
229: fnd_message.set_encoded(g_encoded_message);
230:
231: g_is_message_get := TRUE;
232: END IF;
233: EXCEPTION
232: END IF;
233: EXCEPTION
234: WHEN OTHERS THEN
235: NULL;
236: END get_from_fnd_message;
237:
238: FUNCTION get_message RETURN VARCHAR2
239: IS
240: BEGIN
238: FUNCTION get_message RETURN VARCHAR2
239: IS
240: BEGIN
241: IF (g_is_failed) THEN
242: get_from_fnd_message;
243: RETURN g_message;
244: END IF;
245: RETURN('');
246: EXCEPTION
251: FUNCTION get_encoded_message RETURN VARCHAR2
252: IS
253: BEGIN
254: IF (g_is_failed) THEN
255: get_from_fnd_message;
256: RETURN g_encoded_message;
257: END IF;
258: RETURN('');
259: EXCEPTION
291: IF (concat_segs(n_segments, segments, delimiter, catsegs)) then
292: return(catsegs);
293: ELSE
294: set_failed;
295: FND_MESSAGE.raise_error;
296: end if;
297: EXCEPTION
298: WHEN OTHERS THEN
299: set_failed;
366: -- (application_short_name) (We should use p_* style, but it is late.)
367: --
368: EXCEPTION
369: WHEN NO_DATA_FOUND then
370: FND_MESSAGE.set_name('FND', 'FLEX-CANNOT FIND STRUCT DEF');
371: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.GET_DELIMITER');
372: FND_MESSAGE.set_token('APPL', application_short_name);
373: FND_MESSAGE.set_token('CODE', key_flex_code);
374: FND_MESSAGE.set_token('NUM', to_char(structure_number));
367: --
368: EXCEPTION
369: WHEN NO_DATA_FOUND then
370: FND_MESSAGE.set_name('FND', 'FLEX-CANNOT FIND STRUCT DEF');
371: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.GET_DELIMITER');
372: FND_MESSAGE.set_token('APPL', application_short_name);
373: FND_MESSAGE.set_token('CODE', key_flex_code);
374: FND_MESSAGE.set_token('NUM', to_char(structure_number));
375: set_failed;
368: EXCEPTION
369: WHEN NO_DATA_FOUND then
370: FND_MESSAGE.set_name('FND', 'FLEX-CANNOT FIND STRUCT DEF');
371: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.GET_DELIMITER');
372: FND_MESSAGE.set_token('APPL', application_short_name);
373: FND_MESSAGE.set_token('CODE', key_flex_code);
374: FND_MESSAGE.set_token('NUM', to_char(structure_number));
375: set_failed;
376: return(NULL);
369: WHEN NO_DATA_FOUND then
370: FND_MESSAGE.set_name('FND', 'FLEX-CANNOT FIND STRUCT DEF');
371: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.GET_DELIMITER');
372: FND_MESSAGE.set_token('APPL', application_short_name);
373: FND_MESSAGE.set_token('CODE', key_flex_code);
374: FND_MESSAGE.set_token('NUM', to_char(structure_number));
375: set_failed;
376: return(NULL);
377: WHEN TOO_MANY_ROWS then
370: FND_MESSAGE.set_name('FND', 'FLEX-CANNOT FIND STRUCT DEF');
371: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.GET_DELIMITER');
372: FND_MESSAGE.set_token('APPL', application_short_name);
373: FND_MESSAGE.set_token('CODE', key_flex_code);
374: FND_MESSAGE.set_token('NUM', to_char(structure_number));
375: set_failed;
376: return(NULL);
377: WHEN TOO_MANY_ROWS then
378: FND_MESSAGE.set_name('FND', 'FLEX-DUPLICATE STRUCT DEF');
374: FND_MESSAGE.set_token('NUM', to_char(structure_number));
375: set_failed;
376: return(NULL);
377: WHEN TOO_MANY_ROWS then
378: FND_MESSAGE.set_name('FND', 'FLEX-DUPLICATE STRUCT DEF');
379: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.GET_DELIMITER');
380: FND_MESSAGE.set_token('APPL', application_short_name);
381: FND_MESSAGE.set_token('CODE', key_flex_code);
382: FND_MESSAGE.set_token('NUM', to_char(structure_number));
375: set_failed;
376: return(NULL);
377: WHEN TOO_MANY_ROWS then
378: FND_MESSAGE.set_name('FND', 'FLEX-DUPLICATE STRUCT DEF');
379: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.GET_DELIMITER');
380: FND_MESSAGE.set_token('APPL', application_short_name);
381: FND_MESSAGE.set_token('CODE', key_flex_code);
382: FND_MESSAGE.set_token('NUM', to_char(structure_number));
383: set_failed;
376: return(NULL);
377: WHEN TOO_MANY_ROWS then
378: FND_MESSAGE.set_name('FND', 'FLEX-DUPLICATE STRUCT DEF');
379: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.GET_DELIMITER');
380: FND_MESSAGE.set_token('APPL', application_short_name);
381: FND_MESSAGE.set_token('CODE', key_flex_code);
382: FND_MESSAGE.set_token('NUM', to_char(structure_number));
383: set_failed;
384: return(NULL);
377: WHEN TOO_MANY_ROWS then
378: FND_MESSAGE.set_name('FND', 'FLEX-DUPLICATE STRUCT DEF');
379: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.GET_DELIMITER');
380: FND_MESSAGE.set_token('APPL', application_short_name);
381: FND_MESSAGE.set_token('CODE', key_flex_code);
382: FND_MESSAGE.set_token('NUM', to_char(structure_number));
383: set_failed;
384: return(NULL);
385: WHEN OTHERS then
378: FND_MESSAGE.set_name('FND', 'FLEX-DUPLICATE STRUCT DEF');
379: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.GET_DELIMITER');
380: FND_MESSAGE.set_token('APPL', application_short_name);
381: FND_MESSAGE.set_token('CODE', key_flex_code);
382: FND_MESSAGE.set_token('NUM', to_char(structure_number));
383: set_failed;
384: return(NULL);
385: WHEN OTHERS then
386: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
382: FND_MESSAGE.set_token('NUM', to_char(structure_number));
383: set_failed;
384: return(NULL);
385: WHEN OTHERS then
386: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
387: FND_MESSAGE.set_token('MSG', 'EXT.get_delimiter() exception: ' || SQLERRM);
388: set_failed;
389: return(NULL);
390: END get_delimiter;
383: set_failed;
384: return(NULL);
385: WHEN OTHERS then
386: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
387: FND_MESSAGE.set_token('MSG', 'EXT.get_delimiter() exception: ' || SQLERRM);
388: set_failed;
389: return(NULL);
390: END get_delimiter;
391:
422: return(0);
423:
424: EXCEPTION
425: WHEN OTHERS then
426: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
427: FND_MESSAGE.set_token('MSG', 'get_ccid() exception: ' || SQLERRM);
428: set_failed;
429: return(0);
430:
423:
424: EXCEPTION
425: WHEN OTHERS then
426: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
427: FND_MESSAGE.set_token('MSG', 'get_ccid() exception: ' || SQLERRM);
428: set_failed;
429: return(0);
430:
431: END get_ccid;
433: /* ------------------------------------------------------------------------ */
434: /* Finds combination_id for given segment values. */
435: /* If validation date is NULL checks all cross-validation rules. */
436: /* Returns TRUE if combination valid, or FALSE and sets error message */
437: /* on server using FND_MESSAGE if invalid. */
438: /* ------------------------------------------------------------------------ */
439: FUNCTION get_combination_id(application_short_name IN VARCHAR2,
440: key_flex_code IN VARCHAR2,
441: structure_number IN NUMBER,
474: return(FALSE);
475:
476: EXCEPTION
477: WHEN OTHERS then
478: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
479: FND_MESSAGE.set_token('MSG','get_combination_id() exception: '||SQLERRM);
480: set_failed;
481: return(FALSE);
482:
475:
476: EXCEPTION
477: WHEN OTHERS then
478: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
479: FND_MESSAGE.set_token('MSG','get_combination_id() exception: '||SQLERRM);
480: set_failed;
481: return(FALSE);
482:
483: END get_combination_id;
515: return(FALSE);
516:
517: EXCEPTION
518: WHEN OTHERS then
519: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
520: FND_MESSAGE.set_token('MSG','get_combination_id() exception: '||SQLERRM);
521: set_failed;
522: return(FALSE);
523:
516:
517: EXCEPTION
518: WHEN OTHERS then
519: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
520: FND_MESSAGE.set_token('MSG','get_combination_id() exception: '||SQLERRM);
521: set_failed;
522: return(FALSE);
523:
524: END get_combination_id;
555:
556: /* ------------------------------------------------------------------------ */
557: /* Returns segment values for the given combination id in the */
558: /* specified flexfield. Returns TRUE if combination found, otherwise */
559: /* returns FALSE and sets error using FND_MESSAGE on the server. */
560: /* Does not check value security rules. */
561: /* Concatenated segment string is NULL if error. */
562: /* ------------------------------------------------------------------------ */
563:
584: return(FALSE);
585:
586: EXCEPTION
587: WHEN OTHERS then
588: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
589: FND_MESSAGE.set_token('MSG', 'get_segments() exception: ' || SQLERRM);
590: set_failed;
591: return(FALSE);
592:
585:
586: EXCEPTION
587: WHEN OTHERS then
588: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
589: FND_MESSAGE.set_token('MSG', 'get_segments() exception: ' || SQLERRM);
590: set_failed;
591: return(FALSE);
592:
593: END get_segments;
594:
595: /* ------------------------------------------------------------------------ */
596: /* Returns segment values for the given combination id in the */
597: /* specified flexfield. Returns TRUE if combination found, otherwise */
598: /* returns FALSE and sets error using FND_MESSAGE on the server. */
599: /* n_segments is 0 and no elements of segments array are assigned if */
600: /* combination not found or on error. */
601: /* Does not check value security rules. */
602: /* ------------------------------------------------------------------------ */
698:
699: -- Check CCID.
700: --
701: IF ((combination_id IS NULL) OR (combination_id < 0)) THEN
702: FND_MESSAGE.set_name('FND','FLEX-BAD CCID INPUT');
703: FND_MESSAGE.set_token('CCID',to_char(combination_id));
704: GOTO label_failure;
705: END IF;
706:
699: -- Check CCID.
700: --
701: IF ((combination_id IS NULL) OR (combination_id < 0)) THEN
702: FND_MESSAGE.set_name('FND','FLEX-BAD CCID INPUT');
703: FND_MESSAGE.set_token('CCID',to_char(combination_id));
704: GOTO label_failure;
705: END IF;
706:
707: -- Read structure and comb. table information.
754: segtypes, 0, tmp_qualcols, 0, tmp_xcolnames, NULL, ccid,
755: value_ids, tbl_derv, drv_quals.sq_values, xcol_vals);
756:
757: if (nfound = 0) then
758: FND_MESSAGE.set_name('FND', 'FLEX-COMBINATION NOT FOUND');
759: FND_MESSAGE.set_token('CCID', combination_id);
760: FND_MESSAGE.set_token('APNM', application_short_name);
761: FND_MESSAGE.set_token('CODE', key_flex_code);
762: FND_MESSAGE.set_token('NUM', structure_number);
755: value_ids, tbl_derv, drv_quals.sq_values, xcol_vals);
756:
757: if (nfound = 0) then
758: FND_MESSAGE.set_name('FND', 'FLEX-COMBINATION NOT FOUND');
759: FND_MESSAGE.set_token('CCID', combination_id);
760: FND_MESSAGE.set_token('APNM', application_short_name);
761: FND_MESSAGE.set_token('CODE', key_flex_code);
762: FND_MESSAGE.set_token('NUM', structure_number);
763: end if;
756:
757: if (nfound = 0) then
758: FND_MESSAGE.set_name('FND', 'FLEX-COMBINATION NOT FOUND');
759: FND_MESSAGE.set_token('CCID', combination_id);
760: FND_MESSAGE.set_token('APNM', application_short_name);
761: FND_MESSAGE.set_token('CODE', key_flex_code);
762: FND_MESSAGE.set_token('NUM', structure_number);
763: end if;
764: if (nfound <> 1) THEN
757: if (nfound = 0) then
758: FND_MESSAGE.set_name('FND', 'FLEX-COMBINATION NOT FOUND');
759: FND_MESSAGE.set_token('CCID', combination_id);
760: FND_MESSAGE.set_token('APNM', application_short_name);
761: FND_MESSAGE.set_token('CODE', key_flex_code);
762: FND_MESSAGE.set_token('NUM', structure_number);
763: end if;
764: if (nfound <> 1) THEN
765: GOTO label_failure;
758: FND_MESSAGE.set_name('FND', 'FLEX-COMBINATION NOT FOUND');
759: FND_MESSAGE.set_token('CCID', combination_id);
760: FND_MESSAGE.set_token('APNM', application_short_name);
761: FND_MESSAGE.set_token('CODE', key_flex_code);
762: FND_MESSAGE.set_token('NUM', structure_number);
763: end if;
764: if (nfound <> 1) THEN
765: GOTO label_failure;
766: end if;
850: RETURN(FALSE);
851:
852: EXCEPTION
853: WHEN OTHERS then
854: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
855: FND_MESSAGE.set_token('MSG', 'get_segments() exception: ' || SQLERRM);
856: set_failed;
857: return(FALSE);
858:
851:
852: EXCEPTION
853: WHEN OTHERS then
854: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
855: FND_MESSAGE.set_token('MSG', 'get_segments() exception: ' || SQLERRM);
856: set_failed;
857: return(FALSE);
858:
859: END get_segments;
890: disp_segs.segflags(ncols) := (seg.display_flag = 'Y');
891: end loop;
892:
893: if(ncols < 1) then
894: FND_MESSAGE.set_name('FND', 'FLEX-CANT FIND SEGMENTS');
895: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.read_displayedsegs()');
896: FND_MESSAGE.set_token('APPID', to_char(fstruct.application_id));
897: FND_MESSAGE.set_token('CODE', fstruct.id_flex_code);
898: FND_MESSAGE.set_token('NUM', to_char(fstruct.id_flex_num));
891: end loop;
892:
893: if(ncols < 1) then
894: FND_MESSAGE.set_name('FND', 'FLEX-CANT FIND SEGMENTS');
895: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.read_displayedsegs()');
896: FND_MESSAGE.set_token('APPID', to_char(fstruct.application_id));
897: FND_MESSAGE.set_token('CODE', fstruct.id_flex_code);
898: FND_MESSAGE.set_token('NUM', to_char(fstruct.id_flex_num));
899: return(FALSE);
892:
893: if(ncols < 1) then
894: FND_MESSAGE.set_name('FND', 'FLEX-CANT FIND SEGMENTS');
895: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.read_displayedsegs()');
896: FND_MESSAGE.set_token('APPID', to_char(fstruct.application_id));
897: FND_MESSAGE.set_token('CODE', fstruct.id_flex_code);
898: FND_MESSAGE.set_token('NUM', to_char(fstruct.id_flex_num));
899: return(FALSE);
900: end if;
893: if(ncols < 1) then
894: FND_MESSAGE.set_name('FND', 'FLEX-CANT FIND SEGMENTS');
895: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.read_displayedsegs()');
896: FND_MESSAGE.set_token('APPID', to_char(fstruct.application_id));
897: FND_MESSAGE.set_token('CODE', fstruct.id_flex_code);
898: FND_MESSAGE.set_token('NUM', to_char(fstruct.id_flex_num));
899: return(FALSE);
900: end if;
901:
894: FND_MESSAGE.set_name('FND', 'FLEX-CANT FIND SEGMENTS');
895: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.read_displayedsegs()');
896: FND_MESSAGE.set_token('APPID', to_char(fstruct.application_id));
897: FND_MESSAGE.set_token('CODE', fstruct.id_flex_code);
898: FND_MESSAGE.set_token('NUM', to_char(fstruct.id_flex_num));
899: return(FALSE);
900: end if;
901:
902: disp_segs.n_segflags := ncols;
904: return(TRUE);
905:
906: EXCEPTION
907: WHEN OTHERS then
908: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
909: FND_MESSAGE.set_token('MSG', 'read_displayedsegs() exception: '||SQLERRM);
910: return(FALSE);
911:
912: END read_displayedsegs;
905:
906: EXCEPTION
907: WHEN OTHERS then
908: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
909: FND_MESSAGE.set_token('MSG', 'read_displayedsegs() exception: '||SQLERRM);
910: return(FALSE);
911:
912: END read_displayedsegs;
913:
939: RETURN(true);
940:
941: EXCEPTION
942: WHEN NO_DATA_FOUND then
943: FND_MESSAGE.set_name('FND', 'FLEX-CANNOT FIND STRUCT DEF');
944: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.is_allow_id_value_sets');
945: FND_MESSAGE.set_token('APPL', i_application_short_name);
946: FND_MESSAGE.set_token('CODE', i_id_flex_code);
947: FND_MESSAGE.set_token('NUM', null);
940:
941: EXCEPTION
942: WHEN NO_DATA_FOUND then
943: FND_MESSAGE.set_name('FND', 'FLEX-CANNOT FIND STRUCT DEF');
944: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.is_allow_id_value_sets');
945: FND_MESSAGE.set_token('APPL', i_application_short_name);
946: FND_MESSAGE.set_token('CODE', i_id_flex_code);
947: FND_MESSAGE.set_token('NUM', null);
948: return(FALSE);
941: EXCEPTION
942: WHEN NO_DATA_FOUND then
943: FND_MESSAGE.set_name('FND', 'FLEX-CANNOT FIND STRUCT DEF');
944: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.is_allow_id_value_sets');
945: FND_MESSAGE.set_token('APPL', i_application_short_name);
946: FND_MESSAGE.set_token('CODE', i_id_flex_code);
947: FND_MESSAGE.set_token('NUM', null);
948: return(FALSE);
949: WHEN TOO_MANY_ROWS then
942: WHEN NO_DATA_FOUND then
943: FND_MESSAGE.set_name('FND', 'FLEX-CANNOT FIND STRUCT DEF');
944: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.is_allow_id_value_sets');
945: FND_MESSAGE.set_token('APPL', i_application_short_name);
946: FND_MESSAGE.set_token('CODE', i_id_flex_code);
947: FND_MESSAGE.set_token('NUM', null);
948: return(FALSE);
949: WHEN TOO_MANY_ROWS then
950: FND_MESSAGE.set_name('FND', 'FLEX-DUPLICATE STRUCT DEF');
943: FND_MESSAGE.set_name('FND', 'FLEX-CANNOT FIND STRUCT DEF');
944: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.is_allow_id_value_sets');
945: FND_MESSAGE.set_token('APPL', i_application_short_name);
946: FND_MESSAGE.set_token('CODE', i_id_flex_code);
947: FND_MESSAGE.set_token('NUM', null);
948: return(FALSE);
949: WHEN TOO_MANY_ROWS then
950: FND_MESSAGE.set_name('FND', 'FLEX-DUPLICATE STRUCT DEF');
951: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.is_allow_id_value_sets');
946: FND_MESSAGE.set_token('CODE', i_id_flex_code);
947: FND_MESSAGE.set_token('NUM', null);
948: return(FALSE);
949: WHEN TOO_MANY_ROWS then
950: FND_MESSAGE.set_name('FND', 'FLEX-DUPLICATE STRUCT DEF');
951: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.is_allow_id_value_sets');
952: FND_MESSAGE.set_token('APPL', i_application_short_name);
953: FND_MESSAGE.set_token('CODE', i_id_flex_code);
954: FND_MESSAGE.set_token('NUM', null);
947: FND_MESSAGE.set_token('NUM', null);
948: return(FALSE);
949: WHEN TOO_MANY_ROWS then
950: FND_MESSAGE.set_name('FND', 'FLEX-DUPLICATE STRUCT DEF');
951: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.is_allow_id_value_sets');
952: FND_MESSAGE.set_token('APPL', i_application_short_name);
953: FND_MESSAGE.set_token('CODE', i_id_flex_code);
954: FND_MESSAGE.set_token('NUM', null);
955: return(FALSE);
948: return(FALSE);
949: WHEN TOO_MANY_ROWS then
950: FND_MESSAGE.set_name('FND', 'FLEX-DUPLICATE STRUCT DEF');
951: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.is_allow_id_value_sets');
952: FND_MESSAGE.set_token('APPL', i_application_short_name);
953: FND_MESSAGE.set_token('CODE', i_id_flex_code);
954: FND_MESSAGE.set_token('NUM', null);
955: return(FALSE);
956: WHEN others THEN
949: WHEN TOO_MANY_ROWS then
950: FND_MESSAGE.set_name('FND', 'FLEX-DUPLICATE STRUCT DEF');
951: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.is_allow_id_value_sets');
952: FND_MESSAGE.set_token('APPL', i_application_short_name);
953: FND_MESSAGE.set_token('CODE', i_id_flex_code);
954: FND_MESSAGE.set_token('NUM', null);
955: return(FALSE);
956: WHEN others THEN
957: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
950: FND_MESSAGE.set_name('FND', 'FLEX-DUPLICATE STRUCT DEF');
951: FND_MESSAGE.set_token('ROUTINE', 'FND_FLEX_EXT.is_allow_id_value_sets');
952: FND_MESSAGE.set_token('APPL', i_application_short_name);
953: FND_MESSAGE.set_token('CODE', i_id_flex_code);
954: FND_MESSAGE.set_token('NUM', null);
955: return(FALSE);
956: WHEN others THEN
957: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
958: FND_MESSAGE.set_token('MSG','is_allow_valuesets() exception: '||SQLERRM);
953: FND_MESSAGE.set_token('CODE', i_id_flex_code);
954: FND_MESSAGE.set_token('NUM', null);
955: return(FALSE);
956: WHEN others THEN
957: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
958: FND_MESSAGE.set_token('MSG','is_allow_valuesets() exception: '||SQLERRM);
959: return(false);
960:
961: END is_allow_id_valuesets;
954: FND_MESSAGE.set_token('NUM', null);
955: return(FALSE);
956: WHEN others THEN
957: FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
958: FND_MESSAGE.set_token('MSG','is_allow_valuesets() exception: '||SQLERRM);
959: return(false);
960:
961: END is_allow_id_valuesets;
962:
977: return(TRUE);
978:
979: EXCEPTION
980: WHEN OTHERS then
981: FND_MESSAGE.set_name('FND', 'FLEX-BAD VDATE STRING');
982: return(FALSE);
983:
984: END convert_vdate;
985:
1004: return(TRUE);
1005:
1006: EXCEPTION
1007: WHEN OTHERS then
1008: FND_MESSAGE.set_name('FND', 'FLEX-BAD SEGMENT ARRAY');
1009: return(FALSE);
1010:
1011: END concat_segs;
1012:
1013: /* ------------------------------------------------------------------------ */
1014: /* Copies varchar2 string to output and traps exception raised if */
1015: /* the user's output string buffer is not big enough to hold the */
1016: /* input string. */
1017: /* Returns FALSE and sets FND_MESSAGE on error. */
1018: /* ------------------------------------------------------------------------ */
1019: FUNCTION output_string(s IN VARCHAR2,
1020: s_out OUT nocopy VARCHAR2) RETURN BOOLEAN IS
1021: BEGIN
1022: s_out := s;
1023: return(TRUE);
1024: EXCEPTION
1025: WHEN OTHERS then
1026: FND_MESSAGE.set_name(NULL, 'FLEX-BUFFER TOO SMALL');
1027: FND_MESSAGE.set_token('EXCEPTION', SQLERRM);
1028: return(FALSE);
1029: END output_string;
1030:
1023: return(TRUE);
1024: EXCEPTION
1025: WHEN OTHERS then
1026: FND_MESSAGE.set_name(NULL, 'FLEX-BUFFER TOO SMALL');
1027: FND_MESSAGE.set_token('EXCEPTION', SQLERRM);
1028: return(FALSE);
1029: END output_string;
1030:
1031: /* ----------------------------------------------------------------------- */