| 1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950 | 
							- object rmBGLExecutionData: TrmBGLExecutionData
 
-   OldCreateOrder = False
 
-   Left = 447
 
-   Top = 333
 
-   Height = 150
 
-   Width = 215
 
-   object cdsBGLExecution: TClientDataSet
 
-     Active = True
 
-     Aggregates = <>
 
-     Params = <>
 
-     Left = 64
 
-     Top = 32
 
-     Data = {
 
-       CF0000009619E0BD010000001800000008000000000003000000CF000742474C
 
-       436F646501004A000000010005574944544802000200640004436F6465010049
 
-       000000010005574944544802000200320006425F436F64650100490000000100
 
-       055749445448020002003200044E616D6501004A000000010005574944544802
 
-       000200C80005556E69747301004A000000010005574944544802000200280005
 
-       50726963650800040000000000085175616E7469747908000400000000000A54
 
-       6F74616C507269636508000400000000000000}
 
-     object cdsBGLExecutionBGLCode: TWideStringField
 
-       FieldName = 'BGLCode'
 
-       Size = 50
 
-     end
 
-     object cdsBGLExecutionCode: TStringField
 
-       FieldName = 'Code'
 
-       Size = 50
 
-     end
 
-     object cdsBGLExecutionB_Code: TStringField
 
-       FieldName = 'B_Code'
 
-       Size = 50
 
-     end
 
-     object cdsBGLExecutionName: TWideStringField
 
-       FieldName = 'Name'
 
-       Size = 100
 
-     end
 
-     object cdsBGLExecutionUnits: TWideStringField
 
-       FieldName = 'Units'
 
-     end
 
-     object cdsBGLExecutionPrice: TFloatField
 
-       FieldName = 'Price'
 
-     end
 
-     object cdsBGLExecutionQuantity: TFloatField
 
-       FieldName = 'Quantity'
 
-     end
 
-     object cdsBGLExecutionTotalPrice: TFloatField
 
-       FieldName = 'TotalPrice'
 
-     end
 
-   end
 
- end
 
 
  |