unt_data.dfm

煤矿行业采掘接替计划自动生成系统

    end
    object ADOT_frusfru_Name: TWideStringField
      FieldName = 'fru_Name'
      Size = 15
    end
    object ADOT_frusFruT_Id: TSmallintField
      FieldName = 'FruT_Id'
    end
    object ADOT_frusH: TFloatField
      FieldName = 'H'
      DisplayFormat = '#.00'
    end
    object ADOT_frusAng: TSmallintField
      FieldName = 'Ang'
      DisplayFormat = '#.00'
    end
    object ADOT_frusRock: TFloatField
      FieldName = 'Rock'
      DisplayFormat = '#.00'
    end
  end
  object ADOT_Cfrus: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #26029#23618#23376#34920
    Left = 420
    Top = 196
  end
  object ADOT_FrusT: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #26029#23618#31867#22411
    Left = 23
    Top = 102
  end
  object ADOT_MineT: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #22238#37319#24037#33402
    Left = 104
    Top = 48
  end
  object ADOT_DrillT: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #25496#36827#24037#33402
    Left = 104
    Top = 94
  end
  object ADOT_DayDis: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #37319#25496#36827#24230#26679#26412
    Left = 656
    Top = 318
    object ADOT_DayDisid: TAutoIncField
      FieldName = 'id'
      ReadOnly = True
    end
    object ADOT_DayDisMinDri_Id: TSmallintField
      FieldName = 'MinDri_Id'
    end
    object ADOT_DayDisShaft_Id: TSmallintField
      FieldName = 'Shaft_Id'
    end
    object ADOT_DayDisArea_Id: TSmallintField
      FieldName = 'Area_Id'
    end
    object ADOT_DayDisField2: TStringField
      FieldKind = fkLookup
      FieldName = #37319#21306
      LookupDataSet = ADOT_Area
      LookupKeyFields = 'Area_Id'
      LookupResultField = 'Area_Name'
      KeyFields = 'Area_Id'
      Lookup = True
    end
    object ADOT_DayDisTask_Id: TSmallintField
      FieldName = 'Task_Id'
    end
    object ADOT_DayDisField: TStringField
      FieldKind = fkLookup
      FieldName = #24037#24207
      LookupDataSet = ADOT_Task
      LookupKeyFields = 'Task_Id'
      LookupResultField = 'Task_Name'
      KeyFields = 'Task_Id'
      Size = 30
      Lookup = True
    end
    object ADOT_DayDisB_Date: TDateTimeField
      FieldName = 'B_Date'
      DisplayFormat = 'yyyy/mm/dd'
    end
    object ADOT_DayDisE_Date: TDateTimeField
      FieldName = 'E_Date'
      DisplayFormat = 'yyyy/mm/dd'
    end
    object ADOT_DayDisResult: TFloatField
      FieldName = 'Result'
      DisplayFormat = '#.00'
    end
    object ADOT_DayDisMat: TBCDField
      FieldName = 'Mat'
      Precision = 18
      Size = 2
    end
    object ADOT_DayDisEqu: TBCDField
      FieldName = 'Equ'
      Precision = 18
      Size = 2
    end
    object ADOT_DayDisEle: TBCDField
      FieldName = 'Ele'
      Precision = 18
      Size = 2
    end
    object ADOT_DayDisSal: TBCDField
      FieldName = 'Sal'
      Precision = 18
      Size = 2
    end
    object ADOT_DayDisQ: TBCDField
      FieldName = 'Q'
      Precision = 18
      Size = 2
    end
  end
  object ADOT_ATaskN: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #37319#21306#24037#24207#21517#31216
    Left = 23
    Top = 152
  end
  object ADOT_MDPro: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #37319#25496#26041#26696
    Left = 579
    Top = 104
    object ADOT_MDProPro_Id: TSmallintField
      FieldName = 'Pro_Id'
    end
    object ADOT_MDProAWL: TIntegerField
      FieldName = 'AWL'
    end
    object ADOT_MDProShaft_Id: TSmallintField
      FieldName = 'Shaft_Id'
    end
    object ADOT_MDProAccessR: TFloatField
      FieldName = 'AccessR'
      DisplayFormat = '#.0000'
    end
    object ADOT_MDProIsNum: TBooleanField
      FieldName = 'IsNum'
    end
    object ADOT_MDProIsPlan: TBooleanField
      FieldName = 'IsPlan'
    end
    object ADOT_MDProIsAcc: TBooleanField
      FieldName = 'IsAcc'
    end
  end
  object ADOT_Points: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    TableName = #28857
    Left = 265
    Top = 448
  end
  object ADOT_SMDPro: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    IndexFieldNames = 'Pro_Id'
    MasterFields = 'Pro_Id'
    MasterSource = Ds_MDPro
    TableName = #37319#25496#26041#26696#21333#25509#26367
    Left = 579
    Top = 154
    object ADOT_SMDProId: TAutoIncField
      FieldName = 'Id'
      ReadOnly = True
    end
    object ADOT_SMDProPro_Id: TSmallintField
      FieldName = 'Pro_Id'
    end
    object ADOT_SMDProIId: TIntegerField
      FieldName = 'IId'
    end
    object ADOT_SMDProArea_Id: TSmallintField
      FieldName = 'Area_Id'
    end
    object ADOT_SMDProTask_Id: TSmallintField
      FieldName = 'Task_Id'
    end
    object ADOT_SMDProNArea_Id: TSmallintField
      FieldName = 'NArea_Id'
    end
    object ADOT_SMDProNTask_Id: TSmallintField
      FieldName = 'NTask_Id'
    end
  end
  object ADOT_Convery: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #36816#36755#26426
    Left = 104
    Top = 301
  end
  object ADOT_MineEqu: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #22238#37319#35774#22791
    Left = 26
    Top = 251
    object ADOT_MineEquMineE_Id: TSmallintField
      FieldName = 'MineE_Id'
    end
    object ADOT_MineEquShaft_Id: TSmallintField
      FieldName = 'Shaft_Id'
    end
    object ADOT_MineEquMineT_Id: TSmallintField
      FieldName = 'MineT_Id'
    end
    object ADOT_MineEquCut: TWideStringField
      FieldName = 'Cut'
    end
    object ADOT_MineEquConvery: TWideStringField
      FieldName = 'Convery'
    end
    object ADOT_MineEquTrace: TWideStringField
      FieldName = 'Trace'
    end
    object ADOT_MineEquECou: TSmallintField
      FieldName = 'ECou'
    end
    object ADOT_MineEquzhulin: TFloatField
      FieldName = 'zhulin'
      DisplayFormat = '#.00'
    end
    object ADOT_MineEquField: TStringField
      FieldKind = fkLookup
      FieldName = #36866#29992#24037#33402
      LookupDataSet = ADOT_MineT
      LookupKeyFields = 'MineT_Id'
      LookupResultField = 'Mine_Type'
      KeyFields = 'MineT_Id'
      Size = 30
      Lookup = True
    end
  end
  object Ds_Task: TDataSource
    DataSet = ADOT_Task
    Left = 418
    Top = 4
  end
  object Ds_Area: TDataSource
    DataSet = ADOT_Area
    Left = 238
    Top = 196
  end
  object Ds_MDPro: TDataSource
    DataSet = ADOT_MDPro
    Left = 665
    Top = 104
  end
  object ADOT_D: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #37319#21306#24320#25299
    Left = 579
    Top = 4
  end
  object Ds_D: TDataSource
    DataSet = ADOT_D
    Left = 665
    Top = 4
  end
  object ADOT_WS: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #21306#27573#37319#25496
    Left = 579
    Top = 54
    object ADOT_WSShaft_Id: TSmallintField
      FieldName = 'Shaft_Id'
    end
    object ADOT_WSADMW_Id: TSmallintField
      FieldName = 'ADMW_Id'
    end
    object ADOT_WSWTN: TWideStringField
      FieldName = 'WTN'
      Size = 30
    end
    object ADOT_WSAWL: TSmallintField
      FieldName = 'AWL'
    end
  end
  object Ds_WS: TDataSource
    DataSet = ADOT_WS
    Left = 665
    Top = 54
  end
  object ADOT_ProBDate: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    IndexFieldNames = 'Pro_Id'
    MasterFields = 'Pro_Id'
    MasterSource = Ds_MDPro
    TableName = #37319#25496#24320#22987#26102#38388
    Left = 580
    Top = 205
    object ADOT_ProBDatePro_Id: TSmallintField
      FieldName = 'Pro_Id'
    end
    object ADOT_ProBDateIId: TIntegerField
      FieldName = 'IId'
    end
    object ADOT_ProBDateArea_Id: TSmallintField
      FieldName = 'Area_Id'
    end
    object ADOT_ProBDateField: TStringField
      FieldKind = fkLookup
      FieldName = #37319#21306
      LookupDataSet = ADOT_Area
      LookupKeyFields = 'Area_Id'
      LookupResultField = 'Area_Name'
      KeyFields = 'Area_Id'
      Size = 14
      Lookup = True
    end
    object ADOT_ProBDateTS_Id: TIntegerField
      FieldName = 'TS_Id'
    end
    object ADOT_ProBDateField2: TStringField
      DisplayWidth = 20
      FieldKind = fkLookup
      FieldName = #21306#27573
      LookupDataSet = ADOT_TaskS
      LookupKeyFields = 'TS_Id'
      LookupResultField = 'TS_Name'
      KeyFields = 'TS_Id'
      Size = 26
      Lookup = True
    end
    object ADOT_ProBDateIs_Remove: TBooleanField
      FieldName = 'Is_Remove'
    end
    object ADOT_ProBDateB_Date: TDateTimeField
      FieldName = 'B_Date'
      DisplayFormat = 'yyyy/mm/dd'
    end
    object ADOT_ProBDateSGD_Id: TSmallintField
      FieldName = 'SGD_Id'
    end
  end
  object ADOT_DirSys: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #30452#25509#25351#26631#20307#31995
    Left = 643
    Top = 391
    object ADOT_DirSysId: TSmallintField
      FieldName = 'Id'
    end
    object ADOT_DirSysIId: TIntegerField
      FieldName = 'IId'
    end
    object ADOT_DirSysAT_Id: TSmallintField
      FieldName = 'AT_Id'
    end
    object ADOT_DirSysATStr: TWideStringField
      FieldName = 'ATStr'
      Size = 30
    end
    object ADOT_DirSysT_Id: TIntegerField
      FieldName = 'T_Id'
    end
    object ADOT_DirSysTStr: TWideStringField
      FieldName = 'TStr'
      Size = 50
    end
    object ADOT_DirSysNAT_Id: TSmallintField
      FieldName = 'NAT_Id'
    end
    object ADOT_DirSysNATStr: TWideStringField
      FieldName = 'NATStr'
      Size = 30
    end
    object ADOT_DirSysNT_Id: TIntegerField
      FieldName = 'NT_Id'
    end
    object ADOT_DirSysNTStr: TWideStringField
      FieldName = 'NTStr'
      Size = 50
    end
    object ADOT_DirSysAWL: TWideStringField
      FieldName = 'AWL'
    end
    object ADOT_DirSysAdvance: TSmallintField
      FieldName = 'Advance'
    end
    object ADOT_DirSysAd_Para: TFloatField
      FieldName = 'Ad_Para'
      DisplayFormat = '#.00'
    end
  end
  object ADOT_MDPlan: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #37319#25496#35745#21010
    Left = 568
    Top = 391
    object ADOT_MDPlanIId: TSmallintField
      FieldName = 'IId'
    end
    object ADOT_MDPlanArea_Id: TSmallintField
      FieldName = 'Area_Id'
    end
    object ADOT_MDPlanTask_Id: TSmallintField
      FieldName = 'Task_Id'
    end
    object ADOT_MDPlanDis: TFloatField
      FieldName = 'Dis'
    end
    object ADOT_MDPlanFin_Dis: TFloatField
      FieldName = 'Fin_Dis'
    end
    object ADOT_MDPlanWorkDay: TSmallintField
      FieldName = 'WorkDay'
    end
    object ADOT_MDPlanB_Date: TDateTimeField
      FieldName = 'B_Date'
    end
    object ADOT_MDPlanE_Date: TDateTimeField
      FieldName = 'E_Date'
    end
    object ADOT_MDPlanProTId: TWideStringField
      FieldName = 'ProTId'
      Size = 30
    end
    object ADOT_MDPlanSGD_Id: TIntegerField
      FieldName = 'SGD_Id'
    end
    object ADOT_MDPlanSalary: TBCDField
      FieldName = 'Salary'
      Precision = 19
    end
    object ADOT_MDPlanMaterial: TBCDField
      FieldName = 'Material'
      Precision = 19
    end
    object ADOT_MDPlanElectricity: TBCDField
      FieldName = 'Electricity'
      Precision = 19
    end
    object ADOT_MDPlanEquipment: TBCDField
      FieldName = 'Equipment'
      Precision = 19
    end