我用DELPHI将一个图书购买的TXT中的写入表中，要求从SHOPPING表中搜索出书的作者，插入的条件是BOOKS表中书名与书类别不相等的。对于这个

select author from SHOPPING where BOOK_TYPE=:BOOK_TYPE;
select count(*) into :v_rows from BOOKS where BOOK_NAME=:v_BOOK_NAME and BOOK_TYPE=:BOOK_TYPE;
if v_rows = 0 then
 if len(v_BOOK_NAME)>0 then
   insert into BOOKS (BOOK_NAME,feeBOOK_NAME,author,BOOK_type,usercode,begintime)
    values(v_BOOK_NAME,BOOK_NAME,author,BOOK_type,usercode,sysdate)
  end if
end if我用DELPHI将一个图书购买的TXT中的写入表中，
要求从SHOPPING表中搜索出书的作者，插入的条件是BOOKS表中书名与书类别不相等的。对于这个插入条件我该怎么办？
用ORACLE SQL好写，可是在DELPHI中我该怎么办？请大家帮助。