lazhen
2024-09-24 8b28a76dac37e1d5d8447dbc83ec06a83d1585cf
_Main/BL/Type_CCEngineLogisticsCostReport0/Method_Generate.qbl
@@ -29,37 +29,37 @@
          
          sumcell    := selectobject( column, Cell, c, c.Row() = sumrow );
          if( isnull( sumcell ) ){
            sumcell  := sumrow.Cell( relnew, CCRentEnterCost         := 0
                                     , CCRentOutCost                 := 0
                                     , CCLongTransCoat               := 0
                                     , CCShortTransCost              := 0
                                     , CCRentStorageCost             := 0
                                     , DLRentEnterCost               := 0
                                     , DLRentOutCost                 := 0
                                     , FactoryToDLRentTransCost      := 0
                                     , DLRentStorageCost             := 0 );
            sumcell  := sumrow.Cell( relnew, CCRentInCost            := 0
                                     , CCRentOutOfCost               := 0
                                     , CCLongTransCost               := 0
                                     , CCShorTransCost               := 0
                                     , CCRentStorCost                := 0
                                     , DLRentInCost                  := 0
                                     , DLRentOutOfCost               := 0
                                     , WerkToDLRentTransCost         := 0
                                     , DLRentStorCost                := 0 );
            column.Cell( relinsert, sumcell );
          }
          
          showcell   := showrow.Cell( relnew, CCRentEnterCost        := cell.CCRentEnterCost()
                                      , CCRentOutCost                := cell.CCRentOutCost()
                                      , CCLongTransCoat              := cell.CCLongTransCoat()
                                      , CCShortTransCost             := cell.CCShortTransCost()
                                      , CCRentStorageCost            := cell.CCRentStorageCost()
                                      , DLRentEnterCost              := cell.DLRentEnterCost()
                                      , DLRentOutCost                := cell.DLRentOutCost()
                                      , FactoryToDLRentTransCost     := cell.FactoryToDLRentTransCost()
                                      , DLRentStorageCost            := cell.DLRentStorageCost() );
          showcell   := showrow.Cell( relnew, CCRentInCost           := cell.CCRentInCost()
                                      , CCRentOutOfCost              := cell.CCRentOutOfCost()
                                      , CCLongTransCost              := cell.CCLongTransCost()
                                      , CCShorTransCost              := cell.CCShorTransCost()
                                      , CCRentStorCost               := cell.CCRentStorCost()
                                      , DLRentInCost                 := cell.DLRentInCost()
                                      , DLRentOutOfCost              := cell.DLRentOutOfCost()
                                      , WerkToDLRentTransCost        := cell.WerkToDLRentTransCost()
                                      , DLRentStorCost            := cell.DLRentStorCost() );
          column.Cell( relinsert, showcell );
          sumcell.CCRentEnterCost( cell.CCRentEnterCost() + sumcell.CCRentEnterCost() );
          sumcell.CCRentOutCost( cell.CCRentOutCost() + sumcell.CCRentOutCost() );
          sumcell.CCLongTransCoat( cell.CCLongTransCoat() + sumcell.CCLongTransCoat() );
          sumcell.CCShortTransCost( cell.CCShortTransCost() + sumcell.CCShortTransCost() );
          sumcell.CCRentStorageCost( cell.CCRentStorageCost() + sumcell.CCRentStorageCost() );
          sumcell.DLRentEnterCost( cell.DLRentEnterCost() + sumcell.DLRentEnterCost() );
          sumcell.DLRentOutCost( cell.DLRentOutCost() + sumcell.DLRentOutCost() );
          sumcell.FactoryToDLRentTransCost( cell.FactoryToDLRentTransCost() + sumcell.FactoryToDLRentTransCost() );
          sumcell.DLRentStorageCost( cell.DLRentStorageCost() + sumcell.DLRentStorageCost() );
          sumcell.CCRentOutOfCost( cell.CCRentOutOfCost() + sumcell.CCRentOutOfCost() );
          sumcell.CCRentOutOfCost( cell.CCRentOutOfCost() + sumcell.CCRentOutOfCost() );
          sumcell.CCLongTransCost( cell.CCLongTransCost() + sumcell.CCLongTransCost() );
          sumcell.CCShorTransCost( cell.CCShorTransCost() + sumcell.CCShorTransCost() );
          sumcell.CCRentStorCost( cell.CCRentStorCost() + sumcell.CCRentStorCost() );
          sumcell.DLRentInCost( cell.DLRentInCost() + sumcell.DLRentInCost() );
          sumcell.DLRentOutOfCost( cell.DLRentOutOfCost() + sumcell.DLRentOutOfCost() );
          sumcell.WerkToDLRentTransCost( cell.WerkToDLRentTransCost() + sumcell.WerkToDLRentTransCost() );
          sumcell.DLRentStorCost( cell.DLRentStorCost() + sumcell.DLRentStorCost() );
        }
      }
    }