[推荐]pxjm78081的仓库管理程序[原码]

一品 · 发表于 2003-5-14 01:15:00

我知道了，你把单据号码的生成格式固定了，不能自己定义的~~~但每张也能加1~~~呵呵~~其实是一样的~~~

一品 · 发表于 2003-5-14 01:18:00

但是单据没有明细部分好象也可以保存的哟~~~没有提示吗？

一品 · 发表于 2003-5-14 01:27:00

材料明细查询里面双击单据号后不管有没有找到单据都有“单据不存在”的提示~~

pxjm7808 · 发表于 2003-5-15 19:06:00

这个我也发现了，已经改了过来。还有初始化后的使用单位信息里没有锁定开账日期与相关按钮。关于明细的方面。因为明细是子窗体不知道怎么提示？原本我是准备做一个作废单据功能的。用来取消已输入的单据（不是删除），并且要可以查询已作废的单据。这样就可以将其中有问题的单据作废了，但由于时间关系就没有做。

jimchen · 发表于 2003-5-24 01:18:00

老兄，我下载了原代码，但是不能进入系统，没有密码！
告诉我吧！

grantliping · 发表于 2003-5-27 17:58:00

请问一下这个功能是怎么实现的？

grantliping · 发表于 2003-5-28 01:02:00

已经弄明白了

grantliping · 发表于 2003-5-29 05:53:00

If IsNull([日期]) Then
Me.单据编号 = Null
Else
CKBM = Me.仓库编码
RQ = CKBM & Format([日期], "yyyymmdd")
ID = DMax("[单据编号]", "[进出单据]", "[单据编号] like '" & RQ & "???'")

If IsNull(ID) Then
      Me.单据编号 = RQ & "001"
Else
      AUTO_ID = RQ & Format(CStr(CInt(Right(ID, 3)) + 1), "000")

      DJBH = AUTO_ID
      Me.单据编号 = DJBH
End If
End If

hanbinn · 发表于 2003-6-30 18:44:00

我想学习一下源码。能提供吗？谢谢！！hanbinn@163.net

shenzhen_liu · 发表于 2003-7-4 03:48:00

好。顶

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训群2 (792054000)
Access经典源码培训群 (77130759)
Access源码技巧群 (138920637)
access vba (307776555)

主题相关群

地区相关群[您还没设置居住地]

[模块/函数] [推荐]pxjm78081的仓库管理程序[原码]

回答

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)