Re: PL/SQL Cookies, How do I read.. HELP!!

From: <bonanos_at_yahoo.com>
Date: Tue, 11 Aug 1998 06:30:32 GMT
Message-ID: <6qooe8$675$1@nnrp1.dejanews.com>

Hi Dwight

> I need to retrieve 4 different bits of data from a cookie being passed.
>
> Every example I find uses "name", "type", "vr_char", etc... in a UNCLEAR
fashion that seems to be intermixing variable names with
> parameters....
>
> Can ANYONE tell me how to retrieve 4 values out of 8 that are stored in a
cookie.
> and how to assign them a variable.
> i.e these are 4 of the fields I am concerned with
>
> CID
> CPWD
> CCOMPANY
> CDATE

---

PROCEDURE SET_COMPANY_COOKY (compcode in varchar2,acronym in varchar2)is

BEGIN owa_util.mime_header('text/html',FALSE);

	owa_cookie.send('compcode',compcode);
	owa_cookie.send('acronym',acronym);

owa_util.http_header_close;

END;

---

PROCEDURE GET_COMPANY_COOKY is

ccompany owa_cookie.cookie; --
cacronym owa_cookie.cookie; --

BEGIN ccompany := owa_cookie.get('compcode'); cacronym := owa_cookie.get('acronym');

• Is there a cookie value that has been set? IF (ccompany.num_vals > 0) THEN htp.p('<center>'); htp.p('<table border=0 cellspacing=0 cellpadding=0 width=600>'); htp.p('<TR>'); htp.p('<TD align=left valign=top>'); htp.fontOpen( ccolor => '#ff0000', cface => 'Arial', csize => '0'); htp.Strong('Company: ');

htp.p(htf.strong(lower(Initcap((cacronym.vals(1))))));

				htp.fontclose();
			htp.p('</TD>');
		htp.p('</TR>');
	htp.tableclose;

htp.p('</center>');

else

htp.p('<center>');

    htp.p('<table border=0 cellspacing=0 cellpadding=0 width=600>');

		htp.p('<TR>');
			htp.p('<TD align=left valign=top>');
				htp.fontOpen( ccolor => '#ff0000', cface =>
'Arial', csize => '0');
					htp.p('You have not logged on ( guest
mode , functionality limited )');
				htp.fontclose();
			htp.p('</TD>');
		htp.p('</TR>');
	htp.tableclose;

htp.p('</center>');

END IF; END;

---

-----== Posted via Deja News, The Leader in Internet Discussion ==----- http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum Received on Tue Aug 11 1998 - 01:30:32 CDT