James,
I didn't find one, but if you are using the MetaDbc feature of the framework then the app has already opened the table. I just use a cSelect object to select the table then grab the full path out of the table by doing a locate on the key. Then use JustPath() to return a valid path. This works for me with an exe distributed to three different sites and they all map the data three different ways.

This code sets the path to a common database that is shared by multiple clients. Each client's data is stored in a unique database.

lcOldPath = SET("PATH")
loSelect = CreateObject("cSelect","MetaDbc")
locate for ckey = "COMMON"
lcCommonPath = JustPath(Alltrim(metadbc.cLocalDBC))
lcNewPath = Alltrim(lcOldPath) + ", " + lcCommonPath
SET PATH TO &lcNewPath