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