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
    BeforeValueChange = sddProjectGLBeforeValueChange
    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
      4E616D65060D4C6F636B656453746167654944094669656C644E616D65060D4C
      6F636B6564537461676549440844617461547970650203084461746153697A65
      02040549734B6579080F4E65656450726F636573734E616D65090001044E616D
      650609496E666F5072696365094669656C644E616D650609496E666F50726963
      650844617461547970650206084461746153697A6502080549734B6579080F4E
      65656450726F636573734E616D65090001044E616D650608496E666F44617465
      094669656C644E616D650608496E666F44617465084461746154797065021808
      4461746153697A6502140549734B6579080F4E65656450726F636573734E616D
      65090001044E616D65060A44656C74615072696365094669656C644E616D6506
      0A44656C746150726963650844617461547970650206084461746153697A6502
      080549734B6579080F4E65656450726F636573734E616D65090001044E616D65
      060F56616C696444656C74615072696365094669656C644E616D65060F56616C
      696444656C746150726963650844617461547970650206084461746153697A65
      02080549734B6579080F4E65656450726F636573734E616D65090001044E616D
      65060B504D5F5175616E74697479094669656C644E616D65060B504D5F517561
      6E746974790844617461547970650206084461746153697A6502080549734B65
      79080F4E65656450726F636573734E616D65090001044E616D65060D504D5F54
      6F74616C5072696365094669656C644E616D65060D504D5F546F74616C507269
      63650844617461547970650206084461746153697A6502080549734B6579080F
      4E65656450726F636573734E616D65090000}
  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
    Left = 56
    Top = 136
  end
end