DBA Data[Home] [Help]

PACKAGE BODY: APPS.XNP_CALLBACK_EVENTS$

Source


1 package body xnp_callback_events$ as
2 /* $Header: XNPWEBCB.pls 120.0 2005/05/30 11:46:57 appldev noship $ */
3 
4 
5 --------------------------------------------------------------------------------
6 -- Name:        xnp_callback_events$.Startup
7 --
8 -- Description: This procedure is the entry point for the 'xnp_callback_events$'
9 --              module (Callback Events).
10 --
11 -- Parameters:  None
12 --
13 --------------------------------------------------------------------------------
14    procedure Startup is
15    begin
16 
17       XNP_WSGL.RegisterURL('xnp_callback_events$.startup');
18       if XNP_WSGL.NotLowerCase then
19          return;
20       end if;
21       XNP_WSGL.StoreURLLink(0, 'Callback Events');
22 
23 
24       xnp_callback_events$xnp_callba.startup(
25       Z_DIRECT_CALL=>TRUE);
26 
27    exception
28       when others then
29          XNP_WSGL.DisplayMessage(XNP_WSGL.MESS_EXCEPTION, SQLERRM, 'Callback Events',
30                              'BGCOLOR="CCCCCC"', 'xnp_callback_events$.Startup');
31    end;
32 --------------------------------------------------------------------------------
33 -- Name:        xnp_callback_events$.firstpage
34 --
35 -- Description: This procedure creates the first page for the 'xnp_callback_events$'
36 --              module (Callback Events).
37 --
38 -- Parameters:  Z_DIRECT_CALL
39 --
40 --------------------------------------------------------------------------------
41    procedure FirstPage(Z_DIRECT_CALL in boolean) is
42    begin
43 
44       XNP_WSGL.OpenPageHead('Callback Events');
45       TemplateHeader(TRUE,0);
46       XNP_WSGL.ClosePageHead;
47 
48       XNP_WSGL.OpenPageBody(FALSE, p_attributes=>'BGCOLOR="CCCCCC"');
49 
50       --htp.p(htf.header(1,fnd_message.get_string('XNP','WEB_XNPCALLBACK_EVENTS_TITLE')));
51       htp.p(htf.header(1,fnd_message.get_string('XNP','Callback Event Diagnostics')));
52 
53       XNP_WSGL.NavLinks(XNP_WSGL.MENU_LONG, htf.italic(fnd_message.get_string('XNP','ABOUT_XNP')), 0, 'xnp_callback_events$.showabout');
54       XNP_WSGL.NavLinks;
55 
56 
57       XNP_WSGL.ClosePageBody;
58 
59    exception
60       when others then
61          XNP_WSGL.DisplayMessage(XNP_WSGL.MESS_EXCEPTION, SQLERRM, 'Callback Events',
62                              'BGCOLOR="CCCCCC"', 'xnp_callback_events$.FirstPage');
63    end;
64 --------------------------------------------------------------------------------
65 -- Name:        xnp_callback_events$.showabout
66 --
67 -- Description: This procedure is used to display an 'About' page for the
68 --		'xnp_callback_events$' module (Callback Events).
69 --
70 --------------------------------------------------------------------------------
71    procedure showabout is
72    begin
73 
74       XNP_WSGL.RegisterURL('xnp_callback_events$.showabout');
75       if XNP_WSGL.NotLowerCase then
76          return;
77       end if;
78 
79       XNP_WSGL.OpenPageHead(XNP_WSGL.MsgGetText(107,XNP_WSGLM.DSP107_ABOUT)||' Callback Events');
80       TemplateHeader(TRUE,0);
81       XNP_WSGL.ClosePageHead;
82 
83       XNP_WSGL.OpenPageBody(FALSE, p_attributes=>'BGCOLOR="CCCCCC"');
84 
85       htp.p(htf.bold(fnd_message.get_string('XNP','WEB_TITLE')));
86 
87       --htp.p(htf.header(1,fnd_message.get_string('XNP','WEB_XNPCALLBACK_EVENTS_TITLE')));
88       htp.p(htf.header(1,fnd_message.get_string('XNP','Callback Event Diagnostics')));
89 
90 
91       htp.para;
92 
93       htp.p(XNP_WSGL.MsgGetText(108,XNP_WSGLM.DSP108_GENERATED_BY, 'WebServer Generator', '2.0.24.0.0'));
94       htp.para;
95 
96       XNP_WSGL.Info(FALSE, 'XNP', 'XNPCBEVT');
97 
98 
99       htp.p(htf.img('/OA_MEDIA/FNDLOGOS.gif'));
100 
101       XNP_WSGL.ClosePageBody;
102 
103    exception
104       when others then
105          XNP_WSGL.DisplayMessage(XNP_WSGL.MESS_EXCEPTION, SQLERRM, 'Callback Events',
106                              'BGCOLOR="CCCCCC"', 'xnp_callback_events$.ShowAbout');
107    end;
108 --------------------------------------------------------------------------------
109 -- Name:        xnp_callback_events$.TemplateHeader
110 --
111 -- Description:
112 --
113 --------------------------------------------------------------------------------
114    procedure TemplateHeader(Z_DIRECT_CALL in boolean,
115                             Z_TEMPLATE_ID in number) is
116    begin
117 
118       null;
119 
120    exception
121       when others then
122          XNP_WSGL.DisplayMessage(XNP_WSGL.MESS_EXCEPTION, SQLERRM, 'Callback Events',
123                              'BGCOLOR="CCCCCC"', 'xnp_callback_events$.TemplateHeader');
124    end;
125 end;