The FIND statement locates a specified record in a disk file and makes  it
  the  Current  Record  for  a  GET,  UPDATE,  or  DELETE  operation.   FIND
  statements are valid on RMS sequential, relative, indexed, and  block  I/O
  files.

  Examples

  FIND #4%
  FIND #1%, RFA Address(5)
  FIND #4%, RECORD 155%, WAIT 0%
  FIND #4%, KEY #0% GE "ADAMS"
  FIND #1%, KEY #0% EQ "JONES", ALLOW READ

1  –  Syntax

      FIND chnl-exp [, position-clause ] [, lock-clause ]

                          { RFA rfa-var      }
        position-clause:  { RECORD num-exp   }
                          { KEY # key-clause }

        lock-clause:  { ALLOW allow-clause [WAIT [int-exp]] }
                      { WAIT int-exp                        }
                      { REGARDLESS                          }

                       { NONE   }
        allow-clause:  { READ   }
                       { MODIFY }

                                     { str-exp      }
        key-clause:  int-exp1 rel-op { int-exp2     }
                                     { decimal-exp  }
                                     { quadword-exp }

                 { EQ }
        rel-op:  { GE }
                 { GT }
                 { NX }
                 { NXEQ }