为什么数据不能传送到数据库？数据库已经连接！

为什么数据不能传送到数据库？数据库已经连接成功！在其他模块数据就能传送到数据库里，只有在这个模块不能，怎么回事呢？
   long ll_bookid,ll_publisherid,ll_words,ll_number,ll_price
    date ld_publish
    string ls_ISBN,ls_title,ls_author,ls_keyword,ls_abstract
//数据格式检验
if sle_bookid.text="" or isNull(sle_bookid.text) then
    messagebox ("缺少数据","请输入图书编号！")
    sle_bookid.setfocus()
    return
elseif sle_title.text="" or isnull(sle_title.text) then
    messagebox ("缺少数据","请输入图书名称！")
    sle_title.setfocus()
    return
end if
//检查图书编号有无重号
select BookInfo.BookID
into: ll_bookid
from BookInfo
where BookInfo.BookID=: ll_bookid;
if ll_bookid<>0 then
    messagebox("错误信息","图书编号第"+string(ll_bookid)+"号重号！请改正！")
    sle_bookid.setfocus()
    return
end if
      ls_ISBN=trim(sle_isbn.text)
        ls_title=trim(sle_title.text)
        ls_author=trim(sle_author.text)
        ls_keyword=trim(sle_keyword.text)
        ls_abstract=trim(mle_abstract.text)
//向数据库写入数据
insert into "BookInfo"
           ("BookID",
            "ISBN",
            "Title",
            "Publish",
            "Author",
                "Words",
            "PublisherID",
            "Number",
            "Price",
            "Keyword",
            "Abstract")
values(:ll_bookid,
       :ls_ISBN,
       :ls_title,
       :ld_publish,
       :ls_author,
       :ll_words,
       :ll_price,
       :ls_keyword,
       :ls_abstract);

//数据写入数据库后，将输入控件全部置空
        sle_bookid.text=""
        sle_ISBN.text=""
        sle_title.text=""
        sle_publish.text=""
        sle_author.text=""
        sle_words.text=""
        sle_publisherid.text=""
        sle_number.text=""
        sle_price.text=""
        sle_keyword.text=""
        mle_abstract.text=""
        sle_bookid.setfocus()//将光标放到“图书编号”输入栏