/
balmaster
/
postgres
Обзор
Документация
Войти
/
balmaster
/
postgres
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
src/interfaces/ecpg/test/sql/indicators.pgc
50 строк
1 KB
Peter Eisentraut
Prevent -Wstrict-prototypes and -Wold-style-definition warnings
16 мар 2026, 12:53
16 мар 2026, 12:53
d7ad79e
Код
Авторство
О чём код?
#include <stdio.h> exec sql include sqlca; exec sql include ../regression; int main(void) { exec sql begin declare section; int intvar = 5; int nullind = -1; exec sql end declare section; ECPGdebug(1,stderr); exec sql connect to REGRESSDB1; exec sql set autocommit to off; exec sql create table indicator_test ( "id" int primary key, "str" text NOT NULL, val int null); exec sql commit work; exec sql insert into indicator_test (id, str, val) values ( 1, 'Hello', 0); /* use indicator in insert */ exec sql insert into indicator_test (id, str, val) values ( 2, 'Hi there', :intvar :nullind); nullind = 0; exec sql insert into indicator_test (id, str, val) values ( 3, 'Good evening', :intvar :nullind); exec sql commit work; /* use indicators to get information about selects */ exec sql select val into :intvar from indicator_test where id = 1; exec sql select val into :intvar :nullind from indicator_test where id = 2; printf("intvar: %d, nullind: %d\n", intvar, nullind); exec sql select val into :intvar :nullind from indicator_test where id = 3; printf("intvar: %d, nullind: %d\n", intvar, nullind); /* use indicators for update */ intvar = 5; nullind = -1; exec sql update indicator_test set val = :intvar :nullind where id = 1; exec sql select val into :intvar :nullind from indicator_test where id = 1; printf("intvar: %d, nullind: %d\n", intvar, nullind); exec sql drop table indicator_test; exec sql commit work; exec sql disconnect; return 0; }