BillsEditor/DB/ScReportDM.dfm

object ReportData: TReportData
  OldCreateOrder = False
  Left = 863
  Top = 300
  Height = 232
  Width = 310
  object cdsProjData: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 91
    Top = 16
    object cdsProjDataBuildProjectID: TIntegerField
      FieldName = 'BuildProjectID'
    end
    object cdsProjDataBuildProjectName: TWideStringField
      FieldName = 'BuildProjectName'
      Size = 50
    end
    object cdsProjDataProjectLocation: TWideStringField
      FieldName = 'ProjectLocation'
      Size = 50
    end
    object cdsProjDataBuildUnit: TWideStringField
      FieldName = 'BuildUnit'
      Size = 50
    end
    object cdsProjDataAuthorUnit: TWideStringField
      FieldName = 'AuthorUnit'
      Size = 50
    end
    object cdsProjDataBidder: TWideStringField
      FieldName = 'Bidder'
      Size = 50
    end
    object cdsProjDataAuthor: TWideStringField
      FieldName = 'Author'
      Size = 50
    end
    object cdsProjDataAuthorCertificate: TWideStringField
      FieldName = 'AuthorCertificate'
      Size = 50
    end
    object cdsProjDataAuditor: TWideStringField
      FieldName = 'Auditor'
      Size = 50
    end
    object cdsProjDataAuditorCertificate: TWideStringField
      FieldName = 'AuditorCertificate'
      Size = 50
    end
    object cdsProjDataBudgetProjectName: TWideStringField
      FieldName = 'BudgetProjectName'
      Size = 50
    end
    object cdsProjDataEditRange: TWideStringField
      FieldName = 'EditRange'
      Size = 50
    end
    object cdsProjDataEditDate: TDateTimeField
      FieldName = 'EditDate'
    end
    object cdsProjDataMachineBBFeeRate: TFloatField
      FieldName = 'MachineBBFeeRate'
    end
    object cdsProjDataFZFeeRate: TFloatField
      FieldName = 'FZFeeRate'
    end
    object cdsProjDataIsCalcGYFeeRate: TBooleanField
      FieldName = 'IsCalcGYFeeRate'
    end
    object cdsProjDataRoadLength: TFloatField
      FieldName = 'RoadLength'
    end
    object cdsProjDataAvgMaintMonth: TFloatField
      FieldName = 'AvgMaintMonth'
    end
    object cdsProjDataRoadClass: TIntegerField
      FieldName = 'RoadClass'
    end
    object cdsProjDataIsNew: TBooleanField
      FieldName = 'IsNew'
    end
    object cdsProjDataLandForm: TIntegerField
      FieldName = 'LandForm'
    end
    object cdsProjDataDJZG: TFloatField
      FieldName = 'DJZG'
    end
    object cdsProjDataYJZG: TFloatField
      FieldName = 'YJZG'
    end
    object cdsProjDataNightZG: TFloatField
      FieldName = 'NightZG'
    end
    object cdsProjDataRaiseRateByYear: TFloatField
      FieldName = 'RaiseRateByYear'
    end
    object cdsProjDataRaiseYear: TFloatField
      FieldName = 'RaiseYear'
    end
    object cdsProjDataBuildManageFeeFile: TIntegerField
      FieldName = 'BuildManageFeeFile'
    end
  end
  object aqSQL: TADOQuery
    Parameters = <>
    Left = 16
    Top = 16
  end
end