Measure/DataModules/ProjectGLDm.dfm

object ProjectGLData: TProjectGLData
  OldCreateOrder = False
  Left = 562
  Top = 408
  Height = 252
  Width = 171
  object sdpProjectGL: TsdADOProvider
    TableName = 'ProjectGL'
    Left = 56
    Top = 24
  end
  object sddProjectGL: TsdDataSet
    Active = False
    Provider = sdpProjectGL
    AfterAddRecord = sddProjectGLAfterAddRecord
    BeforeDeleteRecord = sddProjectGLBeforeDeleteRecord
    AfterValueChanged = sddProjectGLAfterValueChanged
    OnGetRecordClass = sddProjectGLGetRecordClass
    Left = 57
    Top = 80
    FieldListData = {
      0101044E616D6506024944094669656C644E616D650602494408446174615479
      70650203084461746153697A6502040549734B6579080F4E65656450726F6365
      73734E616D65090001044E616D650604436F6465094669656C644E616D650604
      436F64650844617461547970650203084461746153697A6502040549734B6579
      080F4E65656450726F636573734E616D65090001044E616D6506044E616D6509
      4669656C644E616D6506044E616D650844617461547970650218084461746153
      697A6503C8000549734B6579080F4E65656450726F636573734E616D65090001
      044E616D650605556E697473094669656C644E616D650605556E697473084461
      7461547970650218084461746153697A6502140549734B6579080F4E65656450
      726F636573734E616D65090001044E616D6506055370656373094669656C644E
      616D65060553706563730844617461547970650218084461746153697A6503C8
      000549734B6579080F4E65656450726F636573734E616D65090001044E616D65
      0609426173655072696365094669656C644E616D650609426173655072696365
      0844617461547970650206084461746153697A6502080549734B6579080F4E65
      656450726F636573734E616D65090001044E616D6506095269736B52616E6765
      094669656C644E616D6506095269736B52616E67650844617461547970650206
      084461746153697A6502080549734B6579080F4E65656450726F636573734E61
      6D65090001044E616D65060D43726561746550686173654944094669656C644E
      616D65060D437265617465506861736549440844617461547970650203084461
      746153697A6502040549734B6579080F4E65656450726F636573734E616D6509
      0001044E616D65060D4C6F636B656450686173654944094669656C644E616D65
      060D4C6F636B6564506861736549440844617461547970650203084461746153
      697A6502040549734B6579080F4E65656450726F636573734E616D6509000104
      4E616D650609496E666F5072696365094669656C644E616D650609496E666F50
      726963650844617461547970650206084461746153697A6502080549734B6579
      080F4E65656450726F636573734E616D65090001044E616D650608496E666F44
      617465094669656C644E616D650608496E666F44617465084461746154797065
      0218084461746153697A6502140549734B6579080F4E65656450726F63657373
      4E616D65090001044E616D65060A44656C74615072696365094669656C644E61
      6D65060A44656C74615072696365084461746154797065020608446174615369
      7A6502080549734B6579080F4E65656450726F636573734E616D65090001044E
      616D65060F56616C696444656C74615072696365094669656C644E616D65060F
      56616C696444656C746150726963650844617461547970650206084461746153
      697A6502080549734B6579080F4E65656450726F636573734E616D6509000104
      4E616D65060B504D5F5175616E74697479094669656C644E616D65060B504D5F
      5175616E746974790844617461547970650206084461746153697A6502080549
      734B6579080F4E65656450726F636573734E616D65090001044E616D65060D50
      4D5F546F74616C5072696365094669656C644E616D65060D504D5F546F74616C
      50726963650844617461547970650206084461746153697A6502080549734B65
      79080F4E65656450726F636573734E616D65090000}
  end
  object sdvProjectGL: TsdDataView
    Active = False
    DataSet = sddProjectGL
    Filtered = False
    Columns = <
      item
        FieldName = 'Code'
      end
      item
        FieldName = 'Name'
      end
      item
        FieldName = 'Units'
      end
      item
        FieldName = 'Specs'
      end
      item
        FieldName = 'BasePrice'
        DisplayFormat = '0.##'
      end
      item
        FieldName = 'RiskRange'
        DisplayFormat = '0.##'
      end
      item
        FieldName = 'InfoPrice'
        DisplayFormat = '0.##'
      end
      item
        FieldName = 'InfoDate'
      end
      item
        FieldName = 'DeltaPrice'
        DisplayFormat = '0.##'
      end
      item
        FieldName = 'ValidDeltaPrice'
        DisplayFormat = '0.##'
      end
      item
        FieldName = 'PM_Quantity'
        DisplayFormat = '0.##'
      end
      item
        FieldName = 'PM_TotalPrice'
        DisplayFormat = '0.##'
      end>
    OnGetText = sdvProjectGLGetText
    OnSetText = sdvProjectGLSetText
    Left = 56
    Top = 136
  end
end