PACKAGE: APPS.ECX_PRINT_LOCAL

Source

1 package ecx_print_local as
2 -- $Header: ECXLXMLS.pls 120.2 2006/05/11 02:08:03 arsriniv ship $
3 
4 /**
5 Public Constant Definitions
6 **/
7 
8 -- Stores the temporary XML Document in the buffer. Later on it is written to CLOB
9 -- and parsed using xmlparser.
10 
11 type		tmpxml_rec is table of varchar2(32767) index by binary_integer;
12 i_tmpxml	tmpxml_rec;
13 
14 -- boolean to aid root element printing
15 first_time_printing	Boolean	:= true;
16 
17 /**
18 Formatting tags for XML Document
19 **/
20 i_elestarttag	varchar2(1) :='<';
21 i_eleendtag	varchar2(1) :='>';
22 i_eleclosetag	varchar2(2) := '</';
23 i_pistart	varchar2(2) := '<?';
24 i_piend		varchar2(2) := '?>';
25 i_commstart	varchar2(4) := '<!--';
26 i_commend	varchar2(3) := '-->';
27 i_cdatastarttag varchar2(9) := '<![CDATA[';
28 i_cdataendtag   varchar2(3) := ']]>';
29 
30 TYPE	node_stack	is table of pls_integer index by binary_integer;
31 /**
32 Define Local Node Stack table
33 **/
34 l_node_stack	node_stack;
35 
36 -- needed for discntinuous elements printng
37 last_printed            pls_integer := -1;
38 
39 procedure print_discont_elements
40         (
41         i_start_pos             IN      pls_integer,
42         i_end_pos               IN      pls_integer,
43         i_parent_attr_id        IN      pls_integer,
44         i_ext_level             IN      pls_integer
45         );
46 
47 procedure xmlPOPALL(
48    x_xmldoc OUT NOCOPY  clob);
49 
50 procedure xmlPUSH
51 	(
52 	i       pls_integer
53 	);
54 procedure xmlPOP;
55 
56 procedure element_open
57 	(
58 	tag_name	IN	varchar2
59 	);
60 
61 procedure element_close;
62 
63 procedure element_node_open
64 	(
65 	tag_name	IN	varchar2,
66 	value		IN	varchar2,
67         clob_value	IN	clob
68 	);
69 
70 procedure element_node_close
71 	(
72 	tag_name	IN	varchar2
73 	);
74 
75 procedure cdata_element_node_open
76 	(
77 	tag_name	IN	varchar2,
78         value           IN      varchar2,
79 	clob_value	IN	clob
80 	);
81 
82 
83 procedure cdata_element_node_close
84 	(
85 	tag_name	IN	varchar2,
86         value           IN      varchar2,
87 	clob_value	IN	clob
88 	);
89 
90 procedure get_chunks
91         (
92           clob_value    IN clob ,
93           is_cdata      IN boolean default false
94         );
95 
96 procedure get_chunks
97         (
98           value    IN Varchar2,
99           is_cdata      IN boolean default false
100 
101         );
102 
103 procedure element_node
104 	(
105 	tag_name	IN	varchar2,
106 	value		IN	varchar2
107 	);
108 
109 procedure attribute_node
110 	(
111 	attribute_name	IN	varchar2,
112 	attribute_value	IN	varchar2
113 	);
114 
115 procedure pi_node
116 	(
117 	pi	IN	varchar2,
118 	attribute_string	in	varchar2 :=NULL
119 	);
120 
121 procedure document_node
122 	(
123 	root_element    in      varchar2,
124 	filename        IN      varchar2,
125 	dtd_url		IN	varchar2
126 	);
127 
128 procedure comment_node
129 	(
130 	value	IN	varchar2
131 	);
132 
133 procedure print_new_level
134 	(
135 	i_level		IN	pls_integer,
136 	i_index		IN	pls_integer
137 	);
138 
139 function is_descendant (
140         i_parent_id     IN      pls_integer,
141         i_element_id    IN      pls_integer
142         ) return                boolean;
143 
144 procedure escape_spec_char (
145                            p_value   IN         Varchar2,
146                            x_value   OUT NOCOPY Varchar2);
147 
148 procedure replace_spec_char(
149                            p_value   IN         Varchar2,
150                            x_value   OUT NOCOPY Varchar2);
151 
152 
153 
154 end ecx_print_local;