#!/usr/bin/mumps

      s i=$zsqlite("pragma","journal_mode=off")
      s i=$zsqlite("pragma","synchronous=off")

      w "pragma journal_mode=off;",!
      w "pragma synchronous=off;",!

      write "drop table if exists physicians;",!
      write "create table physicians ( physician_code int, physician_name varchar(100) ); ",!
      set names=1
      for a=$order(^names(a))  do
      . set b=^names(a)
      . use 5
      . write "insert into physicians values ( ",a,", "
      . write "'",b,"' );",!
      set ^Phys(0)=names
