[Date Prev][Date Next][Thread Prev][Thread Next]
[Author Index] [Date Index] [Thread Index]
[SQR-USERS Info] [SQRUG Home Page]

Re: using substr() and instr() to identify patterns of fields

Just took a glance at your code, but I noticed in the section...

  If substr($read,1,4) = '0000'
   Open $RESUME_TEXT_FILE as 2 For-Writing Record=1000 Status=#OpenStat

   If #OpenStat != 0
      Show 'Error opening ' $RESUME_TEXT_FILE
   Else
       Show $RESUME_TEXT_FILE ' has been opened for writing.'
   End-If
  End-if

  Write 2  from $read

that $read never got defined, so it will never be '0000' in your "if"
statement, so the "open" command won't be executed, thus, the "not opened"
error.

HTH,
-----------------------------------------------------------------------
Donald Mellen  | Ray Ontko & Co. - Richmond, IN - http://www.ontko.com/
donm@ontko.com |  "In the beginning, there was nothing, which exploded"