Is it possible to use Web.Pb with PowerBuilder 7.0 Desktop?

Thank you.


0
Josep
2/7/2000 4:40:25 PM
sybase.powerbuilder.web-pb 1541 articles. 0 followers. Follow

7 Replies
672 Views

Similar Articles

[PageSpeed] 6

While it doesn't address Web.PB specifically, the datasheet:

http://www.sybase.com/products/powerbuilder/pb7ds.pdf

indicates that the HTMLDW isn't supported in the non-Enterprise version.
That would make web development somewhat more difficult.

On Mon, 7 Feb 2000 17:40:25 +0100,
 in powersoft.public.powerbuilder.web-pb
Josep Closas Compte <josep.closas@netprocess.com> wrote: 
>Thank you.
>
>

---
Bruce Armstrong [TeamSybase]          | KFORCE.com
mailto:Bruce.Armstrong@teamsybase.com | http://www.kforce.com

Preach the gospel at all times. If necessary, use words. [Francis of Assisi]
http://www.kidbrothers.org                | http://www.fccwc.org
http://www.harvest.org/knowgod/index.htm  | http://www.needhim.org

-----------== Posted via the PFCGuide Web Newsreader ==----------
http://www.pfcguide.com/_newsgroups/group_list.asp
0
Bruce
2/7/2000 9:35:21 PM
Could you send to me a little example with the following files:

* pbweb.ini
* a PowerBuilder 7 library file without proxy objects (thinking in the
desktop version)
* html file, just returning CGI variables
* winnt/system32/drivers/etc/services file
* hosts file???

All for the IIS4, a localhost server, and using pbcgi70.exe.

Thank you again.

Bruce Armstrong [TeamSybase] <NOCANSPAM_bruce.armstrong@teamsybase.com>
escribi� en el mensaje de noticias qkgl8Mbc$GA.184@forums.sybase.com...
> While it doesn't address Web.PB specifically, the datasheet:
>
> http://www.sybase.com/products/powerbuilder/pb7ds.pdf
>
> indicates that the HTMLDW isn't supported in the non-Enterprise version.
> That would make web development somewhat more difficult.
>
> On Mon, 7 Feb 2000 17:40:25 +0100,
>  in powersoft.public.powerbuilder.web-pb
> Josep Closas Compte <josep.closas@netprocess.com> wrote:
> >Thank you.
> >
> >
>
> ---
> Bruce Armstrong [TeamSybase]          | KFORCE.com
> mailto:Bruce.Armstrong@teamsybase.com | http://www.kforce.com
>
> Preach the gospel at all times. If necessary, use words. [Francis of
Assisi]
> http://www.kidbrothers.org                | http://www.fccwc.org
> http://www.harvest.org/knowgod/index.htm  | http://www.needhim.org
>
> -----------== Posted via the PFCGuide Web Newsreader ==----------
> http://www.pfcguide.com/_newsgroups/group_list.asp


0
Josep
2/11/2000 9:17:55 AM
Give me a couple days and I could supply you with most of that.  The issue
is that the sample would be for WebSite Pro.  I have a rather ABM mentality,
so I don't have any examples for IIS.

On Fri, 11 Feb 2000 10:17:55 +0100,
 in powersoft.public.powerbuilder.web-pb
Josep Closas Compte <josep.closas@netprocess.com> wrote: 
>Could you send to me a little example with the following files:
>
>* pbweb.ini
>* a PowerBuilder 7 library file without proxy objects (thinking in the
>desktop version)
>* html file, just returning CGI variables
>* winnt/system32/drivers/etc/services file
>* hosts file???
>
>All for the IIS4, a localhost server, and using pbcgi70.exe.
>
>Thank you again.
>
>Bruce Armstrong [TeamSybase] <NOCANSPAM_bruce.armstrong@teamsybase.com>
>escribi� en el mensaje de noticias qkgl8Mbc$GA.184@forums.sybase.com...
>> While it doesn't address Web.PB specifically, the datasheet:
>>
>> http://www.sybase.com/products/powerbuilder/pb7ds.pdf
>>
>> indicates that the HTMLDW isn't supported in the non-Enterprise version.
>> That would make web development somewhat more difficult.
>>
>> On Mon, 7 Feb 2000 17:40:25 +0100,
>>  in powersoft.public.powerbuilder.web-pb
>> Josep Closas Compte <josep.closas@netprocess.com> wrote:
>> >Thank you.
>> >
>> >
>>
>> ---
>> Bruce Armstrong [TeamSybase]          | KFORCE.com
>> mailto:Bruce.Armstrong@teamsybase.com | http://www.kforce.com
>>
>> Preach the gospel at all times. If necessary, use words. [Francis of
>Assisi]
>> http://www.kidbrothers.org                | http://www.fccwc.org
>> http://www.harvest.org/knowgod/index.htm  | http://www.needhim.org
>>
>> -----------== Posted via the PFCGuide Web Newsreader ==----------
>> http://www.pfcguide.com/_newsgroups/group_list.asp
>
>

---
Bruce Armstrong [TeamSybase]          | KFORCE.com
mailto:Bruce.Armstrong@teamsybase.com | http://www.kforce.com

Preach the gospel at all times. If necessary, use words. [Francis of Assisi]
http://www.kidbrothers.org                | http://www.fccwc.org
http://www.harvest.org/knowgod/index.htm  | http://www.needhim.org

