
  VAR

    iiv$put_in_progress: [XREF] boolean,
    iiv$fid: [XREF] amt$file_identifier,
    iiv$clp_pso_open: [XREF] boolean;

?? PUSH (LISTEXT := ON) ??
*copyc AMT$FILE_IDENTIFIER
?? POP ??
