DP 7 corrupt IDB. writedb fails

Log for omnidbcheck has:

Checking media management database...
  * Possible bad next_slot value (2232    ) in file # 0
Key file devices.key: total 1 nodes
Key file stores.key: total 1 nodes
Key file pools.key: total 1 nodes
Key file media.key: total 24 nodes
Key file barcode.key: total 30 nodes
Key file desc.key: total 64 nodes
Data file devices.dat: total 1915 slots for records

Data file devices.dat: problems at record 145:
  * record is not deleted, but is on delete chain
  * record is deleted, but is not on delete chain
  * record is deleted, but is not on delete chain
  * record's dba is inconsistent: [0:0]
  * key field DEVNAME(32768) error: has a missing key
  * record's dba is inconsistent: [0:0]
  * key field DEVNAME(32768) error: has a missing key
  * record's dba is inconsistent: [0:0]
  * key field DEVNAME(32768) error: has a missing key

There are many of those lines repeating and then...

  * record's dba is inconsistent: [0:0]
  * set STORESTODEVICES(0) error:
    owner-pointer is null, but next and previous are not
  * key field DEVNAME(32768) error: has a missing key
  * record's id-number=105 is out of range or inappropriate for its file
  * record's dba is inconsistent: [110:3014759]

Data file devices.dat: problems at page zero
  * invalid value 1273 for total records of record type DEVICES: actual=1901

Phase 1 of of consistency check: 3819 errors encountered in 1909 records of file devices.dat
Data file stores.dat: total 2 slots for records
Data file cart.dat: total 842 slots for records
Data file comp.dat: total 0 slots for records
Data file pools.dat: total 4 slots for records
Data file media.dat: total 714 slots for records
Data file mtopt.dat: total 2 slots for records
Data file mtopt.ext: total 0 slots for records
Data file devices.ext: total 38 slots for records
Data file stores.ext: total 6 slots for records

3819 errors encountered in 1909 records/nodes/pages

 

writedb fails on devices.dat.  Since I can't write the db to text then I can't do the writedb/readdb routine to fix the corruption.

Suggestions?