檢查 單頭 與 明細 USER 有不相同的問題
select qitems.FORMNO,qitems.USER from qitems left join qhead where qhead.FORMNO=qitems.FORMNO and qhead.USER<>qitems.USER

檢查未建立索引 而建立索引
//以qheadF 為例
IF ((SELECT COUNT(*) FROM information_schema.statistics
      WHERE TABLE_SCHEMA = DATABASE()
        AND TABLE_NAME = 'qhead'
        AND INDEX_NAME = 'qheadF') = 0
   )
    CREATE INDEX qheadF ON qhead(FORMNO)
;

//create index qheadF on qhead ( FORMNO )');
set @exist := (select count(*) from information_schema.statistics where table_name = 'qhead' and index_name = 'qheadF' and table_schema = database());
set @sqlstmt := if( @exist > 0, 'select ''INFO: Index already exists.''', 'create index qheadF on qhead ( FORMNO )');
PREPARE stmt FROM @sqlstmt;
EXECUTE stmt;

//create index qheadM on qhead ( FORMDATE )
set @exist := (select count(*) from information_schema.statistics where table_name = 'qhead' and index_name = 'qheadM' and table_schema = database());
set @sqlstmt := if( @exist > 0, 'select ''INFO: Index already exists.''', 'create index qheadM on qhead ( FORMDATE )');
PREPARE stmt FROM @sqlstmt;
EXECUTE stmt;