动态SQL中DESCRIPTOR的应用
来源:互联网 发布:网络前景 编辑:程序博客网 时间:2024/06/06 10:02
动态SQL中DESCRIPTOR的应用
王光红
动态SQL具有的灵活性是众所周知的,本人在此介绍一种应用DESCRIPTOR的动态SQL:
$short b_num;
$char *command;
$char Sql[1024];
$short flag;
$date Date;
$long Number, b_count, j;
$long prec;
$long type;
$long scale;
$double money;
sprintf(Sql, "select * from table");
$prepare qid from $Sql;
if(SQLCODE) return -1;
$declare BROWSE scroll cursor for qid;
if(SQLCODE) return -2;
$allocate descriptor 'browsdesc' with max :b_num; //在描述区分配空间,并设置最大的项目数
$get descriptor 'browsdesc' :b_count=count;//得到查询的字段个数
if(SQLCODE){
SqlErrHandle(SQLCODE, SELECT);
goto EXIT0;
}
$fetch BROWSE using sql descriptor 'browsdesc';
if(SQLCODE){
strcpy(RetPacket.data, "SELECT ERROR|");
SqlErrHandle(SQLCODE, SELECT);
goto EXIT0;
}
for(j=1;j<=b_count;j++){
$get descriptor 'browsdesc' value $j //当前字段序号
$prec=precision, /*money、decimal*/
$scale=scale, /*money、decimal*/
$type=type;
if(SQLCODE){
SqlErrHandle(SQLCODE, SELECT);
goto EXIT0;
}
switch(type){
case SQLFLOAT:
case SQLSMFLOAT:
case SQLDECIMAL:
case SQLMONEY:
if(prec)
sprintf(fmt, "%s%d.%df/0", "%",prec+1, scale);
else
strcpy(fmt, "%f");
$get descriptor 'browsdesc' value $j
$money=data;
sprintf(result, fmt, money);
if(SQLCODE==DATAISNULL) result[0]=0;
break;
default:
$get descriptor 'browsdesc' value $j
$result=data;
}//switch
if(SQLCODE==DATAISNULL) SQLCODE=0;
if(SQLCODE){
SqlErrHandle(SQLCODE, SELECT);
goto EXIT0;
}
OutPut(result);//输出结果
}//for
- 动态SQL中DESCRIPTOR的应用
- 动态SQL中DESCRIPTOR的应用
- mybatis框架中动态sql的应用
- 动态SQL的应用案例
- sqlserver中动态sql语句应用
- sqlserver中动态sql语句应用
- oracle存储过程中应用动态sql
- python中@property与Descriptor的使用方法
- python中基于descriptor的一些概念
- 动态SQL语句的应用分析
- PL/SQL中动态SQL的使用
- Mybatis之动态sql语句中时间判断(if)的应用
- sql中权限的应用
- sql 中 Case的应用
- Sql 中 Exists 的应用
- 应用动态SQL语句
- 动态sql应用
- Mysql 动态SQL 应用
- 一个“老”程序员的技术及非技术个人回顾
- 任意一个字符串的全排列算法(可以有重复的字符)
- MSComm编程的一个误解
- JSP语法格式
- UNIX系统下informix自制开发工具构思介绍
- 动态SQL中DESCRIPTOR的应用
- 完善Borland C++ Builder可视化控件功能三例
- AIX仿真SCO UNIX的MENU驱动(1)
- AIX仿真SCO UNIX的MENU驱动(2)
- (转)NGN发展应用的展望:下一代网络
- ASP中巧用Split()函数生成SQL查询语句
- 计算合同内各级别的价格函数 -- 精华推荐
- ASP生成Word文档的又一方法
- ASP.Net安装简明手册