khfwxx.dfm

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

object KhFwxxForm: TKhFwxxForm
  Left = 54
  Top = 169
  Width = 719
  Height = 316
  Caption = '查询客户相关服务信息'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 14
  object DBGrid1: TDBGrid
    Left = 8
    Top = 8
    Width = 697
    Height = 233
    DataSource = DataSource1
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -14
    TitleFont.Name = '宋体'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'slrq'
        Title.Alignment = taCenter
        Title.Caption = '受理日期'
        Width = 75
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'jsrq'
        Title.Alignment = taCenter
        Title.Caption = '结算日期'
        Width = 71
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'flmc'
        Title.Alignment = taCenter
        Title.Caption = '分类名称'
        Width = 68
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ppmc'
        Title.Alignment = taCenter
        Title.Caption = '品牌名称'
        Width = 75
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ggmc'
        Title.Alignment = taCenter
        Title.Caption = '规格名称'
        Width = 71
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'zxfwlx'
        Title.Alignment = taCenter
        Title.Caption = '服务类型'
        Width = 69
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'xxmc'
        Title.Alignment = taCenter
        Title.Caption = '故障现象'
        Width = 156
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'fwjs.zxrm'
        Title.Caption = '执行人名'
        Width = 60
        Visible = True
      end>
  end
  object Button1: TButton
    Left = 296
    Top = 256
    Width = 75
    Height = 25
    Caption = '退出'
    TabOrder = 1
    OnClick = Button1Click
  end
  object ADOQuery1: TADOQuery
    Connection = MainForm.ADOConnection1
    Parameters = <
      item
        Name = 'P_khbh'
        Attributes = [paNullable]
        DataType = ftFixedChar
        NumericScale = 255
        Precision = 255
        Size = 510
        Value = '00001'
      end>
    SQL.Strings = (
      'select * from fwsl,fwjs where fwsl.jsflag='#39'是'#39' '
      'and fwsl.khbh=:P_khbh and fwsl.dabh = fwjs.dabh   '
      'and fwjs.zxfwlx<>'#39'回访'#39' and fwjs.zxfwlx<>’主动回访'#39'  '
      ' and delflag='#39'否'#39' order by fwsl.dabh')
    Left = 208
    Top = 104
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 240
    Top = 104
  end
end