-----------== Posted via the PFCGuide Web Newsreader ==----------
http://www.pfcguide.com/_newsgroups/group_list.asp
0
Bruce
2/11/2000 6:37:24 PM
Please, it's a little urgent for me to resolve this.

Thank you again.

Bruce Armstrong [TeamSybase] <NOCANSPAM_bruce.armstrong@teamsybase.com>
escribi� en el mensaje de noticias IkgJK8Ld$GA.327@forums.sybase.com...
> Give me a couple days and I could supply you with most of that.  The issue
> is that the sample would be for WebSite Pro.  I have a rather ABM
mentality,
> so I don't have any examples for IIS.
>
> On Fri, 11 Feb 2000 10:17:55 +0100,
>  in powersoft.public.powerbuilder.web-pb
> Josep Closas Compte <josep.closas@netprocess.com> wrote:
> >Could you send to me a little example with the following files:
> >
> >* pbweb.ini
> >* a PowerBuilder 7 library file without proxy objects (thinking in the
> >desktop version)
> >* html file, just returning CGI variables
> >* winnt/system32/drivers/etc/services file
> >* hosts file???
> >
> >All for the IIS4, a localhost server, and using pbcgi70.exe.
> >
> >Thank you again.
> >
> >Bruce Armstrong [TeamSybase] <NOCANSPAM_bruce.armstrong@teamsybase.com>
> >escribi� en el mensaje de noticias qkgl8Mbc$GA.184@forums.sybase.com...
> >> While it doesn't address Web.PB specifically, the datasheet:
> >>
> >> http://www.sybase.com/products/powerbuilder/pb7ds.pdf
> >>
> >> indicates that the HTMLDW isn't supported in the non-Enterprise
version.
> >> That would make web development somewhat more difficult.
> >>
> >> On Mon, 7 Feb 2000 17:40:25 +0100,
> >>  in powersoft.public.powerbuilder.web-pb
> >> Josep Closas Compte <josep.closas@netprocess.com> wrote:
> >> >Thank you.
> >> >
> >> >
> >>
> >> ---
> >> Bruce Armstrong [TeamSybase]          | KFORCE.com
> >> mailto:Bruce.Armstrong@teamsybase.com | http://www.kforce.com
> >>
> >> Preach the gospel at all times. If necessary, use words. [Francis of
> >Assisi]
> >> http://www.kidbrothers.org                | http://www.fccwc.org
> >> http://www.harvest.org/knowgod/index.htm  | http://www.needhim.org
> >>
> >> -----------== Posted via the PFCGuide Web Newsreader ==----------
> >> http://www.pfcguide.com/_newsgroups/group_list.asp
> >
> >
>
> ---
> Bruce Armstrong [TeamSybase]          | KFORCE.com
> mailto:Bruce.Armstrong@teamsybase.com | http://www.kforce.com
>
> Preach the gospel at all times. If necessary, use words. [Francis of
Assisi]
> http://www.kidbrothers.org                | http://www.fccwc.org
> http://www.harvest.org/knowgod/index.htm  | http://www.needhim.org
>
> -----------== Posted via the PFCGuide Web Newsreader ==----------
> http://www.pfcguide.com/_newsgroups/group_list.asp


0
Josep
2/17/2000 9:30:00 AM
On Thu, 17 Feb 2000 10:30:00 +0100,
 in powersoft.public.powerbuilder.web-pb
Josep Closas Compte <josep.closas@netprocess.com> wrote: 
>Could you send to me a little example with the following files:
>* pbweb.ini

Make sure that it's in your Windows directory.  I use the port number for
the 'application' name, because I'm using Dean's DPBServer and as a result
I have several applications running on the same port.

[Web.PB]
errormessage='<br>E-Mail: <A HREF="mailto:Bruce.Armstrong@teamsybase.com"> Let
me know about it</A>'
ISAPIKeywords="AUTH_NAME,AUTH_USER,CONTENT_LENGTH,CONTENT_TYPE,GATEWAY_INTERFACE
,HTTP_ACCEPT,HTTP_COOKIE,HTTP_USER_AGENT,PATH_INFO,PATH_TRANSLATED,QUERY_STRING,
REMOTE_ADDR,REMOTE_HOST,REMOTE_USER,REQUEST_METHOD,SCRIPT_NAME,SERVER_NAME,SERVE
R_PORT,SERVER_PROTOCOL,SERVER_SOFTWARE"
CGIKeywords="AUTHENTICATION_METHOD, AUTHENTICATION_REALM,
AUTHENTICATED_USERNAME, AUTHENTICATED_PASSWORD, AUTH_NAME, AUTH_USER,
CGI_VERSION, CONTENT_LENGTH, CONTENT_TYPE, DOCUMENT_ROOT, EXECUTABLE_PATH,
GATEWAY_INTERFACE, GMT_OFFSET, HTTP_ACCEPT, HTTP_COOKIE, HTTP_USER_AGENT,
HTTP_REQUEST_PROTOCOL, LOGICAL_PATH, PHYSICAL_PATH, PATH_INFO, PATH_TRANSLATED,
QUERY_STRING, REFERER, REMOTE_ADDR, REMOTE_HOST, REQUEST_METHOD,
REQUEST_PROTOCOL, REQUEST_RANGE, SCRIPT_NAME, SERVER_ADMIN, SERVER_NAME,
SERVER_PORT, SERVER_PROTOCOL, SERVER_SOFTWARE, USER_AGENT"
NSAPIKeywords="AUTH_NAME,AUTH_USER,CONTENT_LENGTH,CONTENT_TYPE,GATEWAY_INTERFACE
,HTTP_ACCEPT,HTTP_COOKIE,HTTP_USER_AGENT,PATH_INFO,PATH_TRANSLATED,QUERY_STRING,
REMOTE_ADDR,REMOTE_HOST,REQUEST_METHOD,SCRIPT_NAME,SERVER_NAME,SERVER_PORT,SERVE
R_PROTOCOL,SERVER_SOFTWARE"

