temp.txt

delphi编写的ERP原代码事例２,供广大初学者学习参考!

select goodsno.goo_code,   
         goodsno.goo_name,   
         goodsno.goo_unit,   
         goodsno.goo_type,   
         goodsno.goo_price,   
         goodsno.saleprice,   
         goodsno.goo_mate,   
         goodsnopricetab.inprice,   
         goodsno.source,   
         goodsno.spec,   
         goodsno.visible,   
         goodsno.goo_cname,   
         goodsnopricetab.wholecostprice,   
         goodsno.priceretail,   
         goodsno.content,   
         goodsno.saletype,   
         goodsno.savestockcode, 
         goodsno.priceno,  
         goodsno.pricetype,   
         goodsno.notproduce,
         goodsno.goo_no,
         goodsno.firstincasedate,
         vw_getorder_goonum.allnosendnum from goodsno,   
         goodsnopricetab,
         vw_getorder_goonum 
 where goodsno.goo_code *= goodsnopricetab.goo_code
    and (goodsno.goo_code *= vw_getorder_goonum.goo_code) and  
 (visible<>'n') 
 and ( goodsno.goo_code in (select goo_code from vw_useing_goods) ) 
 and (goodsno.goo_no  like '10174232%' )