HMG 3.0.41

[gvaronas]

Daniel,
I know the command _EXECUTE just was curious because the RUN command does not work in version 3.41.
I tested it on 3.1.0 and works Harbour.
Thanks for the reply


Daniel,
Sé que el _EXECUTE comando era sólo curiosidad, porque el comando RUN no funciona en la versión 3.41.
Lo he comprobado en Harbour 3.1.0 y funciona.
Gracias por la respuesta

[SPA]
Al parecer es producto del ultimo gran cambio que se ha hecho en harbour.
Por ejemplo a mi no me funciona este codigo:

[ENG Google]
Apparently is the result of the last great change that has been done in harbor.
For example I do not work this code:

Code: Select all

file: tst.prg:
------------------------------------------------------
PROCEDURE main
    LOCAL cFile := "tstprn.prg"
    LOCAL cPuerto := "\\deyp05\fx2180"
    ? Version()
    ? HB_COMPILER()
    HB_RUN( "TYPE " + cFile + " > " + cPuerto )
    wait
------------------------------------------------------

[danielmaximiliano]

[SPA]
Al parecer es producto del ultimo gran cambio que se ha hecho en harbour.
Por ejemplo a mi no me funciona este codigo:

[ENG Google]
Apparently is the result of the last great change that has been done in harbor.
For example I do not work this code:

Code: Select all

file: tst.prg:
------------------------------------------------------
PROCEDURE main
    LOCAL cFile := "tstprn.prg"
    LOCAL cPuerto := "\\deyp05\fx2180"
    ? Version()
    ? HB_COMPILER()
    HB_RUN( "TYPE " + cFile + " > " + cPuerto )
    wait
------------------------------------------------------

[/quote]

Tst.prg se compila y ejecuta correctamente en HMG.3.0.41

Windows 7 Home Premiun 64
HP4530 i3 4gb

Code: Select all

#include 'hmg.ch'
PROCEDURE main
    LOCAL cFile := "tstprn.prg"
    LOCAL cPuerto := "\\deyp05\fx2180"
    ? Version()
    ? HB_COMPILER()
    HB_RUN( "TYPE " + cFile + " > " + cPuerto )
    wait
    Return

HBrun.jpg (71.6 KiB) Viewed 6602 times

[Amarante]

[Português]
Testei com build.bat e com ide.exe e não funciona o comando RUN.
[Español]
Probado con Build.bat y ide.exe y lo RUN no funciona.
[English]
Tested with Build.bat and ide.exe and the run command does not work.

Code: Select all

#include 'hmg.ch'
PROCEDURE main()
local	cStr := "DIR /B *.* > listfiles.txt"
HB_RUN( cStr )
Return

[gvaronas]

[SPA]
Hola Daniel, a mi tambien me compila sin errores, el problema es que no hace lo que se espera, en el ejemplo, debería imprimir un archivo texto en una impresora remota, compilando con una versión anterior de harbour si trabaja bien.

[ENG Google]
Hi Daniel, I also I compiled without errors, the problem is that it does what is expected, in the example, you should print a text file to a remote printer, compiled with an earlier version of harbor if it works well.

BestRegars GVS

[SPA]
Al parecer es producto del ultimo gran cambio que se ha hecho en harbour.
Por ejemplo a mi no me funciona este codigo:

[ENG Google]
Apparently is the result of the last great change that has been done in harbor.
For example I do not work this code:

Code: Select all

file: tst.prg:
------------------------------------------------------
PROCEDURE main
    LOCAL cFile := "tstprn.prg"
    LOCAL cPuerto := "\\deyp05\fx2180"
    ? Version()
    ? HB_COMPILER()
    HB_RUN( "TYPE " + cFile + " > " + cPuerto )
    wait
------------------------------------------------------

Tst.prg se compila y ejecuta correctamente en HMG.3.0.41

Windows 7 Home Premiun 64
HP4530 i3 4gb

Code: Select all

#include 'hmg.ch'
PROCEDURE main
    LOCAL cFile := "tstprn.prg"
    LOCAL cPuerto := "\\deyp05\fx2180"
    ? Version()
    ? HB_COMPILER()
    HB_RUN( "TYPE " + cFile + " > " + cPuerto )
    wait
    Return

HBrun.jpg

[/quote]

[Amarante]

Apparently it is not an error Harbour, it may be a bug with the version that is HMG, see below:

HMG 3.0.41
Harbour 3.1.0dev (17406 2012-04-20)
The RUN command NOT work.

Harbour MiniGUI Extended Edition 2.1.0
Harbour 3.1.0dev (Last ChangeLog entry: 2012-04-20 08:14 UTC+0200 Przemyslaw Czerpak)
The RUN command WORK!!!

[Roberto Lopez]

Thanks for this new version!

[Pablo César]

[English]
Tested with Build.bat and ide.exe and the run command does not work.

Code: Select all

#include 'hmg.ch'
PROCEDURE main()
local	cStr := "DIR /B *.* > listfiles.txt"
HB_RUN( cStr )
Return

Amarante, I changed to execute DIR command inside batch file and it os working. I have created a Test.bat file with:

Code: Select all

DIR /B *.* > lstfiles.txt
pause

I put pause, just to see what OS makes before ">" (add a "1"). And then in source code I called as: HB_RUN( "Test.bat" )

[Pablo César]

[ENG Google]
Apparently is the result of the last great change that has been done in harbor.
For example I do not work this code:[/color]

Code: Select all

