rmGcl_XmjBillsDm.dfm 6.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251
  1. object rmGcl_XmjBillsData: TrmGcl_XmjBillsData
  2. OldCreateOrder = False
  3. Left = 795
  4. Top = 218
  5. Height = 150
  6. Width = 215
  7. object cdsGcl: TClientDataSet
  8. Active = True
  9. Aggregates = <>
  10. FieldDefs = <
  11. item
  12. Name = 'IndexCode'
  13. DataType = ftString
  14. Size = 50
  15. end
  16. item
  17. Name = 'IndexID'
  18. DataType = ftInteger
  19. end
  20. item
  21. Name = 'B_Code'
  22. DataType = ftString
  23. Size = 50
  24. end
  25. item
  26. Name = 'Name'
  27. DataType = ftWideString
  28. Size = 200
  29. end
  30. item
  31. Name = 'Code'
  32. DataType = ftString
  33. Size = 50
  34. end
  35. item
  36. Name = 'Peg'
  37. DataType = ftWideString
  38. Size = 50
  39. end
  40. item
  41. Name = 'NameDanWei'
  42. DataType = ftWideString
  43. Size = 200
  44. end
  45. item
  46. Name = 'NameFenBu'
  47. DataType = ftWideString
  48. Size = 200
  49. end
  50. item
  51. Name = 'NameFenXiang'
  52. DataType = ftWideString
  53. Size = 200
  54. end
  55. item
  56. Name = 'NameUnit'
  57. DataType = ftWideString
  58. Size = 200
  59. end
  60. item
  61. Name = 'DrawingCode'
  62. DataType = ftWideString
  63. Size = 50
  64. end
  65. item
  66. Name = 'Price'
  67. DataType = ftFloat
  68. end
  69. item
  70. Name = 'Quantity'
  71. DataType = ftFloat
  72. end
  73. item
  74. Name = 'TotalPrice'
  75. DataType = ftFloat
  76. end
  77. item
  78. Name = 'DealQuantity'
  79. DataType = ftFloat
  80. end
  81. item
  82. Name = 'DealTotalPrice'
  83. DataType = ftFloat
  84. end
  85. item
  86. Name = 'DifferQuantity'
  87. DataType = ftFloat
  88. end
  89. item
  90. Name = 'DifferTotalPrice'
  91. DataType = ftFloat
  92. end
  93. item
  94. Name = 'Units'
  95. DataType = ftWideString
  96. Size = 20
  97. end
  98. item
  99. Name = 'NewPrice'
  100. DataType = ftFloat
  101. end
  102. item
  103. Name = 'Position'
  104. DataType = ftWideString
  105. Size = 255
  106. end
  107. item
  108. Name = 'OrgQuantity'
  109. DataType = ftFloat
  110. end
  111. item
  112. Name = 'OrgTotalPrice'
  113. DataType = ftFloat
  114. end
  115. item
  116. Name = 'MisQuantity'
  117. DataType = ftFloat
  118. end
  119. item
  120. Name = 'MisTotalPrice'
  121. DataType = ftFloat
  122. end
  123. item
  124. Name = 'OthQuantity'
  125. DataType = ftFloat
  126. end
  127. item
  128. Name = 'OthTotalPrice'
  129. DataType = ftFloat
  130. end>
  131. IndexDefs = <>
  132. Params = <>
  133. StoreDefs = True
  134. Left = 56
  135. Top = 48
  136. Data = {
  137. 9C0200009619E0BD01000000180000001B0000000000030000009C0209496E64
  138. 6578436F6465010049000000010005574944544802000200320007496E646578
  139. 4944040001000000000006425F436F6465010049000000010005574944544802
  140. 0002003200044E616D6502004A00000001000557494454480200020090010443
  141. 6F646501004900000001000557494454480200020032000350656701004A0000
  142. 0001000557494454480200020064000A4E616D6544616E57656902004A000000
  143. 0100055749445448020002009001094E616D6546656E427502004A0000000100
  144. 0557494454480200020090010C4E616D6546656E5869616E6702004A00000001
  145. 00055749445448020002009001084E616D65556E697402004A00000001000557
  146. 494454480200020090010B44726177696E67436F646501004A00000001000557
  147. 494454480200020064000550726963650800040000000000085175616E746974
  148. 7908000400000000000A546F74616C507269636508000400000000000C446561
  149. 6C5175616E7469747908000400000000000E4465616C546F74616C5072696365
  150. 08000400000000000E4469666665725175616E74697479080004000000000010
  151. 446966666572546F74616C5072696365080004000000000005556E6974730100
  152. 4A0000000100055749445448020002002800084E657750726963650800040000
  153. 00000008506F736974696F6E02004A000000010005574944544802000200FE01
  154. 0B4F72675175616E7469747908000400000000000D4F7267546F74616C507269
  155. 636508000400000000000B4D69735175616E7469747908000400000000000D4D
  156. 6973546F74616C507269636508000400000000000B4F74685175616E74697479
  157. 08000400000000000D4F7468546F74616C507269636508000400000000000000}
  158. object cdsGclIndexCode: TStringField
  159. FieldName = 'IndexCode'
  160. Size = 50
  161. end
  162. object cdsGclIndexID: TIntegerField
  163. FieldName = 'IndexID'
  164. end
  165. object cdsGclB_Code: TStringField
  166. FieldName = 'B_Code'
  167. Size = 50
  168. end
  169. object cdsGclName: TWideStringField
  170. FieldName = 'Name'
  171. Size = 200
  172. end
  173. object cdsGclCode: TStringField
  174. FieldName = 'Code'
  175. Size = 50
  176. end
  177. object cdsGclPeg: TWideStringField
  178. FieldName = 'Peg'
  179. Size = 50
  180. end
  181. object cdsGclNameDanWei: TWideStringField
  182. FieldName = 'NameDanWei'
  183. Size = 200
  184. end
  185. object cdsGclNameFenBu: TWideStringField
  186. FieldName = 'NameFenBu'
  187. Size = 200
  188. end
  189. object cdsGclNameFenXiang: TWideStringField
  190. FieldName = 'NameFenXiang'
  191. Size = 200
  192. end
  193. object cdsGclNameUnit: TWideStringField
  194. FieldName = 'NameUnit'
  195. Size = 200
  196. end
  197. object cdsGclDrawingCode: TWideStringField
  198. FieldName = 'DrawingCode'
  199. Size = 50
  200. end
  201. object cdsGclPrice: TFloatField
  202. FieldName = 'Price'
  203. end
  204. object cdsGclQuantity: TFloatField
  205. FieldName = 'Quantity'
  206. end
  207. object cdsGclTotalPrice: TFloatField
  208. FieldName = 'TotalPrice'
  209. end
  210. object cdsGclDealQuantity: TFloatField
  211. FieldName = 'DealQuantity'
  212. end
  213. object cdsGclDealTotalPrice: TFloatField
  214. FieldName = 'DealTotalPrice'
  215. end
  216. object cdsGclDifferQuantity: TFloatField
  217. FieldName = 'DifferQuantity'
  218. end
  219. object cdsGclDifferTotalPrice: TFloatField
  220. FieldName = 'DifferTotalPrice'
  221. end
  222. object cdsGclUnits: TWideStringField
  223. FieldName = 'Units'
  224. end
  225. object cdsGclNewPrice: TFloatField
  226. FieldName = 'NewPrice'
  227. end
  228. object cdsGclPosition: TWideStringField
  229. FieldName = 'Position'
  230. Size = 255
  231. end
  232. object cdsGclOrgQuantity: TFloatField
  233. FieldName = 'OrgQuantity'
  234. end
  235. object cdsGclOrgTotalPrice: TFloatField
  236. FieldName = 'OrgTotalPrice'
  237. end
  238. object cdsGclMisQuantity: TFloatField
  239. FieldName = 'MisQuantity'
  240. end
  241. object cdsGclMisTotalPrice: TFloatField
  242. FieldName = 'MisTotalPrice'
  243. end
  244. object cdsGclOthQuantity: TFloatField
  245. FieldName = 'OthQuantity'
  246. end
  247. object cdsGclOthTotalPrice: TFloatField
  248. FieldName = 'OthTotalPrice'
  249. end
  250. end
  251. end