xref: /sqlite-3.40.0/test/tkt3508.test (revision 33e619fc) 
1# 2008 November 22
2#
3# The author disclaims copyright to this source code.  In place of
4# a legal notice, here is a blessing:
5#
6#    May you do good and not evil.
7#    May you find forgiveness for yourself and forgive others.
8#    May you share freely, never taking more than you give.
9#
10#***********************************************************************
11# This file implements regression tests for SQLite library.
12#
13# $Id: tkt3508.test,v 1.5 2009/05/28 01:00:56 drh Exp $
14
15set testdir [file dirname $argv0]
16source $testdir/tester.tcl
17
18do_test tkt3508-1.1 {
19  catchsql {
20    CREATE TABLE modificationsTmp (
21      SUBSTRATE_HPRD_ID VARCHAR(80),
22      SUBSTRATE_GENE_SYMBOL VARCHAR(80),
23      SUBSTRATE_ISOFORM_ID VARCHAR(80),
24      SUBSTRATE_REFSEQ_ID VARCHAR(80),
25      SITE INTEGER,
26      RESIDUE VARCHAR(80),
27      ENZYME_NAME VARCHAR(80),
28      ENZYME_HPRD_ID VARCHAR(80),
29      MODIFICATION_TYPE VARCHAR(80),
30      EXPERIMENT_TYPE VARCHAR(80),
31      REFERENCE_ID VARCHAR(80)
32    );
33    select SUBSTRATE_HPRD_ID, count(substrate_refseq_id) as c
34      from modificationsTmp where c > 1 group by SUBSTRATE_HPRD_ID;
35  }
36} {1 {misuse of aggregate: count()}}
37
38finish_test
39