file: tst.prg:
------------------------------------------------------
PROCEDURE main
    LOCAL cFile := "tstprn.prg"
    LOCAL cPuerto := "\\deyp05\fx2180"
    ? Version()
    ? HB_COMPILER()
    HB_RUN( "TYPE " + cFile + " > " + cPuerto )
    wait
------------------------------------------------------

Same for Amarante indication could apply for you too. Please try to create batch file and you will see that is working. I have created a test.bat with this:

Code: Select all

TYPE tstprn.prg > \\deyp05\fx2180
pause

But display an OS error: Access denied.

But if you make test.bat with this:

Code: Select all

TYPE tstprn.prg > \\deyp05\fx2180\tstprn.prg
pause

It´s works fine !

[Amarante]

Portuguese
Pablo, obrigado por responder, eu consegui solucionar o problema, mas eu estou é curioso por ver que o erro ocorre na versão Harbour que está na 3.0.41, pois isso não ocorre no MiniGui que contem a mesma versão do Harbour (veja alguns posts acima).
Google Translator
Pablo, thanks for replying, I managed to solve the problem, but I'm curious to see is that the bug in version 3.0.41 which is in the Harbour, as this does not occur in MiniGUI which contains the same version of the Harbour (see some posts above).

[IMATECH]

Hello Friends...

I'm trying to compile HMG 3.0.41 with Harbor SVN and MSVC
And I update warnigs to w1 (default w0)...

Then I have discovered that will need many changes in source to have succes on this build...

Basically need some work to declare variables and assign Memvar in some cases ( m-> )...

Below a partial compile screen...

Code: Select all

Version: Harbour 3.2.0dev (Rev. 17513)
Compiler: Microsoft Visual C++ 16.0.21003 (32-bit)
Platform: Windows 7 6.1.7601 Service Pack 1
PCode version: 0.3
ChangeLog last entry: 2012-05-25 00:12 UTC+0200 Francesco Perillo (fperillo at gmail.com)
ChangeLog ID: ChangeLog 17513 2012-05-24 22:17:23Z fperillo
Built on: May 24 2012 21:43:50
Build options: (C++ mode) (Clipper 5.3b) (Clipper 5.x undoc)
-------------------------------
hbmk2: Processando opções do ambiente: -compiler=msvc
hbmk2: Harbour: Compilando módulos...
Harbour 3.2.0dev (Rev. 17513)
Copyright (c) 1999-2012, http://harbour-project.org/
Compiling 'source\ErrorSys.prg'...
Lines 12672, Functions/Procedures 8
Generating C source output to 'C:\HMG\OBJ\ErrorSys.c'... Done.
...
source\h_grid.prg(2968) Warning W0001  Ambiguous reference 'NHANDLE'
source\h_grid.prg(2969) Warning W0001  Ambiguous reference 'NHANDLE'
source\h_grid.prg(2969) Warning W0001  Ambiguous reference 'NITEMCOUNT'
source\h_grid.prg(2973) Warning W0001  Ambiguous reference 'NRECNO'
source\h_grid.prg(2989) Warning W0001  Ambiguous reference 'ACOLUMNFIELDS'
source\h_grid.prg(3115) Warning W0001  Ambiguous reference 'NLOGICALROW'
source\h_grid.prg(3117) Warning W0001  Ambiguous reference 'NLOGICALCOL'
source\h_grid.prg(3119) Warning W0001  Ambiguous reference 'XVALUE'
source\h_grid.prg(3121) Warning W0001  Ambiguous reference 'NPHYSICALROW'
source\h_grid.prg(3126) Warning W0001  Ambiguous reference 'NPHYSICALROW'
source\h_grid.prg(3129) Warning W0001  Ambiguous reference 'NPHYSICALROW'
source\h_grid.prg(3136) Warning W0001  Ambiguous reference 'NRECNO'
source\h_grid.prg(3145) Warning W0001  Ambiguous reference 'NLOGICALCOL'
source\h_grid.prg(3147) Warning W0001  Ambiguous reference 'XVALUE'
source\h_grid.prg(3147) Warning W0001  Ambiguous reference 'ACOLUMNFIELDS'
source\h_grid.prg(3147) Warning W0001  Ambiguous reference 'NLOGICALCOL'
source\h_grid.prg(3151) Warning W0002  Ambiguous reference, assuming memvar 'ACOLUMNFIELDS'
source\h_grid.prg(3151) Warning W0001  Ambiguous reference 'XVALUE'
source\h_grid.prg(3151) Warning W0001  Ambiguous reference 'NLOGICALCOL'
source\h_grid.prg(3194) Warning W0001  Ambiguous reference 'NRECNO'
source\h_grid.prg(3205) Warning W0001  Ambiguous reference 'ACOLUMNFIELDS'
source\h_grid.prg(3242) Warning W0001  Ambiguous reference 'NPHYSICALROW'
source\h_grid.prg(3244) Warning W0001  Ambiguous reference 'CCOMMAND'
source\h_grid.prg(3249) Warning W0001  Ambiguous reference 'NPHYSICALROW'
source\h_grid.prg(3262) Warning W0001  Ambiguous reference 'CCOMMAND'
source\h_grid.prg(3266) Warning W0001  Ambiguous reference 'CCOMMAND'
source\h_grid.prg(3298) Warning W0001  Ambiguous reference 'NRECNO'
source\h_grid.prg(3351) Warning W0001  Ambiguous reference 'CCOMMAND'
source\h_grid.prg(3353) Warning W0001  Ambiguous reference 'CCOMMAND'
1 error

No code generated.

Question:

Somebody can see if this is really needed for improving HMG sources?