Buenas tardes a Tod@s
como her que funcione en modharbour la creación de clases
//-----------------------------------------------------------------------------------------------------------------------
como her que funcione en modharbour la creación de clases
CREATE CLASS tReporteVentas
VAR lEmision AS LOGICAL
VAR dDesde AS DATE
//-----------------------------------------------------------------------------------------------------------------------
METHOD New() CLASS tReporteVentas
::lEmision := .t.
::dDesde := dateAds()
return( Self )Saludos
Patricio
__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Patricio
__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl