FiveTech Software tech support forums

I can not put all my code in 1 files . Can somebody guide me How to use make utility .

Ehab,

Please review fwh\makes directory. There you have one make for Borland and another for Microsoft.

I fixed the path in test.rmk and those errors where found .


E:\COMPILER\clipper\FWH\makes\bormake>if not exist obj md obj

E:\COMPILER\clipper\FWH\makes\bormake>e:\compiler\cpp_lang\bcc55\bin\make -fmine.rmk
MAKE Version 5.2 Copyright (c) 1987, 2000 Borland
e:\compiler\clipper\harbour\bin\harbour .\alert.PRG /L /N /W /Oobj\ /Ie:\compiler\clipper\fwh\include;e:\compiler\clipper\harbour\include
Harbour Compiler Alpha build 45.0 (Flex)
Copyright 1999-2005, http://www.harbour-project.org/
Compiling '.\alert.PRG'...

Lines 29, Functions/Procedures 2
Generating C source output to 'obj\alert.c'... Done.
e:\compiler\cpp_lang\bcc55\bin\bcc32 -c -tWM -Ie:\compiler\clipper\harbour\include -oobj\alert obj\alert.c
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
obj\alert.c:
e:\compiler\clipper\harbour\bin\harbour .\one.PRG /L /N /W /Oobj\ /Ie:\compiler\clipper\fwh\include;e:\compiler\clipper\harbour\include
Harbour Compiler Alpha build 45.0 (Flex)
Copyright 1999-2005, http://www.harbour-project.org/
Compiling '.\one.PRG'...

Lines 6, Functions/Procedures 1
Generating C source output to 'obj\one.c'... Done.
e:\compiler\cpp_lang\bcc55\bin\bcc32 -c -tWM -Ie:\compiler\clipper\harbour\include -oobj\one obj\one.c
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
obj\one.c:
echo -c -tWM -D__HARBOUR__ -DHB_API_MACROS > tmp
echo -Ie:\compiler\clipper\harbour\include;e:\compiler\clipper\fwh\include >> tmp
e:\compiler\cpp_lang\bcc55\bin\bcc32 -oobj\two @tmp two.c
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
TWO.C:
del tmp
echo off
echo e:\compiler\cpp_lang\bcc55\bin\c0w32.obj + > b32.bc
echo obj\alert.obj obj\one.obj obj\two.obj, + >> b32.bc
echo alert.exe, + >> b32.bc
echo alert.map, + >> b32.bc
echo e:\compiler\clipper\fwh\lib\FiveH.lib e:\compiler\clipper\fwh\lib\FiveHC.lib + >> b32.bc
echo e:\compiler\clipper\harbour\lib\rtl.lib + >> b32.bc
echo e:\compiler\clipper\harbour\lib\vm.lib + >> b32.bc
echo e:\compiler\clipper\harbour\lib\gtwin.lib + >> b32.bc
echo e:\compiler\clipper\harbour\lib\lang.lib + >> b32.bc
echo e:\compiler\clipper\harbour\lib\macro.lib + >> b32.bc
echo e:\compiler\clipper\harbour\lib\rdd.lib + >> b32.bc
echo e:\compiler\clipper\harbour\lib\dbfntx.lib + >> b32.bc
echo e:\compiler\clipper\harbour\lib\dbfcdx.lib + >> b32.bc
echo e:\compiler\clipper\harbour\lib\dbfdbt.lib + >> b32.bc
echo e:\compiler\clipper\harbour\lib\debug.lib + >> b32.bc
echo e:\compiler\clipper\harbour\lib\common.lib + >> b32.bc
echo e:\compiler\clipper\harbour\lib\pp.lib + >> b32.bc
echo e:\compiler\clipper\harbour\lib\codepage.lib + >> b32.bc
rem Uncomment these two lines to use Advantage RDD
rem echo e:\compiler\clipper\harbour\lib\rddads.lib + >> b32.bc
rem echo e:\compiler\clipper\harbour\lib\Ace32.lib + >> b32.bc
echo e:\compiler\cpp_lang\bcc55\lib\cw32.lib + >> b32.bc
echo e:\compiler\cpp_lang\bcc55\lib\import32.lib + >> b32.bc
echo e:\compiler\cpp_lang\bcc55\lib\psdk\odbc32.lib + >> b32.bc
echo e:\compiler\cpp_lang\bcc55\lib\psdk\nddeapi.lib + >> b32.bc
echo e:\compiler\cpp_lang\bcc55\lib\psdk\iphlpapi.lib + >> b32.bc
echo e:\compiler\cpp_lang\bcc55\lib\psdk\rasapi32.lib, >> b32.bc
IF EXIST Alert.res echo Alert.res >> b32.bc
e:\compiler\cpp_lang\bcc55\bin\ilink32 -Gn -aa -Tpe -s @b32.bc
Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland
Error: Unresolved external '_hb_sxDeCrypt' referenced from E:\COMPILER\CLIPPER\HARBOUR\LIB\RDD.LIB|dbf1
Error: Unresolved external '_hb_sxPtoD' referenced from E:\COMPILER\CLIPPER\HARBOUR\LIB\RDD.LIB|dbf1
Error: Unresolved external '_hb_sxDtoP' referenced from E:\COMPILER\CLIPPER\HARBOUR\LIB\RDD.LIB|dbf1
Error: Unresolved external '_hb_sxEnCrypt' referenced from E:\COMPILER\CLIPPER\HARBOUR\LIB\RDD.LIB|dbf1
Error: Unresolved external '_HB_FUN_DBFFPT' referenced from E:\COMPILER\CLIPPER\HARBOUR\LIB\RDD.LIB|rddsys

** error 2 ** deleting Alert.exe

Ehab,

