ord500_01.dfm.svn-base

一个用Delphi开发的ERP软件

    object adsOrd500FUnitRate: TFloatField
      DisplayLabel = #21333#20301#36716#25442
      DisplayWidth = 10
      FieldName = 'FUnitRate'
    end
    object adsOrd500FQty: TFloatField
      DisplayLabel = #38144#21806#25968#37327
      DisplayWidth = 10
      FieldName = 'FQty'
      Visible = False
    end
    object adsOrd500FDisRate: TFloatField
      DisplayLabel = #25240#25187#27604#29575
      DisplayWidth = 10
      FieldName = 'FDisRate'
      Visible = False
    end
    object adsOrd500FDisAmt: TFloatField
      DisplayLabel = #25240#25187#37329#39069
      DisplayWidth = 10
      FieldName = 'FDisAmt'
      Visible = False
    end
    object adsOrd500FTax: TFloatField
      DisplayLabel = #38144#21806#31246#29575
      DisplayWidth = 10
      FieldName = 'FTax'
      Visible = False
    end
    object adsOrd500FTaxAmt: TFloatField
      DisplayLabel = #38144#21806#31246#39069
      DisplayWidth = 10
      FieldName = 'FTaxAmt'
      Visible = False
    end
    object adsOrd500FNetAmt: TFloatField
      DisplayLabel = #25240#21518#24635#39069
      DisplayWidth = 10
      FieldName = 'FNetAmt'
      Visible = False
    end
    object adsOrd500FAcrAmt: TFloatField
      DisplayLabel = #24212#25910#37329#39069
      FieldName = 'FAcrAmt'
      Visible = False
    end
    object adsOrd500FDate: TDateTimeField
      DisplayLabel = #38656#27714#26085#26399
      DisplayWidth = 18
      FieldName = 'FDate'
      Visible = False
    end
    object adsOrd500FFactDate: TDateTimeField
      DisplayLabel = #23454#38469#20132#36135
      DisplayWidth = 18
      FieldName = 'FFactDate'
      Visible = False
    end
    object adsOrd500FReceQty: TFloatField
      DisplayLabel = #21457#36135#25968#37327
      DisplayWidth = 10
      FieldName = 'FReceQty'
      Visible = False
    end
    object adsOrd500FPlace: TStringField
      DisplayLabel = #20132#36135#22320#22336
      DisplayWidth = 20
      FieldName = 'FPlace'
      Visible = False
    end
    object adsOrd500FNo: TIntegerField
      DisplayWidth = 10
      FieldName = 'FNo'
      Visible = False
    end
    object adsOrd500FItemNo: TIntegerField
      DisplayWidth = 10
      FieldName = 'FItemNo'
      Visible = False
    end
    object adsOrd500FUnitNo: TIntegerField
      DisplayWidth = 10
      FieldName = 'FUnitNo'
      Visible = False
    end
    object adsOrd500FFromID: TStringField
      FieldName = 'FFromID'
      Visible = False
      Size = 30
    end
    object adsOrd500FLineNo: TIntegerField
      FieldName = 'FLineNo'
      Visible = False
    end
    object adsOrd500FReturn: TFloatField
      FieldName = 'FReturn'
      Visible = False
    end
    object adsOrd500FIsBySum: TBooleanField
      FieldName = 'FIsBySum'
      Visible = False
    end
  end
  object adsOrd500B: TADODataSet
    Connection = SYSDM.ADOC
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    FieldDefs = <
      item
        Name = 'FNo'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FItemNo'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FItemID'
        DataType = ftString
        Size = 30
      end
      item
        Name = 'FItemName'
        DataType = ftString
        Size = 60
      end
      item
        Name = 'FItemSpec'
        DataType = ftString
        Size = 60
      end
      item
        Name = 'FUnitNo'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FUnitID'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'FUnitName'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'FUnitRate'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FQty'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FPrice'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FAmount'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FDisRate'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FDisAmt'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FNetAmt'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FTax'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FTaxAmt'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FAcrAmt'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FDate'
        Attributes = [faFixed]
        DataType = ftDateTime
      end
      item
        Name = 'FFactDate'
        Attributes = [faFixed]
        DataType = ftDateTime
      end
      item
        Name = 'FReceQty'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FPlace'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'FFromID'
        DataType = ftString
        Size = 30
      end
      item
        Name = 'FLineNo'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FRemark'
        DataType = ftString
        Size = 100
      end
      item
        Name = 'FReturn'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FIsBySum'
        Attributes = [faFixed]
        DataType = ftBoolean
      end>
    Parameters = <>
    StoreDefs = True
    Left = 40
    Top = 248
    object adsOrd500BFItemID: TStringField
      DisplayLabel = #20135#21697#32534#21495
      DisplayWidth = 22
      FieldName = 'FItemID'
      Size = 30
    end
    object adsOrd500BFItemName: TStringField
      DisplayLabel = #20135#21697#21517#31216
      DisplayWidth = 40
      FieldName = 'FItemName'
      Size = 60
    end
    object adsOrd500BFItemSpec: TStringField
      DisplayLabel = #35268#26684#22411#21495
      DisplayWidth = 40
      FieldName = 'FItemSpec'
      Size = 60
    end
    object adsOrd500BFQty: TFloatField
      DisplayLabel = #38144#21806#25968#37327
      DisplayWidth = 12
      FieldName = 'FQty'
    end
    object adsOrd500BFUnitID: TStringField
      DisplayLabel = #21333#20301#32534#21495
      DisplayWidth = 10
      FieldName = 'FUnitID'
    end
    object adsOrd500BFUnitName: TStringField
      DisplayLabel = #21333#20301#21517#31216
      DisplayWidth = 10
      FieldName = 'FUnitName'
      Size = 50
    end
    object adsOrd500BFUnitRate: TFloatField
      DisplayLabel = #21333#20301#36716#25442
      DisplayWidth = 10
      FieldName = 'FUnitRate'
    end
    object adsOrd500BFPrice: TFloatField
      DisplayLabel = #38144#21806#21333#20215
      DisplayWidth = 12
      FieldName = 'FPrice'
    end
    object adsOrd500BFAmount: TFloatField
      DisplayLabel = #38144#21806#37329#39069
      DisplayWidth = 16
      FieldName = 'FAmount'
    end
    object adsOrd500BFDisRate: TFloatField
      DisplayLabel = #25240#25187#27604#29575
      DisplayWidth = 10
      FieldName = 'FDisRate'
    end
    object adsOrd500BFDisAmt: TFloatField
      DisplayLabel = #25240#25187#37329#39069
      DisplayWidth = 10
      FieldName = 'FDisAmt'
    end
    object adsOrd500BFNetAmt: TFloatField
      DisplayLabel = #25240#21518#24635#39069
      DisplayWidth = 16
      FieldName = 'FNetAmt'
    end
    object adsOrd500BFTax: TFloatField
      DisplayLabel = #38144#21806#31246#29575
      DisplayWidth = 10
      FieldName = 'FTax'
    end
    object adsOrd500BFTaxAmt: TFloatField
      DisplayLabel = #38144#21806#31246#39069
      DisplayWidth = 10
      FieldName = 'FTaxAmt'
    end
    object adsOrd500BFAcrAmt: TFloatField
      DisplayLabel = #24212#25910#37329#39069
      DisplayWidth = 16
      FieldName = 'FAcrAmt'
    end
    object adsOrd500BFDate: TDateTimeField
      DisplayLabel = #38656#27714#26085#26399
      DisplayWidth = 18
      FieldName = 'FDate'
    end
    object adsOrd500BFFactDate: TDateTimeField
      DisplayLabel = #23454#38469#20132#36135
      DisplayWidth = 18
      FieldName = 'FFactDate'
    end
    object adsOrd500BFReceQty: TFloatField
      DisplayLabel = #21457#36135#25968#37327
      DisplayWidth = 10
      FieldName = 'FReceQty'
    end
    object adsOrd500BFPlace: TStringField
      DisplayLabel = #20132#36135#22320#22336
      DisplayWidth = 20
      FieldName = 'FPlace'
    end
    object adsOrd500BFRemark: TStringField
      DisplayLabel = #22791#27880#35828#26126
      DisplayWidth = 35
      FieldName = 'FRemark'
      Size = 100
    end
    object adsOrd500BFNo: TIntegerField
      DisplayWidth = 10
      FieldName = 'FNo'
      Visible = False
    end
    object adsOrd500BFItemNo: TIntegerField
      DisplayWidth = 10
      FieldName = 'FItemNo'
      Visible = False
    end
    object adsOrd500BFUnitNo: TIntegerField
      DisplayWidth = 10
      FieldName = 'FUnitNo'
      Visible = False
    end
    object adsOrd500BFLineNo: TIntegerField
      FieldName = 'FLineNo'
      Visible = False
    end
    object adsOrd500BFFromID: TStringField
      FieldName = 'FFromID'
      Visible = False
      Size = 30
    end
    object adsOrd500BFReturn: TFloatField
      FieldName = 'FReturn'
      Visible = False
    end
    object adsOrd500BFIsBySum: TBooleanField
      FieldName = 'FIsBySum'
      Visible = False
    end
  end
  object qryOrd500B: TADOQuery
    Connection = SYSDM.ADOC
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from ORD500B order by O500B_001,O500B_002')
    Left = 40
    Top = 216
  end
end