Error Log Line No.

Error Log Line No.

Postby acwoo1 » Mon Feb 06, 2012 10:53 pm

Hi

function test2()
#include "fivewin.ch"


local oDlg
local cname1
local cname2


DEFINE DIALOG oDlg FROM 0, 0 TO 26, 79 ;
TITLE "Test"

@ 0.9, 1 say "Name 1"
@ 1.8, 1 say "Name 2"
@ 1, 13 get cname1
@ 2, 13 get cname3

ACTIVATE DIALOG oDlg CENTERED

return nil
*****************************************

The Error Log:

Application
===========
Path and name: C:\test1\test1.exe (32 bits)
Size: ********* bytes
Compiler version: Harbour 3.1.0dev (Rev. 17222)
FiveWin Version: FWH 11.12
Windows version: 5.1, Build 2600 Service Pack 3

Time from start: 0 hours 0 mins 14 secs
Error occurred at: 07/02/12, 00:28:06
Error description: Error BASE/1003 Variable does not exist: CNAME3

Stack Calls
===========
Called from: .\test1.PRG => (b)TEST2( 0 )
Called from: .\source\classes\TGET.PRG => TGET:NEW( 243 )
Called from: .\test1.PRG => TEST2( 0 )
Called from: .\test1.PRG => (b)BUILDMENU2( 0 )
Called from: .\source\classes\MENU.PRG => TMENU:COMMAND( 461 )
Called from: .\source\classes\WINDOW.PRG => TWINDOW:COMMAND( 1033 )
Called from: => TWINDOW:HANDLEEVENT( 0 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3159 )
Called from: => WINRUN( 0 )
Called from: .\source\classes\WINDOW.PRG => TWINDOW:ACTIVATE( 980 )
Called from: .\test1.PRG => MAIN( 0 )

The error line number is 0. How to get the correct error line number.

Thanks

Regards
ACWoo
Using FWH1201 + Harbour + bcc582
acwoo1
 
Posts: 161
Joined: Tue Nov 10, 2009 10:56 am

Re: Error Log Line No.

Postby acwoo1 » Thu Feb 09, 2012 1:55 pm

Hi,

My go.bat:

@echo off

:BUILD

rem make -f%1.mak %2 %3 > make.log
if not exist obj md obj
c:\bcc582\bin\make -ftest1.mak
if errorlevel 1 goto BUILD_ERR

:BUILD_OK

rem if exist %1.exe %1.exe
if exist test1.exe test1.exe
goto EXIT

:BUILD_ERR

notepad make.log
goto EXIT

:EXIT

The make file:
#Borland make sample, (c) FiveTech Software 2005-2009

HBDIR=c:\harbour1201
BCDIR=c:\bcc582
FWDIR=c:\fwh1201

#change these paths as needed
.path.OBJ = .\obj
.path.PRG = .\
.path.CH = $(FWDIR)\include;$(HBDIR)\include
.path.C = .\
.path.rc = .\

#important: Use Uppercase for filenames extensions, in the next two rules!

PRG = \
test1.PRG \
test2.PRG \
test3.PRG

#C = \
#two.C

PROJECT : test1.exe