[20015]
application=20015
driver=winsock
location=localhost

[20016]
application=20016
driver=winsock
location=localhost

[20020]
application=20020
driver=winsock
location=localhost

>* a PowerBuilder 7 library file without proxy objects (thinking in the
>desktop version)

I'm including the exported source code for a couple 'helper' objects.
Some of this code is from the pre-HTMLDW days, I'm sending it primarily
because it contains some of the CGI environmental code you were looking
for:

////////////////////////////////////////////////////////////////////////

$PBExportHeader$n_cst_webutils.sru
$PBExportComments$A number of web utility functions
forward
global type n_cst_webutils from nonvisualobject
end type
end forward

global type n_cst_webutils from nonvisualobject
end type
global n_cst_webutils n_cst_webutils

type variables
boolean	terminateprocessing
end variables

forward prototypes
protected function string of_nvl (string as_value, string as_replacement)
public function string of_getlogin (string as_action, string as_title, string
as_heading, string as_imagebase)
public function blob of_getcookie (string cookie)
public function string of_setcookie (string as_name, string as_value, string
as_domain, string as_path, unsignedlong aul_expire, boolean ab_secure)
public function string of_getenvironment (string authentication_method, string
authentication_realm, string authenticated_username, string
authenticated_password, string auth_name, string auth_user, string cgi_version,
string content_length, string content_type, string cookie, string document_root,
string executable_path, string gmt_offset, string http_cookie, string
logical_path, string physical_path, string query_string, string referer, string
remote_address, string remote_host, string request_method, string
request_protocol, string request_range, string server_admin, string server_name,
string server_port, string server_software, string user_agent, string
http_user_agent, string http_request_protocol)
end prototypes

protected function string of_nvl (string as_value, string as_replacement);IF
IsNull ( as_value ) THEN
	Return as_replacement
ELSE
	Return as_value
END IF
end function

public function string of_getlogin (string as_action, string as_title, string
as_heading, string as_imagebase);integer		li_rc
n_ds_dpb		ln_ds
n_cst_form	lnv_form
string		ls_return

ln_ds = CREATE n_ds_dpb
ln_ds.DataObject = "d_f_login"
li_rc = ln_ds.InsertRow ( 0 )

lnv_form.of_setimagebase ( as_imagebase )

lnv_form.of_register ( ln_ds )
lnv_form.of_setrequired ( 1 )
lnv_form.of_setcellborder ( 1 )
lnv_form.of_settitle ( as_title )
lnv_form.of_setheading ( as_heading )
ls_return = lnv_form.of_getform ( as_action, 1 )

Destroy ln_ds

Return ls_return

end function

public function blob of_getcookie (string cookie);string	ls_html
string	ls_cookie 
integer	li_counter,li_quantity,li_rowCount
integer	li_find , li_end

blob lblob_response

string ls_HTTPHeader="Content-type: text/html~r~n~r~n"
string ls_cookie1 = 'Set-Cookie: timesin='
string ls_cookie2 =';expires=28-Nov-96 GMT;path=/ '
int li_entered_count

if COOKIE > '' then

li_find = pos(COOKIE,'timesin=')
li_find = li_find + 8

li_entered_count = integer(mid(COOKIE,li_find))
li_entered_count =li_entered_count + 1

ls_html = ' <h1> you have been to this site ' + string (li_entered_count) + '
times !! </h1>'
else 
li_entered_count = 1
ls_html = ' <h1> this is your first visit to the site </h1>'
end if

ls_cookie = ls_cookie1 + string(li_entered_count) + ls_cookie2

IF TerminateProcessing = TRUE THEN
setNull(lblob_response)
return lblob_response
end if

TerminateProcessing=True

lblob_response = blob( ls_cookie + ';' + ls_HTTPHeader + ls_html)
return lblob_response
end function

public function string of_setcookie (string as_name, string as_value, string
as_domain, string as_path, unsignedlong aul_expire, boolean
ab_secure);string	ls_cookie

ls_cookie = "Set-Cookie: " + as_name + "=" 
ls_cookie = ls_cookie + as_value

if as_domain <> "" then
   ls_cookie = ls_cookie + ";domain=" + as_domain
end if

if as_path <> "" then
   ls_cookie = ls_cookie + ";path=" + as_path
end if

/////////////////////////////////////////////////////////////////////////////

$PBExportHeader$n_cst_form.sru
$PBExportComments$Form generation services
forward
global type n_cst_form from nonvisualobject
end type
end forward

global type n_cst_form from nonvisualobject autoinstantiate
end type

type variables
protected:

constant integer LEFT = 0
constant integer CENTER = 1
constant integer RIGHT = 2

constant integer TOP = 6
constant integer MIDDLE = 7
constant integer BOTTOM = 8
constant integer BASELINE = 9

constant integer ii_defaultcellpadding = 0
constant integer ii_defaultcellspacing = 0
constant integer ii_defaultcellborder = 0
constant long il_defaultcellcolor = -999
constant integer ii_defaulttablewidth = 100
constant integer ii_defaultrequiredmethod = 0

