rmBGLExecutionDm.dfm 1.4 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950
  1. object rmBGLExecutionData: TrmBGLExecutionData
  2. OldCreateOrder = False
  3. Left = 447
  4. Top = 333
  5. Height = 150
  6. Width = 215
  7. object cdsBGLExecution: TClientDataSet
  8. Active = True
  9. Aggregates = <>
  10. Params = <>
  11. Left = 64
  12. Top = 32
  13. Data = {
  14. CF0000009619E0BD010000001800000008000000000003000000CF000742474C
  15. 436F646501004A000000010005574944544802000200640004436F6465010049
  16. 000000010005574944544802000200320006425F436F64650100490000000100
  17. 055749445448020002003200044E616D6501004A000000010005574944544802
  18. 000200C80005556E69747301004A000000010005574944544802000200280005
  19. 50726963650800040000000000085175616E7469747908000400000000000A54
  20. 6F74616C507269636508000400000000000000}
  21. object cdsBGLExecutionBGLCode: TWideStringField
  22. FieldName = 'BGLCode'
  23. Size = 50
  24. end
  25. object cdsBGLExecutionCode: TStringField
  26. FieldName = 'Code'
  27. Size = 50
  28. end
  29. object cdsBGLExecutionB_Code: TStringField
  30. FieldName = 'B_Code'
  31. Size = 50
  32. end
  33. object cdsBGLExecutionName: TWideStringField
  34. FieldName = 'Name'
  35. Size = 100
  36. end
  37. object cdsBGLExecutionUnits: TWideStringField
  38. FieldName = 'Units'
  39. end
  40. object cdsBGLExecutionPrice: TFloatField
  41. FieldName = 'Price'
  42. end
  43. object cdsBGLExecutionQuantity: TFloatField
  44. FieldName = 'Quantity'
  45. end
  46. object cdsBGLExecutionTotalPrice: TFloatField
  47. FieldName = 'TotalPrice'
  48. end
  49. end
  50. end