VWED PPPS项目
blame | 历史 | 补丁 | 提交 | 提交对比 | 忽略空白
lazhen
2024-09-30 14f01dcdb7ab31794c418c3b16600eb70a061f01 
 _Main/BL/Type_CCEngineLogisticsCostReport/StaticMethod_Initialize.qbl


@@ -11,6 +11,7 @@


    produtparent              := CCEngineLogisticsCostReport::GetDefaultProductParent();


    name                      := CCEngineLogisticsCostReport::GetDefaultName();


    allunit                   := CCEngineLogisticsCostReport::GetDefaultAllUnit();


    ccfactory                 := CCEngineLogisticsCostReport::GetCCFactory();


    ccunit                    := CCEngineLogisticsCostReport::GetDefaultCCUnit();


    ccline                    := CCEngineLogisticsCostReport::GetStockingPointCCLine();


    ccrent                    := CCEngineLogisticsCostReport::GetStockingPointCCRent();


@@ -36,7 +37,7 @@


            //查询对应的发动机成本


            enginecosts       := selectset( owner, LogisticsCostEngine, engine, engine.Generation().ToLower() = product.Generation().ToLower() 


                                                 and engine.MLB_MQB() = product.MQBMLB()


                                                 and engine.Factory() = ccunit );


                                                 and engine.Factory() = ccfactory );//ccunit


            if( not isnull( enginecosts ) and enginecosts.Size() > 0 ){


              ccrow           := table.GetRow( row.Name() );


              products.Add( product );


@@ -66,7 +67,7 @@


            //查询对应的发动机成本


            enginecosts       := selectset( owner, LogisticsCostEngine, engine, engine.Generation().ToLower() = product.Generation().ToLower() 


                                                 and engine.MLB_MQB() = product.MQBMLB()


                                                 and engine.Factory() = ccunit );


                                                 and engine.Factory() = ccfactory );


            if( not isnull( enginecosts ) and enginecosts.Size() > 0 ){


              ccrow           := table.GetRow( row.Name() );


              products.Add( product );


@@ -110,7 +111,7 @@


                //在发动机成本参数表找到对应的包装容量


                enginecost     := selectobject( enginecosts, Elements, engine, engine.Generation().ToLower() = product.Generation().ToLower()


                                                   and engine.MLB_MQB() = product.MQBMLB()


                                                   and engine.Factory() = ccunit );


                                                   and engine.Factory() = ccfactory );


                //在运输成本参数表里找到发动机对应运输单价和装载容量


                transcost      := selectobject( transcosts, Elements, trans, trans.Origin() = ccline 


                                                  and trans.Destination() = ccrent 


@@ -143,7 +144,7 @@


            //查询对应的发动机成本


            enginecosts        := selectset( owner, LogisticsCostEngine, engine, engine.Generation().ToLower() = product.Generation().ToLower() 


                                                 and engine.MLB_MQB() = product.MQBMLB()


                                                 and engine.Factory() = ccunit );


                                                 and engine.Factory() = ccfactory );


            if( not isnull( enginecosts ) and enginecosts.Size() > 0 ){


              row              := table.GetRow( pisp.ProductID() );


              products.Add( product );