Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

COULD NOT FIX THIS ERROR, NEED HELP

Status
Not open for further replies.

VNDN

Programmer
Feb 28, 2003
27
US
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
 
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
 
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
 
I had it figured out. Thank you all your help everyone.
 
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?
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top