我用的三层结构
在前端调用数据时老是出现
raised exception class edbclient with message 'invalid parameter'
下面是代码
with cntRefer do
begin
close;
temp:=' select a.BillNo,a.sequence as BillSeqNum,a.itemno,b.ItemName,b.ModeSpec,a.MeasureUnit,b.costprice as LocalPrice, '+
' b.BarCode,b.OldItemNo,'''' as TradeName,isnull(quantity,0) as AllQty,0 as TranOutQty,a.reserved4 as VendCustCode,a.reserved5 as VendCustName '+
' from pur_transorderdetail a,pub_itemlist b ,pur_transordermaster c '+
' where a.itemno=b.itemno and c.billno=a.billno '
commandtext:=temp;
open;事实上里面根本就没有用到参数
请哪位大侠指教一下我
在前端调用数据时老是出现
raised exception class edbclient with message 'invalid parameter'
下面是代码
with cntRefer do
begin
close;
temp:=' select a.BillNo,a.sequence as BillSeqNum,a.itemno,b.ItemName,b.ModeSpec,a.MeasureUnit,b.costprice as LocalPrice, '+
' b.BarCode,b.OldItemNo,'''' as TradeName,isnull(quantity,0) as AllQty,0 as TranOutQty,a.reserved4 as VendCustCode,a.reserved5 as VendCustName '+
' from pur_transorderdetail a,pub_itemlist b ,pur_transordermaster c '+
' where a.itemno=b.itemno and c.billno=a.billno '
commandtext:=temp;
open;事实上里面根本就没有用到参数
请哪位大侠指教一下我
解决方案 »
- 请教Quickrep 超严重问题...
- vista下某些应用程序运行出错!
- 在98系统下:select * into table1 in 'd:\' 'dbase 5.0;' from tableA 生成的DBF文件打开后中文显示全是乱码???
- 请教!!!在线等待!
- 感谢BEWILL(BEWILL)帮我解决UDP问题,请进来接分
- 求Delphi+SQL Server 数据库应用实例完全解析
- 小弟有话要说.
- 组件
- 引入Com服务器的类型库的问题
- 请问哪儿能下载到有关delphi在开发电子商务方面的书籍?
- ●●●●●天啊,我快死了!!!●●●●●
- ACCESS数据库修复问题,为何出现"这种对象类型不支持该操作"
我开始放在存储过程中调用的时候也是一样的
我用adodataset调用一点问题也没有
一模一样的代码呢
就换一个数据集控件而已
temp:string'
begin
with cntRefer do
begin
close; temp:=' select a.BillNo,a.sequence as BillSeqNum,a.itemno,b.ItemName,b.ModeSpec, '+
' a.MeasureUnit,b.costprice as LocalPrice, '+
' b.BarCode,b.OldItemNo,'''' as TradeName,isnull(quantity,0) as AllQty,'+
' 0 as TranOutQty,a.reserved4 as VendCustCode,a.reserved5 as VendCustName '+
' from pur_transorderdetail a,pub_itemlist b ,pur_transordermaster c '+
' where a.itemno=b.itemno and c.billno=a.billno '
commandtext:=temp;
open;
end;
temp:string'
begin
with cntRefer do
begin
close; temp:=' select a.BillNo,a.sequence as BillSeqNum,'+
' a.itemno,b.ItemName,b.ModeSpec, '+
' a.MeasureUnit,b.costprice as LocalPrice, '+
' b.BarCode,b.OldItemNo,'''' as TradeName, '+
' isnull(quantity,0) as AllQty,'+
' 0 as TranOutQty,a.reserved4 as VendCustCode,'+
' a.reserved5 as VendCustName '+
' from pur_transorderdetail a,'+
' pub_itemlist b ,pur_transordermaster c '+
' where a.itemno=b.itemno and c.billno=a.billno '
commandtext:=temp;
open;
end;