COULD NOT FIX THIS ERROR, NEED HELP

[VNDN]

WHEN I RUN THIS SMALL PROGRAM BELOW I RECIEVED THE FOLLOWING ERRORS: DBFNTX/1001: OPEN ERROR. BUT I KNOW FOR SURE THAT THE LOOKUP.DBF IN THIS DIRECTORY(\\FILE007\INDEHELTH\Medicare\TestSys\MSTAR) ANY IDEAS, HOW TO FIX THIS?.. This is my first time to write something in clipper.
Please guide me with specifics. Thank you much in advance. CVL

STORE "08" TO CONST_TYPECODE
STORE "---" TO CONST_SRCHCODE
STORE "," TO CONST_DELIM

SET CURSOR OFF

PUBLIC line:= 0

BEGIN SEQUENCE
**************PRODUCTION DATABASE******************
**SET PATH TO \\FILE016\Med_grp\ARStar\Combstar

**************TEST DATABASE************************
SET DEFAULT TO \\FILE007\INDEHELTH\Medicare\TestSys\MSTARBase


SET PRINTER TO \\FILE016\MED_APPS\MEDICARETIMEACTIVITY\FROMSTAR\ActCode.txt
SET DEVICE TO PRINT

USE LOOKUP NEW
INDEX ON SOUNDEX(DESC1) TO lookup

SET INDEX TO lookup
GOTO TOP

DO WHILE !lookup -> (eof())
IF upper( alltrim(lookup ->TypeCode)) = CONST_TYPECODE .AND. ALLTRIM(lookup ->SRCHCODE) <> CONST_SRCHCODE
@line, 0 SAY ALLTRIM(lookup ->SRCHCODE) + CONST_DELIM + ALLTRIM(lookup ->Desc1)
line++
ENDIF
SKIP alias lookup
ENDDO

CLOSE lookup
END SEQUENCE

 

[GriffMG]

Can you provide any more details of the error?

I'm looking for the line number preferably.

Is the printer folder available?

Is the index operation causing the problem?

Martin Griffin

Regards

Griff
Keep [Smile]ing

 

[VNDN]

GRIFFMG,
yes, the printer folder is available.
No, the index operation is not causing the problem. When I copy a lookup.dbf in the same directory as the executable and comment the set path to, it runs fine. But this did not solve my problem. Thanks CVL

 

[VNDN]

I had it figured out. Thank you all your help everyone.

 

[GriffMG]

What was the solution?


Regards

Griff
Keep [Smile]ing

 

[HotEye]

Clipper is a DOS application, you need to map a drive to the directory where the database file is.

Was that the answer you found?