Click above to get retro games delivered to your door ever month!

Db_error(name, line, info)        Database error

   Database errors occur when an action is taken that affects a database
   file between the time it is USEd and CLOSEd.  This includes
   operations such as APPEND BLANK or REPLACE.


Info messages: Database required
               Lock required
               Exclusive required
               Field numeric overflow
               Index file corrupted

Recovery:      RETURN (.T.) retries database operation
               RETURN (.F.) and Clipper automatically QUITs (CLOSEs ALL)


------------------------- Example -- Errorsys.prg ----------------------------

  FUNCTION db_error
  PARAM name, line, info

  SET DEVICE TO SCREEN
  @ 0, 0
  @ 0, 0 SAY "Proc " + M->name + " line " + LTRIM(STR(M->line)) +;
         ", " + M->info

  NOTE BREAK

  QUIT

  RETURN .F.


------------------------- Example -- Alterror.prg -----------------------------

  FUNCTION db_error
  PARAM name, line, info

  ALTD(2)

  SET DEVICE TO SCREEN
  @ 0, 0
  @ 0, 0 SAY "Proc " + M->name + " line " + LTRIM(STR(M->line)) +;
         ", " + M->info

  BREAK

  RETURN .F.