使用addbs、justpath和sys(16)返回当前程序的目录

addbs - 向一个路径表达式添加一个反斜杠
使用方法：ADDBS(路径)
范例：
?addbs("c:/foxpro")        &&输出为c:/foxpro/

justpath - 返回完整路径中的路径名。
使用方法：JUSTPATH(完整路径名)
范例：
?justpath("c:/foxpro/a.dbc")        &&输出为c:/foxpro

sys(16) - 返回正在执行的程序文件名。
使用方法：SYS(16 [, 嵌套深度])
嵌套深度值范围可以 1 变化到程序嵌套的层数。 如果 nProgramLevel 是 0 或 1，SYS(16) 返回主程序名(第一个执行的程序)；如果省略了 nProgramlevel 参数，那么返回当前正在执行的程序名；如果 nProgramlevel 参数大于程序嵌套深度，则返回一个空串。
SYS(16) 与 PROGRAM() 相似，然而，SYS(16) 返回带路径的程序名，而 PROGRAM() 只返回程序名。
范例：
**program1**
do program2

**program2**
?sys(16,1)      &&输出为c:/foxpro/program1.FXP
?sys(16,2)      &&输出为c:/foxpro/program2.FXP

本文中使用这三个参数来实现返回当前工作程序的路径，
?addbs(justpath(sys(16)))     &&输出为c:/foxpro/