Re: Finding the directory of current Form

You can get the path with this function
:
[Quoted] FUNCTION workdir RETURN varchar2 IS

   formname varchar2(12);
   path_and_formname varchar2(200);

begin
  path_and_formname := Get_application_property(current_form);

/* liefert leider nur den Modulnamen !!!!!!, nicht den Formnamen              */
/*  formname          := Get_application_property(current_form_name)||'.FMX'; */
/*  return( substr(path_und_formname, 1,

/* z.b. path_and_formname = p:\forms\invekos.fmx or

         path_and_formname = p:\forms\invekos
        workdir                = p:\forms\             */

return(substr(path_and_formname,1,instr(path_and_formname, '\',-1,1))); end;

bdg_at_hotmail.com schrieb:

> Can Developer/2000 identify the source directory of the currently running
> Form?
>
> I have multiple versions of the Forms executables (development, unit test,
> system test, production) installed in different directories and shortcuts
> set up to (hopefully) pull in from the correct directory. It's a little more
> complicated because if the Form executable doesn't exist in the
> non-production directories, the FORMS45_PATH is set to pull in the production
> version. I would like to add the directory in the title bar to help verify
> that the correct Form executable is being used.
>
> I'm using Developer/2000 v1.2, but input on any more recent version would
> also be appreciated.
>
> Thanks,
> Brian Gastineau
>
> -----------== Posted via Deja News, The Discussion Network ==----------
> http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
Received on Thu Feb 25 1999 - 18:11:56 CET