pro*C訪問DB2數(shù)據(jù)庫

pro*C訪問DB2數(shù)據(jù)庫的例子

test.sqc

$ cat test.sqc
#include <stdio.h>
#include <sqlenv.h>

EXEC SQL INCLUDE SQLCA ;

EXEC SQL BEGIN DECLARE SECTION ;
    char   hvalue[16];
EXEC SQL END DECLARE SECTION ;


char sqlcamsg[1025];

#define DUMP_SQLCA()                                                    \
  {                                                                     \
    printf("******************  DUMP OF SQLCA  ******************\n");  \
    printf("SQLCAID: %s\n",     sqlca.sqlcaid);                         \
    printf("SQLCABC: %d\n",     sqlca.sqlcabc);                         \
    printf("SQLCODE: %d\n",     sqlca.sqlcode);                         \
    printf("SQLERRML: %d\n",    sqlca.sqlerrml);                        \
    printf("SQLERRMC: %s\n",    sqlca.sqlerrmc);                        \
    printf("SQLERRP: %s\n",     sqlca.sqlerrp);                         \
    printf("SQLERRD[0]: %d\n",  sqlca.sqlerrd[0]);                      \
    printf("SQLERRD[1]: %d\n",  sqlca.sqlerrd[1]);                      \
    printf("SQLERRD[2]: %d\n",  sqlca.sqlerrd[2]);                      \
    printf("SQLERRD[3]: %d\n",  sqlca.sqlerrd[3]);                      \
    printf("SQLERRD[4]: %d\n",  sqlca.sqlerrd[4]);                      \
    printf("SQLERRD[5]: %d\n",  sqlca.sqlerrd[5]);                      \
    printf("SQLWARN: %s\n",     sqlca.sqlwarn);                         \
    printf("SQLSTATE: %s\n",    sqlca.sqlstate);                        \
    printf("*****************   END OF SQLCA DUMP  **************\n");  \
  }

#define CHECK_SQL(failure_string)               \
  {                                             \
    if (sqlca.sqlcode != 0) {                   \
      printf("!!!ERROR: %s\n", failure_string); \
      sqlaintp(sqlcamsg, 1024, 0, &sqlca);      \
      printf("%s\n", sqlcamsg);                 \
      DUMP_SQLCA();                             \
      goto done;                                \
    }                                           \
  }


main (int argc, char *argv[])
{
    EXEC SQL CONNECT TO <DBNAME> USER <USER> USING <PASSWD>;
    CHECK_SQL("Connect failed");

    EXEC SQL SELECT 'ABCD' into :hvalue FROM SYSIBM.SYSDUMMY1;
    CHECK_SQL("Select failed");

    printf("Select Result: [%s]\n", hvalue);

done:
    EXEC SQL CONNECT RESET;
}

makefile

$ cat makefile 

TARGET=test
DB2DIR?=~/sqllib

$(TARGET): $(TARGET).sqc
        db2 connect to <DBNAME> user <USER> using <PASSWD>
        db2 prep $(TARGET).sqc bindfile 
        db2 bind $(TARGET).bnd 
        #db2 list packages 
        #db2 drop package package-name 
        gcc -o $(TARGET) -I$(DB2DIR)/include $(TARGET).c -L$(DB2DIR)/lib64 -ldb2

clean:
        rm -f $(TARGET) $(TARGET).bnd $(TARGET).c

run

$ make
db2 connect to <DBNAME> user <USER> using <PASSWD>

   Database Connection Information

 Database server        = <DB SERVER>
 SQL authorization ID   = <USER>
 Local database alias   = <DBNAME>

db2 prep test.sqc bindfile 

LINE    MESSAGES FOR test.sqc
------  --------------------------------------------------------------------
        SQL0060W  The "C" precompiler is in progress.
        SQL0091W  Precompilation or binding was ended with "0" 
                  errors and "0" warnings.
db2 bind test.bnd 

LINE    MESSAGES FOR test.bnd
------  --------------------------------------------------------------------
        SQL0061W  The binder is in progress.
        SQL0091N  Binding was ended with "0" errors and "0" warnings.
