代码.txt

实现了基础的医药进销存的管理

  string        ypbh,khqc,jsr,czy,xsph4,ckrq,jsfs,ckmc,ypmc,jc,jx,hw,cd,gg,bz,dw,sb,pzwh,ph,bzq,dj,sl,je
  

select ypbh,khqc,jsr,czy,xsph,ckrq,jsfs,ckmc,ypmc,jc,jx,hw,cd,gg,bz,dw,sb,pzwh,ph,bzq,dj,sl,je
 into :ypbh,:khqc,:jsr,:czy,:xsph4,:ckrq,:jsfs,:ckmc,:ypmc,:jc,:jx,:hw,:cd,:gg,:bz,:dw,:sb,:pzwh,:ph,:bzq,:dj,:sl,:je from xsdj_tab  where xsph=:xsph


销售登记查询的全局函数

function  
tab_1.tabpage_1.sle_2.text=khqc;
tab_1.tabpage_1.sle_3.text=xsph;
tab_1.tabpage_1.sle_4.text=ypbh;
tab_1.tabpage_1.sle_5.text=jc;
tab_1.tabpage_1.sle_6.text=cd
tab_1.tabpage_1.sle_7.text=dw
tab_1.tabpage_1.sle_8.text=ph
tab_1.tabpage_1.sle_9.text=sl
tab_1.tabpage_1.sle_10.text=jsr
tab_1.tabpage_1.sle_11.text=ckrq
tab_1.tabpage_1.sle_12.text=ypmc
tab_1.tabpage_1.sle_13.text=jx
tab_1.tabpage_1.sle_14.text=gg
tab_1.tabpage_1.sle_15.text=sb
tab_1.tabpage_1.sle_16.text=bzq
tab_1.tabpage_1.sle_17.text=je
tab_1.tabpage_1.sle_18.text=czy
tab_1.tabpage_1.sle_19.text=jsfs
tab_1.tabpage_1.sle_20.text=ckmc
tab_1.tabpage_1.sle_21.text=hw
tab_1.tabpage_1.sle_22.text=bz
tab_1.tabpage_1.sle_23.text=pzwh
tab_1.tabpage_1.sle_24.text=dj

销售退货的函数：
string ypbh,khqc,jsr,czy,thph4,thrq,jsfs,ckmc,ypmc,jc,jx,hw,cd,gg,bz,dw,sb,pzwh,ph,bzq,dj,sl,je
  select ypbh,khqc,jsr,czy,thph,thrq,jsfs,ckmc,ypmc,jc,jx,hw,cd,gg,bz,dw,sb,pzwh,ph,bzq,dj,sl,je&
 into :ypbh,:khqc,:jsr,:czy,:thph4,:thrq,:jsfs,:ckmc,:ypmc,:jc,:jx,:hw,:cd,:gg,:bz,:dw,:sb,:pzwh,:ph,:bzq,:dj,:sl,:je from xsth_tab  where thph=:thph;//选择数据

 tab_1.tabpage_1.sle_2.text=khqc;
tab_1.tabpage_1.sle_3.text=thph;
tab_1.tabpage_1.sle_4.text=ypbh;
tab_1.tabpage_1.sle_5.text=jc;
tab_1.tabpage_1.sle_6.text=cd
tab_1.tabpage_1.sle_7.text=dw
tab_1.tabpage_1.sle_8.text=ph
tab_1.tabpage_1.sle_9.text=sl
tab_1.tabpage_1.sle_10.text=jsr
tab_1.tabpage_1.sle_11.text=thrq
tab_1.tabpage_1.sle_12.text=ypmc
tab_1.tabpage_1.sle_13.text=jx
tab_1.tabpage_1.sle_14.text=gg
tab_1.tabpage_1.sle_15.text=sb
tab_1.tabpage_1.sle_16.text=bzq
tab_1.tabpage_1.sle_17.text=je
tab_1.tabpage_1.sle_18.text=czy
tab_1.tabpage_1.sle_19.text=jsfs
tab_1.tabpage_1.sle_20.text=ckmc
tab_1.tabpage_1.sle_21.text=hw
tab_1.tabpage_1.sle_22.text=bz
tab_1.tabpage_1.sle_23.text=pzwh
tab_1.tabpage_1.sle_24.text=dj
 
end if
入库登记查询的代码
gysqc,jsr,czy,rkph,rkrq,jsfs,ypbh,ckmc,ypmc,jc,jx,hw,cd,gg,bz,dw,sb,pzwh,ph,bzq,jj,pfj,yhj,lsj,sl,je




select gysqc,jsr,czy,rkph,rkrq,jsfs,ypbh,ckmc,ypmc,jc,jx,hw,cd,gg,bz,dw,sb,pzwh,ph,bzq,jj,pfj,yhj,lsj,sl,je&
 into :gysqc,:jsr,:czy,:rkph,:rkrq,:jsfs,:ypbh,:ckmc,:ypmc,:jc,:jx,:hw,:cd,:gg,:bz,:dw,:sb,:pzwh,:ph,:bzq,:jj,:pfj,:yhj,:lsj,:sl,:je from rkdj_tab  where rkph=:rkph;//选择数据

 tab_2.tabpage_3.sle_2.text=gysqc;
tab_2.tabpage_3.sle_5.text=rkph;
tab_2.tabpage_3.sle_8.text=ypbh;
tab_2.tabpage_3.sle_11.text=jc;
tab_2.tabpage_3.sle_14.text=cd
tab_2.tabpage_3.sle_17.text=dw
tab_2.tabpage_3.sle_20.text=ph
tab_2.tabpage_3.sle_9.text=sl
tab_2.tabpage_3.sle_3.text=jsr
tab_2.tabpage_3.sle_6.text=rkrq
tab_2.tabpage_3.sle_10.text=ypmc
tab_2.tabpage_3.sle_12.text=jx
tab_2.tabpage_3.sle_15.text=gg
tab_2.tabpage_3.sle_18.text=sb
tab_2.tabpage_3.sle_21.text=bzq
tab_2.tabpage_3.sle_17.text=je
tab_2.tabpage_3.sle_4.text=czy
tab_2.tabpage_3.sle_7.text=jsfs
tab_2.tabpage_3.sle_9.text=ckmc
tab_2.tabpage_3.sle_13.text=hw
tab_2.tabpage_3.sle_16.text=bz
tab_2.tabpage_3.sle_19.text=pzwh
tab_2.tabpage_3.sle_22.text=jj
 tab_2.tabpage_3.sle_23.text=pfj
tab_2.tabpage_3.sle_24.text=yhj
tab_2.tabpage_3.sle_25.text=lsj
tab_2.tabpage_3.sle_26.text=sl
tab_2.tabpage_3.sle_27.text=je