endif atc('PROCEDURE', lcPath) > 0
endif
lcPath = justpath(sys(16, 0)) >if atc('PROCEDURE', lcPath) > 0 > lcPath = substr(lcPath, rat(':', lcPath) - 1) >endif atc('PROCEDURE', lcPath) > 0