PB中sql语句使用
PB11.5已经连接到对应的数据库,而且能看到相应的表,我想在前段属于相应的项目名称能显示出相应的收费价格,所以我在CB按钮输入代码stringls_item,ls_pr...
PB11.5已经连接到对应的数据库,而且能看到相应的表,我想在前段属于相应的项目名称能显示出相应的收费价格,所以我在CB按钮输入代码
string ls_item,ls_price
ls_item=string(sle_2.text)
select price as price_1 from pricelist where item_name=ls_item
ls_price=string(price_1)
st_6.text=ls_price
其中st_6.text用来输出的文本框,sle_2.text是输入项目的,收费项目档案表pricelist,包含字段item_name,price,这个代码在debug的时候出现错误了,求资深人士指教
代码换成
string ls_item,ls_price
integer price_1
ls_item=string(sle_2.text)
select price into price_1 from pricelist where item_name=ls_item
ls_price=string(price_1)
st_6.text=string(ls_price)
还是不行 展开
string ls_item,ls_price
ls_item=string(sle_2.text)
select price as price_1 from pricelist where item_name=ls_item
ls_price=string(price_1)
st_6.text=ls_price
其中st_6.text用来输出的文本框,sle_2.text是输入项目的,收费项目档案表pricelist,包含字段item_name,price,这个代码在debug的时候出现错误了,求资深人士指教
代码换成
string ls_item,ls_price
integer price_1
ls_item=string(sle_2.text)
select price into price_1 from pricelist where item_name=ls_item
ls_price=string(price_1)
st_6.text=string(ls_price)
还是不行 展开
展开全部
select price into :price_1 from pricelist where item_name=:ls_item;
追问
select price into :price_1 from pricelist where item_name=:ls_item
using sqlca;
ls_price=string(price_1)
st_6.text=ls_price
但是每次结果总是为0,数据库中数据没错,其他地方有错误吗
追答
ls_price=string(price_1,"#####0.00")
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询