Power Builder - Necesito ayuda

alguien sabe si existe una funcion o como obtener la direccion exacta de donde esta mi aplicacion.... me explico tengo mi aplicacion en
c:/mi_aplicacion

quiero hacer saber como yo puedo obtener es Path de mi aplicacion..

Declara la función externa:
FUNCTION int GetModuleFileNameA(ulong hinstModule, REF string lpszPath, ulong cchPath) LIBRARY "kernel32"

[Script]
string ls_Path
unsignedlong lul_handle
ls_Path = space(1024)
lul_handle = Handle(GetApplication())
GetModuleFilenameA(lul_handle, ls_Path, 1024)
MessageBox("Path de la aplicación", ls_path)

Suerte!

ok... me sirve para otra cosa gracias de todas formas......

pero lo que quiero saber es donde esta ubicada mi aplicacion ejemplo

tengo una carpeta en donde estan todas los recursos de mi aplicacion
mi_aplicacion.exe
todos mis *.pbd
logos de empresa

su ubicacion es : c:/aplicaciones/mi_aplicacion.exe

como obtengo ese path ... es lo que quiero

Obtienes la carpeta actual de tu aplicación y a ese path lo concatenas el nombre de tu ejecutable. es decir:

sle_1.text = GetCurrentDirectory( )+"\"+"mi_aplicacion.exe"

gracias por la ayuda brindada..... si me funciono

ok.. gracias por darme la funcion .. pero cuando la coloco y quiero guardar me sale que el nombre de la funcion es desconocido.... ahora nose si necesito colocar una funcion external para que esta funcione...

muchas gracias por la ayuda

Bueno esa funcion solo esta disponible desde la versión 8

Tú lo dijiste Novatox. En todo caso, podemos usar APIS para obtener la carpeta actual. El razonamiento sigue siendo el mismo:

1. Declarar Global External Function:

FUNCTION ulong GetCurrentDirectoryA(ulong BufferLen, ref string currentdir) LIBRARY "Kernel32.dll"

2. Script:

string ls_curdir
ulong l_buf
l_buf = 100 //dejar el suficiente espacio por si acaso, para mostrar el path
ls_curdir = space(l_buf)
GetCurrentDirectoryA(l_buf, ls_curdir)
MessageBox("Carpeta actual:", ls_curdir + "\mi_aplicacion.exe")

Muchas gracias, a mi si me fue de mucha ayuda, ya que solucionó el gran problema que tenía con la ruta de mis imágenes.

Con la función GetCurrentDirectory() cuando se ejecutaba directamente de la carpeta funcionaba bien, pero cuando lo ejecutaba desde un acceso directo, increiblemente capturaba otra ruta que no era la correcta provocando que en mi aplicación no carguen los gráficos.

Muchas gracias una vez más.