>DECLARE integer GetLongPathName IN WIN32API ; > string @ lpszShortPath, string @ lpszLongPath, integer cchBuffer >DECLARE integer GetShortPathName IN WIN32API ; > string @ lpszLongPath, string @ lpszShortPath, integer cchBuffer > >lcDir = SYS(5)+CURDIR() >STORE SPACE(300) TO lpszShortPath, lpszLongPath >lnLen = GetShortPathName(lcDir,@lpszShortPath, 300) >? SUBSTR(lpszShortPath,1,lnLen) >lnLen = GetLongPathName(SUBSTR(lpszShortPath,1,lnLen),@lpszLongPath,300) >? SUBSTR(lpszLongPath,1,lnLen) >Cetin