n_ds_dpb	in_ds

integer	ii_cellpadding
integer	ii_cellspacing
integer	ii_cellborder
long	il_cellcolor
integer	ii_tablewidth

integer	ii_requiredmethod

string	is_title = ''
string	is_heading = ''
string	is_imagebase = ''

u_html_form		inv_html_form
u_html_format		inv_html_format

end variables

forward prototypes
protected function string of_makeddlb (string as_name, string as_colname, ref
integer ai_length)
public subroutine of_resetstyle ()
public subroutine of_setcellborder (integer ai_cellborder)
public subroutine of_setcellpadding (integer ai_cellpadding)
public subroutine of_setcellspacing (integer ai_cellspacing)
public subroutine of_settablewidth (integer ai_tablewidth)
public subroutine of_setcellcolor (long al_cellcolor)
public subroutine of_setrequired (integer ai_method)
protected function string of_markrequired ()
protected function string of_makeheader ()
public function string of_getform (string as_action, integer ai_method)
public subroutine of_settitle (string as_title)
public subroutine of_setheading (string as_heading)
public function string of_makesubmit ()
public function string of_makereset ()
public subroutine of_register (n_ds_dpb an_ds)
public subroutine of_setimagebase (string as_url)
end prototypes

protected function string of_makeddlb (string as_name, string as_colname, ref
integer ai_length);
n_ds_dpb					lds
integer				li_rc
string				ls_syntax, ls_dataobject, ls_displaycol, ls_datacol
transaction			l_trans
n_cst_column		lnv_column
u_html_form			lnv_html_form

lds = CREATE n_ds_dpb

ls_syntax = as_colname + '.dddw.name'
ls_dataobject = in_ds.Describe ( ls_syntax )
lds.DataObject = ls_dataobject
l_trans = in_ds.of_GetTransObject()
li_rc = lds.SetTransObject ( l_trans )
li_rc = lds.Retrieve ()

ls_syntax = as_colname + ".dddw.DisplayColumn"
ls_displaycol = in_ds.Describe ( ls_syntax )

ls_syntax = as_colname + ".dddw.DataColumn"
ls_datacol = in_ds.Describe ( ls_syntax )

ls_syntax = lnv_html_form.f_MakeDDLB ( as_name, &
	lds, ls_datacol, ls_displaycol ) 
	
ai_length = lnv_column.of_getlength ( in_ds, ls_displaycol )

Destroy lds

Return ls_syntax
end function

public subroutine of_resetstyle ();ii_cellborder = ii_defaultcellborder
ii_cellpadding = ii_defaultcellpadding
ii_cellspacing = ii_defaultcellspacing
ii_tablewidth = ii_defaulttablewidth
il_cellcolor = il_defaultcellcolor
ii_requiredmethod = ii_defaultrequiredmethod

end subroutine

public subroutine of_setcellborder (integer ai_cellborder);ii_cellborder =
ai_cellborder
end subroutine

public subroutine of_setcellpadding (integer ai_cellpadding);ii_cellpadding =
ai_cellpadding
end subroutine

public subroutine of_setcellspacing (integer ai_cellspacing);ii_cellspacing =
ai_cellspacing
end subroutine

public subroutine of_settablewidth (integer ai_tablewidth);ii_tablewidth =
ai_tablewidth
end subroutine

public subroutine of_setcellcolor (long al_cellcolor);il_cellcolor =
al_cellcolor
end subroutine

public subroutine of_setrequired (integer ai_method);ii_requiredmethod =
ai_method

end subroutine

protected function string of_markrequired ();CHOOSE CASE ii_requiredmethod
	CASE 1
		Return '<IMG SRC="' + is_imagebase + 'required.gif" WIDTH=10 HEIGHT=15>'
	CASE ELSE
		Return ''
END CHOOSE

end function

protected function string of_makeheader ();CHOOSE CASE ii_requiredmethod
	CASE 1
		Return '<P><IMG SRC="' + is_imagebase + 'required.gif" WIDTH=10 HEIGHT=15>
indicates a required field</P>'
	CASE ELSE
		Return ''
END CHOOSE
end function

public function string of_getform (string as_action, integer
ai_method);integer				li_inner, li_outer, li_count, li_lastx, li_lasty
integer				li_colspan, li_rowspan = 1
integer				li_height, li_width = 50
string				ls_return = '', ls_cell
n_column_attrib	lnv_column_attrib[]
n_cst_column		lnv_column

ls_return = ls_return + inv_html_format.f_BeginPage()
ls_return = ls_return + inv_html_format.f_BeginPageHeading()
ls_return = ls_return + inv_html_format.f_SetPageTitle ( is_title )
ls_return = ls_return + inv_html_format.f_EndPageHeading()

ls_return = ls_return + inv_html_format.f_BeginPageBody()
ls_return = ls_return + inv_html_format.f_MakeHeading ( is_heading, 4, CENTER )
ls_return = ls_return + inv_html_form.f_BeginForm ( as_action, ai_method )
ls_return = ls_return + this.of_MakeHeader()

ls_return = ls_return + this.of_MakeSubmit()
ls_return = ls_return + this.of_MakeReset()

ls_return = ls_return + inv_html_format.f_BeginTable ( LEFT, &
	ii_cellborder, ii_cellpadding, ii_cellspacing, &
	0, il_cellcolor )
