MPE CI Programming for 7.5

July 22, 2008
Page 53
hp e3000
strategy
• PARM fileset=./@ “LF”
listfile !fileset,6
• PARM group=@ “LG”
listgroup !group; format=brief
• PARM user=@ “LU”
listuser !user; format=brief
• PARM dir=./@ “LD”
setvar _dir “!dir”
if delimpos(_dir, “./”) <> 1 then
# convert MPE name to POSIX name
setvar _dir dirname( fqualify(_dir)) + “/” + basename(_dir)
endif
listfile !_dir, 6; seleq=[object=HFSDIR]; tree
brief file, group, user, dir listings