File: pwd_ds_order.sru
Size: 939
Date: Sat, 08 Dec 2007 15:38:33 +0100
$PBExportHeader$pwd_ds_order.sru
$PBExportComments$Class Order (using the non-HTML Datawindow)
forward
global type pwd_ds_order from pwd_ds_cgibase
end type
end forward

global type pwd_ds_order from pwd_ds_cgibase
string dataobject = "pwd_d_order_detail"
string #detaildataobject = "pwd_d_order_detail"
end type
global pwd_ds_order pwd_ds_order

type variables
string is_id
end variables

on pwd_ds_order.create
call super::create
end on

on pwd_ds_order.destroy
call super::destroy
end on

event pbw_setdetailretrievearguments;call super::pbw_setdetailretrievearguments;// Set Retrieve Arguments 
//this.of_setargument( 1,Long ( cgienv.of_getParam( 'id')))
this.of_fillretrieveargs( )

end event

event pbw_setdetailwebproperties;call super::pbw_setdetailwebproperties;// Set SelfLink
This.object.Datawindow.HTMLGen.SelfLink=''
This.object.Datawindow.HTMLGen.SelfLinkArgs="id='String(id)'"
end event