ls_return = ls_return + inv_html_format.f_BeginTableBody()
ls_return = ls_return + inv_html_format.f_BeginTableRow ( LEFT, MIDDLE )		

li_count = lnv_column.of_getcolumns( in_ds, lnv_column_attrib[] )
FOR li_outer = 1 TO li_count
	FOR li_inner = 1 TO li_count
		IF lnv_column_attrib[li_inner].ii_tabsequence = li_outer * 10 THEN
			
			ls_cell = ''
			li_colspan = 0

			ls_cell = ls_cell + lnv_column_attrib[li_inner].is_title

			IF lnv_column_attrib[li_inner].ii_y > li_lasty + 10 THEN
				ls_return = ls_return + inv_html_format.f_EndTableRow ( )
				ls_return = ls_return + inv_html_format.f_BeginTableRow ( LEFT, MIDDLE )
				li_colspan = 1 
			ELSE
				li_colspan = Ceiling ( &
					Len ( lnv_column_attrib[li_inner].is_title ) / 20 )
			END IF

			ls_return = ls_return + inv_html_format.f_MakeTableBodyCell ( ls_cell, &
				RIGHT, &	
				TOP, &  
				li_colspan, &  
				li_rowspan, &  
				TRUE )
			ls_return = ls_return + "~r~n"

			ls_cell = ''
			li_colspan = 0

			CHOOSE CASE lnv_column_attrib[li_inner].is_editstyle
				CASE 'edit', 'editmask'
					li_colspan = lnv_column.of_getlength ( in_ds,
lnv_column_attrib[li_inner].is_colname )
					IF li_colspan > li_width THEN
						li_height = Ceiling ( li_colspan / li_width )
						ls_cell = ls_cell + inv_html_form.f_MakeMLE ( &
							lnv_column_attrib[li_inner].is_colname, &
							Min ( li_height, 5 ), &
							li_width, 1 )
						li_colspan = li_width
					ELSE
						ls_cell = ls_cell + inv_html_form.f_MakeSLE ( &
							lnv_column_attrib[li_inner].is_colname, &
							li_colspan , li_colspan, '', &
							lnv_column_attrib[li_inner].ib_password )
					END IF
				CASE 'dddw'
					ls_cell = ls_cell + this.of_MakeDDLB ( &
						lnv_column_attrib[li_inner].is_colname, &
						lnv_column_attrib[li_inner].is_colname, &
						li_colspan )
				CASE ELSE
					CONTINUE
			END CHOOSE

			IF lnv_column_attrib[li_inner].ib_required THEN
				ls_cell = ls_cell + this.of_markrequired ( )
			END IF
			
			li_lastx = lnv_column_attrib[li_inner].ii_x
			li_lasty = lnv_column_attrib[li_inner].ii_y
			
			li_colspan = Integer ( lnv_column_attrib[li_inner].ii_width / 200 )

			ls_return = ls_return + inv_html_format.f_MakeTableBodyCell ( ls_cell, &
				LEFT, &	
				MIDDLE, &  
				li_colspan, &  
				li_rowspan, &  
				FALSE )
				
			ls_return = ls_return + "~r~n"
			
		END IF
	NEXT
NEXT

ls_return = ls_return + inv_html_format.f_EndTableRow ( )
ls_return = ls_return + inv_html_format.f_EndTable()
ls_return = ls_return + inv_html_form.f_EndForm()
ls_return = ls_return + inv_html_format.f_EndPageBody()
ls_return = ls_return + inv_html_format.f_EndPage ( )

Return ls_return

end function

public subroutine of_settitle (string as_title);is_title = as_title
end subroutine

public subroutine of_setheading (string as_heading);is_heading = as_heading
end subroutine

public function string of_makesubmit ();string	ls_text
integer	li_x, li_y, li_height, li_width

ls_text = in_ds.Describe ( 'submit.Text' )
IF ls_text <> "?" THEN
	li_x = Integer ( in_ds.Object.submit.x )
	li_y = Integer ( in_ds.Object.submit.y )
	li_width = Integer ( in_ds.Object.submit.width )
	li_height = Integer ( in_ds.Object.submit.height )
	Return inv_html_form.f_MakeSubmit ( ls_text )
ELSE
	Return ''
END IF
end function

public function string of_makereset ();string	ls_text
integer	li_x, li_y, li_height, li_width

ls_text = in_ds.Describe ( 'reset.Text' )
IF ls_text <> "?" THEN
	li_x = Integer ( in_ds.Object.submit.x )
	li_y = Integer ( in_ds.Object.submit.y )
	li_width = Integer ( in_ds.Object.submit.width )
	li_height = Integer ( in_ds.Object.submit.height )
	Return inv_html_form.f_MakeReset ( ls_text )
ELSE
	Return ''
END IF
end function
public subroutine of_register (n_ds_dpb an_ds);in_ds = an_ds
end subroutine

public subroutine of_setimagebase (string as_url);is_imagebase = as_url
end subroutine

on n_cst_form.create
TriggerEvent( this, "constructor" )
end on

on n_cst_form.destroy
TriggerEvent( this, "destructor" )
end on

event constructor;this.of_resetstyle ( )
end event

////////////////////////////////////////////////////////////////////////////////
/

