by Patricio Avalos Aguirre » Sun Jun 21, 2020 8:22 pm
Buenas tardes a Tod@s
como her que funcione en modharbour la creación de clases
- Code: Select all Expand view RUN
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
