交易专区，欢迎大家！

大梦

[这个贴子最后由大梦在 2003/01/06 01:35pm 编辑]

欢迎大家在此坛进行交易：
1、出售源码；
2、开发合作；
3、。。。。。。。
郑重声明：
本坛给大家提供一个交易空间，一切纠纷与本坛无关！
          

syzlc

好主意！

hbczjzc

开发ESQL/C 编写的程序，可别忘了我。虽然学的不太精通，但也可以贡献一些力量吧。

brokunix

有ESQL/C开发的算我一个，某银行工作两年，一直使用aix＋informix＋esql/c
qf0388@163.net
13332890715

Neo98

晕~~ 怎么做起生意来了？

大梦

不是呀！
帮兄弟们找出路！
这是经过总版主同意的！

semicolon

很好，esql/c 我只能算一般选手，但愿尽微薄之力

大梦

大家有现成的例子也可以贴几个上来呀！

hbczjzc

[这个贴子最后由hbczjzc在 2003/01/06 08:34pm 编辑]

同意

semicolon

/*    ec程序实例  */

#define  _debug

#include <curses.h>;
#include <sqlca.h>;
#include <sqlda.h>;
#include &quot;ec.h&quot;

EXEC SQL BEGIN DECLARE SECTION&#59;

typedef struct {
int  customer_num&#59;
char fname[16]&#59;
char lname[16]&#59;
char company[21]&#59;
char address1[21]&#59;
char address2[21]&#59;
char city[16]&#59;
char state[3]&#59;
char zipcode[6]&#59;
char phone[19]&#59;
} CUSTOMER&#59;
CUSTOMERstrbl&#59;
EXEC SQL END DECLARE SECTION&#59;

main(int argc,char *argv[])

{
intiItem&#59;

/*----------------------------------------*/
EXEC SQL database stores7&#59;
/*----------------------------------------*/
if (sqlca.sqlcode)
{
printf(&quot;open database err [%d]\n&quot;,sqlca.sqlcode)&#59;
return FAIL&#59;
}

while(1)
{
initscreen()&#59;

mvscanw(16,40,&quot;%d&quot;,&amp;iItem)&#59;

if (iItem == 4)
{
break&#59;
}

switch(iItem)
{
case  1:
if ( insert() == FAIL )
{
printf(&quot;录入失败\n&quot&#59;
return FAIL&#59;
}

break&#59;
case  2:
if ( query() == FAIL )
{
printf(&quot;查询失败\n&quot&#59;
return FAIL&#59;
}

break&#59;
case  3:
if ( update() == FAIL )
{
printf(&quot;更新失败\n&quot&#59;
return FAIL&#59;
}
break&#59;
default :
break&#59;


}

closesrceen()&#59;

}

closesrceen()&#59;

/*----------------------------------------------------*/
EXEC SQL close database&#59;
/*----------------------------------------------------*/
if (sqlca.sqlcode)
{
printf(&quot;close database err [%d]\n&quot;,sqlca.sqlcode)&#59;
return FAIL&#59;
}

}


int insert()
{


clear()&#59;

memset(&amp;strbl,0,sizeof(strbl))&#59;

mvprintw(11,20, &quot;姓名\n&quot&#59;

mvscanw(11,25,&quot;%s&quot;,&amp;strbl.fname)&#59;
/*------------------------------------------------------*/
EXEC SQL insert into customer( customer_num,fname )
values (:strbl.customer_num,:strbl.fname)&#59;
/*-------------------------------------------------------*/
if (sqlca.sqlcode)
{
printf(&quot;insert into customer err [%d]\n&quot;,sqlca.sqlcode)&#59;
return FAIL&#59;
}

return SUCCESS&#59;
}

int query()
{
CUSTOMER customer&#59;

clear()&#59;

memset(&amp;customer,0,sizeof(customer))&#59;


return SUCCESS&#59;
}

int update()
{
return SUCCESS&#59;
}

int initscreen()
{
initscr()&#59;
clear()&#59;
saveterm()&#59;

mvprintw(5,30,&quot;^_^欢迎使用.ec实例程序!^_^\n&quot&#59;

mvprintw(7,40,&quot;1.录入\n&quot&#59;
mvprintw(9,40,&quot;2.查询\n&quot&#59;
mvprintw(11,40,&quot;3.更新\n&quot&#59;
mvprintw(13,40,&quot;4.退出\n&quot&#59;


return SUCCESS&#59;
}

int closesrceen()
{
resetterm()&#59;
refresh()&#59;

return SUCCESS&#59;
}