:R
xy=0
log opr:
;
;IF REQUIRED, place here the password for the system operator account
;
:<
CLEANT -- Creating directory of ".LST" files
>
dir CLEANT.DAT=ALL:*.lst[]/d/k
run cleant
:k
erase CLEANT.DAT
:<
CLEANT is done. Enter a (CR) to continue
>
:K
log $:[$P]
;
;place here the command to return to your application program
;