uzzzgxx.dfm

行业应急系统 包括: 应急系统（待遇核发） 发放系统 开发环境:Delphi5 (sp1)+ Oracle 8.05 MultiExport是一个可以将数据按指定字段倒出

              Width = 48
              Height = 12
              Caption = '单位名称'
            end
            object edtXM: TDBEdit
              Left = 287
              Top = 19
              Width = 92
              Height = 20
              DataField = 'XM'
              DataSource = souTemp
              TabOrder = 1
            end
            object edtSFZH: TDBEdit
              Left = 88
              Top = 19
              Width = 130
              Height = 20
              DataField = 'SFZH'
              DataSource = souTemp
              TabOrder = 0
              OnExit = edtSFZHExit
            end
            object cmbXB: TwwDBLookupCombo
              Left = 505
              Top = 68
              Width = 42
              Height = 20
              DropDownAlignment = taLeftJustify
              Selected.Strings = (
                'DMMC'#9'4'#9'性别'#9'F'
                'DM'#9'4'#9'代码'#9'F')
              DataField = 'XB'
              DataSource = souTemp
              LookupTable = qryXB
              LookupField = 'DM'
              Options = [loColLines, loRowLines, loTitles]
              TabOrder = 6
              AutoDropDown = False
              ShowButton = True
              AllowClearKey = False
            end
            object cmbYGXS: TwwDBLookupCombo
              Left = 88
              Top = 68
              Width = 84
              Height = 20
              DropDownAlignment = taLeftJustify
              Selected.Strings = (
                'DMMC'#9'10'#9'用工形式'#9'F'
                'DM'#9'4'#9'代码'#9'F')
              DataField = 'YGXS'
              DataSource = souTemp
              LookupTable = qryYGXS
              LookupField = 'DM'
              Options = [loColLines, loRowLines, loTitles]
              TabOrder = 4
              AutoDropDown = False
              ShowButton = True
              AllowClearKey = False
            end
            object dtpCJGZSJ: TwwDBDateTimePicker
              Left = 287
              Top = 68
              Width = 92
              Height = 20
              CalendarAttributes.Font.Charset = DEFAULT_CHARSET
              CalendarAttributes.Font.Color = clWindowText
              CalendarAttributes.Font.Height = -11
              CalendarAttributes.Font.Name = 'MS Sans Serif'
              CalendarAttributes.Font.Style = []
              DataField = 'CJGZSJ'
              DataSource = souTemp
              Epoch = 1950
              ShowButton = True
              TabOrder = 5
            end
            object dtpCSSJ: TwwDBDateTimePicker
              Left = 505
              Top = 19
              Width = 92
              Height = 20
              CalendarAttributes.Font.Charset = DEFAULT_CHARSET
              CalendarAttributes.Font.Color = clWindowText
              CalendarAttributes.Font.Height = -11
              CalendarAttributes.Font.Name = 'MS Sans Serif'
              CalendarAttributes.Font.Style = []
              DataField = 'CSSJ'
              DataSource = souTemp
              Epoch = 1950
              ShowButton = True
              TabOrder = 2
            end
            object cmbYGXS_Edit: TwwDBLookupCombo
              Left = 544
              Top = 70
              Width = 84
              Height = 20
              DropDownAlignment = taLeftJustify
              Selected.Strings = (
                'DM'#9'4'#9'代码'#9'F'
                'DMMC'#9'10'#9'用工形式'#9'F')
              DataField = 'YGXS'
              DataSource = souTemp
              LookupTable = qryYGXS
              LookupField = 'DM'
              Options = [loColLines, loRowLines, loTitles]
              TabOrder = 7
              AutoDropDown = False
              ShowButton = True
              AllowClearKey = False
            end
            object cmbXB_Edit: TwwDBLookupCombo
              Left = 571
              Top = 68
              Width = 42
              Height = 20
              DropDownAlignment = taLeftJustify
              Selected.Strings = (
                'DM'#9'4'#9'代码'#9'F'
                'DMMC'#9'4'#9'性别'#9'F')
              DataField = 'XB'
              DataSource = souTemp
              LookupTable = qryXB
              LookupField = 'DM'
              Options = [loColLines, loRowLines, loTitles]
              TabOrder = 8
              AutoDropDown = False
              ShowButton = True
              AllowClearKey = False
            end
            object edtDWMC: TDBEdit
              Left = 287
              Top = 43
              Width = 311
              Height = 20
              TabStop = False
              Color = clBtnFace
              DataField = 'DWMC'
              DataSource = souTemp
              ReadOnly = True
              TabOrder = 9
            end
            object cmbDWID: TwwDBLookupCombo
              Left = 87
              Top = 43
              Width = 130
              Height = 20
              DropDownAlignment = taLeftJustify
              Selected.Strings = (
                'DWDM'#9'9'#9'单位代码'#9'F'
                'DWMC'#9'40'#9'单位名称'#9'F')
              DataField = 'DWID'
              DataSource = souTemp
              LookupTable = qryDWID
              LookupField = 'DWID'
              Options = [loColLines, loRowLines, loTitles]
              TabOrder = 3
              AutoDropDown = False
              ShowButton = False
              AllowClearKey = True
              ShowMatchText = True
            end
          end
        end
      end
      object Panel1: TPanel
        Left = 0
        Top = 217
        Width = 638
        Height = 243
        Align = alClient
        BevelOuter = bvNone
        BorderWidth = 5
        TabOrder = 2
        object GroupBox3: TGroupBox
          Left = 5
          Top = 5
          Width = 628
          Height = 233
          Align = alClient
          Caption = '缴费记录'
          TabOrder = 0
          object wwDBGrid1: TwwDBGrid
            Left = 2
            Top = 14
            Width = 624
            Height = 217
            Selected.Strings = (
              'JFKSYF'#9'15'#9'缴费开始月份'
              'JFZZYF'#9'16'#9'缴费终止月份'
              'JFYS'#9'11'#9'缴费月数'
              'JFZE'#9'16'#9'缴费总额（元）'
              'JFGZZE'#9'19'#9'缴费工资总额（元）'
              'GRJFBL'#9'17'#9'个人缴费比例（%）')
            IniAttributes.Delimiter = ';;'
            TitleColor = clBtnFace
            FixedCols = 0
            ShowHorzScrollBar = False
            Align = alClient
            BorderStyle = bsNone
            DataSource = souList
            Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgWordWrap, dgPerfectRowFit, dgShowFooter, dgTrailingEllipsis]
            TabOrder = 0
            TitleAlignment = taCenter
            TitleFont.Charset = GB2312_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -12
            TitleFont.Name = '宋体'
            TitleFont.Style = []
            TitleLines = 1
            TitleButtons = False
            OnCalcCellColors = wwDBGrid1CalcCellColors
            IndicatorColor = icBlack
            OnTopRowChanged = wwDBGrid1TopRowChanged
            OnUpdateFooter = wwDBGrid1UpdateFooter
          end
        end
      end
    end
    inherited tabBrowse: TTabSheet
      Caption = '查找子集'
      object Panel3: TPanel
        Left = 0
        Top = 33
        Width = 638
        Height = 427
        Align = alClient
        BevelInner = bvLowered
        BorderWidth = 2
        Caption = 'Panel3'
        TabOrder = 1
        object wwDBGrid2: TwwDBGrid
          Left = 4
          Top = 4
          Width = 630
          Height = 419
          Selected.Strings = (
            'DMMC'#9'20'#9'所属行业'
            'SFZH'#9'18'#9'社会保障号'
            'XM'#9'10'#9'姓名'
            'DWMC'#9'40'#9'单位名称')
          IniAttributes.Delimiter = ';;'
          TitleColor = clBtnFace
          FixedCols = 0
          ShowHorzScrollBar = True
          Align = alClient
          BorderStyle = bsNone
          DataSource = souMaster
          TabOrder = 0
          TitleAlignment = taLeftJustify
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -12
          TitleFont.Name = '宋体'
          TitleFont.Style = []
          TitleLines = 1
          TitleButtons = False
          IndicatorColor = icBlack
        end
      end
    end
  end
  inherited actlstTemp: TActionList
    inherited actFind: TAction
      OnExecute = actFindExecute
    end
    object actCheck: TAction
      Category = '界面操作'
      Caption = '审核'
      ImageIndex = 7
      OnExecute = actCheckExecute