if aul_expire > 0 then
   //	u_datetime luo_dt
   //luo_dt = create u_datetime

  	// Get the current datetime as GMT
	//ldt_GMT = luo_dt.f_GMT_DateTime() 

	// Adjust the GMT to the relative expire seconds
	//ldt_GMT = luo_dt.f_relative_datetime( ldt_GMT, iul_expire)
	
	//ls_cookie = ls_cookie + ";expires=" + &
	//				 DayName(date(ldt_GMT)) + ", " + &
	//				 string(ldt_GMT, "dd-mmm-yy HH:MM:SS") + " GMT"
END IF
  
IF ab_secure THEN
	ls_cookie = ls_cookie + ";secure"
END IF

ls_cookie = ls_cookie + ";"

Return ls_cookie

end function

public function string of_getenvironment (string authentication_method, string
authentication_realm, string authenticated_username, string
authenticated_password, string auth_name, string auth_user, string cgi_version,
string content_length, string content_type, string cookie, string document_root,
string executable_path, string gmt_offset, string http_cookie, string
logical_path, string physical_path, string query_string, string referer, string
remote_address, string remote_host, string request_method, string
request_protocol, string request_range, string server_admin, string server_name,
string server_port, string server_software, string user_agent, string
http_user_agent, string http_request_protocol);string	ls_result

ls_result = 'Authentication Method: ' + of_nvl ( authentication_method, '' ) +
"<BR>" + &
'Authentication Realm: ' + of_nvl ( authentication_realm, '' ) + "<BR>" + &
'Authenticated Username: ' + of_nvl ( authenticated_username, '' ) + "<BR>" + &
'Authenticated Password: ' + of_nvl ( authenticated_password, '' ) + "<BR>" + &
'Auth Name: ' + of_nvl ( auth_name, '' ) + "<BR>" + &
'Auth User: ' + of_nvl ( auth_user, '' ) + "<BR>" + &
'CGI Version: ' + of_nvl ( 	cgi_version, '' ) + "<BR>" + &
'Content Length: ' + of_nvl ( content_length, '' ) + "<BR>" + &
'Content Type: ' + of_nvl ( content_type, '' ) + "<BR>" + &
'Cookie: ' + of_nvl ( cookie, '' ) + "<BR>" + &
'Document Root: ' + of_nvl ( document_root, '' ) + "<BR>" + &
'Executable Path: ' + of_nvl ( executable_path, '' ) + "<BR>" + &
'GMT Offset: ' + of_nvl ( gmt_offset, '' ) + "<BR>" + &
'Logical Path: ' + of_nvl ( logical_path, '' ) + "<BR>" + &
'Physical Path: ' + of_nvl ( physical_path, '' ) + "<BR>" + &
'Query String: ' + of_nvl ( query_string, '' ) + "<BR>" + &
'Referer: ' + of_nvl ( referer, '' ) + "<BR>" + &
'Remote Addr: ' + of_nvl ( remote_address, '' ) + "<BR>" + &
'Remote Host: ' + of_nvl ( remote_host, '' ) + "<BR>" + &
'Request Method: ' + of_nvl ( request_method, '' ) + "<BR>" + &
'Request Protocol: ' + of_nvl ( request_protocol, '' ) + "<BR>" + &
'Request Range: ' + of_nvl ( request_range, '' ) + "<BR>" + &
'Server Admin: ' + of_nvl ( server_admin, '' ) + "<BR>" + &
'Server Name: ' + of_nvl ( server_name, '' ) + "<BR>" + &
'Server Port: ' + of_nvl ( server_port, '' ) + "<BR>" + &
'Server Software: ' + of_nvl ( server_software, '' ) + "<BR>" + &
'User Agent: ' + of_nvl ( user_agent, '' ) + "<BR>" + &
'HTTP Cookie: ' + of_nvl ( http_cookie, '' ) + "<BR>" + &
'HTTP User Agent: ' + of_nvl ( http_user_agent, '' ) + "<BR>" + &
'HTTP Request Protocol: ' + of_nvl ( http_request_protocol, '' ) + "<BR>"
	
Return ls_result
end function
on n_cst_webutils.create
TriggerEvent( this, "constructor" )
end on

on n_cst_webutils.destroy
TriggerEvent( this, "destructor" )
end on

////////////////////////////////////////////////////////////////////////

>* html file, just returning CGI variables

////////////////////////////////////////////////////////////////////////
<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<HTML>
<HEAD>
   <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1">
   <META NAME="Author" CONTENT="Bruce Armstrong">
   <TITLE>Work In Progress</TITLE>
</HEAD>
<BODY>
&nbsp;
<CENTER><TABLE BORDER COLS=1 WIDTH="25%" >
<TR>
<TD>
<CENTER><A
HREF="/cgi-bin/$pbcgi70.exe/20015/n_cst_webutils/of_getenvironment">Get
Environment</A></CENTER>
</TD>
</TR>
</TABLE></CENTER>
&nbsp;
<BR>&nbsp;
</BODY>
</HTML>
///////////////////////////////////////////////////////////////////////////

>* winnt/system32/drivers/etc/services file

Because I'm directly referencing the port number, my services file is
unchanged.

>* hosts file???

Unchanged.


---
Bruce Armstrong [TeamSybase]              | kforce.com
mailto:Bruce.Armstrong@teamsybase.com     | http://www.kforce.com

Preach the gospel at all times. If necessary, use words. [Francis of Assisi]
http://www.kidbrothers.org                | http://www.fccwc.org
http://www.harvest.org/knowgod/index.htm  | http://www.needhim.org

