PBMiner

$PBExportHeader$pwd_ds_customer.sru
$PBExportComments$Class Customer (using the non-HTML Datawindow)
forward
global type pwd_ds_customer from pwd_ds_cgibase
end type
end forward

global type pwd_ds_customer from pwd_ds_cgibase
string dataobject = "pwd_d_customer_detail"
string #detaildataobject = "pwd_d_customer_detail"
end type
global pwd_ds_customer pwd_ds_customer

type variables

end variables

on pwd_ds_customer.create
call super::create
end on

on pwd_ds_customer.destroy
call super::destroy
end on

event pbw_setdetailretrievearguments;call super::pbw_setdetailretrievearguments;// set retrieve arg
//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(customer_id)'"
end event