[Home] [Help]
PACKAGE BODY: APPS.WS_SAMPLES
Source
1 package body WS_SAMPLES as
2 -- $Header: wssmplb.pls 115.0 2003/10/16 21:53:37 jjxie noship $
3
4 --
5 -- generate (PUBLIC)
6 -- Sample Web Services generate function to procedure outbound
7 -- XML document
8 -- IN:
9 -- p_event_name - Event to be processes
10 -- p_event_key - Event key
11 -- p_parameter_list - parameter list
12 -- OUT
13 -- CLOB - Event data
14 --
15
16 function generate
17 (
18 p_event_name in varchar2,
19 p_event_key in varchar2,
20 p_parameter_list in wf_parameter_list_t
21 ) return CLOB
22 is
23
24 p_xmldoc clob;
25 i_xmldoc varchar2(4000);
26
27 begin
28
29 dbms_lob.createtemporary(p_xmldoc,true,dbms_lob.session);
30 i_xmldoc := '<s0:AnnouncementDate>11/11/2003</s0:AnnouncementDate>';
31 dbms_lob.write(p_xmldoc, 53, 1, i_xmldoc);
32 --dbms_lob.freetemporary(p_xmldoc);
33
34 return p_xmldoc;
35
36 exception
37
38 when others then
39 wf_core.context('WS_SAMPLES', 'Generate', p_event_name, p_event_key);
40 raise;
41
42 end generate;
43
44
45 end WS_SAMPLES;