fwfyjs.dfm

售后服务系统优质的售后服务是企业生存和市场竞争的保障

object FwFyJsForm: TFwFyJsForm
  Left = 193
  Top = 110
  Width = 729
  Height = 388
  BorderIcons = []
  Caption = '服务费用结算'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 14
  object GroupBox1: TGroupBox
    Left = 8
    Top = 8
    Width = 353
    Height = 345
    Caption = '服务情况'
    TabOrder = 0
    object Label1: TLabel
      Left = 16
      Top = 216
      Width = 56
      Height = 14
      Caption = '服务日期'
    end
    object Label2: TLabel
      Left = 16
      Top = 280
      Width = 56
      Height = 14
      Caption = '服务情况'
    end
    object Label10: TLabel
      Left = 16
      Top = 312
      Width = 56
      Height = 14
      Caption = '服务备注'
    end
    object Label15: TLabel
      Left = 16
      Top = 89
      Width = 56
      Height = 14
      Caption = '购买日期'
    end
    object Label17: TLabel
      Left = 16
      Top = 121
      Width = 56
      Height = 14
      Caption = '机身号码'
    end
    object Label20: TLabel
      Left = 16
      Top = 57
      Width = 56
      Height = 14
      Caption = '商品型号'
    end
    object Label16: TLabel
      Left = 16
      Top = 25
      Width = 56
      Height = 14
      Caption = '服务商品'
    end
    object Label19: TLabel
      Left = 16
      Top = 153
      Width = 56
      Height = 14
      Caption = '服务种类'
    end
    object Label21: TLabel
      Left = 16
      Top = 184
      Width = 56
      Height = 14
      Caption = '保修类型'
    end
    object Label18: TLabel
      Left = 16
      Top = 248
      Width = 56
      Height = 14
      Caption = '完成日期'
    end
    object DBEdit9: TDBEdit
      Left = 80
      Top = 312
      Width = 257
      Height = 22
      DataField = 'fwbz'
      DataSource = FwJsForm.DataSourcefwjs
      TabOrder = 0
    end
    object DBLookupComboBox1: TDBLookupComboBox
      Left = 80
      Top = 280
      Width = 257
      Height = 22
      DataField = 'zxqkbh'
      DataSource = FwJsForm.DataSourcefwjs
      KeyField = 'bh'
      ListField = 'mc'
      ListSource = DataSourcefwqkxx
      TabOrder = 1
    end
    object DateTimePicker1: TDateTimePicker
      Left = 80
      Top = 216
      Width = 129
      Height = 22
      CalAlignment = dtaLeft
      Date = 37466.3736362616
      Time = 37466.3736362616
      DateFormat = dfLong
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 2
    end
    object DateTimePicker2: TDateTimePicker
      Left = 80
      Top = 87
      Width = 129
      Height = 22
      CalAlignment = dtaLeft
      Date = 37466.3736362616
      Time = 37466.3736362616
      DateFormat = dfLong
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 3
    end
    object Edit1: TEdit
      Left = 80
      Top = 119
      Width = 129
      Height = 22
      TabOrder = 4
    end
    object Edit2: TEdit
      Left = 80
      Top = 55
      Width = 129
      Height = 22
      TabOrder = 5
    end
    object DBRadioGroup1: TDBRadioGroup
      Left = 224
      Top = 168
      Width = 113
      Height = 105
      Caption = '客户意见'
      DataField = 'zxfwyj'
      DataSource = FwJsForm.DataSourcefwjs
      Items.Strings = (
        '满意'
        '一般'
        '不满意')
      TabOrder = 6
    end
    object Button9: TButton
      Left = 224
      Top = 56
      Width = 113
      Height = 41
      Caption = '维修部位登记'
      TabOrder = 7
      OnClick = Button9Click
    end
    object Button1: TButton
      Left = 224
      Top = 112
      Width = 113
      Height = 41
      Caption = '配件登记'
      TabOrder = 8
      OnClick = Button1Click
    end
    object DBEdit14: TDBEdit
      Left = 80
      Top = 24
      Width = 129
      Height = 22
      DataField = 'ppmc'
      DataSource = FwJsForm.DataSourcefwsl
      ReadOnly = True
      TabOrder = 9
    end
    object DBEdit17: TDBEdit
      Left = 216
      Top = 24
      Width = 121
      Height = 22
      DataField = 'ggmc'
      DataSource = FwJsForm.DataSourcefwsl
      ReadOnly = True
      TabOrder = 10
    end
    object DBEdit18: TDBEdit
      Left = 80
      Top = 152
      Width = 129
      Height = 22
      DataField = 'zxfwlx'
      DataSource = FwJsForm.DataSourcefwsl
      ReadOnly = True
      TabOrder = 11
    end
    object DBEdit19: TDBEdit
      Left = 80
      Top = 184
      Width = 129
      Height = 22
      DataField = 'zxsflx'
      DataSource = FwJsForm.DataSourcefwsl
      ReadOnly = True
      TabOrder = 12
    end
    object DateTimePicker3: TDateTimePicker
      Left = 80
      Top = 248
      Width = 129
      Height = 22
      CalAlignment = dtaLeft
      Date = 37466.3736362616
      Time = 37466.3736362616
      DateFormat = dfLong
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 13
    end
  end
  object Button2: TButton
    Left = 392
    Top = 312
    Width = 121
    Height = 41
    Caption = '确认'
    TabOrder = 1
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 568
    Top = 312
    Width = 113
    Height = 41
    Caption = '放弃'
    TabOrder = 2
    OnClick = Button3Click
  end
  object GroupBox5: TGroupBox
    Left = 368
    Top = 8
    Width = 169
    Height = 161
    Caption = '供应商结算费用'
    TabOrder = 3
    object Label11: TLabel
      Left = 13
      Top = 24
      Width = 42
      Height = 14
      Caption = '服务费'
    end
    object Label12: TLabel
      Left = 13
      Top = 56
      Width = 42
      Height = 14
      Caption = '配件费'
    end
    object Label13: TLabel
      Left = 13
      Top = 88
      Width = 42
      Height = 14
      Caption = '误工费'
    end
    object Label14: TLabel
      Left = 13
      Top = 120
      Width = 42
      Height = 14
      Caption = '交通费'
    end
    object DBEdit1: TDBEdit
      Left = 64
      Top = 24
      Width = 89
      Height = 22
      DataField = 'mffwfy'
      DataSource = FwJsForm.DataSourcefwjs
      ReadOnly = True
      TabOrder = 0
    end
    object DBEdit10: TDBEdit
      Left = 64
      Top = 56
      Width = 89
      Height = 22
      DataField = 'mfpjfy'
      DataSource = FwJsForm.DataSourcefwjs
      ReadOnly = True
      TabOrder = 1
    end
    object DBEdit11: TDBEdit
      Left = 64
      Top = 88
      Width = 89
      Height = 22
      DataField = 'gyswgfy'
      DataSource = FwJsForm.DataSourcefwjs
      ReadOnly = True
      TabOrder = 2
    end
    object DBEdit12: TDBEdit
      Left = 64
      Top = 120
      Width = 89
      Height = 22
      DataField = 'gysjtfy'
      DataSource = FwJsForm.DataSourcefwjs
      ReadOnly = True
      TabOrder = 3
    end
  end
  object GroupBox6: TGroupBox
    Left = 368
    Top = 176
    Width = 169
    Height = 121
    Caption = '人员结算费用'
    TabOrder = 4
    object DBEdit13: TDBEdit
      Left = 72
      Top = 24
      Width = 89
      Height = 22
      DataField = 'yfryfy'
      DataSource = FwJsForm.DataSourcefwjs
      ReadOnly = True
      TabOrder = 0
    end
    object DBEdit15: TDBEdit
      Left = 72
      Top = 56
      Width = 89
      Height = 22
      DataField = 'yfrywgfy'
      DataSource = FwJsForm.DataSourcefwjs
      ReadOnly = True
      TabOrder = 1
    end
    object DBEdit16: TDBEdit
      Left = 72
      Top = 88
      Width = 89
      Height = 22
      DataField = 'yfryjtfy'
      DataSource = FwJsForm.DataSourcefwjs
      ReadOnly = True
      TabOrder = 2
    end
    object CheckBox1: TCheckBox
      Left = 8
      Top = 24
      Width = 65
      Height = 17
      Caption = '服务费'
      TabOrder = 3
      OnClick = CheckBox1Click
    end
    object CheckBox2: TCheckBox
      Left = 8
      Top = 56
      Width = 65
      Height = 17
      Caption = '误工费'
      TabOrder = 4
      OnClick = CheckBox2Click
    end
    object CheckBox3: TCheckBox
      Left = 8
      Top = 88
      Width = 65
      Height = 17
      Caption = '交通费'
      TabOrder = 5
      OnClick = CheckBox3Click
    end
  end
  object GroupBox3: TGroupBox
    Left = 544
    Top = 8
    Width = 169
    Height = 129
    Caption = '应收客户费用'
    TabOrder = 5
    object Label4: TLabel
      Left = 13
      Top = 56
      Width = 42
      Height = 14
      Caption = '配件费'
    end
    object Label5: TLabel
      Left = 13
      Top = 88
      Width = 42
      Height = 14
      Caption = '其它费'
    end
    object Label3: TLabel
      Left = 13
      Top = 24
      Width = 42
      Height = 14
      Caption = '服务费'
    end
    object DBEdit2: TDBEdit
      Left = 64
      Top = 24
      Width = 89
      Height = 22
      DataField = 'zffwfy'
      DataSource = FwJsForm.DataSourcefwjs
      ReadOnly = True
      TabOrder = 0
    end
    object DBEdit3: TDBEdit
      Left = 64
      Top = 56
      Width = 89
      Height = 22
      DataField = 'zfpjfy'
      DataSource = FwJsForm.DataSourcefwjs
      ReadOnly = True
      TabOrder = 1
    end
    object DBEdit4: TDBEdit
      Left = 64
      Top = 88
      Width = 89
      Height = 22
      DataField = 'ysqtfy'
      DataSource = FwJsForm.DataSourcefwjs
      ReadOnly = True
      TabOrder = 2
    end
  end
  object GroupBox4: TGroupBox
    Left = 544
    Top = 144
    Width = 169
    Height = 153
    Caption = '实收客户费用'
    TabOrder = 6
    object Label6: TLabel
      Left = 13
      Top = 56
      Width = 42
      Height = 14
      Caption = '配件费'
    end
    object Label7: TLabel
      Left = 13
      Top = 88
      Width = 42
      Height = 14
      Caption = '其它费'
    end
    object Label8: TLabel
      Left = 13
      Top = 24
      Width = 42
      Height = 14
      Caption = '服务费'
    end
    object Label9: TLabel
      Left = 13
      Top = 120
      Width = 42
      Height = 14
      Caption = '合  计'
    end
    object DBEdit5: TDBEdit
      Left = 64
      Top = 24
      Width = 89
      Height = 22
      DataField = 'ssfwfy'
      DataSource = FwJsForm.DataSourcefwjs
      TabOrder = 0
      OnChange = DBEdit5Change
    end
    object DBEdit6: TDBEdit
      Left = 64
      Top = 56
      Width = 89
      Height = 22
      DataField = 'sspjfy'
      DataSource = FwJsForm.DataSourcefwjs
      TabOrder = 1
      OnChange = DBEdit6Change
    end
    object DBEdit7: TDBEdit
      Left = 64
      Top = 88
      Width = 89
      Height = 22
      DataField = 'ssqtfy'
      DataSource = FwJsForm.DataSourcefwjs
      TabOrder = 2
      OnChange = DBEdit7Change
    end
    object DBEdit8: TDBEdit
      Left = 64
      Top = 120
      Width = 89
      Height = 22
      DataField = 'sskhfy'
      DataSource = FwJsForm.DataSourcefwjs
      ReadOnly = True
      TabOrder = 3
    end
  end
  object ADOQuerypjxx: TADOQuery
    Connection = MainForm.ADOConnection1
    Parameters = <
      item
        Name = 'P_dabh'
        Attributes = [paNullable]
        DataType = ftFixedChar
        NumericScale = 255
        Precision = 255
        Size = 510
        Value = '00001'
      end>
    SQL.Strings = (
      'select * from wxpjxx where dabh =:P_dabh ')
    Left = 304
    Top = 32
  end
  object DataSourcefwqkxx: TDataSource
    DataSet = ADOQueryfwqkxx
    Left = 272
    Top = 272
  end
  object ADOQueryggxx: TADOQuery
    Connection = MainForm.ADOConnection1
    Parameters = <
      item
        Name = 'P_flbh'
        Attributes = [paNullable]
        DataType = ftFixedChar
        NumericScale = 255
        Precision = 255
        Size = 510
        Value = Null
      end
      item
        Name = 'P_ppbh'
        Attributes = [paNullable]
        DataType = ftFixedChar
        NumericScale = 255
        Precision = 255
        Size = 510
        Value = Null
      end
      item
        Name = 'P_ggbh'
        Attributes = [paNullable]
        DataType = ftFixedChar
        NumericScale = 255
        Precision = 255
        Size = 510
        Value = Null
      end>
    SQL.Strings = (
      'select * from ggxx where flbh=:P_flbh and ppbh=:P_ppbh'
      'and ggbh=:P_ggbh')
    Left = 168
    Top = 24
  end
  object ADOQuerytmp: TADOQuery
    Connection = MainForm.ADOConnection1
    Parameters = <>
    Left = 128
    Top = 48
  end
  object ADOQueryfwqkxx: TADOQuery
    Connection = MainForm.ADOConnection1
    Parameters = <>
    SQL.Strings = (
      'select * from fwqkxx where lx='#39'服务'#39)
    Left = 232
    Top = 272
  end
end