4: p_flexfield_name IN varchar2,
5: name OUT NOCOPY /* file.sql.39 change */ varchar2,
6: apps_name OUT NOCOPY /* file.sql.39 change */ varchar2,
7: nr_segs OUT NOCOPY /* file.sql.39 change */ number,
8: dfs_name OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
9: dfs_dbcolumn_name OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
10: dfs_default_value OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
11: dfs_prompt OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
12: dfs_max_size OUT NOCOPY /* file.sql.39 change */ jtf_number_table,
5: name OUT NOCOPY /* file.sql.39 change */ varchar2,
6: apps_name OUT NOCOPY /* file.sql.39 change */ varchar2,
7: nr_segs OUT NOCOPY /* file.sql.39 change */ number,
8: dfs_name OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
9: dfs_dbcolumn_name OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
10: dfs_default_value OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
11: dfs_prompt OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
12: dfs_max_size OUT NOCOPY /* file.sql.39 change */ jtf_number_table,
13: dfs_min_value OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
6: apps_name OUT NOCOPY /* file.sql.39 change */ varchar2,
7: nr_segs OUT NOCOPY /* file.sql.39 change */ number,
8: dfs_name OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
9: dfs_dbcolumn_name OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
10: dfs_default_value OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
11: dfs_prompt OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
12: dfs_max_size OUT NOCOPY /* file.sql.39 change */ jtf_number_table,
13: dfs_min_value OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
14: dfs_max_value OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
7: nr_segs OUT NOCOPY /* file.sql.39 change */ number,
8: dfs_name OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
9: dfs_dbcolumn_name OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
10: dfs_default_value OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
11: dfs_prompt OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
12: dfs_max_size OUT NOCOPY /* file.sql.39 change */ jtf_number_table,
13: dfs_min_value OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
14: dfs_max_value OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
15: dfs_mandatory OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_100,
9: dfs_dbcolumn_name OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
10: dfs_default_value OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
11: dfs_prompt OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
12: dfs_max_size OUT NOCOPY /* file.sql.39 change */ jtf_number_table,
13: dfs_min_value OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
14: dfs_max_value OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
15: dfs_mandatory OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_100,
16: dfs_default_type OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_100,
17: dfs_valtype OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_100,
10: dfs_default_value OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
11: dfs_prompt OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
12: dfs_max_size OUT NOCOPY /* file.sql.39 change */ jtf_number_table,
13: dfs_min_value OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
14: dfs_max_value OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300,
15: dfs_mandatory OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_100,
16: dfs_default_type OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_100,
17: dfs_valtype OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_100,
18: dfs_lov_id OUT NOCOPY /* file.sql.39 change */ jtf_number_table,
43: name := p_flexfield_name;
44: apps_name := p_application;
45:
46: -- initialize those arrays.
47: dfs_name := jtf_varchar2_table_300();
48: dfs_dbcolumn_name := jtf_varchar2_table_300();
49: dfs_default_value := jtf_varchar2_table_300();
50: dfs_prompt := jtf_varchar2_table_300();
51: dfs_max_size := jtf_number_table();
44: apps_name := p_application;
45:
46: -- initialize those arrays.
47: dfs_name := jtf_varchar2_table_300();
48: dfs_dbcolumn_name := jtf_varchar2_table_300();
49: dfs_default_value := jtf_varchar2_table_300();
50: dfs_prompt := jtf_varchar2_table_300();
51: dfs_max_size := jtf_number_table();
52: dfs_min_value := jtf_varchar2_table_300();
45:
46: -- initialize those arrays.
47: dfs_name := jtf_varchar2_table_300();
48: dfs_dbcolumn_name := jtf_varchar2_table_300();
49: dfs_default_value := jtf_varchar2_table_300();
50: dfs_prompt := jtf_varchar2_table_300();
51: dfs_max_size := jtf_number_table();
52: dfs_min_value := jtf_varchar2_table_300();
53: dfs_max_value := jtf_varchar2_table_300();
46: -- initialize those arrays.
47: dfs_name := jtf_varchar2_table_300();
48: dfs_dbcolumn_name := jtf_varchar2_table_300();
49: dfs_default_value := jtf_varchar2_table_300();
50: dfs_prompt := jtf_varchar2_table_300();
51: dfs_max_size := jtf_number_table();
52: dfs_min_value := jtf_varchar2_table_300();
53: dfs_max_value := jtf_varchar2_table_300();
54: dfs_mandatory := jtf_varchar2_table_100();
48: dfs_dbcolumn_name := jtf_varchar2_table_300();
49: dfs_default_value := jtf_varchar2_table_300();
50: dfs_prompt := jtf_varchar2_table_300();
51: dfs_max_size := jtf_number_table();
52: dfs_min_value := jtf_varchar2_table_300();
53: dfs_max_value := jtf_varchar2_table_300();
54: dfs_mandatory := jtf_varchar2_table_100();
55: dfs_default_type := jtf_varchar2_table_100();
56: dfs_valtype := jtf_varchar2_table_100();
49: dfs_default_value := jtf_varchar2_table_300();
50: dfs_prompt := jtf_varchar2_table_300();
51: dfs_max_size := jtf_number_table();
52: dfs_min_value := jtf_varchar2_table_300();
53: dfs_max_value := jtf_varchar2_table_300();
54: dfs_mandatory := jtf_varchar2_table_100();
55: dfs_default_type := jtf_varchar2_table_100();
56: dfs_valtype := jtf_varchar2_table_100();
57: dfs_lov_id := jtf_number_table();
168: RETURN;
169: END Get_Flexfield;
170:
171: procedure Get_ValueSet(p_valueset_id IN number,
172: x_value OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300 ,
173: x_meaning OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300) IS
174: l_valueset_info FND_VSET.valueset_r;
175: l_valueset_format FND_VSET.valueset_dr;
176: l_setvalue FND_VSET.value_dr;
169: END Get_Flexfield;
170:
171: procedure Get_ValueSet(p_valueset_id IN number,
172: x_value OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300 ,
173: x_meaning OUT NOCOPY /* file.sql.39 change */ jtf_varchar2_table_300) IS
174: l_valueset_info FND_VSET.valueset_r;
175: l_valueset_format FND_VSET.valueset_dr;
176: l_setvalue FND_VSET.value_dr;
177: l_rowcount NUMBER;
180: BEGIN
181: FND_VSET.Get_ValueSet(p_valueset_id, l_valueset_info, l_valueset_format);
182: -- no exception, valueset information retrieved.
183: FND_VSET.get_value_init(l_valueset_info, TRUE);
184: x_value := jtf_varchar2_table_300();
185: x_meaning := jtf_varchar2_table_300();
186: l_count := 1;
187: LOOP
188: FND_VSET.get_value(l_valueset_info, l_rowcount, l_found, l_setvalue);
181: FND_VSET.Get_ValueSet(p_valueset_id, l_valueset_info, l_valueset_format);
182: -- no exception, valueset information retrieved.
183: FND_VSET.get_value_init(l_valueset_info, TRUE);
184: x_value := jtf_varchar2_table_300();
185: x_meaning := jtf_varchar2_table_300();
186: l_count := 1;
187: LOOP
188: FND_VSET.get_value(l_valueset_info, l_rowcount, l_found, l_setvalue);
189: EXIT WHEN l_found <> TRUE;