灵悲雨 發表於 2023-10-13 00:00:00

用计算列实现移动加权平均算法

<p class="codetitle">
        <span><u>复制代码</u></span> 代码如下:</p>
<p class="codebody">
        <br>
        if OBJECT_ID('tb') is not null drop table tb<br>
        if OBJECT_ID('TEMP') is not null drop table TEMP<br>
        if OBJECT_ID('FUN_NOWPRICE') is not null drop FUNCTION FUN_NOWPRICE<br>
        if OBJECT_ID('FUN_NOWQTY') is not null drop FUNCTION FUN_NOWQTY<br>
        go<br><br>
        create table tb(<br>
        id INT<br>
        ,Date1 datetime<br>
        ,ctype varchar(10)<br>
        ,qnt float<br>
        ,pri float<br>
        )<br><br>
        --qnt 数量<br>
        --pri 单价<br>
        insert tb<br>
        select 0,'2009-1-1', '进货', 10, 100 union all<br>
        select 1,'2009-1-1', '进货', 50, 120 union all<br>
        select 2,'2009-1-2', '出货', 30, 150 union all<br>
        select 3,'2009-1-3', '进货', 40, 130 union all<br>
        select 4,'2009-1-3', '出货', 25, 160<br>
        GO<br>
        -- 我要算成本价,按移动加权平均<br><br>
        /*<br>
        1进货以后的成本价c1=(10*100+50*120)/(10+50)<br>
        2出货以后的成本价c2=((10+50)*c1-30*c1)/((10+50)-30)=C2<br>
        --也就是说出货的时候价格不变<br>
        3进货以后的成本价c3=(((10+50)-30)*c2+40*130)/((10+50)-30+40)<br>
        --也就是说进货的时候单价更新为(当前库存的总价值+库总价值)/入库后总数量<br><br><br>
        以此类推...<br>
        */<br><br>
        --想了半天,觉得只能用循环、递归、游标实现,因为出库时的价格是根据之前的记录算出来的。<br>
        --也许有经典的算法,谁知道的麻烦教教我或者发个链接。<br><br>
        --这个FUNCTION就是变相实现递归的<br>
        CREATE FUNCTION FUN_NOWPRICE(@ID INT)<br>
        RETURNS NUMERIC(19,6)<br>
        AS<br>
        BEGIN<br>
        RETURN (SELECT ISNULL(NOWPRICE,0) FROM<br>
        (SELECT MAX(NOWPRICE) 'NOWPRICE' FROM TEMP T1 WHERE ID&lt;@ID AND<br>
        NOT EXISTS(SELECT 1 FROM TEMP WHERE ID&gt;T1.ID AND ID&lt;@ID))<br>
        T)<br>
        END<br>
        GO<br>
        --这个FUNCTION是为了计算方便<br>
        CREATE FUNCTION FUN_NOWQTY(@ID INT)<br>
        RETURNS NUMERIC(19,6)<br>
        AS<br>
        BEGIN<br>
        RETURN (SELECT ISNULL(SUM(CASE CTYPE WHEN '进货' THEN QNT ELSE 0-QNT END),0) FROM TEMP WHERE ID&lt;@ID)<br>
        END<br>
        GO<br><br><br>
        --建一个临时表,包含原表参与运算的全部字段<br>
        create table TEMP(<br>
        id INT<br>
        ,Date1 datetime<br>
        ,ctype varchar(10)<br>
        ,qnt float<br>
        ,pri float<br>
        ,NOWPRICE AS<br>
        CASE ctype<br>
        WHEN '出货' THEN DBO.FUN_NOWPRICE(ID)<br>
        ELSE (DBO.FUN_NOWPRICE(ID)*DBO.FUN_NOWQTY(ID)+QNT*PRI)/(DBO.FUN_NOWQTY(ID)+QNT)<br>
        END)<br><br><br>
        INSERT INTO TEMP<br>
        SELECT * FROM TB<br>
        ORDER BY DATE1 ASC,ID ASC<br><br>
        SELECT * FROM TEMP<br><br>
        /*<br>
        0 2009-01-01 00:00:00.000 进货 10 100 100<br>
        1 2009-01-01 00:00:00.000 进货 50 120 116.666666666667<br>
        2 2009-01-02 00:00:00.000 出货 30 150 116.666667<br>
        3 2009-01-03 00:00:00.000 进货 40 130 124.285714428571<br>
        4 2009-01-03 00:00:00.000 出货 25 160 124.285714<br>
        */</p>
<p>
        <br>
        这个写法的不完善处在于它是根据ID和日期对记录进行排序的,对于同一天的出入库情况没有处理。实际运用中可以根据CREATEDATE等时间标志性字段来进行排序。<br>
        --------------------------------------------------------------------------------<br><br>
        第一次写技术性博客,希望这是一个好的开始,欢迎大家对我的算法进行指正^_^</p>
頁: [1]
查看完整版本: 用计算列实现移动加权平均算法