DBA Data[Home] [Help]

PACKAGE BODY: APPS.POS_WINDOW

Source


1 PACKAGE BODY POS_WINDOW AS
2 /* $Header: POSASLWB.pls 115.1 99/10/14 16:18:24 porting shi $ */
3 
4   /* DialogBox
5    * ---------
6    */
7   PROCEDURE dialogbox IS
8     l_script_name VARCHAR2(240);
9   BEGIN
10 
11     l_script_name := owa_util.get_cgi_env('SCRIPT_NAME');
12 
13     htp.htmlOpen;
14     htp.linkRel('STYLESHEET', '/OA_HTML/US/POSSTYLE.css');
15 
16     htp.headOpen;
17 
18     htp.p('<script src="/OA_HTML/POSWUTIL.js"></script>');
19 
20     htp.p('<SCRIPT>
21            document.write("<title>" +
22            top.getTop().FND_MESSAGES["ICX_POS_CAP_CONFIRM"] + "</title>")
23            </SCRIPT>');
24 
25     js.scriptOpen;
26 
27     htp.p('
28 
29   function drawMe(doc)
30   {
31 
32     var htmlString = "<html><LINK REL=STYLESHEET HREF=/OA_HTML/US/POSSTYLE.css TYPE=text/css><body bgcolor=#cccccc><center><table width=100% height=100%><tr><td width=20% align=center valign=center></td><td valign=center><font class=datablack>" +
33                           top.getTop().FND_MESSAGES[''ICX_POS_CAP_SUBMIT_CONFIRM''] +
34                      "</font></td></tr></table></body></html>" ;
35     doc.write(htmlString);
36     doc.close();
37   }
38 
39     ');
40 
41     js.scriptClose;
42 
43     htp.headClose;
44 
45     htp.p('<frameset cols="3,*,3" border=0>');
46     htp.p('   <frame
47 		src=/OA_HTML/US/POSBLBOR.htm
48 		name=borderLeft
49 		marginwidth=0
50 		scrolling=no>');
51     htp.p('   <frameset rows="15,*,7,45" border=0 >');
52     htp.p('      <frame
53                   src=/OA_HTML/US/POSDLTOP.htm
54         	  name=alert_cancel_top
55         	  marginwidth=0
56        		  scrolling=no>');
57     htp.p('      <frame
58         	  src="javascript:top.drawMe(document);"
59         	  name=alert_cancel_content
60         	  marginwidth=6
61 		  marginheight=2
62        		  scrolling=auto>');
63 
64     -- lower banner with curved edge
65     htp.p('      <frame src="/OA_HTML/US/POSLWBAN.htm"');
66     htp.p('       name=lowerbanner');
67     htp.p('       marginwidth=0');
68     htp.p('       marginheight=2');
69     htp.p('       frameborder=no');
70     htp.p('       scrolling=no>');
71 
72 
73     htp.p('	  <frame src="' || l_script_name ||
74           '/pos_window_sv.buildbuttons?p_button1Name=ICX_POS_ASN_EDIT_EXIT_BUT&p_button1Function=AslDiscard()&p_button2Name=&p_button2Function=&p_button3Name=ICX_POS_CAP_CREATE&p_button3Function=AslCreateEntry(top)"');
75 
76     htp.p('	name=alert_cancel_bottom');
77     htp.p('     marginwidth=0');
78     htp.p('     scrolling=no>');
79     htp.p('   </frameset>');
80 
81     htp.p('   <frame
82 	       src=/OA_HTML/US/POSBLBOR.htm
83 	       name=borderRight
84 	       marginwidth=0
85 	       marginheight=0
86 	       scrolling=no>');
87 
88     htp.p('</frameset>');
89 
90     htp.htmlClose;
91 
92   END dialogbox;
93 
94 
95   /* BuildButtons
96    * ------------
97    */
98   PROCEDURE BuildButtons(p_button1Name VARCHAR2, p_button1Function VARCHAR2,
99                          p_button2Name VARCHAR2, p_button2Function VARCHAR2,
100                          p_button3Name VARCHAR2, p_button3Function VARCHAR2)
101   IS
102   BEGIN
103 
104     htp.htmlOpen;
105     htp.linkRel('STYLESHEET', '/OA_HTML/US/POSSTYLE.css');
106 
107     htp.headOpen;
108     htp.headClose;
109     htp.bodyOpen(NULL, 'bgcolor=#336699');
110 /*
111     htp.p('
112       <table width=100% cellpadding=0 cellspacing=0 border=0>
113       <tr bgcolor=#cccccc>
114       <td><img src=/OA_MEDIA/FNDCTBL.gif></td>
115       <td width=100%><img src=/OA_MEDIA/FNDPXG5.gif></td>
116       <td><img src=/OA_MEDIA/FNDCTBR.gif></td>
117       </tr>
118       </table>');
119 */
120     htp.p('
121       <table width=100% bgcolor=#336699 cellpadding=0 cellspacing=0 border=0>
122       <tr><td height=3><img src=/OA_MEDIA/FNDPX3.gif></td></tr>
123       <TR>
124       <TD align=right>');
125 
126     -- This is a button table containing 3 buttons.
127     -- The first row defines the edges and tops
128     htp.p('
129       <table cellpadding=0 cellspacing=0 border=0>
130       <tr>
131       <!-- left hand button, round left side and square right side-->
132       <td rowspan=5><img src=/OA_MEDIA/FNDBRNDL.gif></td>
133       <td bgcolor=#333333><img src=/OA_MEDIA/FNDPX3.gif></td>
134       <td rowspan=5><img src=/OA_MEDIA/FNDBSQRR.gif></td>');
135 
136     htp.p('<!-- standard spacer between square button images-->
137            <td width=2 rowspan=5></td>');
138 
139     IF (p_button2Name is NOT NULL) THEN
140       htp.p('
141          <!-- middle button with squared ends on both left and right-->
142          <td rowspan=5><img src=/OA_MEDIA/FNDBSQRL.gif></td>
143          <td bgcolor=#333333><img src=/OA_MEDIA/FNDPX3.gif></td>
144          <td rowspan=5><img src=/OA_MEDIA/FNDBSQRR.gif></td>
145          <!-- standard spacer between square button images-->
146          <td width=2 rowspan=5></td>');
147     ELSE
148       htp.p('
149          <!-- middle button with squared ends on both left and right-->
150          <td rowspan=5></td>
151          <td></td>
152          <td rowspan=5></td>
153          <!-- standard spacer between square button images-->
154          <td width=2 rowspan=5></td>');
155     END IF;
156 
157     htp.p('
158       <!-- right hand button, square left side and round right side-->
159       <td rowspan=5><img src=/OA_MEDIA/FNDBSQRL.gif></td>
160       <td bgcolor=#333333><img src=/OA_MEDIA/FNDPX3.gif></td>
161       <td rowspan=5><img src=/OA_MEDIA/FNDBRNDR.gif></td>
162       <td width=10 rowspan=5></td>
163       </tr>
164       <tr>');
165 
166     htp.p('<!-- one cell of this type required for every button -->');
167     htp.p('<td bgcolor=#ffffff><img src=/OA_MEDIA/FNDPX6.gif></td>');
168     IF (p_button2Name is NOT NULL) THEN
169       htp.p('<td bgcolor=#ffffff><img src=/OA_MEDIA/FNDPX6.gif></td>');
170     ELSE
171       htp.p('<td></td>');
172     END IF;
173     htp.p('<td bgcolor=#ffffff><img src=/OA_MEDIA/FNDPX6.gif></td>');
174     htp.p('</tr>');
175     htp.p('<tr>');
176 
177     htp.p('<!-- Text and links for each button are listed here-->');
178     htp.p('<td bgcolor=#cccccc height=20 nowrap>');
179     htp.p('<a href="javascript:top.getTop().' || p_button1Function || ';">');
180     htp.p('<font class=button>');
181     htp.p('<SCRIPT>');
182     htp.p('document.write(window.top.getTop().FND_MESSAGES["' ||
183           p_button1Name || '"])');
184     htp.p('</SCRIPT></font></td>');
185 
186 
187     IF (p_button2Name is NOT NULL) THEN
188       htp.p('<td bgcolor=#cccccc height=20 nowrap>');
189       htp.p('<a href="javascript:top.getTop().' || p_button2Function || ';">');
190       htp.p('<font class=button>');
191       htp.p('<SCRIPT>');
192       htp.p('document.write(window.top.getTop().FND_MESSAGES["' ||
193              p_button2Name || '"])');
194       htp.p('</SCRIPT></font></td>');
195     ELSE
196       htp.p('<td></td>');
197     END IF;
198 
199     htp.p('<td bgcolor=#cccccc height=20 nowrap>');
200     htp.p('<a href="javascript:top.getTop().' || p_button3Function || ';">');
201     htp.p('<font class=button>');
202     htp.p('<SCRIPT>');
203     htp.p('document.write(window.top.getTop().FND_MESSAGES["' ||
204           p_button3Name || '"])');
205     htp.p('</SCRIPT></font></td>');
206 
207     htp.p('
208       </tr>
209       <tr>');
210 
211     htp.p('<!-- one cell of this type required for every button -->');
212     htp.p('<td bgcolor=#666666><img src=/OA_MEDIA/FNDPX3.gif></td>');
213     IF (p_button2Name is NOT NULL) THEN
214       htp.p('<td bgcolor=#666666><img src=/OA_MEDIA/FNDPX3.gif></td>');
215     ELSE
216       htp.p('<td></td>');
217     END IF;
218     htp.p('<td bgcolor=#666666><img src=/OA_MEDIA/FNDPX3.gif></td>');
219     htp.p('</tr>');
220 
221     htp.p('<tr>');
222     htp.p('<!-- one cell of this type required for every button -->');
223     htp.p('<td bgcolor=#333333><img src=/OA_MEDIA/FNDPX3.gif></td>');
224     IF (p_button2Name is NOT NULL) THEN
225       htp.p('<td bgcolor=#333333><img src=/OA_MEDIA/FNDPX3.gif></td>');
226     ELSE
227       htp.p('<td></td>');
228     END IF;
229     htp.p('<td bgcolor=#333333><img src=/OA_MEDIA/FNDPX3.gif></td>');
230     htp.p('</tr>');
231 
232     htp.p('</table>');
233 
234     htp.p('
235       </td>
236       </tr>
237       <TR><td height=30><img src=/OA_MEDIA/FNDPX3.gif></td></TR>
238       </table>
239       </body>
240       </html>
241       ');
242 
243   END BuildButtons;
244 
245 
246 
247 
248   /* ModalWindow
249    * -----------
250    */
251   PROCEDURE ModalWindow(p_asn_line_id VARCHAR2,
252                         p_asn_line_split_id VARCHAR2,
253                         p_quantity VARCHAR2) IS
254      l_language    VARCHAR2(5);
255      l_script_name VARCHAR2(240);
256      l_org_id      NUMBER;
257      l_user_id     NUMBER;
258      l_session_id  NUMBER;
259      l_responsibility_id NUMBER;
260   BEGIN
261 
262 
263      IF NOT icx_sec.validatesession THEN
264        RETURN;
265      END IF;
266 
267      l_org_id := icx_sec.getID(icx_sec.PV_ORG_ID);
268      l_language := icx_sec.getID(icx_sec.PV_LANGUAGE_CODE);
269      l_script_name := owa_util.get_cgi_env('SCRIPT_NAME');
270      l_user_id := icx_sec.getID(icx_sec.PV_WEB_USER_ID);
271      l_session_id := icx_sec.getID(icx_sec.PV_SESSION_ID);
272      l_responsibility_id := icx_sec.getID(icx_sec.PV_RESPONSIBILITY_ID);
273 
274      fnd_client_info.set_org_context(l_org_id);
275 
276      htp.htmlOpen;
277      htp.linkRel('STYLESHEET', '/OA_HTML/US/POSSTYLE.css');
278 
279      htp.headOpen;
280 
281      htp.p('<script src="/OA_HTML/POSWUTIL.js"></script>');
282 
283      htp.p('<SCRIPT>
284            document.write("<title>" +
285            top.getTop().FND_MESSAGES["ICX_POS_ASN_SHIPMENT_DETAILS"] + "</title>")
286            </SCRIPT>');
287 
288      js.scriptOpen;
289 
290      js.scriptClose;
291 
292      htp.headClose;
293 
294      htp.p('<frameset cols="3,*,3" border=0 framespacing=0>');
295 
296        -- blue border frame
297        htp.p('<frame src="/OA_HTML/US/POSBLBOR.htm"
298                      name=borderLeft
299                      marginwidth=0
300                      frameborder=no
301                      scrolling=no>');
302 
303        -- new frameset
304        htp.p('<frameset rows="3,50,10,*,8,40" border=0 framespacing=0>');
305 
306          -- blue border frame
307          htp.p('<frame src="/OA_HTML/US/POSBLBOR.htm"');
308          htp.p('       name=borderTop');
309          htp.p('       marginwidth=0');
310          htp.p('       frameborder=no');
311          htp.p('       scrolling=no>');
312 
313          -- title bar and logo
314          htp.p('<frame src="' || l_script_name || '/pos_upper_banner_sv.ModalWindowTitle?p_title=ICX_POS_ASN_SHIPMENT_DETAILS"');
315          htp.p('       name=titlebar');
316          htp.p('       marginwidth=0');
317          htp.p('       frameborder=no');
318          htp.p('       scrolling=no>');
319 
320          -- upper banner with the curved edge
321          htp.p('<frame src="/OA_HTML/US/POSUPBAN.htm"');
322          --htp.p('<frame src="' || l_script_name || '/pos_upper_banner_sv.PaintUpperBanner"');
323          htp.p('       name=upperbanner');
324          htp.p('       marginwidth=0');
325          htp.p('       frameborder=no');
326          htp.p('       scrolling=no>');
327 
328 
329          -- content frame
330          htp.p('<frame src="' || l_script_name ||
331                  '/pos_asn_details_s.show_details?p_asn_line_id=' ||
332                  p_asn_line_id ||
333                  '&p_asn_line_split_id=' ||
334                  p_asn_line_split_id ||
335                  '&p_quantity=' ||
336                  p_quantity || '"');
337          htp.p('       name=content');
338          htp.p('       marginwidth=3');
339          htp.p('       frameborder=no');
340          htp.p('       scrolling=auto>');
341 
342          -- lower banner with curved edge
343          htp.p('<frame src="/OA_HTML/US/POSLWBAN.htm"');
344          --htp.p('<frame src="' || l_script_name || '/pos_lower_banner_sv.PaintLowerBanner"');
345          htp.p('       name=lowerbanner');
346          htp.p('       marginwidth=0');
347          htp.p('       marginheight=2');
348          htp.p('       frameborder=no');
349          htp.p('       scrolling=no>');
350 
351          -- lower button frame
352          htp.p('<frame src="' || l_script_name ||
353                '/pos_window_sv.buildbuttons?p_button1Name=ICX_POS_BTN_OK&p_button1Function=acceptShipmentDetails(top)&p_button2Name=&p_button2Function=&p_button3Name=ICX_POS_BTN_CANCEL&p_button3Function=cancelShipmentDetails(top)"');
354          htp.p('       name=controlregion');
355          htp.p('       marginwidth=0');
356          htp.p('       frameborder=no');
357          htp.p('       scrolling=no>');
358 
359        htp.p('</frameset>');
360 
361        -- blue border frame
362        htp.p('<frame src="/OA_HTML/US/POSBLBOR.htm"
363                      name=borderRight
364                      marginwidth=0
365                      frameborder=no
366                      scrolling=no>');
367 
368      htp.p('</frameset>');
369 
370 
371     htp.htmlClose;
372 
373   END ModalWindow;
374 
375 
376 END POS_WINDOW;