⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 sy_ndjhqlsb.dfm

📁 省级集邮品管理ERP
💻 DFM
📖 第 1 页 / 共 4 页
字号:
      FF7F0000FF7FFF7FFF7FFF7FFF7FFF7F00000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000FF030000FF7FE07FFF7FE07FFF7F
      E07FFF7FE07FFF7F0000FF7FFF7FFF7F00000000FF7F00000000FF7F00000000
      F75E00001F001F001F00007C1F001F0000000000000000000000000000000000
      1F000000000000000000000000000000000000000000000000001F0000000000
      000000000000000000000000000000000000FF030000E07FFF7F000000000000
      0000000000000000FF7FFF7FFF7FFF7F00000000FF7FFF7FFF7FFF7FFF7FFF7F
      FF7FFF7F00000000007C007C007C000000000000000000000000000000000000
      1F001F0000000000000000000000000000000000000000001F001F0000000000
      000000000000000000000000000000000000000000000000E07FFF7FE07F0000
      0000E07F0000FF7FFF7F00000000FF7F00000000FF7F0000000000000000FF7F
      0000FF7F0000007C007C007C007C007C000000001F001F001F001F001F001F00
      1F001F001F001F000000007C007C0000000000001F001F001F001F001F001F00
      1F001F001F001F000000007C007C000000000000000000000000000000000000
      E07F0000FF7FFF7FFF7FFF7FFF7FFF7F00000000FF7FFF7FFF7FFF7FFF7FFF7F
      FF7FFF7F007C007C007C007C007C007C007C00001F001F001F001F001F001F00
      1F001F001F001F000000007C007C0000000000001F001F001F001F001F001F00
      1F001F001F001F000000007C007C00000000000000000000000000000000E07F
      0000FF7FFF7FFF7FFF7F00000000000000000000FF7F00000000FF7F00000000
      0000000000000000007C007C007C000000000000000000000000000000000000
      1F001F0000000000000000000000000000000000000000001F001F0000000000
      00000000000000000000000000000000000000000000000000000000E07F0000
      FF7FFF7F00000000FF7F0000FF7FFF7F00000000FF7FFF7FFF7FFF7F0000FF7F
      FF7F000000000000007C007C007C000000000000000000000000000000000000
      1F000000000000000000000000000000000000000000000000001F0000000000
      0000000000000000000000000000000000000000000000000000E07F00000000
      FF7FFF7FFF7FFF7FFF7F0000FF7F000000000000FF7F0000F75EFF7F0000FF7F
      000000000000EF3D007C007C007C000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000007C000000000000
      FF7FFF7FFF7FFF7FFF7F00000000000000000000FF7FFF7FFF7FFF7F00000000
      0000007C007C007C007C007C0000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000424D3E000000000000003E000000
      2800000040000000600000000100010000000000000300000000000000000000
      000000000000000000000000FFFFFF00FFFF3F01CC594400FFFF00007C286681
      07C160810000000007C1F7BFF6B3F7BF07C14CC1E0F63F010101608178286681
      00014300E0F63F0102013F01D8C344000201FFFF400000008003F7BF4D040000
      C1074300D8C34400C1070000A0726181E38F440000000000E38F430000004300
      E38FFFFF40000000FFFFF7BF47040000FFFFFFFFF800FFFFFFFFF83FF800E01F
      F183E00F2000C00FFBC7C00700008007F9C7800300000003F807800300000001
      FD8F000100008000FC8F00010000C000FC8F00010000E000FE1F00010000F000
      FE1F0001E000F801FE1F8003F800FC01FF3F8003F800FE01FF7FC007F801FF1F
      FFFFE00FF803FFFFFFFFF83FF807FFFFFFFFFFFF80058069FFFF000000000000
      C0070000F00FE007E7E70000F00FE007F3F70000F00FE007F9F70000F00FE007
      FCFF0000F00FE007FE7F0000F00FE007FF3F0000F00FE007FE7F0000F00FE007
      FCFF0000F00FE007F9F70000F00FE007F3F70000FFFFFFFFE7E70000F81FF81F
      C007FFFFF81FF81FFFFFFFFFF81FF81FFFFF8001C0038003FC000000C0038003
      FC000000C0038003FC000000C0038003FC000000C0038003EC000000C0038003
      E4000000C0038003E0000000C00380030000E007C00380030001E007C0038003
      0003E007C00380030007E007C0038003000FE00FC0038003E3FFE01FC0038007
      E7FFE03FC003800FEFFFE07FC003801FFFFFFFFFC007FFDFF83FFFC8C007FFCF
      E00FFFB8C007FFC7CC47CFBFC00700038463CFBCC0070001A073FFBCC0070000
      31F9DFBFC007000138F9CF7CC00700033C79E6FCC00700073C39F37FC007000F
      3C1933BCC007001F9C0B33BCC007007F8C4387BFC00700FFC467FFB8C00701FF
      E00FFFC8C00703FFF83FFFFFC007FFFFFFFFFFFFFC00FF00E7F8FFF8FC00FF00
      E7F8FFF82000FF0081FF81FF0000FF0081FC81FC00000000E7FCFFFC00000000
      E7FFFFFF00000000FFFCFFFC00000000FEFCF7FC00000023FE7FE7FF00000001
      80138013E000000080138013F8000023FE7FE7FFF0000063FEF8F7F8E00100C3
      FFF8FFF8C4030107FFFFFFFFEC0703FF00000000000000000000000000000000
      000000000000}
  end
  object ActionList1: TActionList
    Images = ILi_Edit
    Left = 432
    Top = 20
    object Act_mod: TAction
      Caption = '修改'
      ImageIndex = 2
      OnExecute = Act_modExecute
    end
    object Act_sav: TAction
      Caption = '保存'
      ImageIndex = 3
      OnExecute = Act_savExecute
    end
    object Act_can: TAction
      Caption = '取消'
      ImageIndex = 4
      OnExecute = Act_canExecute
    end
    object Act_rtn: TAction
      Caption = '返回'
      ImageIndex = 15
      OnExecute = Act_rtnExecute
    end
    object Act_snd: TAction
      Caption = '发送(&T)'
      ImageIndex = 7
      OnExecute = Act_sndExecute
    end
    object Act_re: TAction
      Caption = '重新生成'
      ImageIndex = 13
      OnExecute = Act_reExecute
    end
  end
  object Qry_super: TQuery
    DatabaseName = 'YZPP'
    Left = 260
    Top = 16
  end
  object Qry_xq: TQuery
    CachedUpdates = True
    OnUpdateError = Qry_xqUpdateError
    DatabaseName = 'YZPP'
    RequestLive = True
    SQL.Strings = (
      'select '
      '  a.JHH,a.SQDWDM,a.ND,a.ZT,a.PPMC,a.XQZTS,a.YDTS,'
      '  a.LSTS,a.NCTS,a.KFYPTS,a.ZBR,a.PZR,a.ZDRQ,a.BZ,b.TMC '
      'from '
      '  TY_JJNXQB a, TF_PFXJHTAO b'
      'where '
      '  a.JHH=b.JHH and'
      '  a.ZT='#39'2'#39' and'
      '  a.ND=:ND'
      'order by a.JHH')
    UpdateObject = UpdateSQL2
    Left = 264
    Top = 137
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'ND'
        ParamType = ptUnknown
      end>
    object Qry_xqJHH: TStringField
      FieldName = 'JHH'
      Origin = 'YZPP.TY_JJNXQB.JHH'
      Size = 8
    end
    object Qry_xqSQDWDM: TStringField
      FieldName = 'SQDWDM'
      Origin = 'YZPP.TY_JJNXQB.SQDWDM'
      Size = 8
    end
    object Qry_xqND: TStringField
      FieldName = 'ND'
      Origin = 'YZPP.TY_JJNXQB.ND'
      Size = 4
    end
    object Qry_xqZT: TStringField
      FieldName = 'ZT'
      Origin = 'YZPP.TY_JJNXQB.ZT'
      Size = 1
    end
    object Qry_xqXQZTS: TFloatField
      FieldName = 'XQZTS'
      Origin = 'YZPP.TY_JJNXQB.XQZTS'
      DisplayFormat = '#,##'
    end
    object Qry_xqPPMC: TStringField
      FieldName = 'PPMC'
      Origin = 'YZPP.TY_JJNXQB.PPMC'
      Visible = False
      Size = 60
    end
    object Qry_xqYDTS: TFloatField
      FieldName = 'YDTS'
      Origin = 'YZPP.TY_JJNXQB.YDTS'
      OnChange = Qry_xqYDTSChange
      DisplayFormat = '#,##'
    end
    object Qry_xqLSTS: TFloatField
      FieldName = 'LSTS'
      Origin = 'YZPP.TY_JJNXQB.LSTS'
      OnChange = Qry_xqYDTSChange
      DisplayFormat = '#,##'
    end
    object Qry_xqKFYPTS: TFloatField
      FieldName = 'KFYPTS'
      Origin = 'YZPP.TY_JJNXQB.KFYPTS'
      OnChange = Qry_xqYDTSChange
      DisplayFormat = '#,##'
    end
    object Qry_xqZBR: TStringField
      FieldName = 'ZBR'
      Origin = 'YZPP.TY_JJNXQB.ZBR'
      Size = 12
    end
    object Qry_xqPZR: TStringField
      FieldName = 'PZR'
      Origin = 'YZPP.TY_JJNXQB.PZR'
      Size = 12
    end
    object Qry_xqZDRQ: TDateTimeField
      FieldName = 'ZDRQ'
      Origin = 'YZPP.TY_JJNXQB.ZDRQ'
    end
    object Qry_xqBZ: TStringField
      FieldName = 'BZ'
      Origin = 'YZPP.TY_JJNXQB.BZ'
      Size = 100
    end
    object Qry_xqNCTS: TFloatField
      FieldName = 'NCTS'
      Origin = 'YZPP.TY_JJNXQB.NCTS'
      OnChange = Qry_xqYDTSChange
      DisplayFormat = '#,##'
    end
    object Qry_xqTMC: TStringField
      FieldName = 'TMC'
      Origin = 'YZPP.TF_PFXJHTAO.TMC'
      Size = 60
    end
  end
  object DS_xq: TDataSource
    DataSet = Qry_xq
    Left = 296
    Top = 137
  end
  object UpdateSQL2: TUpdateSQL
    ModifySQL.Strings = (
      'update TY_JJNXQB'
      'set'
      '  JHH = :JHH,'
      '  SQDWDM = :SQDWDM,'
      '  ND = :ND,'
      '  ZT = :ZT,'
      '  PPMC = :PPMC,'
      '  XQZTS = :XQZTS,'
      '  YDTS = :YDTS,'
      '  LSTS = :LSTS,'
      '  NCTS = :NCTS,'
      '  KFYPTS = :KFYPTS,'
      '  ZBR = :ZBR,'
      '  PZR = :PZR,'
      '  ZDRQ = :ZDRQ,'
      '  BZ = :BZ'
      'where'
      '  JHH = :OLD_JHH and'
      '  SQDWDM = :OLD_SQDWDM and'
      '  ND = :OLD_ND and'
      '  ZT = :OLD_ZT')
    InsertSQL.Strings = (
      'insert into TY_JJNXQB'
      
        '  (JHH, SQDWDM, ND, ZT, PPMC, XQZTS, YDTS, LSTS, NCTS, KFYPTS, Z' +
        'BR, '
      'PZR, '
      '   ZDRQ, BZ)'
      'values'
      
        '  (:JHH, :SQDWDM, :ND, :ZT, :PPMC, :XQZTS, :YDTS, :LSTS, :NCTS, ' +
        ':KFYPTS, '
      '   :ZBR, :PZR, :ZDRQ, :BZ)')
    DeleteSQL.Strings = (
      'delete from TY_JJNXQB'
      'where'
      '  JHH = :OLD_JHH and'
      '  SQDWDM = :OLD_SQDWDM and'
      '  ND = :OLD_ND and'
      '  ZT = :OLD_ZT')
    Left = 328
    Top = 137
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -