sum070report.dfm.keep

电子充值系统:全球通的充值卡通过POS机传到销售点.

inherited qrSUM070: TqrSUM070
  Functions.DATA = (
    '0'
    '0'
    #39#39)
  Page.Values = (
    50
    2970
    50
    2100
    50
    50
    0)
  inherited bdPageHeader: TQRBand
    Size.Values = (
      280.458333333333
      2000.25)
    inherited CompanyName: TQRLabel
      Size.Values = (
        66.1458333333333
        838.729166666667
        0
        322.791666666667)
      FontSize = 16
    end
    inherited QRSysData1: TQRSysData
      Size.Values = (
        44.9791666666667
        1778
        52.9166666666667
        113.770833333333)
      FontSize = 10
    end
    inherited QRSysData2: TQRSysData
      Size.Values = (
        44.9791666666667
        1778
        105.833333333333
        132.291666666667)
      FontSize = 10
    end
    inherited QRLabel1: TQRLabel
      Size.Values = (
        44.9791666666667
        1598.08333333333
        52.9166666666667
        158.75)
      FontSize = 10
    end
    inherited QRLabel2: TQRLabel
      Size.Values = (
        44.9791666666667
        1598.08333333333
        105.833333333333
        89.9583333333333)
      FontSize = 10
    end
    inherited ReportName: TQRLabel
      Left = 325
      Width = 106
      Size.Values = (
        58.2083333333333
        859.895833333333
        63.5
        280.458333333333)
      Caption = #38144#21806#27719#24635#34920
      FontSize = 16
    end
    inherited QRLabel4: TQRLabel
      Size.Values = (
        44.9791666666667
        1598.08333333333
        0
        158.75)
      FontSize = 10
    end
    inherited QRLabel5: TQRLabel
      Width = 43
      Size.Values = (
        44.9791666666667
        1778
        0
        113.770833333333)
      Caption = 'SUM070'
      FontSize = 10
    end
    object QRLabel8: TQRLabel
      Left = 24
      Top = 88
      Width = 66
      Height = 14
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      Size.Values = (
        37.0416666666667
        63.5
        232.833333333333
        174.625)
      Alignment = taLeftJustify
      AlignToBand = False
      AutoSize = True
      AutoStretch = False
      Caption = #38144#21806#28857#32534#21495
      Color = clWhite
      Transparent = False
      WordWrap = True
      FontSize = 10
    end
    object QRLabel9: TQRLabel
      Left = 152
      Top = 88
      Width = 66
      Height = 14
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      Size.Values = (
        37.0416666666667
        402.166666666667
        232.833333333333
        174.625)
      Alignment = taLeftJustify
      AlignToBand = False
      AutoSize = True
      AutoStretch = False
      Caption = #38144#21806#28857#21517#31216
      Color = clWhite
      Transparent = False
      WordWrap = True
      FontSize = 10
    end
    object QRLabel11: TQRLabel
      Left = 526
      Top = 88
      Width = 53
      Height = 14
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      Size.Values = (
        37.0416666666667
        1391.70833333333
        232.833333333333
        140.229166666667)
      Alignment = taLeftJustify
      AlignToBand = False
      AutoSize = True
      AutoStretch = False
      Caption = #20986#24211#24352#25968
      Color = clWhite
      Transparent = False
      WordWrap = True
      FontSize = 10
    end
    object QRLabel15: TQRLabel
      Left = 648
      Top = 88
      Width = 53
      Height = 14
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      Size.Values = (
        37.0416666666667
        1714.5
        232.833333333333
        140.229166666667)
      Alignment = taLeftJustify
      AlignToBand = False
      AutoSize = True
      AutoStretch = False
      Caption = #20986#24211#37329#39069
      Color = clWhite
      Transparent = False
      WordWrap = True
      FontSize = 10
    end
    object lDate: TQRLabel
      Left = 364
      Top = 48
      Width = 27
      Height = 17
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      Size.Values = (
        44.9791666666667
        963.083333333333
        127
        71.4375)
      Alignment = taCenter
      AlignToBand = False
      AutoSize = True
      AutoStretch = False
      Caption = #26085#26399
      Color = clWhite
      Transparent = False
      WordWrap = True
      FontSize = 10
    end
  end
  inherited bgDetail: TQRBand
    Size.Values = (
      60.8541666666667
      2000.25)
    object QRDBText4: TQRDBText
      Left = 24
      Top = 4
      Width = 57
      Height = 14
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      Size.Values = (
        37.0416666666667
        63.5
        10.5833333333333
        150.8125)
      Alignment = taLeftJustify
      AlignToBand = False
      AutoSize = True
      AutoStretch = False
      Color = clWhite
      DataSet = qyReport
      DataField = 'SALECODE'
      Transparent = False
      WordWrap = True
      FontSize = 10
    end
    object QRDBText8: TQRDBText
      Left = 522
      Top = 4
      Width = 57
      Height = 14
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      Size.Values = (
        37.0416666666667
        1381.125
        10.5833333333333
        150.8125)
      Alignment = taRightJustify
      AlignToBand = False
      AutoSize = True
      AutoStretch = False
      Color = clWhite
      DataSet = qyReport
      DataField = 'OUTCOUNT'
      Transparent = False
      WordWrap = True
      FontSize = 10
    end
    object QRDBText5: TQRDBText
      Left = 152
      Top = 4
      Width = 57
      Height = 14
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      Size.Values = (
        37.0416666666667
        402.166666666667
        10.5833333333333
        150.8125)
      Alignment = taLeftJustify
      AlignToBand = False
      AutoSize = True
      AutoStretch = False
      Color = clWhite
      DataSet = qyReport
      DataField = 'SALENAME'
      Transparent = False
      WordWrap = True
      FontSize = 10
    end
    object QRDBText1: TQRDBText
      Left = 658
      Top = 4
      Width = 43
      Height = 14
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      Size.Values = (
        37.0416666666667
        1740.95833333333
        10.5833333333333
        113.770833333333)
      Alignment = taRightJustify
      AlignToBand = False
      AutoSize = True
      AutoStretch = False
      Color = clWhite
      DataSet = qyReport
      DataField = 'OUTSUM'
      Transparent = False
      WordWrap = True
      FontSize = 10
    end
  end
  inherited bdPageFooter: TQRBand
    Top = 188
    Size.Values = (
      105.833333333333
      2000.25)
    inherited QRLabel3: TQRLabel
      Size.Values = (
        44.9791666666667
        1651
        52.9166666666667
        89.9583333333333)
      FontSize = 10
    end
    inherited UserName: TQRLabel
      Size.Values = (
        44.9791666666667
        1746.25
        52.9166666666667
        150.8125)
      FontSize = 10
    end
  end
  object QRBand1: TQRBand [3]
    Left = 19
    Top = 148
    Width = 756
    Height = 40
    Frame.Color = clBlack
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    AlignToBottom = False
    Color = clWhite
    ForceNewColumn = False
    ForceNewPage = False
    Size.Values = (
      105.833333333333
      2000.25)
    BandType = rbSummary
    object QRExpr4: TQRExpr
      Left = 560
      Top = 4
      Width = 141
      Height = 14
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      Size.Values = (
        37.0416666666667
        1481.66666666667
        10.5833333333333
        373.0625)
      Alignment = taRightJustify
      AlignToBand = False
      AutoSize = True
      AutoStretch = False
      Color = clWhite
      ResetAfterPrint = False
      Transparent = False
      WordWrap = True
      Expression = 'SUM(qyReport.OUTSUM)'
      Mask = '#,##0'
      FontSize = 10
    end
    object QRExpr3: TQRExpr
      Left = 427
      Top = 4
      Width = 155
      Height = 14
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      Size.Values = (
        37.0416666666667
        1129.77083333333
        10.5833333333333
        410.104166666667)
      Alignment = taRightJustify
      AlignToBand = False
      AutoSize = True
      AutoStretch = False
      Color = clWhite
      ResetAfterPrint = False
      Transparent = False
      WordWrap = True
      Expression = 'SUM(qyReport.OUTCOUNT)'
      Mask = '#,##0'
      FontSize = 10
    end
    object QRLabel6: TQRLabel
      Left = 24
      Top = 4
      Width = 40
      Height = 14
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      Size.Values = (
        37.0416666666667
        63.5
        10.5833333333333
        105.833333333333)
      Alignment = taLeftJustify
      AlignToBand = False
      AutoSize = True
      AutoStretch = False
      Caption = #21512#35745#65306
      Color = clWhite
      Transparent = False
      WordWrap = True
      FontSize = 10
    end
  end
  inherited qyReport: TQuery
    DatabaseName = 'ePaperApp'
    SQL.Strings = (
      'select C.SaleCode,S.SaleName,'
      '  sum(1) as OutCount, sum(CardParValue) as OutSum'
      'from Pwpt_CardStock C,Pwpt_Sale S'
      
        'where C.OutDate >= :BeginDate and C.OutDate <= :EndDate and bOut' +
        '='#39'1'#39' '
      '  and C.SaleCode = S.SaleCode'
      'group by C.SaleCode,S.SaleName'
      'order by C.SaleCode,S.SaleName')
    ParamData = <
      item
        DataType = ftDateTime
        Name = 'BeginDate'
        ParamType = ptUnknown
      end
      item
        DataType = ftDateTime
        Name = 'EndDate'
        ParamType = ptUnknown
      end>
    object qyReportOUTCOUNT: TFloatField
      FieldName = 'OUTCOUNT'
    end
    object qyReportOUTSUM: TFloatField
      FieldName = 'OUTSUM'
    end
    object qyReportSALECODE: TStringField
      FieldName = 'SALECODE'
      FixedChar = True
      Size = 4
    end
    object qyReportSALENAME: TStringField
      FieldName = 'SALENAME'
    end
  end
end