Set PGP$lock <Obey$Dir>.PGPlockDir
Set Lock$Dir <PGP$lock>.!Lock
CDir <PGP$lock>.Data
CDir <PGP$lock>.bin
Filer_OpenDir <PGP$lock>
