uffdy.~dfm

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

              TitleAlignment = taLeftJustify
              TitleFont.Charset = GB2312_CHARSET
              TitleFont.Color = clWindowText
              TitleFont.Height = -12
              TitleFont.Name = '宋体'
              TitleFont.Style = []
              TitleLines = 1
              TitleButtons = False
              IndicatorColor = icBlack
            end
            object Panel2: TPanel
              Left = 2
              Top = 2
              Width = 266
              Height = 29
              Align = alTop
              TabOrder = 2
              object Label4: TLabel
                Left = 10
                Top = 9
                Width = 48
                Height = 12
                Caption = '应急系统'
              end
              object btnYJDW_Select: TSpeedButton
                Left = 185
                Top = 4
                Width = 23
                Height = 22
                Hint = '录入应急系统单位代码,选择应急系统中的对应单位'
                Glyph.Data = {
                  DE000000424DDE0000000000000076000000280000000D0000000D0000000100
                  0400000000006800000000000000000000001000000000000000000000000000
                  80000080000000808000800000008000800080800000C0C0C000808080000000
                  FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
                  F000FFFF77FFFFFFF000FFFFFF7FFFFFF000FFF222F7FFFFF000FF22222F7FFF
                  F000F222222F7FFFF0002222F222F7FFF000F22FFF22F7FFF000FFFFFF222F7F
                  F000FFFFFFF22F7FF000FFFFFFFF22F7F000FFFFFFFF22F7F000FFFFFFFFF22F
                  F000}
                OnClick = btnYJDW_SelectClick
              end
              object edtYJDW: TEdit
                Left = 63
                Top = 4
                Width = 121
                Height = 20
                TabOrder = 0
              end
            end
          end
          object Panel7: TPanel
            Left = 321
            Top = 0
            Width = 33
            Height = 378
            Align = alLeft
            BevelOuter = bvNone
            TabOrder = 2
            object btnLink: TSpeedButton
              Left = 2
              Top = 96
              Width = 30
              Height = 28
              Glyph.Data = {
                76010000424D7601000000000000760000002800000020000000100000000100
                04000000000000010000120B0000120B00001000000000000000000000000000
                800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
                33333333333333333333333333333333333333333333333333FF333333333333
                3000333333FFFFF3F77733333000003000B033333777773777F733330BFBFB00
                E00033337FFF3377F7773333000FBFB0E000333377733337F7773330FBFBFBF0
                E00033F7FFFF3337F7773000000FBFB0E000377777733337F7770BFBFBFBFBF0
                E00073FFFFFFFF37F777300000000FB0E000377777777337F7773333330BFB00
                000033333373FF77777733333330003333333333333777333333333333333333
                3333333333333333333333333333333333333333333333333333333333333333
                3333333333333333333333333333333333333333333333333333}
              NumGlyphs = 2
              OnClick = btnLinkClick
            end
            object btnUnlink: TSpeedButton
              Left = 2
              Top = 128
              Width = 30
              Height = 28
              Glyph.Data = {
                76010000424D7601000000000000760000002800000020000000100000000100
                04000000000000010000120B0000120B00001000000000000000000000000000
                800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
                3333333333333333333333333333333333333FFF333333333333000333333333
                3333777FFF3FFFFF33330B000300000333337F777F777773F333000E00BFBFB0
                3333777F773333F7F333000E0BFBF0003333777F7F3337773F33000E0FBFBFBF
                0333777F7F3333FF7FFF000E0BFBF0000003777F7F3337777773000E0FBFBFBF
                BFB0777F7F33FFFFFFF7000E0BF000000003777F7FF777777773000000BFB033
                33337777773FF733333333333300033333333333337773333333333333333333
                3333333333333333333333333333333333333333333333333333333333333333
                3333333333333333333333333333333333333333333333333333}
              NumGlyphs = 2
            end
          end
        end
      end
    end
  end
  inherited souDetail: TwwDataSource
    OnDataChange = souDetailDataChange
  end
  inherited qryDetail: TwwQuery
    DataSource = nil
    SQL.Strings = (
      'select * from tff_ryxx')
  end
  inherited sqlDetail: TUpdateSQL
    ModifySQL.Strings = (
      'update tff_ryxx'
      'set'
      '  RYID = :RYID,'
      '  HDJE = :HDJE'
      'where'
      '  RYID_FF = :OLD_RYID_FF and'
      '  DWID_FF = :OLD_DWID_FF and'
      '  SSDWID = :OLD_SSDWID and'
      '  RYID = :OLD_RYID and'
      '  XM = :OLD_XM and'
      '  SFZH = :OLD_SFZH and'
      '  HDJE = :OLD_HDJE and'
      '  FFFS = :OLD_FFFS and'
      '  FFJGID = :OLD_FFJGID and'
      '  DJQK = :OLD_DJQK and'
      '  ZH = :OLD_ZH and'
      '  KHH = :OLD_KHH and'
      '  HB = :OLD_HB and'
      '  SKR = :OLD_SKR and'
      '  HRDD = :OLD_HRDD and'
      '  YZBM = :OLD_YZBM and'
      '  DZ = :OLD_DZ and'
      '  FFJE = :OLD_FFJE and'
      '  LJFFJE = :OLD_LJFFJE and'
      '  FFZQ = :OLD_FFZQ and'
      '  RYZT = :OLD_RYZT and'
      '  KSFFYF = :OLD_KSFFYF and'
      '  CSRQ = :OLD_CSRQ and'
      '  TXSJ = :OLD_TXSJ and'
      '  TXLB = :OLD_TXLB and'
      '  LXDH = :OLD_LXDH and'
      '  XM_QS = :OLD_XM_QS and'
      '  SFZH_QS = :OLD_SFZH_QS and'
      '  GX_QS = :OLD_GX_QS and'
      '  LXDH_QS = :OLD_LXDH_QS and'
      '  LXDZ_QS = :OLD_LXDZ_QS and'
      '  YZBM_QS = :OLD_YZBM_QS and'
      '  YYFWSJ = :OLD_YYFWSJ and'
      '  SKFWRQ = :OLD_SKFWRQ and'
      '  SKFWSJ = :OLD_SKFWSJ and'
      '  BZ = :OLD_BZ and'
      '  JBR = :OLD_JBR and'
      '  JBRQ = :OLD_JBRQ and'
      '  SHR = :OLD_SHR and'
      '  SHRQ = :OLD_SHRQ and'
      '  BZJE = :OLD_BZJE and'
      '  SWSJ = :OLD_SWSJ')
    InsertSQL.Strings = (
      'insert into tff_ryxx'
      '  (RYID, HDJE)'
      'values'
      '  (:RYID, :HDJE)')
    DeleteSQL.Strings = (
      'delete from tff_ryxx'
      'where'
      '  RYID_FF = :OLD_RYID_FF and'
      '  DWID_FF = :OLD_DWID_FF and'
      '  SSDWID = :OLD_SSDWID and'
      '  RYID = :OLD_RYID and'
      '  XM = :OLD_XM and'
      '  SFZH = :OLD_SFZH and'
      '  HDJE = :OLD_HDJE and'
      '  FFFS = :OLD_FFFS and'
      '  FFJGID = :OLD_FFJGID and'
      '  DJQK = :OLD_DJQK and'
      '  ZH = :OLD_ZH and'
      '  KHH = :OLD_KHH and'
      '  HB = :OLD_HB and'
      '  SKR = :OLD_SKR and'
      '  HRDD = :OLD_HRDD and'
      '  YZBM = :OLD_YZBM and'
      '  DZ = :OLD_DZ and'
      '  FFJE = :OLD_FFJE and'
      '  LJFFJE = :OLD_LJFFJE and'
      '  FFZQ = :OLD_FFZQ and'
      '  RYZT = :OLD_RYZT and'
      '  KSFFYF = :OLD_KSFFYF and'
      '  CSRQ = :OLD_CSRQ and'
      '  TXSJ = :OLD_TXSJ and'
      '  TXLB = :OLD_TXLB and'
      '  LXDH = :OLD_LXDH and'
      '  XM_QS = :OLD_XM_QS and'
      '  SFZH_QS = :OLD_SFZH_QS and'
      '  GX_QS = :OLD_GX_QS and'
      '  LXDH_QS = :OLD_LXDH_QS and'
      '  LXDZ_QS = :OLD_LXDZ_QS and'
      '  YZBM_QS = :OLD_YZBM_QS and'
      '  YYFWSJ = :OLD_YYFWSJ and'
      '  SKFWRQ = :OLD_SKFWRQ and'
      '  SKFWSJ = :OLD_SKFWSJ and'
      '  BZ = :OLD_BZ and'
      '  JBR = :OLD_JBR and'
      '  JBRQ = :OLD_JBRQ and'
      '  SHR = :OLD_SHR and'
      '  SHRQ = :OLD_SHRQ and'
      '  BZJE = :OLD_BZJE and'
      '  SWSJ = :OLD_SWSJ')
  end
  object souRight: TwwDataSource
    DataSet = qryRight
    Left = 284
    Top = 83
  end
  object qryRight: TwwQuery
    DatabaseName = 'MainDB'
    SQL.Strings = (
      'select * from tryjbxx')
    ValidateWithMask = True
    Left = 324
    Top = 75
  end
end