wsdm.dfm

企业ERP管理系统

    end
    object adsSalesMasterDiscountRate: TBCDField
      DisplayLabel = #25240#25187#27604#29575
      FieldName = 'DiscountRate'
      Precision = 19
      Size = 5
    end
    object adsSalesMasterTradeType: TStringField
      DisplayLabel = #19994#21153#31867#22411
      FieldName = 'TradeType'
      Size = 16
    end
    object adsSalesMasterEmployeeID: TIntegerField
      FieldName = 'EmployeeID'
      Visible = False
    end
    object adsSalesMasterEmployee: TStringField
      DisplayLabel = #21592#24037
      FieldKind = fkLookup
      FieldName = 'Employee'
      LookupDataSet = adsPerson
      LookupKeyFields = 'fPerID'
      LookupResultField = 'fPerName'
      KeyFields = 'EmployeeID'
      Size = 30
      Lookup = True
    end
    object adsSalesMasterIsInvoice: TBooleanField
      DisplayLabel = #24320#21457#31080
      FieldName = 'IsInvoice'
      Required = True
    end
  end
  object adsSalesDetail: TADODataSet
    Connection = Connection
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    OnNewRecord = adsSalesDetailNewRecord
    CommandText = 'SELECT * FROM SalesDetail WHERE ID = :ID'
    Parameters = <
      item
        Name = 'ID'
        Attributes = [paSigned]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = Null
      end>
    Left = 24
    Top = 104
    object adsSalesDetailID: TIntegerField
      FieldName = 'ID'
      Visible = False
    end
    object adsSalesDetailGoodsID: TIntegerField
      DisplayLabel = #36135#21697
      FieldName = 'GoodsID'
      Required = True
      Visible = False
      OnChange = adsSalesDetailGoodsIDChange
    end
    object adsSalesDetailGoodsName: TStringField
      DisplayLabel = #36135#21697
      DisplayWidth = 30
      FieldKind = fkLookup
      FieldName = 'GoodsName'
      LookupDataSet = adsGoods
      LookupKeyFields = 'fSN'
      LookupResultField = 'fClassName'
      KeyFields = 'GoodsID'
      Size = 50
      Lookup = True
    end
    object adsSalesDetailGoods: TStringField
      DisplayLabel = #36135#21697
      DisplayWidth = 30
      FieldName = 'Goods'
      Visible = False
      Size = 50
    end
    object adsSalesDetailSpecsModel: TStringField
      DisplayLabel = #35268#26684
      FieldName = 'SpecsModel'
    end
    object adsSalesDetailUnits: TStringField
      DisplayLabel = #21333#20301
      FieldName = 'Units'
      Size = 16
    end
    object adsSalesDetailQuantity: TBCDField
      DisplayLabel = #25968#37327
      DisplayWidth = 10
      FieldName = 'Quantity'
      Required = True
      OnChange = adsSalesDetailQuantityChange
      Precision = 19
      Size = 5
    end
    object adsSalesDetailUnitPrice: TBCDField
      DisplayLabel = #21333#20215
      FieldName = 'UnitPrice'
      Required = True
      OnChange = adsSalesDetailQuantityChange
      currency = True
      Precision = 10
    end
    object adsSalesDetailSaleAmount: TBCDField
      DisplayLabel = #37329#39069
      DisplayWidth = 12
      FieldName = 'SaleAmount'
      currency = True
      Precision = 19
    end
    object adsSalesDetailTaxRate: TBCDField
      DisplayLabel = #31246#29575
      DisplayWidth = 8
      FieldName = 'TaxRate'
      Precision = 19
      Size = 5
    end
    object adsSalesDetailTaxAmount: TBCDField
      DisplayLabel = #31246#37329
      DisplayWidth = 12
      FieldName = 'TaxAmount'
      currency = True
      Precision = 19
    end
    object adsSalesDetailDiscountAmount: TBCDField
      DisplayLabel = #25240#25187#37329#39069
      DisplayWidth = 12
      FieldName = 'DiscountAmount'
      currency = True
      Precision = 19
    end
    object adsSalesDetailLastSaleAmount: TBCDField
      DisplayLabel = #38144#21806#24635#35745
      DisplayWidth = 12
      FieldName = 'LastSaleAmount'
      currency = True
      Precision = 19
    end
    object adsSalesDetailStandardQuantity: TBCDField
      DisplayLabel = #26631#20934#25968#37327
      DisplayWidth = 10
      FieldName = 'StandardQuantity'
      Precision = 19
      Size = 5
    end
  end
  object adsClients: TADODataSet
    Connection = Connection
    CommandText = 'BaseClients'
    CommandType = cmdTable
    Parameters = <>
    Left = 216
    Top = 8
    object adsClientsClientID: TIntegerField
      FieldName = 'ClientID'
      Visible = False
    end
    object adsClientsName: TStringField
      FieldName = 'Name'
    end
    object adsClientsFullName: TStringField
      FieldName = 'FullName'
      Size = 50
    end
    object adsClientsTel: TStringField
      FieldName = 'Tel'
    end
    object adsClientsZip: TStringField
      FieldName = 'Zip'
      Size = 8
    end
    object adsClientsAddress: TStringField
      FieldName = 'Address'
      Size = 50
    end
  end
  object adsPerson: TADODataSet
    Connection = Connection
    CommandText = 'jbPerson'
    CommandType = cmdTable
    Parameters = <>
    Left = 160
    Top = 8
    object adsPersonfPerID: TAutoIncField
      FieldName = 'fPerID'
      ReadOnly = True
      Visible = False
    end
    object adsPersonfPerName: TStringField
      DisplayLabel = #21592#24037#22995#21517
      FieldName = 'fPerName'
      Size = 30
    end
  end
  object adsGoods: TADODataSet
    Connection = Connection
    CommandText = 'BaseGoods'
    CommandType = cmdTable
    Parameters = <>
    Left = 160
    Top = 64
  end
  object adsBaseProduct_D: TADODataSet
    Connection = Connection
    CommandText = 'BaseProduct_D'
    CommandType = cmdTable
    Parameters = <>
    Left = 240
    Top = 64
  end
  object adsBaseUnits: TADODataSet
    Connection = Connection
    CommandText = 'baseunits'
    CommandType = cmdTable
    Parameters = <>
    Left = 152
    Top = 120
  end
end