topic-27738

Posts: 723

Joined: Tue Sep 04, 2007 08:45 AM

To Antonio:
Posted: Thu Nov 28, 2013 06:53 PM

Antonio:

I'm getting the following errors when compiling (with FW 13.09) the SAMPSIX.PRG included in FW 10.06:

Turbo Incremental Link 5.69 Copyright (c) 1997-2005 Borland
Error: Unresolved external '_HB_FUN_SIX' referenced from E:\COMP\FWH\SAMPLES\SAM
PSIX.OBJ
Error: Unresolved external '_HB_FUN_SX_SETFILETYPE' referenced from E:\COMP\FWH\
SAMPLES\SAMPSIX.OBJ
Error: Unresolved external '_HB_FUN_SX_SETCENTURY' referenced from E:\COMP\FWH\S
AMPLES\SAMPSIX.OBJ
Error: Unresolved external '_HB_FUN_SX_SETDELETED' referenced from E:\COMP\FWH\S
AMPLES\SAMPSIX.OBJ
Error: Unresolved external '_HB_FUN_SX_SETEPOCH' referenced from E:\COMP\FWH\SAM
PLES\SAMPSIX.OBJ
* Linking errors *

Here's the source.

Code (fw): Select all Collapse

#define DRIVER    "SIX"

#include "Apollo.ch"

#include "FiveWin.ch"
#include "Inkey.ch"


#xtranslate Sx_I_TagName()    => ORDNAME(ORDSETFOCUS())
#xtranslate Sx_I_IndexName()  => ORDBAGNAME()
#xtranslate Sx_KeysIncluded() => ORDKEYCOUNT()


PROCEDURE Main
    LOCAL cPassWord := "12345678"

    request SIX
    rddRegister( "SIX", 1 )
    rddsetdefault( "SIX" )
    SET FILETYPE TO CDX
    ThreadSleep(100)

    SETCANCEL(.F.)
    SET _3DLOOK ON
    SET CENTURY ON
    SET CONFIRM OFF
    SET DELETED ON
    SET EPOCH TO 2000
    SET ESCAPE ON
    SET WRAP ON

    USE Customer NEW VIA DRIVER SHARED
    Sx_SetPass(cPassWord)
    Sx_DBFencrypt()

    // Browse will go in here.
    USE
RETURN
* EOP: Main

What I'm missing ?

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: To Antonio:
Posted: Fri Nov 29, 2013 09:21 AM

Are you using Harbour or xHarbour ? What version ?

regards, saludos

Antonio Linares
www.fivetechsoft.com

HunterEC

Posts: 723

Joined: Tue Sep 04, 2007 08:45 AM

Re: To Antonio:
Posted: Sat Nov 30, 2013 03:33 AM

Antonio:

Here it is:

Code (fw): Select all Collapse

xHarbour 1.2.3 Intl. (SimpLex) (Build 20130422)
Copyright 1999-2013, http://www.xharbour.org <!-- m --><a class="postlink" href="http://www.harbour-project.org/">http://www.harbour-project.org/</a><!-- m -->

Thank you very much.

FiveTech Support Forums

Continue the discussion