|
| ARGENTINA |
|
|  | Mariano Triñanes Pump Controllers, Tank Gauges, E.R.P. and P.O.S. system for Gas Stations
|
|
|
|
|
|
|
|
|
|
|
| AUSTRALIA |
|
|  | Pat Driscoll Manufacturing, Quoting, Job Control and many others
|
|  | Colin Haig Service Industry - job costing , invoicing etc , Maintenance scheduling
software.
|
|
|
|
| AUSTRIA |  | Guenther Steiner Software zur Zeiterfassung und Lohnabrechnung;
Materialwirtschaft ;
Programme für die oeffentliche Verwaltung;
Vereinsverwaltung;
Datenerfassung für Sportveranstaltungen
|
|
| BELGIUM |
|
|  | DRIESSEN Michel Juda - software voor advocatenkantoren
Curato - software voor curatoren
|
|  | Marc Venken Invoice, Prospect, Stock management,
only for my own company.
|
|
|  | Marc Vanzegbroeck Accounting program 'EasyFact'.
Documentation program 'TPSDoc' for the Honeywell DCS system, used bij Honeywell Belgium, chemical- and petrochemical plants.
Also planning,stock,transport and other software.
|
|
|
| BRAZIL |
|
|
|
|
|
|
|
|
|  | Jose Carlos R Leoner Venda Certa - Automação Comercial
Menthor - Administração de Vendas
Suprim - Administração de Suprimentos
Finance - Controle Financeiro
Aspen - Controle Patrimonial
Prisma - Controle de Assistencia Técnica
|
|
|  | Maurilio Viana Filho SGE - Sistema de Gestão Empresarial (controle financeiro, estoque, contábil, etc.)
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|  | Elias Abrão Junior I'm trying to compile the class TsysInfo version "1,061" with the xHarbour 1.1.0 - Simplex, and is giving this error METHOD Memory, you could see the already occurs can'tI hit and need this class so that my system functioning normally. Already this class was compiled by the version 0.99.61 without serro
USE
xHarbour 1.1.0 Free
Fivewin 8.3
Borland C++
xMate 1.15
*****************************************************************************************************
METHOD Memory( nMem ) Class TSystemInfo
Local nRetu
#ifdef __HARBOUR__
************************************************* INIT DO ERROR
#pragma BEGINDUMP
#include "\Language\Bcc55\Include\Windows.h"
#pragma ENDDUMP
nRetu := HB_INLINE( nMem )
{
MEMORYSTATUS mst;
long nMem = hb_parnl(1);
mst.dwLength = sizeof( MEMORYSTATUS );
GlobalMemoryStatus( &mst );
switch( nMem )
{
case 1: hb_retnl( mst.dwTotalPhys / (1024*1024) ) ; break;
case 2: hb_retnl( mst.dwAvailPhys / (1024*1024) ) ; break;
case 3: hb_retnl( mst.dwTotalPageFile / (1024*1024) ) ; break;
case 4: hb_retnl( mst.dwAvailPageFile / (1024*1024) ) ; break;
case 5: hb_retnl( mst.dwTotalVirtual / (1024*1024) ) ; break;
case 6: hb_retnl( mst.dwAvailVirtual / (1024*1024) ) ; break;
default: hb_retnl( 0 ) ;
}
}
*/
************************************************* END ERROR
#else
Local oMemory
Struct oMemory
Member m1 As LONG // nSize
Member m2 As LONG // Memory Load
Member m3 As LONG // Total Physical
Member m4 As LONG // Available Physical
Member m5 As LONG // Total Page File
Member m6 As LONG // Available Page File
Member m7 As LONG // Total Virtual
Member m8 As LONG // Available Virtual
EndStruct
oMemory:m1 := oMemory:sizeOf()
MemStat( oMemory:cBuffer )
Do Case
Case nMem == 1 ; nRetu := Round( oMemory:m3 / ( 1024 * 1024 ), 0 )
Case nMem == 2 ; nRetu := Round( oMemory:m4 / ( 1024 * 1024 ), 0 )
Case nMem == 3 ; nRetu := Round( oMemory:m5 / ( 1024 * 1024 ), 0 )
Case nMem == 4 ; nRetu := Round( oMemory:m6 / ( 1024 * 1024 ), 0 )
Case nMem == 5 ; nRetu := Round( oMemory:m7 / ( 1024 * 1024 ), 0 )
Case nMem == 6 ; nRetu := Round( oMemory:m8 / ( 1024 * 1024 ), 0 )
Otherwise ; nRetu := 0
EndCase
If nRetu # 0 .and. ::nPlatform == 1 // added by lkm
nRetu += 1 // calc error under Win95/98/ME
Endif
#endif
Return nRetu
I'm trying to compile the class TsysInfo version "1,061" with the xHarbour 1.1.0 - Simplex, and is giving this error METHOD Memory, you could see the already occurs can'tI hit and need this class so that my system functioning normally. Already this class was compiled by the version 0.99.61 without serro
USE
xHarbour 1.1.0 Free
Fivewin 8.3
Borland C++
*****************************************************************************************************
METHOD Memory( nMem ) Class TSystemInfo
Local nRetu
#ifdef __HARBOUR__
************************************************* INIT DO ERROR
#pragma BEGINDUMP
#include "\Language\Bcc55\Include\Windows.h"
#pragma ENDDUMP
nRetu := HB_INLINE( nMem )
{
MEMORYSTATUS mst;
long nMem = hb_parnl(1);
mst.dwLength = sizeof( MEMORYSTATUS );
GlobalMemoryStatus( &mst );
switch( nMem )
{
case 1: hb_retnl( mst.dwTotalPhys / (1024*1024) ) ; break;
case 2: hb_retnl( mst.dwAvailPhys / (1024*1024) ) ; break;
case 3: hb_retnl( mst.dwTotalPageFile / (1024*1024) ) ; break;
case 4: hb_retnl( mst.dwAvailPageFile / (1024*1024) ) ; break;
case 5: hb_retnl( mst.dwTotalVirtual / (1024*1024) ) ; break;
case 6: hb_retnl( mst.dwAvailVirtual / (1024*1024) ) ; break;
default: hb_retnl( 0 ) ;
}
}
*/
************************************************* END ERROR
#else
Local oMemory
Struct oMemory
Member m1 As LONG // nSize
Member m2 As LONG // Memory Load
Member m3 As LONG // Total Physical
Member m4 As LONG // Available Physical
Member m5 As LONG // Total Page File
Member m6 As LONG // Available Page File
Member m7 As LONG // Total Virtual
Member m8 As LONG // Available Virtual
EndStruct
oMemory:m1 := oMemory:sizeOf()
MemStat( oMemory:cBuffer )
Do Case
Case nMem == 1 ; nRetu := Round( oMemory:m3 / ( 1024 * 1024 ), 0 )
Case nMem == 2 ; nRetu := Round( oMemory:m4 / ( 1024 * 1024 ), 0 )
Case nMem == 3 ; nRetu := Round( oMemory:m5 / ( 1024 * 1024 ), 0 )
Case nMem == 4 ; nRetu := Round( oMemory:m6 / ( 1024 * 1024 ), 0 )
Case nMem == 5 ; nRetu := Round( oMemory:m7 / ( 1024 * 1024 ), 0 )
Case nMem == 6 ; nRetu := Round( oMemory:m8 / ( 1024 * 1024 ), 0 )
Otherwise ; nRetu := 0
EndCase
If nRetu # 0 .and. ::nPlatform == 1 // added by lkm
nRetu += 1 // calc error under Win95/98/ME
Endif
#endif
Return nRetu
am using the version of your site, 2004/03/10
|
|
|
| CANADA |
|
|  | Mel Smith Medical Billing (MircoMed)
EST (a structural steel estimating system)
INV (structural steel inventory program)
ACT (an Accounting/payroll/cheque-writing system)
|
|
|  | Sylvain Larche 1) POS software for "food market store"
2) Credit/Collection system
|
|
|
|
|
| CHILE |  | Adolfo Lagos Jimenez Sistema de Gestion Administrativo, controla Compras, Ventas, Cuentas Corrientes, Cierres, Multiples locales etc. etc.
|
|
|
|
|
|
|
|
|
|  | José Concha Leiva Sistema Gestión Empresarial: Clientes, Proveedores e Inventarios, toda la información, históricos, etc. Todos los documentos y movimientos posibles 100% parametrizados. Utilidades, Comisiones, %Participación. Plan de Cuentas, Control bancario, Cartera documentos, Cajas Chicas, Otros. Información diferentes niveles, control y seguimientos, proyecciones, etc.
|
|
|  | Luis Fuentes Guerrero Sistema Remuneraciones multiempresa, Puntos de Venta Facturacion, Inventario, contabilidad, Activo Fijo inmobilizado
|
|
| COLOMBIA |
|
|
|  | MARIO SANTIAGO SECOME (EVENTOS Y BANQUETES), VENTAS, INVENTARIOS Y CARTERA
|
|  | Carlos Gallego Acoounting/Administration system
Payroll system
Sales Control system
POS system
|
|
| ECUADOR |
|  | Fernando Patricio Espinoza Una aplicación actualmente personal, para llevar estadísticas del fútbl ecuatoriano. No soy programador profesional, soy usuario de Clipper porque lo aprendi en la Universidad para hacer mi tesis de grado en Ingenieía Eléctrica. Desde ahí me gusto este lenguaje y antes que pasarme a los visual preferi seguir con FiveWin.
|
|
|
| ESTONIA |  | Taavi Remmelg Whole range of financial software modules for local market.
|
|
| GERMANY |
|
|
|
|
|  | Stefan Haupt Software for the invitation of tenders (for architects)
|
|
|
|
|
|
| GREECE |  | Tassos Kourbanis Retail (POS) Applications, Exhibitions Registration Application, Pos2Sql Replication
|
|
|  | Dionisis Divaris Electronic technician (celular phones)
Programmer (xHArbour - V.B)
|
|
| INDIA |  | Sandeep Raja Rao PMS, a full featured and integrated soltuion for hotel industry.
AW-Delcredre, a full featured integrated inventory and accounting system.
|
|
| INDONESIA |
|  | Lucky Prianata POS-Retail System, Trading Application, Car-Station Application, MultiFinance Application.
All Application running with SQL Database such as : MS SQL-Server, MySQL, SQLite engine
|
|
|
|
|
|
|
|
|
| ITALY |
|  | Menabue Maurizio Misure: applicativo per la determinazione
del C.V., della deviazione STD
per il controllo qualita'.
|
|
|
|
|
|
|
|
|  | Paolo Orna Sviluppo e mantenimento di applicazioni per la statistica, il supporto aziendale ed utilità in genere.
|
|
|  | R&C Informatica Snc Gestione aziendale integrata, fatturazione, magazzino, contabilità
Software gestionali personalizzati
|
|
|
|
|
|
| LITHUANIA |  | Rimantas Usevicius I'm working in a big enterprise and creating programs for their needfuls .
|
|
| MALAYSIA |
|
|  | eddy fivewin 2.0, Clipper 5.3b, Blinker 5.1
|
|
|
|
|
|
| MEXICO |
|
|
|
|
|
|
|  | Rene Montaño Inventory control
service center control
production control for textil plants
|
|
|
|
|  | Iván C. Méndez López LogiCat 2000 (Sistema Integral de Bibliotecas & LogiCal 2000 (Sistema de Control Escolar)
|
|
|
|
|  | Martin Gamez Programa de cuenta de gastos (agencia aduanal)
programa para Empresa de Transportes (publico federal)
|
|
|
|
|
|  | JOSE LUGO LOZANO Sistemas Comercial para Organismos Operadores de Agua Dos y Windows Usuarios, Facturacion, Medidores etc.
|
|
| |
|