40:
41: l_mrc_flag VARCHAR2(1) := paapimp_pkg.get_mrc_flag;
42:
43: FUNCTION check_required_segment (structnum number) RETURN varchar2 IS
44: fftype fnd_flex_key_api.flexfield_type;
45: numstruct number;
46: liststruct fnd_flex_key_api.structure_list;
47: thestruct fnd_flex_key_api.structure_type;
48: numsegs number;
42:
43: FUNCTION check_required_segment (structnum number) RETURN varchar2 IS
44: fftype fnd_flex_key_api.flexfield_type;
45: numstruct number;
46: liststruct fnd_flex_key_api.structure_list;
47: thestruct fnd_flex_key_api.structure_type;
48: numsegs number;
49: listsegs fnd_flex_key_api.segment_list;
50: segtype fnd_flex_key_api.segment_type;
43: FUNCTION check_required_segment (structnum number) RETURN varchar2 IS
44: fftype fnd_flex_key_api.flexfield_type;
45: numstruct number;
46: liststruct fnd_flex_key_api.structure_list;
47: thestruct fnd_flex_key_api.structure_type;
48: numsegs number;
49: listsegs fnd_flex_key_api.segment_list;
50: segtype fnd_flex_key_api.segment_type;
51: segname fnd_id_flex_segments.segment_name%TYPE;
45: numstruct number;
46: liststruct fnd_flex_key_api.structure_list;
47: thestruct fnd_flex_key_api.structure_type;
48: numsegs number;
49: listsegs fnd_flex_key_api.segment_list;
50: segtype fnd_flex_key_api.segment_type;
51: segname fnd_id_flex_segments.segment_name%TYPE;
52: BEGIN
53: fnd_flex_key_api.set_session_mode('seed_data');
46: liststruct fnd_flex_key_api.structure_list;
47: thestruct fnd_flex_key_api.structure_type;
48: numsegs number;
49: listsegs fnd_flex_key_api.segment_list;
50: segtype fnd_flex_key_api.segment_type;
51: segname fnd_id_flex_segments.segment_name%TYPE;
52: BEGIN
53: fnd_flex_key_api.set_session_mode('seed_data');
54: fftype := fnd_flex_key_api.find_flexfield(appl_short_name =>'OFA',
49: listsegs fnd_flex_key_api.segment_list;
50: segtype fnd_flex_key_api.segment_type;
51: segname fnd_id_flex_segments.segment_name%TYPE;
52: BEGIN
53: fnd_flex_key_api.set_session_mode('seed_data');
54: fftype := fnd_flex_key_api.find_flexfield(appl_short_name =>'OFA',
55: flex_code =>'KEY#');
56: thestruct := fnd_flex_key_api.find_structure(fftype,structnum);
57: fnd_flex_key_api.get_segments(fftype,thestruct,TRUE,numsegs,listsegs);
50: segtype fnd_flex_key_api.segment_type;
51: segname fnd_id_flex_segments.segment_name%TYPE;
52: BEGIN
53: fnd_flex_key_api.set_session_mode('seed_data');
54: fftype := fnd_flex_key_api.find_flexfield(appl_short_name =>'OFA',
55: flex_code =>'KEY#');
56: thestruct := fnd_flex_key_api.find_structure(fftype,structnum);
57: fnd_flex_key_api.get_segments(fftype,thestruct,TRUE,numsegs,listsegs);
58: for i in 1 .. numsegs loop
52: BEGIN
53: fnd_flex_key_api.set_session_mode('seed_data');
54: fftype := fnd_flex_key_api.find_flexfield(appl_short_name =>'OFA',
55: flex_code =>'KEY#');
56: thestruct := fnd_flex_key_api.find_structure(fftype,structnum);
57: fnd_flex_key_api.get_segments(fftype,thestruct,TRUE,numsegs,listsegs);
58: for i in 1 .. numsegs loop
59: segtype := fnd_flex_key_api.find_segment(fftype,thestruct,listsegs(i));
60: if (segtype.required_flag = 'Y' and segtype.enabled_flag = 'Y') then
53: fnd_flex_key_api.set_session_mode('seed_data');
54: fftype := fnd_flex_key_api.find_flexfield(appl_short_name =>'OFA',
55: flex_code =>'KEY#');
56: thestruct := fnd_flex_key_api.find_structure(fftype,structnum);
57: fnd_flex_key_api.get_segments(fftype,thestruct,TRUE,numsegs,listsegs);
58: for i in 1 .. numsegs loop
59: segtype := fnd_flex_key_api.find_segment(fftype,thestruct,listsegs(i));
60: if (segtype.required_flag = 'Y' and segtype.enabled_flag = 'Y') then
61: return('Y');
55: flex_code =>'KEY#');
56: thestruct := fnd_flex_key_api.find_structure(fftype,structnum);
57: fnd_flex_key_api.get_segments(fftype,thestruct,TRUE,numsegs,listsegs);
58: for i in 1 .. numsegs loop
59: segtype := fnd_flex_key_api.find_segment(fftype,thestruct,listsegs(i));
60: if (segtype.required_flag = 'Y' and segtype.enabled_flag = 'Y') then
61: return('Y');
62: end if;
63: end loop;