vb进销存管理系统毕业论文

vb进销存管理系统毕业论文内容摘要：

部收货数量加月初存货数量作为权数，去除本月全部收货成本加上月初存货成本，计算出存货的加权平均单位成本，从而确定存货的发出和库存成本。 计算公式如下： 移动平均法 移动平均法亦称移动加权平均法，指本次收货的成本加原有库存的成本，除以本次收货数量加原有收货数量，据以计算加权单价，并对发出存货进行计价的 移动加权平均法的优点：能使管理当局及时了解存货的结存情况，而且计算的平均单位成本以及发出和结存的存货成本比较客观。 缺点：每次收货都要计算一次平均单价，计算工作量较大。 五、编码实现与测试 编码摘要 材料收发存分类汇总的部分代码： sql 语句： SELECT [K_llll_D].[CLBH] AS CLBH, [K_llll_M].[KDRQ] AS KDRQ, [K_llll_M].[CBXM] AS CBXM, [K_llll_M].[DHDH], [K_llll_D].[SLSL] AS SLSL, [k_LLLL_D].[JEJE] AS JEJE FROM K_llll_M INNER JOIN K_llll_D ON [K_llll_M].[DHDH]=[K_llll_D].[DHDH] WHERE [K_llll_M].[status]=1。 SELECT [K_clrk_D].[CLBH] AS CLBH, [K_clrk_M].[KDRQ] AS KDRQ, [K_clrk_M].[DHDH] AS DHDH, [K_clrk_D].[SLSL] AS SLSL, [SLSL]*[K_clrk_D].[DJDJ] AS JEJE FROM K_clrk_M INNER JOIN K_clrk_D ON [K_clrk_M].[DHDH]=[K_clrk_D].[DHDH] WHERE [K_clrk_m].[STATUS]=1。 SELECT , Sum() AS ZSL, Sum() AS ZJE, year([KDRQ]) amp。 amp。 Month([KDRQ]) amp。 amp。 1 AS MON FROM SFC_rk AS A GROUP BY , year([KDRQ]) amp。 amp。 Month([KDRQ]) amp。 amp。 1。 SELECT , Sum(IIf(ISNULL(),0,)) AS ZSL, Sum(IIf(ISNULL(),0,)) AS ZJE, year([KDRQ]) amp。 amp。 Month([KDRQ]) amp。 amp。 1 AS MON FROM SFC_ck AS A GROUP BY , year([KDRQ]) amp。 amp。 Month([KDRQ]) amp。 amp。 1。 SELECT AS BHBH, AS YFYF, IIf(ISNULL(),0,) AS QCSL, IIf(ISNULL(),0,) AS SRSL, [QCSL]+SRSL AS MISL, IIf(ISNULL(),0,) AS QCJE, IIf(ISNULL(),0,) AS SRJE, [QCJE]+SRJE AS MIJE FROM T_SFC_QC AS A LEFT JOIN SFC_RK_GP AS B ON (=CDATE()) AND (=) ORDER BY [bhbh]。 SELECT , , , , (ISNULL(),0,) AS QMSL, , , (ISNULL(),0,) AS QMJE, IIF(ISNULL(),0,) AS FCSL, IIF(ISNULL(),0,) AS FCJE FROM SFC_AAA AS A LEFT JOIN SFC_CK_GP AS B ON (=CDATE()) AND (=) ORDER BY [bhbh]。 SELECT , AS PMPM, AS GGGG, , , , , , , , , , , , FROM SFC_BBB AS A LEFT JOIN J_clcl AS B ON = ORDER BY。 SELECT SFC_CCC.*, IIf(ISNULL([O_Dzfy].[ZWZW]),空 ,[O_Dzfy].[ZWZW]) AS ZWBB FROM SFC_CCC LEFT JOIN O_Dzfy ON [O_Dzfy].[FHFH]=[SFC_CCC].[FLBB]。 SELECT SFC_ZW_B.*, IIf(isnull([O_Dzfy].[ZWZW]),空 ,[O_Dzfy].[ZWZW]) AS ZWCC FROM SFC_ZW_B LEFT JOIN O_Dzfy ON [SFC_ZW_B].[FLCC]=[O_Dzfy].[FHFH]。 SELECT AS FLBB, AS ZWBB, AS ZWCC, AS YFYF, Sum() AS QCZSL, Sum() AS SRZSL, Sum() AS FCZSL, Sum() AS QMZSL, Sum() AS QCZJE, Sum() AS SRZJE, Sum() AS FCZJE, Sum() AS QMZJE FROM SFC_ZW_C AS A GROUP BY , , ,。 全月一次加权平均计算单价的部分代码： sql 语句： SELECT , SUM() AS RKSL, SUM() AS RKJE FROM AVER_MTH_RK1 AS A WHERE NOT (ISNULL()) GROUP BY [CLBH]。 SELECT , [SLSL], [JEJE], [YFYF] FROM AVER_MTH_RK AS A LEFT JOIN T_SFC_QC AS B ON (=) AND (=)。 SELECT , , , , * AS JEJE FROM K_clrk_M AS A INNER JOIN K_clrk_D AS B ON = WHERE STATUS=1。 VB 进销存管理系统毕业论文 SELECT , , IIf(=0,IIf(ISNULL([QCSL]),0,[QCJE]/[QCSL]),(+)/(CSL+)) AS DJDJ FROM AVER_MTH_RK2 AS A LEFT JOIN T_SFC_QC AS B ON =。 功能函数 Public Sub Do_Aver_DJ() Dim da_Rec As Dim da_SQL As String Set da_Rec = (select * from AVER_DJ) Do While Not da_SQL = update J_clcl set DJDJ = amp。 (DJDJ) amp。 where BHBH= 39。 amp。 (CLBH) amp。 39。 (da_SQL) da_SQL = update K_LLLL_D set JEJE = amp。 (DJDJ) amp。 * where =39。 amp。 _ (CLBH) amp。 39。 and IN (SELECT DHDH FROM AVER_mth_LL2) (da_SQL) Loop End Sub 收发存明细 ,追踪某中材。