用VFP怎么做会计凭证录入的表单???高手帮忙!

来源:百度知道 编辑:UC知道 时间:2024/07/11 07:15:53
本人是初学菜鸟,最好有个比较明白的过程
我做出来的是单个表单,就是斋录入数据……但我想做出一对多的样式,像ERP一样,上面录入,下面就可以看到分录,这个我不会做了……百度又不能贴图,烦!

讲一下思路:
上面是几个文本框,下面是GRID;
表(JZPZ)的字段:PZH凭着号,RQ日期,ZY摘要,JFJE借方金额,XFJE贷方金额,SHBZ审核标志
TEXT1:PZH,TEXT2:RQ,TEXT3:ZY,TEXT4:JFJE,TEXT5:DFJE

FORM1.INIT
SELECT 0
USE JZPZ
THISFORM.GRID1.recordsource='jzpz'
WITH THISFORM.GRID1
.COLUMN1.WIDTH=180
.COLUMN2.WIDTH=80
.COLUMN3.WIDTH=80
.COLUMN1.HEADER1.CAPTION='摘 要'
.COLUMN2.HEADER1.CAPTION='借方金额'
.COLUMN3.HEADER1.CAPTION='贷方金额'
.COLUMN1.controlsource='jzpz.zy'
.COLUMN2.controlsource='jzpz.jfje'
.COLUMN3.controlsource='jzpz.dfje'
endwith
THISFORM.TEXT1.VALUE=SCPZH() &&做一个过程,生成凭证号
THISFORM.TEXT2.VALUE=DATE()
THISFORM.TEXT3.VALUE=''
THISFORM.TEXT4.VALUE=0.00
THISFORM.TEXT5.VALUE=0.00
*录入一条记录后确定按钮
COMMAND1.CLICK:
M.PZH=THISFORM.TEXT1.VALUE
M.RQ=THISFORM.TEXT2.VALUE
M.JFJE=THISFORM.TEXT4.VALUE
M.DFJE=THISFORM.TEXT5.VALUE<