uryxxframe.dfm

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

object FrameRyxx: TFrameRyxx
  Left = 0
  Top = 0
  Width = 501
  Height = 328
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  ParentFont = False
  TabOrder = 0
  object Label1: TLabel
    Left = 24
    Top = 50
    Width = 24
    Height = 12
    Caption = '姓名'
    FocusControl = DBEdit1
  end
  object Label2: TLabel
    Left = 150
    Top = 48
    Width = 48
    Height = 12
    Caption = '身份证号'
    FocusControl = DBEdit2
  end
  object Label3: TLabel
    Left = 347
    Top = 48
    Width = 48
    Height = 12
    Caption = '核定金额'
    FocusControl = DBEdit3
  end
  object Label4: TLabel
    Left = 24
    Top = 74
    Width = 48
    Height = 12
    Caption = '发放方式'
  end
  object Label5: TLabel
    Left = 150
    Top = 74
    Width = 48
    Height = 12
    Caption = '发放机构'
  end
  object Label6: TLabel
    Left = 347
    Top = 74
    Width = 48
    Height = 12
    Caption = '定居情况'
  end
  object Label7: TLabel
    Left = 24
    Top = 113
    Width = 24
    Height = 12
    Caption = '帐户'
    FocusControl = DBEdit7
  end
  object Label9: TLabel
    Left = 201
    Top = 113
    Width = 36
    Height = 12
    Caption = '开户行'
    FocusControl = DBEdit8
  end
  object Label10: TLabel
    Left = 24
    Top = 139
    Width = 24
    Height = 12
    Caption = '行别'
  end
  object Label11: TLabel
    Left = 203
    Top = 139
    Width = 36
    Height = 12
    Caption = '收款人'
    FocusControl = DBEdit10
  end
  object Label12: TLabel
    Left = 24
    Top = 163
    Width = 48
    Height = 12
    Caption = '汇入地点'
    FocusControl = DBEdit11
  end
  object Label13: TLabel
    Left = 24
    Top = 209
    Width = 48
    Height = 12
    Caption = '邮政编码'
    FocusControl = DBEdit12
  end
  object Label14: TLabel
    Left = 150
    Top = 209
    Width = 24
    Height = 12
    Caption = '地址'
    FocusControl = DBEdit13
  end
  object Label8: TLabel
    Left = 24
    Top = 233
    Width = 48
    Height = 12
    Caption = '发放金额'
    FocusControl = DBEdit14
  end
  object Label16: TLabel
    Left = 150
    Top = 233
    Width = 48
    Height = 12
    Caption = '发放周期'
  end
  object Label17: TLabel
    Left = 290
    Top = 232
    Width = 72
    Height = 12
    Caption = '开始发放月份'
  end
  object Bevel1: TBevel
    Left = 11
    Top = 97
    Width = 479
    Height = 2
  end
  object Bevel2: TBevel
    Left = 9
    Top = 189
    Width = 479
    Height = 2
  end
  object Label18: TLabel
    Left = 16
    Top = 8
    Width = 108
    Height = 12
    Caption = '当前有参与发放人员'
  end
  object lblCount: TLabel
    Left = 136
    Top = 8
    Width = 6
    Height = 12
  end
  object DBEdit1: TDBEdit
    Left = 79
    Top = 44
    Width = 64
    Height = 20
    DataField = 'XM'
    DataSource = souRYXX
    TabOrder = 0
  end
  object DBEdit2: TDBEdit
    Left = 216
    Top = 44
    Width = 124
    Height = 20
    DataField = 'SFZH'
    DataSource = souRYXX
    TabOrder = 1
  end
  object DBEdit3: TDBEdit
    Left = 402
    Top = 44
    Width = 65
    Height = 20
    DataField = 'HDJE'
    DataSource = souRYXX
    TabOrder = 2
  end
  object DBEdit7: TDBEdit
    Left = 79
    Top = 111
    Width = 113
    Height = 20
    DataField = 'ZH'
    DataSource = souRYXX
    TabOrder = 6
  end
  object DBEdit8: TDBEdit
    Left = 253
    Top = 111
    Width = 217
    Height = 20
    DataField = 'KHH'
    DataSource = souRYXX
    TabOrder = 7
  end
  object DBEdit10: TDBEdit
    Left = 253
    Top = 135
    Width = 64
    Height = 20
    DataField = 'SKR'
    DataSource = souRYXX
    TabOrder = 9
  end
  object DBEdit11: TDBEdit
    Left = 79
    Top = 159
    Width = 392
    Height = 20
    DataField = 'HRDD'
    DataSource = souRYXX
    TabOrder = 10
  end
  object DBEdit12: TDBEdit
    Left = 79
    Top = 205
    Width = 64
    Height = 20
    DataField = 'YZBM'
    DataSource = souRYXX
    TabOrder = 11
  end
  object DBEdit13: TDBEdit
    Left = 207
    Top = 205
    Width = 264
    Height = 20
    DataField = 'DZ'
    DataSource = souRYXX
    TabOrder = 12
  end
  object DBEdit14: TDBEdit
    Left = 79
    Top = 229
    Width = 64
    Height = 20
    DataField = 'FFJE'
    DataSource = souRYXX
    TabOrder = 13
  end
  object cmbFFFS: TwwDBLookupCombo
    Left = 79
    Top = 70
    Width = 65
    Height = 20
    DropDownAlignment = taLeftJustify
    Selected.Strings = (
      'DMMC'#9'20'#9'发放形式'#9'F'
      'DM'#9'10'#9'代码'#9'F')
    DataField = 'FFFS'
    DataSource = souRYXX
    LookupTable = qryFFFS
    LookupField = 'DM'
    Options = [loColLines, loRowLines, loTitles]
    TabOrder = 3
    AutoDropDown = False
    ShowButton = True
    AllowClearKey = False
  end
  object cmbDJQK: TwwDBLookupCombo
    Left = 402
    Top = 70
    Width = 65
    Height = 20
    DropDownAlignment = taLeftJustify
    Selected.Strings = (
      'DMMC'#9'20'#9'定居情况'#9'F'
      'DM'#9'10'#9'代码'#9'F')
    DataField = 'DJQK'
    DataSource = souRYXX
    LookupTable = qryDJQK
    LookupField = 'DM'
    Options = [loColLines, loRowLines, loTitles]
    TabOrder = 5
    AutoDropDown = False
    ShowButton = True
    AllowClearKey = False
  end
  object cmbHB: TwwDBLookupCombo
    Left = 79
    Top = 134
    Width = 113
    Height = 20
    DropDownAlignment = taLeftJustify
    Selected.Strings = (
      'DMMC'#9'20'#9'行别'#9'F'
      'DM'#9'10'#9'代码'#9'F')
    DataField = 'HB'
    DataSource = souRYXX
    LookupTable = qryHB
    LookupField = 'DM'
    Options = [loColLines, loRowLines, loTitles]
    TabOrder = 8
    AutoDropDown = False
    ShowButton = True
    AllowClearKey = False
  end
  object cmbFFZQ: TwwDBLookupCombo
    Left = 207
    Top = 229
    Width = 65
    Height = 20
    DropDownAlignment = taLeftJustify
    Selected.Strings = (
      'DMMC'#9'20'#9'发放周期'#9'F'
      'DM'#9'10'#9'代码'#9'F')
    DataField = 'FFZQ'
    DataSource = souRYXX
    LookupTable = qryFFZQ
    LookupField = 'DM'
    Options = [loColLines, loRowLines, loTitles]
    TabOrder = 14
    AutoDropDown = False
    ShowButton = True
    AllowClearKey = False
  end
  object cmbFFFS_Edit: TwwDBLookupCombo
    Left = 343
    Top = 262
    Width = 65
    Height = 20
    DropDownAlignment = taLeftJustify
    Selected.Strings = (
      'DM'#9'10'#9'代码'#9'F'
      'DMMC'#9'20'#9'发放形式'#9'F')
    DataField = 'FFFS'
    DataSource = souRYXX
    LookupTable = qryFFFS
    LookupField = 'DM'
    Options = [loColLines, loRowLines, loTitles]
    TabOrder = 16
    AutoDropDown = False
    ShowButton = True
    AllowClearKey = False
  end
  object cmbDJQK_Edit: TwwDBLookupCombo
    Left = 370
    Top = 284
    Width = 65
    Height = 20
    DropDownAlignment = taLeftJustify
    Selected.Strings = (
      'DM'#9'10'#9'代码'#9'F'
      'DMMC'#9'20'#9'定居情况'#9'F')
    DataField = 'DJQK'
    DataSource = souRYXX
    LookupTable = qryDJQK
    LookupField = 'DM'
    Options = [loColLines, loRowLines, loTitles]
    TabOrder = 17
    AutoDropDown = False
    ShowButton = True
    AllowClearKey = False
  end
  object cmbFFZQ_Edit: TwwDBLookupCombo
    Left = 415
    Top = 285
    Width = 65
    Height = 20
    DropDownAlignment = taLeftJustify
    Selected.Strings = (
      'DM'#9'10'#9'代码'#9'F'
      'DMMC'#9'20'#9'发放周期'#9'F')
    DataField = 'FFZQ'
    DataSource = souRYXX
    LookupTable = qryFFZQ
    LookupField = 'DM'
    Options = [loColLines, loRowLines, loTitles]
    TabOrder = 18
    AutoDropDown = False
    ShowButton = True
    AllowClearKey = False
  end
  object wwDBDateTimePicker1: TwwDBDateTimePicker
    Left = 367
    Top = 229
    Width = 106
    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 = 'KSFFYF'
    DataSource = souRYXX
    Epoch = 1950
    ShowButton = True
    TabOrder = 15
  end
  object cmbHB_Edit: TwwDBLookupCombo
    Left = 431
    Top = 262
    Width = 66
    Height = 20
    DropDownAlignment = taLeftJustify
    Selected.Strings = (
      'DM'#9'10'#9'代码'#9'F'
      'DMMC'#9'20'#9'行别'#9'F')
    DataField = 'HB'
    DataSource = souRYXX
    LookupTable = qryHB
    LookupField = 'DM'
    Options = [loColLines, loRowLines, loTitles]
    TabOrder = 19
    AutoDropDown = False
    ShowButton = True
    AllowClearKey = False
  end
  object cmbFFJGID: TwwDBLookupCombo
    Left = 215
    Top = 70
    Width = 124
    Height = 20
    DropDownAlignment = taLeftJustify
    Selected.Strings = (
      'JGMC'#9'30'#9'发放机构名称'#9'F'
      'JGDM'#9'10'#9'机构代码'#9'F')
    DataField = 'FFJGID'
    DataSource = souRYXX
    LookupTable = qryFFJG
    LookupField = 'FFJGID'
    Options = [loColLines, loRowLines, loTitles]
    TabOrder = 4
    AutoDropDown = False
    ShowButton = True
    AllowClearKey = False
  end
  object cmbFFJGID_Edit: TwwDBLookupCombo
    Left = 311
    Top = 254
    Width = 124
    Height = 20
    DropDownAlignment = taLeftJustify
    Selected.Strings = (
      'JGDM'#9'10'#9'机构代码'#9'F'
      'JGMC'#9'30'#9'发放机构名称'#9'F')
    DataField = 'FFJGID'
    DataSource = souRYXX
    LookupTable = qryFFJG
    LookupField = 'FFJGID'
    Options = [loColLines, loRowLines, loTitles]
    TabOrder = 20
    AutoDropDown = False
    ShowButton = True
    AllowClearKey = False
  end
  object souRYXX: TDataSource
    OnDataChange = souRYXXDataChange
    Left = 457
    Top = 136
  end
  object souFFFS: TDataSource
    DataSet = qryFFFS
    Left = 10
    Top = 278
  end
  object qryFFFS: TQuery
    DatabaseName = 'MainDB'
    SQL.Strings = (
      'SELECT DM,DMMC'
      'FROM tDMB'
      'WHERE zdbz='#39'FFXS'#39
      'ORDER BY DM')
    Left = 42
    Top = 278
  end
  object souDJQK: TDataSource
    DataSet = qryDJQK
    Left = 96
    Top = 273
  end
  object qryDJQK: TQuery
    DatabaseName = 'MainDB'
    SQL.Strings = (
      'SELECT DM,DMMC'
      'FROM tDMB'
      'WHERE zdbz='#39'DJQK'#39
      'ORDER BY DM')
    Left = 128
    Top = 273
  end
  object souFFZQ: TDataSource
    DataSet = qryFFZQ
    Left = 168
    Top = 273
  end
  object qryFFZQ: TQuery
    DatabaseName = 'MainDB'
    SQL.Strings = (
      'SELECT DM,DMMC'
      'FROM tDMB'
      'WHERE zdbz='#39'FFZQ'#39
      'ORDER BY DM')
    Left = 200
    Top = 273
  end
  object souFFJG: TDataSource
    DataSet = qryFFJG
    Left = 246
    Top = 257
  end
  object qryFFJG: TQuery
    DatabaseName = 'MainDB'
    SQL.Strings = (
      'SELECT *'
      'from tFF_WTFFJG')
    Left = 278
    Top = 259
  end
  object souHB: TDataSource
    Left = 376
    Top = 136
  end
  object qryHB: TQuery
    DatabaseName = 'MainDB'
    SQL.Strings = (
      'select * from tDMB where zdbz='#39'HB'#39
      'order by dm ')
    Left = 416
    Top = 136
  end
end