-----------== Posted via the PFCGuide Web Newsreader ==----------
http://www.pfcguide.com/_newsgroups/group_list.asp
0
Bruce
2/17/2000 5:50:25 PM
First of all, thank you again.
When I try to import the pb files, always appears an error.
Could you send to me by E-mail the original documents.

Josep Closas


0
Josep
2/21/2000 10:09:08 AM
They're in the mail.  There were some other objects refernced in that code
that I didn't supply the exports for.

On Mon, 21 Feb 2000 11:09:08 +0100,
 in powersoft.public.powerbuilder.web-pb
Josep Closas Compte <josep.closas@netprocess.com> wrote: 
>First of all, thank you again.
>When I try to import the pb files, always appears an error.
>Could you send to me by E-mail the original documents.
>
>Josep Closas
>
>

---
Bruce Armstrong [TeamSybase]              | kforce.com
mailto:Bruce.Armstrong@teamsybase.com     | http://www.kforce.com

Preach the gospel at all times. If necessary, use words. [Francis of Assisi]
http://www.kidbrothers.org                | http://www.fccwc.org
http://www.harvest.org/knowgod/index.htm  | http://www.needhim.org

-----------== Posted via the PFCGuide Web Newsreader ==----------
http://www.pfcguide.com/_newsgroups/group_list.asp
0
Bruce
2/21/2000 6:12:36 PM
Reply:

Similar Artilces:

web.Pb and PB 7.0
--------------1D85A18742F7DF1C9285F8D4 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit I migrated PB 6.5 and Web.Pb application to PB 7.0.I found some features are missing . I am using GenerateHTMLForm method and when visible property of datawindow column is set to 0 ,the HTML code INPUT TYPE = HIDDEN with value is not generated dynamically which is working fine with PB6.5 Are there any other enhancements with GenerateHTMLForm method. Thank you Murali Gopisetti --------------1D85A18742F7DF1C9285F8D4 Content-Type: text/html; charset=us-ascii Co...

WEB.PB and PB 7.0 #2
We just migrated up from 6.5 to 7.0. Unfortunately we're stuck using WEB.PB and distributed applications for the long term, so using EA 3.0 isn't an option. Anyway, the problem is this: Without any code changes, the web applications crash without an error message when two threads are running the remote object. This wasn't happening in 6.5 and now we don't know how to get around it in 7.0. HELP! ...

PB 6.0 DeskTop and Web.PB
Hi, I am just getting started on Internet development using PB 6.0. I am using PB 6.0 DeskTop and PowerJ 2.5, PowerDynamo and PowerSite. I do not see the Web.PB icon on the Powerbar in PB 6.0 desktop. ( I have used PB6.5 EnterPrise at work and I remember seeing Web.PB icon ) I have made sure that internet components are installed bu choosing the Custom installation. I contacted sybase support and they told me to verify the Product Matrix. No where it is specifically mentioned that a Enterprise edition is required for Web development. Could somebody tell me how I can use P...

WEB.PB and PB 7.0 Execution Errors
I migrated my WebPB 6.5 application to PB7.0. The actual migration of the PBLs works fine. When I run the migrated server application from the development environment, there's no problem. I comipled the application into pbds and it worked fine. If I compile to DLLs, the application is crashing.I comipled the application with new build version 7021. Can someone please let me know the fix. Thank You Murali Gopisetti Murali Gopisetti wrote: > I migrated my WebPB 6.5 application to PB7.0. > > The actual migration of the PBLs works fine. When I run the...

Web.pb and pb.7
Hello, After installation of PB7 (EAS3), I cannot find web.pb class and library except the tutor_pb.pbl file and some dll's at "Internet Tools" directory. I remember that pb6 includes internet.pbl and webpb.pbl for development. Is it need to download from sybase to create web.pb application? Please any suggestions. Best Regards, Frankie ...

how to use powerbuilder 7.0 web datawindow
how to use powerbuilder7.0 web datawindow? I saw a paper named "powerbuilder 7 and the web datawindow", in the paper,the auther listed how to write the javascript for implementing the web datawindow(thin_client implementation),but I tried,it is not runnable,the java object is not the javascript's object.Does someone know how to do it,please tell me.thank you! you mean html datawindow? if so, you need PowerSite and Jaguar CTS and ASA! Do you have it? eursan@go.ro hyj wrote in message <37B2A3D4.85A6BEAD@ynmail.com>... >how to use powerbuilder7.0 web da...

PB 7.0.3 C5 Localized files on PB 7.0.3 Desktop
Hi, I found a file in my.sybase.com that says: "PowerBuilder 7.0.3 C5 Localized Files" Release Date: 16 Feb 2001 I have PB 7.0.3 Desktop, can I use this files? And what is C5? Is a Build code only for the Enterprise version of PB? Many Thanks Oliver Please help :-) Oliver Schulze L. wrote: > Hi, > I found a file in my.sybase.com that says: > "PowerBuilder 7.0.3 C5 Localized Files" Release Date: 16 Feb 2001 > > I have PB 7.0.3 Desktop, can I use this files? > > And what is C5? Is a Build code only for the Enterprise ...

Connection of PB 6.0 to SQL Server 7.0 & Version B/W PB 6.0 and PB 7.0
Can anyone tell me about connecting PB 6.0 to SQL Server 7.0. Please remember we are not planning to upgrade both software. When I was trying to connect PB 6.0 to SQL Server 7.0, error occurred " SQLSTAT 1003". OS=NT 4.0 Server PB=6.0 Enterprise Edition SQL SERVER=7.0 Corporate Edition I also want to know the versions between PB 6.0 to PB 7.0 If your are using the ODBC, which I assume you are, include Disablebind=1 in your DBParm. If your deployment environment is also NT, you will have to turn SQLSPY=1 using PFC services. Autocommit=FALSE and SetTransObject() ra...

