Welcome to the NEW CHUG— your ultimate destination for cutting-edge insights and discussions at the intersection of healthcare and technology.

Our platform is dedicated to exploring the dynamic landscape of healthcare technology, empowering professionals, enthusiasts, and innovators alike with the knowledge and resources to navigate the rapidly evolving field.

From telemedicine revolutionizing patient care to the transformative potential of artificial intelligence in diagnostics, we delve into a myriad of topics shaping the future of healthcare delivery. Whether you’re a seasoned healthcare IT professional, an aspiring entrepreneur in the digital health space, or simply curious about the latest innovations, our curated content, expert interviews, and thought-provoking articles provide a comprehensive exploration of healthcare technology’s most pressing issues.

Join us as we navigate the forefront of innovation, driving forward the transformation of healthcare for a healthier, more connected world.

Have questions or suggestions? Please use the contact button below.

Notifications

Clear all

MEL File Read Troubles

MEL, SQL, Oracle

Last Post by Anonymous 1 second ago

4 Posts

3 Users

0 Reactions

58 Views

RSS

Cbrown

(@cbrown)

Posts: 5

Active Member

Topic starter

Has anyone been able to successfully read from a file using MEL - FILEREAD (fhnd)?

I have been stuck on this for a little more than a day and i can write to a file, run a separate process but for some reason i can not get the read function to work properly :/

Every time i attempt to call the function it just returns "FALSE" ... Is there a specific directory it forces the read from? (Also i have reversed the forward slashes to back slashes and get the same result.)

Im using VFE

Read File Function:

!fn fnFileRead()
{

local fname = "c:/temp/output.txt"

local fhnd = FILEOPEN(fname,"r")
FILEOPEN(fname,"r")
if fhnd <> NULL then

text = FILEREAD(fhnd)

FILECLOSE(fhnd)

else ""
endif
}

any assistance would be greatly appreciated!!

-Chris

Posted : May 29, 2015 5:00 am

gibsonmi

(@gibsonmi)

Posts: 827

Prominent Member

I use it all the time for user preferences and occasionally for writing log files. Its great. My guess is the FILECLOSE is returning the FALSE, add return text at the end of the function and I think it should work.

!fn fnFileRead()

{

local fname = “c:/temp/output.txt”

local fhnd = FILEOPEN(fname,”r”)
local text = ""

if fhnd NULL then

text = FILEREAD(fhnd)

FILECLOSE(fhnd)

endif

return text

}

Posted : May 29, 2015 5:23 am

jfitzmd

(@jfitzmd)

Posts: 419

Reputable Member

Agree with above comments, the routine is returning the logical value of FILECLOSE(fhnd). In addition, I am always concerned about executing functions on load. It is prone to timing problems. Here is working code snippet I use, the file name is in call, strTextComp:

{fn Get_File(strTextComp)

{

local strFile=""

local fhnd

local fname="F:/ACG Text Components/"+strTextComp

fhnd=fileopen(fname,"r")

if fhnd==NULL then

userok("Unable to open file: "+strTextComp)

else

strFile=fileread(fhnd)

fileclose(fhnd)

endif

return strFile

}

}

Posted : May 29, 2015 6:00 am

Cbrown

(@cbrown)

Posts: 5

Active Member

Topic starter

That was it!!!

Wow i cant believe i forgot to put the return test at the end of the function ... my bad! But thank you guys for the help!!! got it up and working!!

🙂

Posted : May 29, 2015 7:08 am

Share:

24 Forums
9,940 Topics
39.9 K Posts
0 Online
6,470 Members

Forum Icons: Forum contains no unread posts Forum contains unread posts

Topic Icons: Not Replied Replied Active Hot Sticky Unapproved Solved Private Closed

Powered by wpForo Powered by wpForo version 2.4.0