| icPath | input | character |
QadFinancials
do viCount = 1 to num-entries(icPath) :
FILE-INFO:FILE-NAME = entry(viCount, icPath).
if length(right-trim(entry(viCount, icPath)), "CHARACTER":U) <> 0
then
if FILE-INFO:FULL-PATHNAME = ?
then
/* propath directory not valid */
return false.
end.
return true.