标题:VFP的药品库存问题
只看楼主
卷耳23
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2020-4-13
结帖率:100%
已结贴  问题点数:20 回复次数:13 
VFP的药品库存问题
新手上路,想请教一下大佬,请大佬赐教
如何在我修改 药品的用药数量时库存跟着变化,
0001号药品   库存200(李莉已购买了2盒后的结果)
0002好药品   库存100
第一种情况:比如 李莉 用了 0001号药品 2盒,现在需要将其用药修改为 3盒(在原来的基础上增加了一盒),该药品的库存数量会随着用药数量的变化跟着进行正确的变化,库存结果变为
0001号药品   库存199
0002好药品   库存100
第二种情况:将 0001号药品修改为0002号药品,0001号药品会恢复为最开始的库存,0002号药品则减少2盒,库存结果变为
0001号药品   库存202
0002好药品   库存98
药品库存变化.rar (8.47 KB)
搜索更多相关主题的帖子: VFP 数量 库存 结果 变化 
2020-05-20 20:40
wcx_cc
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:52
帖 子:352
专家分:1152
注 册:2015-10-2
得分:5 
可这样考虑如何?
第一种情况:3-2=1,可理解为继续又用了1合。将现库存200减去 1,剩余 199. 比如:replace 库存量 with (库存量-1) for alltrim(药品名)=‘0002号’)
第二种情况:可理解为,0002号药品的2合,又退回来了,200 合的现库存又加了2合。0001 号卖出2合,现库存 100减2. (用2次 replace 解决).
2020-05-20 23:29
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:190
帖 子:3125
专家分:8340
注 册:2015-3-25
得分:5 
锁库存
锁库存时,应该会有个“单号”之类的东西,
可以用库存数量=库存数-锁库存数
库存表(编号,名称,数量)
锁库存(编号,名称,数量,单号)
这样查可以使用的库存,c单号,就是你这次领料时,开的单号
select k1.编号,k1.名称,k1.数量,t1.锁库数 from 库存表 as k1 ;
left join (select 编号,sum(数量) as 锁库数 from 锁库存 where 单号<>c单号 group by 编号) as t1 on t1.编号=k1.编号





2020-05-21 08:48
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:5 

坚守VFP最后的阵地
2020-05-21 09:07
卷耳23
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2020-4-13
得分:0 
回复 2楼 wcx_cc
嗯嗯,这个例子可以这样考虑,我是在文本框里修改 用药数量,那请问这两种情况该写在哪里才能达到这两种效果呢?我是新手,可能要麻烦讲详细一点,多谢
2020-05-21 15:01
卷耳23
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2020-4-13
得分:0 
回复 4楼 sdta
谢谢版主的回复,我刚刚运行了一下,修改同一种药品的 用药数量时,相应药品的库存会直接减掉,它不会将修改之前的数量退还给相应的药品?请问一下这种情况可以实现吗?
2020-05-21 15:05
卷耳23
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2020-4-13
得分:0 
回复 3楼 mywisdom88
多谢大佬,请问一下如果不增加表能实现我所说的功能吗?
2020-05-21 15:11
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:0 
以下是引用卷耳23在2020-5-21 15:05:31的发言:

谢谢版主的回复,我刚刚运行了一下,修改同一种药品的 用药数量时,相应药品的库存会直接减掉,它不会将修改之前的数量退还给相应的药品?请问一下这种情况可以实现吗?

楼主的患者用药流程根本就是错误的
没有用药日期及时间,明细清单等内容
我的代码是就事论事,不同情况处理方法是不一样的


[此贴子已经被作者于2020-5-21 15:21编辑过]


坚守VFP最后的阵地
2020-05-21 15:19
卷耳23
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2020-4-13
得分:0 
回复 8楼 sdta
好的,谢谢啦
2020-05-21 15:55
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:0 
楼主知道医生是如何开处方的吗

坚守VFP最后的阵地
2020-05-21 16:33



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-501701-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.136806 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved