comp.lang.idl-pvwave archive
Messages from Usenet group comp.lang.idl-pvwave, compiled by Paulo Penteado

Home » Public Forums » archive » how to set path?
Show: Today's Messages :: Show Polls :: Message Navigator
E-mail to friend 
Return to the default flat view Create a new topic Submit Reply
Re: how to set path? [message #25289 is a reply to message #25223] Wed, 30 May 2001 07:10 Go to previous messageGo to previous message
Dave Greenwood is currently offline  Dave Greenwood
Messages: 33
Registered: October 2000
Member
"web" <jiali3@21cn.com> wrote:
> Thank you.
> All the other files are in the same directory with sav file. How to get the
> path? I try to use
> path=FILEPATH('test.pro'), to get the full path,
> but failed. Are there any some function to do this?

I use the following code to determine the location of a .sav file
(courtesy of a source within RSI):

HELP, CALLS = calls
thisroutine = (STRSPLIT(calls[0], ' ', /EXTRACT))[0]
source = ROUTINE_INFO(thisroutine, /SOURCE)
CASE STRUPCASE(!version.os_family) of
'WINDOWS' : dirsep = '\'
'UNIX' : dirsep = '/'
'MACOS' : dirsep = ':'
'VMS' : dirsep = ']'
ELSE : dirsep = ''
ENDCASE
path = STRMID(source.path, 0, STRPOS(source.path, dirsep, /REVERSE_SEARCH))

Dave
--------------
Dave Greenwood Email: Greenwoodde@ORNL.GOV
Oak Ridge National Lab %STD-W-DISCLAIMER, I only speak for myself
[Message index]
 
Read Message
Read Message
Read Message
Previous Topic: erfc
Next Topic: Re: code snippet

-=] Back to Top [=-
[ Syndicate this forum (XML) ] [ RSS ] [ PDF ]

Current Time: Wed Oct 08 19:03:02 PDT 2025

Total time taken to generate the page: 0.00435 seconds