You have to link hbsix.lib and dbffpt.lib too. These changes were implemented after the makes were developed.

What are the rules of making variable(Dialog) visible to main and sub-program such as public variable in clipper ?

Also I faced that error in the sub-program

Compiling '.\cust.PRG'...

.\cust.PRG(16) Error E0030 Syntax error: "parse error at 'DIALOG'"

.\cust.PRG(19) Error E0030 Syntax error: "parse error at '@'"

.\cust.PRG(45) Error E0030 Syntax error: "parse error at '@'"

.\cust.PRG(52) Error E0030 Syntax error: "parse error at '@'"

.\cust.PRG(63) Error E0030 Syntax error: "parse error at '@'"

.\cust.PRG(64) Error E0030 Syntax error: "parse error at '@'"

.\cust.PRG(65) Error E0030 Syntax error: "parse error at '@'"

.\cust.PRG(66) Error E0030 Syntax error: "parse error at '@'"

.\cust.PRG(69) Error E0030 Syntax error: "parse error at '@'"

.\cust.PRG(70) Error E0030 Syntax error: "parse error at '@'"

.\cust.PRG(72) Error E0030 Syntax error: "parse error at '@'"

.\cust.PRG(73) Error E0030 Syntax error: "parse error at '@'"

.\cust.PRG(74) Error E0030 Syntax error: "parse error at '@'"

.\cust.PRG(78) Error E0030 Syntax error: "parse error at 'DIALOG'"

14 errors

No code generated

** error 1 ** deleting cust.OBJ

function listcust()//cust.prg
*-----------------
local custDlg,oLbx,oRec
*local oLbx,oRec

select 1
USE cust
INDEX ON cust->cu_acct TO cust
SET INDEX TO cust
GO TOP

if RecCount() == 0
APPEND BLANK
endif

DEFINE DIALOG custDlg FROM 0,0 TO 45,128 TITLE "Customer Management"
*oWnd:oClient:=oLbx

@ 0, 1 SAY " &Customer List" OF custDlg
@ 1, 1 LISTBOX oLbx FIELDS;
cust->CU_ACCT,;
cust->CU_NAME,;
cust->cu_stre,;
cust->cu_gove,;
cust->cu_city,;
cust->cu_coun,;
cust->CU_phon,;
cust->CU_fax,;
cust->CU_MAN,;
cust->CU_mobi,;
cust->CU_appr;
HEADERS "Account No.",;
"NAME",;
"Street",;
"Governer",;
"City",;
"Country",;
"Phone",;
"Fax",;
"Customer Man",;
"Customer Mobile",;
"Aprreviation";
ON CHANGE oLbx:Say( "Rec: " + cValToChar( RecNo() ) + "/" + ;
cValToChar( RecCount() ) );
SIZE 480, 280 OF custDlg

*FIELDSIZES 200,200,200,200,200,200,200,200;

/* ON CHANGE oRec:SetText( "Rec: " + cValToChar( RecNo() ) + "/" + ;
cValToChar( RecCount() ) )*/

@14,35 SAY oRec OF custDlg

// Lets use different row colors
oLbx:nClrText = { || SelColor( 3 ) }
oLbx:nClrForeFocus = { || SelColor( 3 ) }

// Uncomment this to quickly calculate the desired columns width
// Right click with the mouse over the browse and you will
// see the columns sizes!
oLbx:bRClicked = { || oLbx:ShowSizes() }

@ 17, 1 BUTTON "&New" OF custDlg SIZE 40, 12 ACTION Editcust( oLbx, .t. )
@ 17, 8 BUTTON "&Modify" OF custDlg SIZE 40, 12 ACTION Editcust( oLbx, .f. )
@ 17, 15 BUTTON "&Delete" OF custDlg SIZE 40, 12 ACTION Delrecord( oLbx )
@ 17, 22 BUTTON "&Search" OF custDlg SIZE 40, 12 ACTION SeekCust( oLbx )
@ 17, 29 BUTTON "&Print" OF custDlg ;
ACTION oLbx:Report( "Customers Report", .t. ) ; // .t. --> wants preview
SIZE 40, 12
@ 17, 36 BUTTON "&Exit" OF custDlg ACTION custDlg:End() SIZE 40, 12

@ 18, 1 BUTTON "&Order" OF custDlg ACTION ordermach(oLbx) SIZE 40, 12
@ 18, 8 BUTTON "&Filter" OF custDlg ACTION filtermach(oLbx) SIZE 40, 12
@ 18, 15 BUTTON "&Unfilter" OF custDlg ACTION Nonfiltermach(oLbx) SIZE 40, 12



ACTIVATE DIALOG custDlg

USE


return nil

Ehab,

Please start new threads for new questions.

Have you #include "FiveWin.ch" at the beginning ?

Variables values may be public and they keep the values. A dialog (modal) ends when it is closed.

I faced that error after including in my sub-programs after including :
#include "FiveWin.ch"
#include "colors.ch"
#include "Folder.ch"
listcust() is the function of the sub-program called from the main program as action listcust()


IF EXIST sitex.res echo sitex.res >> b32.bc
e:\compiler\cpp_lang\bcc55\bin\ilink32 -Gn -aa -Tpe -s @b32.bc
Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland
Error: Unresolved external '_HB_FUN_SELCOLOR' referenced from E:\PROGRAMS\CLIPPER\FWH\SITEX\SITEX2\OBJ\CUST.OBJ
Warning: Public symbol '_HB_FUN_LISTCUST' defined in both module E:\PROGRAMS\CLIPPER\FWH\SITEX\SITEX2\OBJ\SITEX.OBJ and E:\PROGRAMS\CLIPPER\FWH\SITEX\SITEX2\OBJ\CUST.OBJ

** error 2 ** deleting sitex.exe