Web.PB class library, Web.PB examples, WebSite Web server software
The PB 7 "About the Internet Tools" Help mentions "Additional freeware components...available via FTP that you can use to develop Web.PB applications". Does anyone know where these are? (Web.PB class library, Web.PB examples, WebSite Web server software).Thanks. Try: http://sdn.sybase.com/sdn/appdev/get_doc.stm?loc=1001660 On Mon, 1 Nov 1999 15:44:58 -0600, in powersoft.public.powerbuilder.web-pb Rich Walz <rich@cse-armerica.com> wrote: >The PB 7 "About the Internet Tools" Help mentions "Additional freeware >components...avail...

Web.PB class library, Web.PB examples, WebSite Web Server software
The PB 7 "About the Internet Tools" Help mentions "Additional freeware components...available via FTP that you can use to develop Web.PB applications". Does anyone know where these are? (Web.PB class library, Web.PB examples, WebSite Web server software). Thanks. ...

web.pb and Powerbuilder 6.0 beta 4
I just recieved my beta 4 cd in the mail and I have been trying to get my 5.0 web app to work. I am testing on IIS 3.0 with the pbisa60.dll on the web server and the powerbuilder distributed app running on my machine. The first page checks with the INI file to determine if password protection is turned on. If so, it asks the user to login and then recalls the first page again. If not, it just shows the first page. Problem: If the login page is served up, then when I submit the userid and password, it comes back with the following error: Netscape Document contains no data. This ...

Help me about connecting PB 6.0 to SQL Server 7.0 & Versions B/W PB 6.0 and PB 7.0
Can anyone tell me about connecting PB 6.0 to SQL Server 7.0. Please remember we are not planning to upgrade both software. When I was trying to connect PB 6.0 to SQL Server 7.0, error occurred " SQLSTAT 1003". OS=NT 4.0 Server PB=6.0 Enterprise Edition SQL SERVER=7.0 Corporate Edition I also want to know the versions between PB 6.0 to PB 7.0 I don't believe this is going to be possible without at least upgrading to the latest maintenance release of 6.x. On Mon, 23 Aug 1999 00:59:56 -0700, in powersoft.public.powerbuilder.database Abdul Lateef <abdul_lat...

Error connecting Pb 6.5 and Pb 7.0 to SQL SERVER 7.0 desktop(Window 98)
Today(9 Sep 1999), I can't connect to SQL Server 7.0 before this i can connect it. It give an Error "Unable to connect : SQL Server is unavailable or does not exist, Specified SQl Server not found ". I have check with Query analyzer , the Query analyzer can connect very well. Any one this have this problem, and how to solve this ??? TIA -- Regards Daniel Fransius not enough information... are you trying to use OLE DB ? ODBC ? Native driver ? What about security settings on the server ? What user id and password are you passing ? There is a lot of things ...

Compiling Web.pb app PB ver 7.0.2 to dll's
I am not able to compile PB web.pb ver 7.0.2 ver 8011 app to dll's.Is anyone facing the same problem.Can you please let me know. Thank You Murali ...

Web resources about - Is it possible to use Web.Pb with PowerBuilder 7.0 Desktop? - sybase.powerbuilder.web-pb

PowerBuilder - Wikipedia, the free encyclopedia
PowerBuilder is an integrated development environment owned by Sybase , a division of SAP . It has been in use since 1991, peaking around 1998 ...

Sybase PowerBuilder tool readied for Microsoft's .Net
... Win32 or newer style .Net development After several years of work, Sybase is ready to deliver on the final step in its plan to move PowerBuilder ...

Jim O'Neil (@jimoneil) on Twitter
Sign in Sign up To bring you Twitter, we and our partners use cookies on our and other websites. Cookies help personalize Twitter content, tailor ...

Open Directory - Computers: Programming: Languages
about dmoz - dmoz blog - report abuse/spam - help the entire directory only in Programming/Languages Description Top : Computers : Programming ...

The HP Booth Staff (Goons) Owe Me an Apology
... when you might need to use it. For instance, when I was in the WinRunner world there were plugins for driving terminal emulators and powerbuilder ...

Contact Us - Sybase Inc
Thanks for visiting the 主页 section of Sybase.com. Here you will find information about Contact Us. For more information about Business Intelligence, ...

热门搜索 - 我的异常网
... 我的异常网 » 热门搜索 sdpnet2 移动【A111】其它用户原因鉴权失败,是什么意思啊 http:// 192.168.1.102:22578 本网站服务器位于美国,受美国法律保护 MiniUI js 破解 http://192.168.1.103:8080/ powerbuilder ...

Mobile app security: Always keep the back door locked
The best way to keep mobile apps safe is to secure the services they connect to.

10 Tech Skills That Will Instantly Net You A $100,000+ Salary
... that let's developers run Java applications. Java is highly popular language for writing web apps and custom enterprise apps. No. 8: PowerBuilder ...

Top Ranked Articles
Top Ranked Articles - Free source code and tutorials for Software developers and Architects.; Updated: 23 Feb 2013

Resources last updated: 12/5/2015 5:49:04 PM