Age         Owner                  TLA  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                 : 
 6094 meskes                      7 CBC           1 : 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               1 :    ECPGdebug(1, stderr);
                                 15                 : 
                                 16                 :    exec sql whenever sqlerror do sqlprint();
                                 17               1 :    exec sql connect to REGRESSDB1;
                                 18               1 : 
                                 19               1 :    exec sql create table test (a int, b text);
                                 20               1 :    exec sql insert into test values (NUMBER, STR);
                                 21               1 : 
                                 22                 :    exec sql ifdef INSERTNULL;
                                 23               1 :    exec sql insert into test values (NULL, 'defined');
                                 24               1 :    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               1 :    exec sql insert into test values (NULL, 'someothervar not defined');
                                 32               1 :    exec sql endif;
                                 33                 : 
                                 34                 :    exec sql define NUMBER 29;
                                 35                 : 
                                 36               1 :    exec sql select INSERTNULL, NUMBER::text || '-' || STR INTO :i, :s;
                                 37               1 : 
                                 38               1 :    printf("i: %d, s: %s\n", i, s);
                                 39                 : 
                                 40                 :    exec sql undef STR;
                                 41                 :    exec sql ifndef STR;
                                 42               1 :    exec sql insert into test values (NUMBER, 'no string');
                                 43               1 :    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               1 :    exec sql SET TIMEZONE TO TZVAR;
                                 54               1 :    exec sql endif;
                                 55                 : 
                                 56               1 :    exec sql disconnect;
                                 57               1 :    return 0;
                                 58                 : }