object FZHYD: TFZHYD
IndexDefs = <>
ForeignKeyDefs = <>
TableLog.LogFields = <>
object FieldFZHYDID: TBizFieldDef
ID = 'FZHYDID'
DisplayName = #36741#21161#21270#39564#21333'ID'
DataType = dtString
DataTypeAttribute.Size = 32
EditStyleID = 'String'
Templet.Reference = 'XTZDMBZ.GUIDTemplete'
Alignment = taLeftJustify
AutoFillDef.Enabled = True
AutoFillDef.Trigger = [ftOnInsert]
AutoFillDef.Options = [foFillReadOnly, foNullFieldOnly]
AutoFillDef.Expression.Text = 'NewGUID()'
IsPrimaryKey = True
IsRequired = True
end
object FieldDCDM: TBizFieldDef
ID = 'DCDM'
DisplayName = #30005#21378#20195#30721
DataType = dtString
DataTypeAttribute.Size = 100
EditStyleID = 'String'
Templet.Reference = 'YWZDMBZ.DCBMTemplet'
Alignment = taLeftJustify
DisplayWidth = 10
LookupDef.Kind = lkDataValues
LookupDef.DataBase.Reference = 'RLGLDB'
LookupDef.SQL.Strings = (
'SELECT SYS_PUBLIC.GJZ, SYS_PUBLIC.MC'
' FROM SYS_PUBLIC'
' WHERE SYS_PUBLIC.FID is not null and SYS_PUBLIC.FID = '#39'28D5296' +
'24A9143BEAC9F5DAED5BF8E55'#39
' ORDER BY SYS_PUBLIC.PX')
LookupDef.DisplayField = 'MC'
LookupDef.KeyField = 'GJZ'
LookupDef.Filter.Strings = (
' ')
LookupDef.ViewID = 'GridView'
LookupDef.ViewProperties.Strings = (
'object _1: TGridViewDesigner'
' VisibleColumns.Strings = ('
' '#39'MC'#39')'
' Options = []'
'end')
LookupDef.Options = [loAutoRefresh, loDropDownButton]
LookupDef.InnerSQLList.Expressions = <
item
Name = '[Default]'
Expression.Text =
'SELECT SYS_PUBLIC.GJZ, SYS_PUBLIC.MC'#13#10' FROM SYS_PUBLIC'#13#10' WHERE' +
' SYS_PUBLIC.FID is not null and SYS_PUBLIC.FID = '#39'28D529624A9143' +
'BEAC9F5DAED5BF8E55'#39#13#10' ORDER BY SYS_PUBLIC.PX'#13#10
end
item
Name = 'ORACLE'
Expression.Text = ' '
end
item
Name = 'MSSQL'
Expression.Text = ' '
end
item
Name = 'SYBASE'
Expression.Text = ' '
end
item
Name = 'DB2'
Expression.Text = ' '
end
item
Name = 'SQLITE'
Expression.Text = ' '
end
item
Name = 'Paradox'
Expression.Text = ' '
end>
AutoFillDef.Enabled = True
AutoFillDef.Trigger = [ftOnInsert]
AutoFillDef.Options = [foFillReadOnly, foNullFieldOnly]
AutoFillDef.CalcMode = cmByLookup
AutoFillDef.LookupFillMode = fmFirst
end
object FieldCYDID: TBizFieldDef
ID = 'CYDID'
DisplayName = #37319#26679#21333'ID'
DataType = dtString
DataTypeAttribute.Size = 32
EditStyleID = 'String'
Alignment = taLeftJustify
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
end
object FieldECBM: TBizFieldDef
ID = 'ECBM'
DisplayName = #20108#27425#32534#30721
DataType = dtString
DataTypeAttribute.Size = 100
EditStyleID = 'String'
Templet.Reference = 'XTZDMBZ.Char100Templet'
Alignment = taCenter
DisplayWidth = 20
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
end
object FieldHYDW: TBizFieldDef
ID = 'HYDW'
DisplayName = #21270#39564#21333#20301
DataType = dtString
DataTypeAttribute.Size = 64
EditStyleID = 'Org.Dept.ID'
EditStyleAttribute.ApperceiveImmediately = False
Alignment = taLeftJustify
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
end
object FieldHYBM: TBizFieldDef
ID = 'HYBM'
DisplayName = #21270#39564#37096#38376
DataType = dtString
DataTypeAttribute.Size = 64
EditStyleID = 'Org.Dept.ID'
EditStyleAttribute.ApperceiveImmediately = False
Alignment = taCenter
LookupDef.DataBase.Reference = 'RLGLDB'
LookupDef.SQL.Strings = (
'SELECT SYS_PUBLIC.GJZ, SYS_PUBLIC.MC'
' FROM SYS_PUBLIC'
' WHERE SYS_PUBLIC.FID is not null and SYS_PUBLIC.FID = '#39'EB8A0EB' +
'87B3443308CE4DC8BB1DAB71B'#39
' ORDER BY SYS_PUBLIC.PX')
LookupDef.InnerSQLList.Expressions = <
item
Name = '[Default]'
Expression.Text =
'SELECT SYS_PUBLIC.GJZ, SYS_PUBLIC.MC'#13#10' FROM SYS_PUBLIC'#13#10' WHERE' +
' SYS_PUBLIC.FID is not null and SYS_PUBLIC.FID = '#39'EB8A0EB87B3443' +
'308CE4DC8BB1DAB71B'#39#13#10' ORDER BY SYS_PUBLIC.PX'#13#10
end
item
Name = 'ORACLE'
Expression.Text = ' '
end
item
Name = 'MSSQL'
Expression.Text = ' '
end
item
Name = 'SYBASE'
Expression.Text = ' '
end
item
Name = 'DB2'
Expression.Text = ' '
end
item
Name = 'SQLITE'
Expression.Text = ' '
end
item
Name = 'Paradox'
Expression.Text = ' '
end>
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
end
object FieldHYSJ: TBizFieldDef
ID = 'HYSJ'
DisplayName = #21270#39564#26102#38388
DataType = dtDateTime
DataTypeAttribute.SubType = stDate
EditStyleID = 'Date'
Templet.Reference = 'XTZDMBZ.DateAutoFillTemplet'
Alignment = taCenter
AutoFillDef.Enabled = True
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
AutoFillDef.Expression.Text = '&[DATATIMEPARAMS.ServerDate]'
end
object FieldQSFMt: TBizFieldDef
ID = 'QSFMt'
DisplayName = #20840#27700#20221'Mt(%)'
DataType = dtNumber
DataTypeAttribute.Precision = 18
DataTypeAttribute.Scale = 3
EditStyleID = 'Number'
Alignment = taRightJustify
DisplayWidth = 8
AutoFillDef.Enabled = True
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
AutoFillDef.Expression.Text = '0'
end
object FieldKQGZJSFMad: TBizFieldDef
ID = 'KQGZJSFMad'
DisplayName = #31354#27668#24178#29157#22522#27700#20998'Mad(%)'
DataType = dtNumber
DataTypeAttribute.Precision = 18
DataTypeAttribute.Scale = 3
EditStyleID = 'Number'
Alignment = taRightJustify
DisplayWidth = 8
AutoFillDef.Enabled = True
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
AutoFillDef.Expression.Text = '0'
end
object FieldKQGZJHFAad: TBizFieldDef
ID = 'KQGZJHFAad'
DisplayName = #31354#27668#24178#29157#22522#28784#20998'Aad(%)'
DataType = dtNumber
DataTypeAttribute.Precision = 18
DataTypeAttribute.Scale = 3
EditStyleID = 'Number'
Alignment = taRightJustify
DisplayWidth = 8
AutoFillDef.Enabled = True
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
AutoFillDef.Expression.Text = '0'
end
object FieldKQGZJHFFVad: TBizFieldDef
ID = 'KQGZJHFFVad'
DisplayName = #31354#27668#24178#29157#22522#25381#21457#20998'Vad(%)'
DataType = dtNumber
DataTypeAttribute.Precision = 18
DataTypeAttribute.Scale = 3
EditStyleID = 'Number'
Alignment = taRightJustify
DisplayWidth = 8
AutoFillDef.Enabled = True
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
AutoFillDef.Expression.Text = '0'
end
object FieldKQGZJQLSt_ad: TBizFieldDef
ID = 'KQGZJQLSt_ad'
DisplayName = #31354#27668#24178#29157#22522#20840#30827'St,ad(%)'
DataType = dtNumber
DataTypeAttribute.Precision = 18
DataTypeAttribute.Scale = 3
EditStyleID = 'Number'
Alignment = taRightJustify
DisplayWidth = 8
AutoFillDef.Enabled = True
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
AutoFillDef.Expression.Text = '0'
end
object FieldDTFRLQb_ad: TBizFieldDef
ID = 'DTFRLQb_ad'
DisplayName = #31354#27668#24178#29157#22522#24377#31570#21457#28909#37327'Qb,ad(J/g)'
DataType = dtNumber
DataTypeAttribute.Precision = 18
DataTypeAttribute.Scale = 3
EditStyleID = 'Number'
Alignment = taRightJustify
DisplayWidth = 8
AutoFillDef.Enabled = True
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
AutoFillDef.Expression.Text = '0'
end
object FieldMar: TBizFieldDef
ID = 'Mar'
DisplayName = 'Mar(%)'
DataType = dtNumber
DataTypeAttribute.Precision = 18
DataTypeAttribute.Scale = 3
EditStyleID = 'Number'
Alignment = taRightJustify
DisplayWidth = 8
AutoFillDef.Enabled = True
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
AutoFillDef.Options = [foFillReadOnly, foFillNullValue]
AutoFillDef.Expression.Text = 'QSFMt'
end
object FieldSDJHFAar: TBizFieldDef
ID = 'SDJHFAar'
DisplayName = #25910#21040#22522#28784#20998'Aar(%)'
DataType = dtNumber
DataTypeAttribute.Precision = 18
DataTypeAttribute.Scale = 3
EditStyleID = 'Number'
Alignment = taRightJustify
DisplayWidth = 8
AutoFillDef.Enabled = True
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
AutoFillDef.Options = [foFillReadOnly, foFillNullValue]
AutoFillDef.Expression.Text =
'IIf(Mar=0,0,1)*IIf(KQGZJSFMad=0,0,1)*KQGZJHFAad*(100-Mar)/(100-K' +
'QGZJSFMad)'
end
object FieldSDJHFFVar: TBizFieldDef
ID = 'SDJHFFVar'
DisplayName = #25910#21040#22522#25381#21457#20998'Var(%)'
DataType = dtNumber
DataTypeAttribute.Precision = 18
DataTypeAttribute.Scale = 3
EditStyleID = 'Number'
Alignment = taRightJustify
DisplayWidth = 8
AutoFillDef.Enabled = True
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
AutoFillDef.Options = [foFillReadOnly, foFillNullValue]
AutoFillDef.Expression.Text =
'IIf(QSFMt=0,0,1)*IIf(KQGZJSFMad=0,0,1)*KQGZJHFFVad*(100-QSFMt)/(' +
'100-KQGZJSFMad)'
end
object FieldGZWHJHFFVdaf: TBizFieldDef
ID = 'GZWHJHFFVdaf'
DisplayName = #24178#29157#26080#28784#22522#25381#21457#20998'Vdaf(%)'
DataType = dtNumber
DataTypeAttribute.Precision = 18
DataTypeAttribute.Scale = 3
EditStyleID = 'Number'
Alignment = taRightJustify
DisplayWidth = 8
AutoFillDef.Enabled = True
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
AutoFillDef.Options = [foFillReadOnly, foFillNullValue]
AutoFillDef.Expression.Text =
'IIf(KQGZJSFMad=0,0,1)*IIf(KQGZJHFAad=0,0,1)*KQGZJHFFVad*100/(100' +
'-KQGZJSFMad-KQGZJHFAad)'
end
object FieldQHL: TBizFieldDef
ID = 'QHL'
DisplayName = #27682#21547#37327'(%)'
DataType = dtNumber
DataTypeAttribute.Precision = 18
DataTypeAttribute.Scale = 3
EditStyleID = 'Number'
Alignment = taRightJustify
DisplayWidth = 8
AutoFillDef.Enabled = True
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
AutoFillDef.Options = [foFillReadOnly, foFillNullValue]
AutoFillDef.Expression.Text = 'IIf(KQGZJHFFVad=0,0,0.0605*KQGZJHFFVad+2.217)'
end
object FieldGZJQLSt_d: TBizFieldDef
ID = 'GZJQLSt_d'
DisplayName = #25910#21040#22522#20840#30827'St,d(%)'
DataType = dtNumber
DataTypeAttribute.Precision = 18
DataTypeAttribute.Scale = 3
EditStyleID = 'Number'
Alignment = taRightJustify
DisplayWidth = 8
AutoFillDef.Enabled = True
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
AutoFillDef.Expression.Text = '0'
end
object FieldDWFRLQnet_ar: TBizFieldDef
ID = 'DWFRLQnet_ar'
DisplayName = #25910#21040#22522#20302#20301#21457#28909#37327'Qnet,ar(MJ/kg)'
DataType = dtNumber
DataTypeAttribute.Precision = 18
DataTypeAttribute.Scale = 3
EditStyleID = 'Number'
Alignment = taRightJustify
DisplayWidth = 8
AutoFillDef.Enabled = True
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
AutoFillDef.Options = [foFillReadOnly, foFillNullValue]
AutoFillDef.Expression.Text =
'(IIf(DTFRLQb_ad*KQGZJQLSt_ad*KQGZJHFFVad*QSFMt*KQGZJSFMad=0,0,((' +
'DTFRLQb_ad-(94.1*KQGZJQLSt_ad+(IIf(DTFRLQb_ad<=16700,0.001,(IIf(' +
'DTFRLQb_ad>25100,0.0016,0.0012))))*DTFRLQb_ad))-206*(0.0605*KQGZ' +
'JHFFVad+2.217))*(100-QSFMt)/(100-KQGZJSFMad)-23*QSFMt))/1000'#13#10
end
object FieldSDJDWFRLQnet_arK: TBizFieldDef
ID = 'SDJDWFRLQnet_arK'
DisplayName = #25910#21040#22522#20302#20301#21457#28909#37327'Qnet,ar(K)'
DataType = dtNumber
DataTypeAttribute.Precision = 18
DataTypeAttribute.Scale = 3
EditStyleID = 'Number'
Alignment = taRightJustify
AutoFillDef.Enabled = True
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
AutoFillDef.Options = [foFillReadOnly, foFillNullValue]
AutoFillDef.Expression.Text = 'Round(DWFRLQnet_ar*1000/4.1816,0)'
end
object FieldBXZ: TBizFieldDef
ID = 'BXZ'
DisplayName = #34987#36873#20013
DataType = dtInteger
EditStyleID = 'String'
Alignment = taLeftJustify
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
end
object FieldYJXY: TBizFieldDef
ID = 'YJXY'
DisplayName = #24050#32463#26657#39564
DataType = dtInteger
EditStyleID = 'Number'
Templet.Reference = 'XTZDMBZ.IntegerTemplet'
Alignment = taRightJustify
DisplayWidth = 8
AutoFillDef.Trigger = [ftOnInsert, ftOnEdit, ftOnDataChange]
end
end |