278 lines
7.3 KiB
Plaintext
278 lines
7.3 KiB
Plaintext
object dmObj: TdmObj
|
|
Height = 240
|
|
Width = 640
|
|
PixelsPerInch = 96
|
|
object vTabObj: TMemTableEh
|
|
Params = <>
|
|
Left = 24
|
|
Top = 20
|
|
object vTabPoradiSort: TSingleField
|
|
FieldName = 'PoradiSort'
|
|
Visible = False
|
|
end
|
|
object vTabK1: TStringField
|
|
FieldName = 'K1'
|
|
Size = 10
|
|
end
|
|
object vTabK2: TStringField
|
|
FieldName = 'K2'
|
|
Size = 10
|
|
end
|
|
object vTabSortiment: TStringField
|
|
FieldName = 'Sortiment'
|
|
Required = True
|
|
Size = 50
|
|
end
|
|
object vTabIDZboSklad: TIntegerField
|
|
FieldName = 'IDZboSklad'
|
|
Visible = False
|
|
end
|
|
object vTabRegCis: TStringField
|
|
FieldName = 'RegCis'
|
|
Size = 30
|
|
end
|
|
object vTabNazev: TStringField
|
|
FieldName = 'Nazev'
|
|
Size = 100
|
|
end
|
|
object vTabRano: TFloatField
|
|
DisplayLabel = 'R'#225'no'
|
|
FieldName = 'Rano'
|
|
end
|
|
object vTabDoporuceno: TFloatField
|
|
FieldName = 'Doporuceno'
|
|
end
|
|
object vTabPoledne: TFloatField
|
|
FieldName = 'Poledne'
|
|
end
|
|
object vTabStavSkladu: TFloatField
|
|
DisplayLabel = 'Stav skladu'
|
|
FieldName = 'StavSkladu'
|
|
end
|
|
object vTabPriorita: TIntegerField
|
|
DisplayWidth = 10
|
|
FieldName = 'Priorita'
|
|
Visible = False
|
|
end
|
|
object vTabCisloZbozi: TStringField
|
|
FieldName = 'CisloZbozi'
|
|
Visible = False
|
|
Size = 33
|
|
end
|
|
object vTabIDKZ: TIntegerField
|
|
FieldName = 'IDKZ'
|
|
Visible = False
|
|
end
|
|
object vTabSkupZbo: TStringField
|
|
FieldName = 'SkupZbo'
|
|
Visible = False
|
|
Size = 3
|
|
end
|
|
object vTabDodavatel: TIntegerField
|
|
FieldName = 'Dodavatel'
|
|
Visible = False
|
|
end
|
|
object vTabJenRano: TSmallintField
|
|
FieldName = 'JenRano'
|
|
Visible = False
|
|
end
|
|
object vTabMinimum: TFloatField
|
|
FieldName = 'Minimum'
|
|
Visible = False
|
|
end
|
|
object vTabDelitelnost: TFloatField
|
|
FieldName = 'Delitelnost'
|
|
Visible = False
|
|
end
|
|
object vTabPoradi: TSingleField
|
|
FieldName = 'Poradi'
|
|
Visible = False
|
|
end
|
|
object vTabK1K2: TStringField
|
|
FieldName = 'K1K2'
|
|
Visible = False
|
|
Size = 15
|
|
end
|
|
object vTabPoradiSortNazev: TStringField
|
|
FieldName = 'PoradiSortNazev'
|
|
Size = 100
|
|
end
|
|
object MemTableData: TMemTableDataEh
|
|
object DataStruct: TMTDataStructEh
|
|
object PoradiSortNazev: TMTStringDataFieldEh
|
|
FieldName = 'PoradiSortNazev'
|
|
StringDataType = fdtStringEh
|
|
DisplayWidth = 100
|
|
Size = 100
|
|
end
|
|
object Delitelnost: TMTNumericDataFieldEh
|
|
FieldName = 'Delitelnost'
|
|
NumericDataType = fdtFloatEh
|
|
AutoIncrement = False
|
|
DisplayWidth = 20
|
|
currency = False
|
|
Precision = 15
|
|
end
|
|
object Minimum: TMTNumericDataFieldEh
|
|
FieldName = 'Minimum'
|
|
NumericDataType = fdtFloatEh
|
|
AutoIncrement = False
|
|
DisplayWidth = 20
|
|
currency = False
|
|
Precision = 15
|
|
end
|
|
object JenRano: TMTNumericDataFieldEh
|
|
FieldName = 'JenRano'
|
|
NumericDataType = fdtSmallintEh
|
|
AutoIncrement = False
|
|
DisplayWidth = 20
|
|
currency = False
|
|
Precision = 15
|
|
end
|
|
object Dodavatel: TMTNumericDataFieldEh
|
|
FieldName = 'Dodavatel'
|
|
NumericDataType = fdtIntegerEh
|
|
AutoIncrement = False
|
|
DisplayWidth = 20
|
|
Visible = False
|
|
currency = False
|
|
Precision = 15
|
|
end
|
|
object SkupZbo: TMTStringDataFieldEh
|
|
FieldName = 'SkupZbo'
|
|
StringDataType = fdtStringEh
|
|
DisplayWidth = 3
|
|
Visible = False
|
|
Size = 3
|
|
end
|
|
object PoradiSort: TMTNumericDataFieldEh
|
|
FieldName = 'PoradiSort'
|
|
NumericDataType = fdtSingleEh
|
|
AutoIncrement = False
|
|
DisplayWidth = 20
|
|
Visible = False
|
|
currency = False
|
|
Precision = 15
|
|
end
|
|
object K1: TMTStringDataFieldEh
|
|
FieldName = 'K1'
|
|
StringDataType = fdtStringEh
|
|
DisplayWidth = 10
|
|
Size = 10
|
|
end
|
|
object K2: TMTStringDataFieldEh
|
|
FieldName = 'K2'
|
|
StringDataType = fdtStringEh
|
|
DisplayWidth = 10
|
|
Size = 10
|
|
end
|
|
object Sortiment: TMTStringDataFieldEh
|
|
FieldName = 'Sortiment'
|
|
StringDataType = fdtStringEh
|
|
DisplayWidth = 50
|
|
Size = 50
|
|
end
|
|
object IDZboSklad: TMTNumericDataFieldEh
|
|
FieldName = 'IDZboSklad'
|
|
NumericDataType = fdtIntegerEh
|
|
AutoIncrement = False
|
|
DisplayWidth = 20
|
|
currency = False
|
|
Precision = 15
|
|
end
|
|
object IDKZ: TMTNumericDataFieldEh
|
|
FieldName = 'IDKZ'
|
|
NumericDataType = fdtIntegerEh
|
|
AutoIncrement = False
|
|
DisplayWidth = 20
|
|
currency = False
|
|
Precision = 15
|
|
end
|
|
object RegCis: TMTStringDataFieldEh
|
|
FieldName = 'RegCis'
|
|
StringDataType = fdtStringEh
|
|
DisplayWidth = 10
|
|
Size = 30
|
|
end
|
|
object Nazev: TMTStringDataFieldEh
|
|
FieldName = 'Nazev'
|
|
StringDataType = fdtStringEh
|
|
DisplayWidth = 50
|
|
Size = 100
|
|
end
|
|
object StavSkladu: TMTNumericDataFieldEh
|
|
FieldName = 'StavSkladu'
|
|
NumericDataType = fdtFloatEh
|
|
AutoIncrement = False
|
|
DisplayLabel = '0'
|
|
DisplayWidth = 20
|
|
currency = False
|
|
Precision = 10
|
|
end
|
|
object Doporuceno: TMTNumericDataFieldEh
|
|
FieldName = 'Doporuceno'
|
|
NumericDataType = fdtFloatEh
|
|
AutoIncrement = False
|
|
DisplayLabel = '0'
|
|
DisplayWidth = 20
|
|
currency = False
|
|
Precision = 10
|
|
end
|
|
object Rano: TMTNumericDataFieldEh
|
|
FieldName = 'Rano'
|
|
NumericDataType = fdtFloatEh
|
|
AutoIncrement = False
|
|
DisplayLabel = '0'
|
|
DisplayWidth = 20
|
|
currency = False
|
|
Precision = 10
|
|
end
|
|
object Poledne: TMTNumericDataFieldEh
|
|
FieldName = 'Poledne'
|
|
NumericDataType = fdtFloatEh
|
|
AutoIncrement = False
|
|
DisplayLabel = '0'
|
|
DisplayWidth = 20
|
|
currency = False
|
|
Precision = 10
|
|
end
|
|
object K1K2: TMTStringDataFieldEh
|
|
FieldName = 'K1K2'
|
|
StringDataType = fdtStringEh
|
|
DisplayWidth = 20
|
|
Visible = False
|
|
end
|
|
object Poradi: TMTNumericDataFieldEh
|
|
FieldName = 'Poradi'
|
|
NumericDataType = fdtSingleEh
|
|
AutoIncrement = False
|
|
DisplayWidth = 20
|
|
currency = False
|
|
Precision = 15
|
|
end
|
|
object Priorita: TMTNumericDataFieldEh
|
|
FieldName = 'Priorita'
|
|
NumericDataType = fdtSmallintEh
|
|
AutoIncrement = False
|
|
DisplayWidth = 20
|
|
currency = False
|
|
Precision = 3
|
|
end
|
|
object CisloZbozi: TMTStringDataFieldEh
|
|
FieldName = 'CisloZbozi'
|
|
StringDataType = fdtStringEh
|
|
DisplayWidth = 50
|
|
Size = 33
|
|
end
|
|
end
|
|
object RecordsList: TRecordsListEh
|
|
end
|
|
end
|
|
end
|
|
object dsObj: TDataSource
|
|
DataSet = vTabObj
|
|
Left = 85
|
|
Top = 21
|
|
end
|
|
end
|