test1.exe : $(PRG:.PRG=.OBJ) $(C:.C=.OBJ)
echo off
echo $(BCDIR)\lib\c0w32.obj + > b32.bc
echo obj\test1.obj obj\test2.obj obj\test3.obj, + >> b32.bc
echo test1.exe, + >> b32.bc
echo test1.map, + >> b32.bc
echo $(FWDIR)\lib\FiveH.lib $(FWDIR)\lib\FiveHC.lib + >> b32.bc
echo $(HBDIR)\lib\hbrtl.lib + >> b32.bc
echo $(HBDIR)\lib\hbvm.lib + >> b32.bc
echo $(HBDIR)\lib\gtgui.lib + >> b32.bc
echo $(HBDIR)\lib\hblang.lib + >> b32.bc
echo $(HBDIR)\lib\hbmacro.lib + >> b32.bc
echo $(HBDIR)\lib\hbrdd.lib + >> b32.bc
echo $(HBDIR)\lib\rddntx.lib + >> b32.bc
echo $(HBDIR)\lib\rddcdx.lib + >> b32.bc
echo $(HBDIR)\lib\rddfpt.lib + >> b32.bc
echo $(HBDIR)\lib\hbsix.lib + >> b32.bc
echo $(HBDIR)\lib\hbdebug.lib + >> b32.bc
echo $(HBDIR)\lib\hbcommon.lib + >> b32.bc
echo $(HBDIR)\lib\hbpp.lib + >> b32.bc
echo $(HBDIR)\lib\hbwin.lib + >> b32.bc
echo $(HBDIR)\lib\hbcpage.lib + >> b32.bc
echo $(HBDIR)\lib\hbct.lib + >> b32.bc
echo $(HBDIR)\lib\png.lib + >> b32.bc
echo $(HBDIR)\lib\hbzlib.lib + >> b32.bc

echo $(HBDIR)\lib\hbcplr.lib + >> b32.bc
echo $(HBDIR)\lib\xhb.lib + >> b32.bc # must have
echo $(HBDIR)\lib\hbziparc.lib + >> b32.bc # must have
echo $(HBDIR)\lib\hbmzip.lib + >> b32.bc # must have
echo $(HBDIR)\lib\minizip.lib + >> b32.bc # must have

rem Uncomment these two lines to use Advantage RDD
rem echo $(HBDIR)\lib\rddads.lib + >> b32.bc
rem echo $(HBDIR)\lib\Ace32.lib + >> b32.bc

echo $(BCDIR)\lib\cw32.lib + >> b32.bc
echo $(BCDIR)\lib\uuid.lib + >> b32.bc
echo $(BCDIR)\lib\ws2_32.lib + >> b32.bc
echo $(BCDIR)\lib\import32.lib + >> b32.bc
echo $(BCDIR)\lib\psdk\odbc32.lib + >> b32.bc
echo $(BCDIR)\lib\psdk\nddeapi.lib + >> b32.bc
echo $(BCDIR)\lib\psdk\iphlpapi.lib + >> b32.bc
echo $(BCDIR)\lib\psdk\msimg32.lib + >> b32.bc
echo $(BCDIR)\lib\psdk\psapi.lib + >> b32.bc
echo $(BCDIR)\lib\psdk\rasapi32.lib, >> b32.bc

IF EXIST Alert.res echo test1.res >> b32.bc
$(BCDIR)\bin\ilink32 -Gn -aa -Tpe -s @b32.bc
del b32.bc

.PRG.OBJ:
$(HBDIR)\bin\harbour $< /L /N /Oobj\ /I$(FWDIR)\include;$(HBDIR)\include
$(BCDIR)\bin\bcc32 -c -tWM -I$(HBDIR)\include -oobj\$& obj\$&.c

.C.OBJ:
echo -c -tWM -D__HARBOUR__ -DHB_API_MACROS > tmp
echo -I$(HBDIR)\include;$(FWDIR)\include >> tmp
$(BCDIR)\bin\bcc32 -oobj\$& @tmp $&.c
del tmp

#Alert.res : Alert.rc
# $(BCDIR)\bin\brc32.exe -r Alert.rc

How to change the above so that I get the correct line number in my error log

Thanks

Regards
ACWoo
Using FWH1201 + harbour + bcc582
acwoo1
 
Posts: 161
Joined: Tue Nov 10, 2009 10:56 am

Re: Error Log Line No.

Postby Antonio Linares » Thu Feb 09, 2012 2:08 pm

ACWoo,

Please remove /L from here:

$(HBDIR)\bin\harbour $< /L /N /Oobj\ /I$(FWDIR)\include;$(HBDIR)\include
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41462
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: Error Log Line No.

Postby acwoo1 » Fri Feb 10, 2012 5:03 am

Tried the solution. It's OK now.
Thanks very much.

Regards

ACWoo
acwoo1
 
Posts: 161
Joined: Tue Nov 10, 2009 10:56 am


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 130 guests