[Home] [Help]
PACKAGE BODY: APPS.POS_ASN_MASTER_PKG
Source
1 PACKAGE BODY POS_ASN_MASTER_PKG AS
2 /* $Header: POSASNMB.pls 115.2 2001/10/29 17:18:46 pkm ship $*/
3
4
5 PROCEDURE BogusFrame IS
6 BEGIN
7
8 htp.htmlOpen;
9 htp.linkRel('STYLESHEET', '/OA_HTML/US/POSSTYLE.css');
10
11 htp.title('Web Suppliers Bogus Frame');
12 htp.headOpen;
13 htp.headClose;
14
15 htp.bodyOpen(NULL, 'bgcolor=#cccccc');
16
17 htp.bodyClose;
18 htp.htmlClose;
19
20 END BogusFrame;
21
22
23
24 /* ShowFrameSet
25 * ------------
26 */
27 PROCEDURE ShowFrameSet(p_respID VARCHAR2) IS
28 l_language VARCHAR2(5);
29 l_script_name VARCHAR2(240);
30 l_org_id NUMBER;
31 l_user_id NUMBER;
32 l_session_id NUMBER;
33 BEGIN
34
35 POS_INIT_SESSION_PKG.InitSession(p_respID);
36
37 l_session_id := icx_sec.getID(icx_sec.PV_SESSION_ID);
38 l_org_id := icx_sec.getID(icx_sec.PV_ORG_ID);
39 l_language := icx_sec.getID(icx_sec.PV_LANGUAGE_CODE);
40 l_script_name := owa_util.get_cgi_env('SCRIPT_NAME');
41 l_user_id := icx_sec.getID(icx_sec.PV_WEB_USER_ID);
42
43 htp.htmlOpen;
44 htp.title(fnd_message.get_string('ICX', 'ICX_POS_ENTER_ASN'));
45
46 htp.headOpen;
47 icx_util.copyright;
48
49 htp.linkRel('STYLESHEET', '/OA_HTML/US/POSSTYLE.css');
50
51 js.scriptOpen;
52 pos_global_vars_sv.InitializeMessageArray;
53 pos_global_vars_sv.InitializeOtherVars(l_script_name);
54 js.scriptClose;
55 htp.p(' <script src="/OA_HTML/POSCUTIL.js" language="JavaScript">');
56 htp.p(' </script>');
57 htp.p(' <script src="/OA_HTML/POSWUTIL.js" language="JavaScript">');
58 htp.p(' </script>');
59 htp.p(' <script src="/OA_HTML/POSEVENT.js" language="JavaScript">');
60 htp.p(' </script>');
61 --icx_util.LOVscript;
62
63
64 htp.headClose;
65 -- htp.bodyOpen(NULL, 'bgcolor=#336699');
66
67
68 -- Here, we are using nested framesets. The illusion that
69 -- we want to achieve is as follows:
70 --
71 -- ************************************
72 -- * toolbar *
73 -- ************************************
74 -- * * upperbanner * *
75 -- * ****************************** *
76 -- * * search * *
77 -- * ****************************** *
78 -- * * results * *
79 -- * ****************************** *
80 -- * * lowerbanner * *
81 -- ************************************
82 -- * controlregion *
83 -- ************************************
84
85 -- these partitions should probably be in percentages
86 htp.p('<frameset rows="50,*,40" border=0>');
87
88 -- Toolbar frame
89 htp.p('<frame src="' || l_script_name || '/pos_toolbar_sv.PaintToolbar?p_title=ICX_POS_ENTER_ASN"');
90 htp.p(' name=toolbar');
91 htp.p(' marginwidth=6');
92 htp.p(' marginheight=2');
93 htp.p(' scrolling=no>');
94
95 -- these partitions should probably be in percentages
96 htp.p('<frameset cols="3,*,3" border=0>');
97
98 -- blue border frame
99 htp.p('<frame src="/OA_HTML/US/POSBLBOR.htm"
100 name=borderLeft
101 marginwidth=0
102 marginheight=0
103 scrolling=no>');
104 -- these partitions should probably be in percentages
105 htp.p('<frameset rows="30,*,5" border=0>');
106
107 -- upper banner frame
108 -- htp.p('<frame src="/OA_HTML/US/POSUPBAN.htm"');
109 htp.p('<frame src="' || l_script_name || '/pos_upper_banner_sv.PaintUpperBanner?p_product=ICX&p_title=ICX_POS_ASN_SELECT"');
110 htp.p(' name=upperbanner');
111 htp.p(' marginwidth=0');
112 htp.p(' marginheight=0');
113 htp.p(' scrolling=no>');
114
115 -- search frame
116 htp.p('<frame src="' || l_script_name || '/pos_asn_search_pkg.search_page"');
117 --htp.p('<frame src="' || l_script_name || '/pos_test.BogusFrame"');
118 htp.p(' name=content');
119 htp.p(' marginwidth=0');
120 htp.p(' marginheight=0');
121 htp.p(' scrolling=auto>');
122 /*
123 -- details frame
124 --htp.p('<frame src="' || l_script_name || '/pos_asn_search_pkg.result_frame"');
125 htp.p('<frame src="' || l_script_name || '/pos_test.BogusFrame"');
126 htp.p(' name=results');
127 htp.p(' marginwidth=0');
128 htp.p(' marginheight=0');
129 htp.p(' scrolling=yes>');
130 */
131 -- lower banner frame
132 htp.p('<frame src="/OA_HTML/US/POSLWBAN.htm"');
133 htp.p(' name=lowerbanner');
134 htp.p(' marginwidth=0');
135 htp.p(' marginheight=0');
136 htp.p(' scrolling=no>');
137
138 htp.p('</frameset>');
139
140 -- blue border frame
141 htp.p('<frame src="/OA_HTML/US/POSBLBOR.htm"
142 name=borderRight
143 marginwidth=0
144 marginheight=0
145 scrolling=no>');
146
147 htp.p('</frameset>');
148
149 -- control region frame
150 htp.p('<frame src="' || l_script_name || '/pos_control_region_sv.PaintControlRegion?p_position=SELECT"');
151 htp.p(' name=controlregion');
152 htp.p(' marginwidth=0');
153 htp.p(' marginheight=0');
154 htp.p(' scrolling=no>');
155
156 htp.p('</frameset>');
157
158
159 -- htp.bodyClose;
160 htp.htmlClose;
161
162 END ShowFrameSet;
163
164
165
166 /* Discard
167 * -------
168 */
169 PROCEDURE Discard IS
170 l_language VARCHAR2(5);
171 l_script_name VARCHAR2(240);
172 l_org_id NUMBER;
173 l_user_id NUMBER;
174 l_session_id NUMBER;
175 BEGIN
176
177 IF NOT icx_sec.validatesession THEN
178 RETURN;
179 END IF;
180
181 l_session_id := icx_sec.getID(icx_sec.PV_SESSION_ID);
182 l_org_id := icx_sec.getID(icx_sec.PV_ORG_ID);
183 l_language := icx_sec.getID(icx_sec.PV_LANGUAGE_CODE);
184 l_script_name := owa_util.get_cgi_env('SCRIPT_NAME');
185 l_user_id := icx_sec.getID(icx_sec.PV_WEB_USER_ID);
186
187 DELETE FROM POS_ASN_SHOP_CART_HEADERS
188 WHERE session_id = l_session_id;
189
190 DELETE FROM POS_ASN_SHOP_CART_DETAILS
191 WHERE session_id = l_session_id;
192
193 DELETE FROM POS_ASN_SEARCH_RESULT
194 WHERE session_id = l_session_id;
195
196 COMMIT;
197
198 END Discard;
199
200 END POS_ASN_MASTER_PKG;