data.~dfm

仓库管理信息系统

  end
  object whclbmads: TADODataSet
    CacheSize = 1000
    Connection = adocn
    CursorType = ctStatic
    CommandText = 'select *  from '#26448#26009#34920' order by '#31867#22411'id, '#26448#26009#32534#30721
    Parameters = <>
    Left = 122
    Top = 288
    object whclbmadsDSDesigner: TStringField
      FieldName = #26448#26009#32534#30721
      FixedChar = True
      Size = 14
    end
    object whclbmadsDSDesigner2: TStringField
      FieldName = #26448#26009#21517#31216
      LookupCache = True
      FixedChar = True
      Size = 18
    end
    object whclbmadsDSDesigner3: TStringField
      FieldName = #21333#20301
      LookupCache = True
      FixedChar = True
      Size = 4
    end
    object whclbmadsDSDesigner4: TStringField
      FieldName = #26448#26009#35268#26684
      LookupCache = True
      FixedChar = True
      Size = 8
    end
    object whclbmadsDSDesigner5: TBCDField
      FieldName = #21442#32771#20215#26684
      LookupCache = True
      Precision = 19
    end
    object whclbmadsID: TStringField
      FieldName = #31867#22411'ID'
      LookupCache = True
      FixedChar = True
      Size = 4
    end
    object whclbmadsDSDesigner6: TIntegerField
      FieldName = #21021#22987#25968#37327
    end
    object whclbmadsDSDesigner7: TBCDField
      FieldName = #21021#22987#37329#39069
      Precision = 19
    end
    object whclbmadsDSDesigner8: TIntegerField
      FieldName = #36827#20179#25968
    end
    object whclbmadsDSDesigner9: TIntegerField
      FieldName = #20986#20179#25968
    end
    object whclbmadsDSDesigner10: TIntegerField
      FieldName = #24211#23384#25968
    end
    object whclbmadsField: TStringField
      FieldKind = fkLookup
      FieldName = #31867#22411
      LookupDataSet = whcllxdmads
      LookupKeyFields = #31867#22411'ID'
      LookupResultField = #31867#22411#21517#31216
      KeyFields = #31867#22411'ID'
      LookupCache = True
      Lookup = True
    end
  end
  object whclbmds: TDataSource
    DataSet = whclbmads
    Left = 163
    Top = 289
  end
  object whjcdds: TDataSource
    DataSet = whjcdads
    Left = 404
    Top = 201
  end
  object whjcdads: TADODataSet
    CacheSize = 1000
    Connection = adocn
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    BeforeInsert = whjcdadsBeforeInsert
    BeforeEdit = whjcdadsBeforeEdit
    BeforePost = whjcdadsBeforePost
    AfterPost = whjcdadsAfterPost
    BeforeCancel = whjcdadsBeforeCancel
    AfterCancel = whjcdadsAfterCancel
    BeforeDelete = whjcdadsBeforeDelete
    AfterDelete = whjcdadsAfterDelete
    AfterScroll = whjcdadsAfterScroll
    OnNewRecord = whjcdadsNewRecord
    CommandText = 'select *  from '#26448#26009#36827#20179#21333' where '#26085#26399' between :date1 and :date2'
    Parameters = <
      item
        Name = 'date1'
        DataType = ftDateTime
        NumericScale = 3
        Precision = 23
        Size = 16
        Value = Null
      end
      item
        Name = 'date2'
        DataType = ftDateTime
        NumericScale = 3
        Precision = 23
        Size = 16
        Value = Null
      end>
    Left = 358
    Top = 200
    object whjcdadsDSDesigner: TStringField
      FieldName = #36827#20179#21333#21495
      FixedChar = True
      Size = 12
    end
    object whjcdadsDSDesigner2: TDateTimeField
      FieldName = #26085#26399
    end
    object whjcdadsID2: TStringField
      FieldName = #36827#20179#31867#22411'ID'
      LookupCache = True
      FixedChar = True
      Size = 4
    end
    object whjcdadsID3: TStringField
      FieldName = #20379#24212#21830'ID'
      LookupCache = True
      FixedChar = True
      Size = 6
    end
    object whjcdadsID6: TStringField
      FieldName = #39564#25910#20154'ID'
      LookupCache = True
      FixedChar = True
      Size = 4
    end
    object whjcdadsField: TStringField
      FieldKind = fkLookup
      FieldName = #36827#20179#31867#22411
      LookupDataSet = whjclxdmads
      LookupKeyFields = #36827#20179#31867#22411'ID'
      LookupResultField = #36827#20179#31867#22411
      KeyFields = #36827#20179#31867#22411'ID'
      LookupCache = True
      Lookup = True
    end
    object whjcdadsField2: TStringField
      FieldKind = fkLookup
      FieldName = #20379#24212#21830
      LookupDataSet = whgysdmads
      LookupKeyFields = #20379#24212#21830'ID'
      LookupResultField = #20379#24212#21830#31616#31216
      KeyFields = #20379#24212#21830'ID'
      LookupCache = True
      Lookup = True
    end
    object whjcdadsDSDesigner3: TStringField
      FieldName = #22791#27880
      FixedChar = True
      Size = 40
    end
    object whjcdadsField3: TStringField
      FieldKind = fkLookup
      FieldName = #39564#25910#20154
      LookupDataSet = whysrads
      LookupKeyFields = #39564#25910#20154'ID'
      LookupResultField = #39564#25910#20154
      KeyFields = #39564#25910#20154'ID'
      LookupCache = True
      Lookup = True
    end
  end
  object whjcmxads: TADODataSet
    CacheSize = 1000
    Connection = adocn
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    BeforeInsert = whjcmxadsBeforeInsert
    BeforeEdit = whjcmxadsBeforeEdit
    BeforePost = whjcmxadsBeforePost
    AfterPost = whjcmxadsAfterPost
    BeforeDelete = whjcmxadsBeforeDelete
    AfterDelete = whjcmxadsAfterDelete
    OnNewRecord = whjcmxadsNewRecord
    OnPostError = whjcmxadsPostError
    CommandText = 'select *  from '#26448#26009#36827#20179#26126#32454#34920
    DataSource = whjcdds
    IndexFieldNames = #36827#20179#21333#21495
    MasterFields = #36827#20179#21333#21495
    Parameters = <>
    Left = 356
    Top = 249
    object whjcmxadsID: TAutoIncField
      FieldName = #36827#20179#26126#32454'ID'
      ReadOnly = True
    end
    object whjcmxadsDSDesigner6: TStringField
      FieldName = #36827#20179#21333#21495
      FixedChar = True
      Size = 12
    end
    object whjcmxadsDSDesigner: TStringField
      FieldName = #26448#26009#32534#30721
      FixedChar = True
      Size = 14
    end
    object whjcmxadsStringField: TStringField
      FieldKind = fkLookup
      FieldName = #26448#26009#21517#31216
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #26448#26009#21517#31216
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whjcmxadsField4: TStringField
      FieldKind = fkLookup
      FieldName = #21333#20301
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #21333#20301
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whjcmxadsField2: TStringField
      FieldKind = fkLookup
      FieldName = #31867#22411
      LookupDataSet = whcclxdmads
      LookupKeyFields = #20986#20179#31867#22411'ID'
      LookupResultField = #20986#20179#31867#22411
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whjcmxadsField3: TStringField
      FieldKind = fkLookup
      FieldName = #26448#26009#35268#26684
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #26448#26009#35268#26684
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whjcmxadsID3: TStringField
      FieldKind = fkLookup
      FieldName = #31867#22411'ID'
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #31867#22411'ID'
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whjcmxadsDSDesigner2: TFloatField
      FieldName = #25968#37327
      OnChange = whjcmxadsDSDesigner2Change
    end
    object whjcmxadsDSDesigner3: TBCDField
      FieldName = #21333#20215
      OnChange = whjcmxadsDSDesigner2Change
      Precision = 19
    end
    object whjcmxadsDSDesigner4: TBCDField
      FieldName = #37329#39069
      Precision = 19
    end
    object whjcmxadsDSDesigner5: TStringField
      FieldName = #22791#27880
      FixedChar = True
    end
  end
  object whjcmxds: TDataSource
    DataSet = whjcmxads
    Left = 404
    Top = 249
  end
  object whccdads: TADODataSet
    CacheSize = 1000
    Connection = adocn
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    BeforeInsert = whccdadsBeforeInsert
    BeforeEdit = whccdadsBeforeEdit
    BeforePost = whccdadsBeforePost
    AfterPost = whccdadsAfterPost
    BeforeCancel = whccdadsBeforeCancel
    AfterCancel = whccdadsAfterCancel
    BeforeDelete = whccdadsBeforeDelete
    AfterDelete = whccdadsAfterDelete
    AfterScroll = whccdadsAfterScroll
    OnNewRecord = whccdadsNewRecord
    CommandText = 'select *  from '#26448#26009#39046#26009#21333' where '#26085#26399' between :date1 and :date2'
    Parameters = <
      item
        Name = 'date1'
        Size = -1
        Value = Null
      end
      item
        Name = 'date2'
        Size = -1
        Value = Null
      end>
    Left = 357
    Top = 296
    object whccdadsDSDesigner: TStringField
      FieldName = #20986#20179#21333#21495
      FixedChar = True
      Size = 10
    end
    object whccdadsDSDesigner2: TDateTimeField
      FieldName = #26085#26399
    end
    object whccdadsID2: TStringField
      FieldName = #20986#20179#31867#22411'ID'
      FixedChar = True
      Size = 4
    end
    object whccdadsField2: TStringField
      FieldKind = fkLookup
      FieldName = #20986#20179#31867#22411
      LookupDataSet = whcclxdmads
      LookupKeyFields = #20986#20179#31867#22411'ID'
      LookupResultField = #20986#20179#31867#22411
      KeyFields = #20986#20179#31867#22411'ID'
      LookupCache = True
      Lookup = True
    end
    object whccdadsField: TStringField
      FieldKind = fkLookup
      FieldName = #37096#38376
      LookupDataSet = whbmdmads
      LookupKeyFields = #37096#38376'ID'
      LookupResultField = #37096#38376#21517#31216
      KeyFields = #37096#38376'ID'
      LookupCache = True
      Lookup = True
    end
    object whccdadsID3: TStringField
      FieldName = #37096#38376'ID'
      FixedChar = True
      Size = 4
    end
    object whccdadsDSDesigner3: TStringField
      FieldName = #39046#29992#20154
      FixedChar = True
      Size = 8
    end
    object whccdadsDSDesigner4: TStringField
      FieldName = #22791#27880
      FixedChar = True
      Size = 40
    end
  end
  object whccdds: TDataSource
    DataSet = whccdads
    Left = 405
    Top = 298
  end
  object whccmxads: TADODataSet
    CacheSize = 1000
    Connection = adocn
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    BeforeInsert = whccmxadsBeforeInsert
    BeforeEdit = whccmxadsBeforeEdit
    BeforePost = whccmxadsBeforePost
    AfterPost = whccmxadsAfterPost
    BeforeDelete = whccmxadsBeforeDelete
    AfterDelete = whccmxadsAfterDelete
    OnNewRecord = whccmxadsNewRecord
    OnPostError = whccmxadsPostError
    CommandText = 'select *  from '#26448#26009#39046#26009#26126#32454#34920
    DataSource = whccdds
    IndexFieldNames = #20986#20179#21333#21495
    MasterFields = #20986#20179#21333#21495
    Parameters = <>
    Left = 355
    Top = 343
    object whccmxadsDSDesigner6: TStringField
      FieldName = #20986#20179#21333#21495
      FixedChar = True
      Size = 10
    end
    object whccmxadsID: TAutoIncField
      FieldName = #20986#20179#26126#32454'ID'
      ReadOnly = True
    end
    object whccmxadsDSDesigner: TStringField
      FieldName = #26448#26009#32534#30721
      FixedChar = True
      Size = 14
    end
    object whccmxadsID3: TStringField
      FieldKind = fkLookup
      FieldName = #31867#22411'ID'
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #31867#22411'ID'
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whccmxadsStringField4: TStringField
      FieldKind = fkLookup
      FieldName = #26448#26009#35268#26684
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721
      LookupResultField = #26448#26009#35268#26684
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whccmxadsStringField3: TStringField
      FieldKind = fkLookup
      FieldName = #31867#22411
      LookupDataSet = whcclxdmads
      LookupKeyFields = #20986#20179#31867#22411'ID'
      LookupResultField = #20986#20179#31867#22411
      KeyFields = #26448#26009#32534#30721
      LookupCache = True
      Lookup = True
    end
    object whccmxadsStringField2: TStringField
      FieldKind = fkLookup
      FieldName = #21333#20301
      LookupDataSet = whclbmads
      LookupKeyFields = #26448#26009#32534#30721