#db2 list packages 
#db2 drop package package-name 
gcc -o test -I${DB2DIR}/include test.c -L${DB2DIR}/lib64 -ldb2
$
$ ./test 
Select Result: [ABCD]
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請聯(lián)系作者
  • 序言:七十年代末,一起剝皮案震驚了整個濱河市贺归,隨后出現(xiàn)的幾起案子赏参,更是在濱河造成了極大的恐慌冯勉,老刑警劉巖,帶你破解...
    沈念sama閱讀 211,884評論 6 492
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件铺呵,死亡現(xiàn)場離奇詭異官套,居然都是意外死亡,警方通過查閱死者的電腦和手機(jī)关摇,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 90,347評論 3 385
  • 文/潘曉璐 我一進(jìn)店門,熙熙樓的掌柜王于貴愁眉苦臉地迎上來碾阁,“玉大人输虱,你說我怎么就攤上這事≈祝” “怎么了宪睹?”我有些...
    開封第一講書人閱讀 157,435評論 0 348
  • 文/不壞的土叔 我叫張陵愁茁,是天一觀的道長。 經(jīng)常有香客問我亭病,道長鹅很,這世上最難降的妖魔是什么? 我笑而不...
    開封第一講書人閱讀 56,509評論 1 284
  • 正文 為了忘掉前任罪帖,我火速辦了婚禮道宅,結(jié)果婚禮上,老公的妹妹穿的比我還像新娘胸蛛。我一直安慰自己,他們只是感情好樱报,可當(dāng)我...
    茶點(diǎn)故事閱讀 65,611評論 6 386
  • 文/花漫 我一把揭開白布葬项。 她就那樣靜靜地躺著,像睡著了一般迹蛤。 火紅的嫁衣襯著肌膚如雪民珍。 梳的紋絲不亂的頭發(fā)上,一...
    開封第一講書人閱讀 49,837評論 1 290
  • 那天盗飒,我揣著相機(jī)與錄音嚷量,去河邊找鬼。 笑死逆趣,一個胖子當(dāng)著我的面吹牛蝶溶,可吹牛的內(nèi)容都是我干的。 我是一名探鬼主播宣渗,決...
    沈念sama閱讀 38,987評論 3 408
  • 文/蒼蘭香墨 我猛地睜開眼抖所,長吁一口氣:“原來是場噩夢啊……” “哼!你這毒婦竟也來了痕囱?” 一聲冷哼從身側(cè)響起田轧,我...
    開封第一講書人閱讀 37,730評論 0 267
  • 序言:老撾萬榮一對情侶失蹤,失蹤者是張志新(化名)和其女友劉穎鞍恢,沒想到半個月后傻粘,有當(dāng)?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體,經(jīng)...
    沈念sama閱讀 44,194評論 1 303
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡帮掉,尸身上長有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 36,525評論 2 327
  • 正文 我和宋清朗相戀三年弦悉,在試婚紗的時候發(fā)現(xiàn)自己被綠了。 大學(xué)時的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片蟆炊。...
    茶點(diǎn)故事閱讀 38,664評論 1 340
  • 序言:一個原本活蹦亂跳的男人離奇死亡警绩,死狀恐怖,靈堂內(nèi)的尸體忽然破棺而出盅称,到底是詐尸還是另有隱情肩祥,我是刑警寧澤后室,帶...
    沈念sama閱讀 34,334評論 4 330
  • 正文 年R本政府宣布,位于F島的核電站混狠,受9級特大地震影響岸霹,放射性物質(zhì)發(fā)生泄漏。R本人自食惡果不足惜将饺,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 39,944評論 3 313
  • 文/蒙蒙 一贡避、第九天 我趴在偏房一處隱蔽的房頂上張望。 院中可真熱鬧予弧,春花似錦刮吧、人聲如沸。這莊子的主人今日做“春日...
    開封第一講書人閱讀 30,764評論 0 21
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽。三九已至蚓庭,卻和暖如春致讥,著一層夾襖步出監(jiān)牢的瞬間,已是汗流浹背器赞。 一陣腳步聲響...
    開封第一講書人閱讀 31,997評論 1 266
  • 我被黑心中介騙來泰國打工垢袱, 沒想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留,地道東北人港柜。 一個月前我還...
    沈念sama閱讀 46,389評論 2 360
  • 正文 我出身青樓请契,卻偏偏與公主長得像,于是被迫代替她去往敵國和親夏醉。 傳聞我的和親對象是個殘疾皇子姚糊,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 43,554評論 2 349

推薦閱讀更多精彩內(nèi)容