Branch data     Line data    Source code

       1                 :             : exec sql include sqlca;
       2                 :             : exec sql include ../regression;
       3                 :             : exec sql define STR 'abcdef';
       4                 :             : exec sql define INSERTNULL 1;
       5                 :             : exec sql define NUMBER 29;
       6                 :             : 
       7                 :           2 : int main(void)
       8                 :             : {
       9                 :             :    exec sql begin declare section;
      10                 :             :      int i;
      11                 :             :      char s[200];
      12                 :             :    exec sql end declare section;
      13                 :             : 
      14                 :           2 :    ECPGdebug(1, stderr);
      15                 :             : 
      16                 :             :    exec sql whenever sqlerror do sqlprint();
      17                 :           2 :    exec sql connect to REGRESSDB1;
      18         [ -  + ]:           2 : 
      19                 :           2 :    exec sql create table test (a int, b text);
      20         [ -  + ]:           2 :    exec sql insert into test values (NUMBER, STR);
      21         [ -  + ]:           2 : 
      22                 :             :    exec sql ifdef INSERTNULL;
      23                 :           2 :    exec sql insert into test values (NULL, 'defined');
      24         [ -  + ]:           2 :    exec sql endif;
      25                 :             : 
      26                 :             :    exec sql ifndef INSERTNULL;
      27                 :             :    exec sql insert into test values (NULL, 'not defined');
      28                 :             :    exec sql elif SOMEOTHERVAR;
      29                 :             :    exec sql insert into test values (NULL, 'someothervar defined');
      30                 :             :    exec sql else;
      31                 :           2 :    exec sql insert into test values (NULL, 'someothervar not defined');
      32         [ -  + ]:           2 :    exec sql endif;
      33                 :             : 
      34                 :             :    exec sql define NUMBER 29;
      35                 :             : 
      36                 :           2 :    exec sql select INSERTNULL, NUMBER::text || '-' || STR INTO :i, :s;
      37         [ -  + ]:           2 : 
      38                 :           2 :    printf("i: %d, s: %s\n", i, s);
      39                 :             : 
      40                 :             :    exec sql undef STR;
      41                 :             :    exec sql ifndef STR;
      42                 :           2 :    exec sql insert into test values (NUMBER, 'no string');
      43         [ -  + ]:           2 :    exec sql endif;
      44                 :             : 
      45                 :             :    exec sql define TZVAR;  /* no value */
      46                 :             :    exec sql define TZVAR 'UTC';
      47                 :             : 
      48                 :             :    exec sql ifndef TZVAR;
      49                 :             :    exec sql SET TIMEZONE TO 'GMT';
      50                 :             :    exec sql elif TZNAME;
      51                 :             :    exec sql SET TIMEZONE TO TZNAME;
      52                 :             :    exec sql else;
      53                 :           2 :    exec sql SET TIMEZONE TO TZVAR;
      54         [ -  + ]:           2 :    exec sql endif;
      55                 :             : 
      56                 :             :    /* test handling of a macro defined on the command line */
      57                 :           2 :    exec sql select CMDLINESYM INTO :i;
      58         [ -  + ]:           2 :    printf("original CMDLINESYM: %d\n", i);
      59                 :             : 
      60                 :             :    exec sql define CMDLINESYM 42;
      61                 :             : 
      62                 :           2 :    exec sql select CMDLINESYM INTO :i;
      63         [ -  + ]:           2 :    printf("redefined CMDLINESYM: %d\n", i);
      64                 :             : 
      65                 :             :    exec sql define CMDLINESYM 43;
      66                 :             : 
      67                 :           2 :    exec sql select CMDLINESYM INTO :i;
      68         [ -  + ]:           2 :    printf("redefined CMDLINESYM: %d\n", i);
      69                 :             : 
      70                 :             :    exec sql undef CMDLINESYM;
      71                 :             : 
      72                 :             :    exec sql ifdef CMDLINESYM;
      73                 :             :    exec sql insert into test values (NUMBER, 'no string');
      74                 :             :    exec sql endif;
      75                 :             : 
      76                 :             :    /* this macro should not have carried over from define_prelim.pgc */
      77                 :             :    exec sql ifdef NONCMDLINESYM;
      78                 :             :    exec sql insert into test values (NUMBER, 'no string');
      79                 :             :    exec sql endif;
      80                 :             : 
      81                 :           2 :    exec sql disconnect;
      82         [ -  + ]:           2 :    return 0;
      83                 :             : }