The problem does not happen all the time...in fact, I can run the program, and it will happen most of the time. It seems to happen more if I use the backspace key to change the value in the field.
What are the environmental variables that might influence this situation?
Mike
-------------- Original message from "jan johansen" <[email protected]>: --------------
Michael,I have a twofold comment.1. What is your current build of R:BASE? There was a problem with temp tables that was fixed in a version a few months back but I don't remember when.2. The disk-full error is usually a problem with your environment. What are your TEMP settings? Check to make sure that the user has the proper permissions to the temp folder. Make sure you don't have stray DLL's and CFG's floating around.Jan
-----Original Message-----
From: "Michael J. Sinclair" <[email protected]>
To: [email protected] (RBASE-L Mailing List)
Date: Tue, 20 Oct 2009 19:52:54 +0000
Subject: [RBASE-L] - Dropping a temp table within an EEP causes an I/O Error
Hi All,
I have been working with the OnKeyPress Demo, and trying to modify it so that I can use 2 fields (lastname and frstname) to narrow down the patient selection. For some reason, I am getting an I/O error when I drop the temporary table and then recreate the table....but other than showing the error message, the EEP seems to work. I did not notice this problem when I used the OnKeyPressDemo as it was given to me, only when I added the second field. What can I do to track this down? It does happen even when I trace the file. The exact error messag is...
-ERROR- I/O problems - Check for a full disk. (2009)
The code in the EEP is (red lines are causing the problem)
SET VAR vlastkey TEXT = (LASTKEY(0))
PROPERTY idnomatch visible 'FALSE'
GETPROPERTY idkey_stroke3 textvalue 'vkey_stroke4'
SET VAR vlike2 TEXT = (.vkey_stroke4 +'%')
SET VAR vtest = NULL
SET ERROR MESSAGE 2059 OFF
--sel LName into vTEST INDI isNULL from customer +
--WHERE lname LIKE .vlike and COUNT = 1
SELECT lastname INTO vtest i1 FROM patinfo +
WHERE lastname LIKE .vlike AND frstname LIKE .vlike2 AND COUNT =1
SET ERROR MESSAGE 2059 ON
IF vtest IS NULL THEN
PROPERTY idnomatch visible 'TRUE'
--DELETE FROM patinfo_tmp
--PROPERTY table patinfo_tmp 'refresh'
GOTO bypass
ENDIF
SELECT COUNT patnumbr INTO vcount FROM patinfo WHERE +
lastname LIKE .vlike and frstname like .vlike2
IF vcount = 1 THEN
SET V vpnum = patnumbr, vlastname = lastname, vfrstname = frstname +
IN patinfo WHERE lastname LIKE .vlike and frstname like .vlike2
SET V vpnumtxt = (CTXT(INT(.vpnum)))
PROPERTY id_pnumtxt textvalue .vpnumtxt
SET V vkey_stroke = .vlastname
PROPERTY idkey_stroke textvalue .vlastname
SET V vkey_stroke3 = .vfrstname
PROPERTY idkey_stroke3 textvalue .vfrstname
PROPERTY id_doctype set_focus 'TRUE'
ENDIF
DROP TABLE patinfo_tmp
PROJECT TEMP patinfo_tmp FROM patinfo +
USING patnumbr lastname frstname midlname birthday +
WHERE lastname LIKE .vlike and frstname like .vlike2 +
ORDER BY lastname frstname midlname birthday
--DELETE FROM patinfo_tmp
--APPEND patinfo TO patinfo_tmp WHERE lastname LIKE .vlike
PROPERTY table patinfo_tmp 'refresh'
LABEL bypass
RETURN
My hard drive is not full.
I can use the Delete from table and the APPEND commands that follow but are commented out, but I lose the nice alphabetized list. Is there a way to make the APPEND produce an alphabetized list??
TIA!
Mike
