Measure/DataModules/ZJJLDm.dfm

object ZJJLData: TZJJLData
  OldCreateOrder = False
  Left = 691
  Top = 246
  Height = 241
  Width = 166
  object atZJJL: TADOTable
    TableName = 'ZJJL'
    Left = 33
    Top = 17
  end
  object dspZJJL: TDataSetProvider
    DataSet = atZJJL
    UpdateMode = upWhereKeyOnly
    Left = 33
    Top = 80
  end
  object cdsZJJL: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspZJJL'
    Left = 33
    Top = 144
    object cdsZJJLID: TIntegerField
      FieldName = 'ID'
    end
    object cdsZJJLBillsID: TIntegerField
      FieldName = 'BillsID'
    end
    object cdsZJJLCode: TWideStringField
      FieldName = 'Code'
      Size = 50
    end
    object cdsZJJLCertificateCode: TWideStringField
      FieldName = 'CertificateCode'
      Size = 50
    end
    object cdsZJJLBillsCode: TWideStringField
      FieldName = 'BillsCode'
      Size = 50
    end
    object cdsZJJLFormulaMemo: TMemoField
      FieldName = 'FormulaMemo'
      BlobType = ftMemo
    end
    object cdsZJJLRelaFile: TWideStringField
      FieldName = 'RelaFile'
      Size = 200
    end
    object cdsZJJLType: TIntegerField
      FieldName = 'Type'
    end
  end
  object cdsZJJLView: TClientDataSet
    Aggregates = <>
    Params = <>
    AfterScroll = cdsZJJLViewAfterScroll
    Left = 97
    Top = 144
    object cdsZJJLViewID: TIntegerField
      FieldName = 'ID'
    end
    object cdsZJJLViewBillsID: TIntegerField
      FieldName = 'BillsID'
    end
    object cdsZJJLViewCode: TWideStringField
      FieldName = 'Code'
      Size = 50
    end
    object cdsZJJLViewCertificateCode: TWideStringField
      FieldName = 'CertificateCode'
      Size = 50
    end
    object cdsZJJLViewBillsCode: TWideStringField
      FieldName = 'BillsCode'
      Size = 50
    end
    object cdsZJJLViewFormulaMemo: TMemoField
      FieldName = 'FormulaMemo'
      BlobType = ftMemo
    end
    object cdsZJJLViewRelaFile: TWideStringField
      FieldName = 'RelaFile'
      Size = 200
    end
    object cdsZJJLViewType: TIntegerField
      FieldName = 'Type'
    end
  end
end