6: g_debug_mode BOOLEAN := TRUE;
7:
8: -- Type of group list description
9: TYPE group_list_type IS RECORD (
10: pk_attrib_id igs_en_attrib_values.attrib_id%TYPE, --PK attrib which provides versions for the loop
11: ord_by_attrib_id igs_en_attrib_values.attrib_id%TYPE, --Odrer by attrib id
12: attrib_amount NUMBER, --Amount of the described attribs in the table
13: attrib_start_index NUMBER ); --Start index in the table with the attrib info
14:
7:
8: -- Type of group list description
9: TYPE group_list_type IS RECORD (
10: pk_attrib_id igs_en_attrib_values.attrib_id%TYPE, --PK attrib which provides versions for the loop
11: ord_by_attrib_id igs_en_attrib_values.attrib_id%TYPE, --Odrer by attrib id
12: attrib_amount NUMBER, --Amount of the described attribs in the table
13: attrib_start_index NUMBER ); --Start index in the table with the attrib info
14:
15:
19: INDEX BY BINARY_INTEGER;
20:
21: -- Type of attrib list description
22: TYPE attrib_list_type IS RECORD (
23: attrib_id igs_en_attrib_values.attrib_id%TYPE, --ID of the attribute. If 0 - then attrib is a constant and has a default value
24: len NUMBER (10), -- Lenght of the full value
25: format_mask VARCHAR2(30), -- Not used
26: empty_space_fill VARCHAR2(1) , -- If the value length is less then provided then the rest is filled with this character
27: pre_attrib_char VARCHAR2(1) , -- Character added before the value
38: p_debug_message IN VARCHAR2
39: );
40:
41: FUNCTION Format_Attrib (
42: p_obj_type_id IN igs_en_attrib_values.obj_type_id%TYPE ,
43: p_obj_id IN igs_en_attrib_values.obj_id%TYPE ,
44: p_version IN igs_en_attrib_values.version%TYPE ,
45: p_attr_def IN attrib_list_type
46: )RETURN VARCHAR2;
39: );
40:
41: FUNCTION Format_Attrib (
42: p_obj_type_id IN igs_en_attrib_values.obj_type_id%TYPE ,
43: p_obj_id IN igs_en_attrib_values.obj_id%TYPE ,
44: p_version IN igs_en_attrib_values.version%TYPE ,
45: p_attr_def IN attrib_list_type
46: )RETURN VARCHAR2;
47:
40:
41: FUNCTION Format_Attrib (
42: p_obj_type_id IN igs_en_attrib_values.obj_type_id%TYPE ,
43: p_obj_id IN igs_en_attrib_values.obj_id%TYPE ,
44: p_version IN igs_en_attrib_values.version%TYPE ,
45: p_attr_def IN attrib_list_type
46: )RETURN VARCHAR2;
47:
48:
84: l_attr_val VARCHAR2(255);
85:
86: CURSOR c_group_vers (c_pk_id NUMBER, c_ord_id NUMBER) IS
87: SELECT pk_tbl.version
88: FROM igs_en_attrib_values pk_tbl,
89: igs_en_attrib_values ord_tbl
90: WHERE pk_tbl.obj_type_id = ord_tbl.obj_type_id (+)
91: AND pk_tbl.obj_id = ord_tbl.obj_id (+)
92: AND pk_tbl.version = ord_tbl.version (+)
85:
86: CURSOR c_group_vers (c_pk_id NUMBER, c_ord_id NUMBER) IS
87: SELECT pk_tbl.version
88: FROM igs_en_attrib_values pk_tbl,
89: igs_en_attrib_values ord_tbl
90: WHERE pk_tbl.obj_type_id = ord_tbl.obj_type_id (+)
91: AND pk_tbl.obj_id = ord_tbl.obj_id (+)
92: AND pk_tbl.version = ord_tbl.version (+)
93: AND pk_tbl.obj_id = p_doc_inst_id
238:
239: /* Procedure retrieves and formats the particular attribute value */
240:
241: FUNCTION Format_Attrib (
242: p_obj_type_id IN igs_en_attrib_values.obj_type_id%TYPE ,
243: p_obj_id IN igs_en_attrib_values.obj_id%TYPE ,
244: p_version IN igs_en_attrib_values.version%TYPE ,
245: p_attr_def IN attrib_list_type
246: )RETURN VARCHAR2
239: /* Procedure retrieves and formats the particular attribute value */
240:
241: FUNCTION Format_Attrib (
242: p_obj_type_id IN igs_en_attrib_values.obj_type_id%TYPE ,
243: p_obj_id IN igs_en_attrib_values.obj_id%TYPE ,
244: p_version IN igs_en_attrib_values.version%TYPE ,
245: p_attr_def IN attrib_list_type
246: )RETURN VARCHAR2
247: IS
240:
241: FUNCTION Format_Attrib (
242: p_obj_type_id IN igs_en_attrib_values.obj_type_id%TYPE ,
243: p_obj_id IN igs_en_attrib_values.obj_id%TYPE ,
244: p_version IN igs_en_attrib_values.version%TYPE ,
245: p_attr_def IN attrib_list_type
246: )RETURN VARCHAR2
247: IS
248: l_value VARCHAR2(255);