| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416 | 
							- object rmGclBillsAddData: TrmGclBillsAddData
 
-   OldCreateOrder = False
 
-   Left = 745
 
-   Top = 306
 
-   Height = 150
 
-   Width = 215
 
-   object cdsBills: TClientDataSet
 
-     Active = True
 
-     Aggregates = <>
 
-     IndexFieldNames = 'IndexCode'
 
-     Params = <>
 
-     Left = 56
 
-     Top = 40
 
-     Data = {
 
-       A20800009619E0BD01000000180000006D000000000003000000A20806425F43
 
-       6F6465010049000000010005574944544802000200320009496E646578436F64
 
-       650100490000000100055749445448020002003200044E616D6501004A000000
 
-       010005574944544802000200C80005556E69747301004A000000010005574944
 
-       544802000200280005507269636508000400000000000C4465616C5175616E74
 
-       69747908000400000000000E4465616C546F74616C5072696365080004000000
 
-       0000085175616E7469747908000400000000000A546F74616C50726963650800
 
-       040000000000095175616E746974793108000400000000000B546F74616C5072
 
-       696365310800040000000000095175616E746974793208000400000000000B54
 
-       6F74616C5072696365320800040000000000095175616E746974793308000400
 
-       000000000B546F74616C5072696365330800040000000000095175616E746974
 
-       793408000400000000000B546F74616C50726963653408000400000000000951
 
-       75616E746974793508000400000000000B546F74616C50726963653508000400
 
-       00000000095175616E746974793608000400000000000B546F74616C50726963
 
-       65360800040000000000095175616E746974793708000400000000000B546F74
 
-       616C5072696365370800040000000000095175616E7469747938080004000000
 
-       00000B546F74616C5072696365380800040000000000095175616E7469747939
 
-       08000400000000000B546F74616C50726963653908000400000000000A517561
 
-       6E74697479313008000400000000000C546F74616C5072696365313008000400
 
-       000000000A5175616E74697479313108000400000000000C546F74616C507269
 
-       6365313108000400000000000A5175616E74697479313208000400000000000C
 
-       546F74616C5072696365313208000400000000000A5175616E74697479313308
 
-       000400000000000C546F74616C5072696365313308000400000000000A517561
 
-       6E74697479313408000400000000000C546F74616C5072696365313408000400
 
-       000000000A5175616E74697479313508000400000000000C546F74616C507269
 
-       6365313508000400000000000A5175616E74697479313608000400000000000C
 
-       546F74616C5072696365313608000400000000000A5175616E74697479313708
 
-       000400000000000C546F74616C5072696365313708000400000000000A517561
 
-       6E74697479313808000400000000000C546F74616C5072696365313808000400
 
-       000000000A5175616E74697479313908000400000000000C546F74616C507269
 
-       6365313908000400000000000A5175616E74697479323008000400000000000C
 
-       546F74616C5072696365323008000400000000000A5175616E74697479323108
 
-       000400000000000C546F74616C5072696365323108000400000000000A517561
 
-       6E74697479323208000400000000000C546F74616C5072696365323208000400
 
-       000000000A5175616E74697479323308000400000000000C546F74616C507269
 
-       6365323308000400000000000A5175616E74697479323408000400000000000C
 
-       546F74616C5072696365323408000400000000000A5175616E74697479323508
 
-       000400000000000C546F74616C5072696365323508000400000000000A517561
 
-       6E74697479323608000400000000000C546F74616C5072696365323608000400
 
-       000000000A5175616E74697479323708000400000000000C546F74616C507269
 
-       6365323708000400000000000A5175616E74697479323808000400000000000C
 
-       546F74616C5072696365323808000400000000000A5175616E74697479323908
 
-       000400000000000C546F74616C5072696365323908000400000000000A517561
 
-       6E74697479333008000400000000000C546F74616C5072696365333008000400
 
-       000000000A5175616E74697479333108000400000000000C546F74616C507269
 
-       6365333108000400000000000A5175616E74697479333208000400000000000C
 
-       546F74616C5072696365333208000400000000000A5175616E74697479333308
 
-       000400000000000C546F74616C5072696365333308000400000000000A517561
 
-       6E74697479333408000400000000000C546F74616C5072696365333408000400
 
-       000000000A5175616E74697479333508000400000000000C546F74616C507269
 
-       6365333508000400000000000A5175616E74697479333608000400000000000C
 
-       546F74616C5072696365333608000400000000000A5175616E74697479333708
 
-       000400000000000C546F74616C5072696365333708000400000000000A517561
 
-       6E74697479333808000400000000000C546F74616C5072696365333808000400
 
-       000000000A5175616E74697479333908000400000000000C546F74616C507269
 
-       6365333908000400000000000A5175616E74697479343008000400000000000C
 
-       546F74616C5072696365343008000400000000000A5175616E74697479343108
 
-       000400000000000C546F74616C5072696365343108000400000000000A517561
 
-       6E74697479343208000400000000000C546F74616C5072696365343208000400
 
-       000000000A5175616E74697479343308000400000000000C546F74616C507269
 
-       6365343308000400000000000A5175616E74697479343408000400000000000C
 
-       546F74616C5072696365343408000400000000000A5175616E74697479343508
 
-       000400000000000C546F74616C5072696365343508000400000000000A517561
 
-       6E74697479343608000400000000000C546F74616C5072696365343608000400
 
-       000000000A5175616E74697479343708000400000000000C546F74616C507269
 
-       6365343708000400000000000A5175616E74697479343808000400000000000C
 
-       546F74616C5072696365343808000400000000000A5175616E74697479343908
 
-       000400000000000C546F74616C5072696365343908000400000000000A517561
 
-       6E74697479353008000400000000000C546F74616C5072696365353008000400
 
-       000000000000}
 
-     object cdsBillsB_Code: TStringField
 
-       FieldName = 'B_Code'
 
-       Size = 50
 
-     end
 
-     object cdsBillsIndexCode: TStringField
 
-       FieldName = 'IndexCode'
 
-       Size = 50
 
-     end
 
-     object cdsBillsName: TWideStringField
 
-       FieldName = 'Name'
 
-       Size = 100
 
-     end
 
-     object cdsBillsUnits: TWideStringField
 
-       FieldName = 'Units'
 
-     end
 
-     object cdsBillsPrice: TFloatField
 
-       FieldName = 'Price'
 
-     end
 
-     object cdsBillsDealQuantity: TFloatField
 
-       FieldName = 'DealQuantity'
 
-     end
 
-     object cdsBillsDealTotalPrice: TFloatField
 
-       FieldName = 'DealTotalPrice'
 
-     end
 
-     object cdsBillsQuantity: TFloatField
 
-       FieldName = 'Quantity'
 
-     end
 
-     object cdsBillsTotalPrice: TFloatField
 
-       FieldName = 'TotalPrice'
 
-     end
 
-     object cdsBillsQuantity1: TFloatField
 
-       FieldName = 'Quantity1'
 
-     end
 
-     object cdsBillsTotalPrice1: TFloatField
 
-       FieldName = 'TotalPrice1'
 
-     end
 
-     object cdsBillsQuantity2: TFloatField
 
-       FieldName = 'Quantity2'
 
-     end
 
-     object cdsBillsTotalPrice2: TFloatField
 
-       FieldName = 'TotalPrice2'
 
-     end
 
-     object cdsBillsQuantity3: TFloatField
 
-       FieldName = 'Quantity3'
 
-     end
 
-     object cdsBillsTotalPrice3: TFloatField
 
-       FieldName = 'TotalPrice3'
 
-     end
 
-     object cdsBillsQuantity4: TFloatField
 
-       FieldName = 'Quantity4'
 
-     end
 
-     object cdsBillsTotalPrice4: TFloatField
 
-       FieldName = 'TotalPrice4'
 
-     end
 
-     object cdsBillsQuantity5: TFloatField
 
-       FieldName = 'Quantity5'
 
-     end
 
-     object cdsBillsTotalPrice5: TFloatField
 
-       FieldName = 'TotalPrice5'
 
-     end
 
-     object cdsBillsQuantity6: TFloatField
 
-       FieldName = 'Quantity6'
 
-     end
 
-     object cdsBillsTotalPrice6: TFloatField
 
-       FieldName = 'TotalPrice6'
 
-     end
 
-     object cdsBillsQuantity7: TFloatField
 
-       FieldName = 'Quantity7'
 
-     end
 
-     object cdsBillsTotalPrice7: TFloatField
 
-       FieldName = 'TotalPrice7'
 
-     end
 
-     object cdsBillsQuantity8: TFloatField
 
-       FieldName = 'Quantity8'
 
-     end
 
-     object cdsBillsTotalPrice8: TFloatField
 
-       FieldName = 'TotalPrice8'
 
-     end
 
-     object cdsBillsQuantity9: TFloatField
 
-       FieldName = 'Quantity9'
 
-     end
 
-     object cdsBillsTotalPrice9: TFloatField
 
-       FieldName = 'TotalPrice9'
 
-     end
 
-     object cdsBillsQuantity10: TFloatField
 
-       FieldName = 'Quantity10'
 
-     end
 
-     object cdsBillsTotalPrice10: TFloatField
 
-       FieldName = 'TotalPrice10'
 
-     end
 
-     object cdsBillsQuantity11: TFloatField
 
-       FieldName = 'Quantity11'
 
-     end
 
-     object cdsBillsTotalPrice11: TFloatField
 
-       FieldName = 'TotalPrice11'
 
-     end
 
-     object cdsBillsQuantity12: TFloatField
 
-       FieldName = 'Quantity12'
 
-     end
 
-     object cdsBillsTotalPrice12: TFloatField
 
-       FieldName = 'TotalPrice12'
 
-     end
 
-     object cdsBillsQuantity13: TFloatField
 
-       FieldName = 'Quantity13'
 
-     end
 
-     object cdsBillsTotalPrice13: TFloatField
 
-       FieldName = 'TotalPrice13'
 
-     end
 
-     object cdsBillsQuantity14: TFloatField
 
-       FieldName = 'Quantity14'
 
-     end
 
-     object cdsBillsTotalPrice14: TFloatField
 
-       FieldName = 'TotalPrice14'
 
-     end
 
-     object cdsBillsQuantity15: TFloatField
 
-       FieldName = 'Quantity15'
 
-     end
 
-     object cdsBillsTotalPrice15: TFloatField
 
-       FieldName = 'TotalPrice15'
 
-     end
 
-     object cdsBillsQuantity16: TFloatField
 
-       FieldName = 'Quantity16'
 
-     end
 
-     object cdsBillsTotalPrice16: TFloatField
 
-       FieldName = 'TotalPrice16'
 
-     end
 
-     object cdsBillsQuantity17: TFloatField
 
-       FieldName = 'Quantity17'
 
-     end
 
-     object cdsBillsTotalPrice17: TFloatField
 
-       FieldName = 'TotalPrice17'
 
-     end
 
-     object cdsBillsQuantity18: TFloatField
 
-       FieldName = 'Quantity18'
 
-     end
 
-     object cdsBillsTotalPrice18: TFloatField
 
-       FieldName = 'TotalPrice18'
 
-     end
 
-     object cdsBillsQuantity19: TFloatField
 
-       FieldName = 'Quantity19'
 
-     end
 
-     object cdsBillsTotalPrice19: TFloatField
 
-       FieldName = 'TotalPrice19'
 
-     end
 
-     object cdsBillsQuantity20: TFloatField
 
-       FieldName = 'Quantity20'
 
-     end
 
-     object cdsBillsTotalPrice20: TFloatField
 
-       FieldName = 'TotalPrice20'
 
-     end
 
-     object cdsBillsQuantity21: TFloatField
 
-       FieldName = 'Quantity21'
 
-     end
 
-     object cdsBillsTotalPrice21: TFloatField
 
-       FieldName = 'TotalPrice21'
 
-     end
 
-     object cdsBillsQuantity22: TFloatField
 
-       FieldName = 'Quantity22'
 
-     end
 
-     object cdsBillsTotalPrice22: TFloatField
 
-       FieldName = 'TotalPrice22'
 
-     end
 
-     object cdsBillsQuantity23: TFloatField
 
-       FieldName = 'Quantity23'
 
-     end
 
-     object cdsBillsTotalPrice23: TFloatField
 
-       FieldName = 'TotalPrice23'
 
-     end
 
-     object cdsBillsQuantity24: TFloatField
 
-       FieldName = 'Quantity24'
 
-     end
 
-     object cdsBillsTotalPrice24: TFloatField
 
-       FieldName = 'TotalPrice24'
 
-     end
 
-     object cdsBillsQuantity25: TFloatField
 
-       FieldName = 'Quantity25'
 
-     end
 
-     object cdsBillsTotalPrice25: TFloatField
 
-       FieldName = 'TotalPrice25'
 
-     end
 
-     object cdsBillsQuantity26: TFloatField
 
-       FieldName = 'Quantity26'
 
-     end
 
-     object cdsBillsTotalPrice26: TFloatField
 
-       FieldName = 'TotalPrice26'
 
-     end
 
-     object cdsBillsQuantity27: TFloatField
 
-       FieldName = 'Quantity27'
 
-     end
 
-     object cdsBillsTotalPrice27: TFloatField
 
-       FieldName = 'TotalPrice27'
 
-     end
 
-     object cdsBillsQuantity28: TFloatField
 
-       FieldName = 'Quantity28'
 
-     end
 
-     object cdsBillsTotalPrice28: TFloatField
 
-       FieldName = 'TotalPrice28'
 
-     end
 
-     object cdsBillsQuantity29: TFloatField
 
-       FieldName = 'Quantity29'
 
-     end
 
-     object cdsBillsTotalPrice29: TFloatField
 
-       FieldName = 'TotalPrice29'
 
-     end
 
-     object cdsBillsQuantity30: TFloatField
 
-       FieldName = 'Quantity30'
 
-     end
 
-     object cdsBillsTotalPrice30: TFloatField
 
-       FieldName = 'TotalPrice30'
 
-     end
 
-     object cdsBillsQuantity31: TFloatField
 
-       FieldName = 'Quantity31'
 
-     end
 
-     object cdsBillsTotalPrice31: TFloatField
 
-       FieldName = 'TotalPrice31'
 
-     end
 
-     object cdsBillsQuantity32: TFloatField
 
-       FieldName = 'Quantity32'
 
-     end
 
-     object cdsBillsTotalPrice32: TFloatField
 
-       FieldName = 'TotalPrice32'
 
-     end
 
-     object cdsBillsQuantity33: TFloatField
 
-       FieldName = 'Quantity33'
 
-     end
 
-     object cdsBillsTotalPrice33: TFloatField
 
-       FieldName = 'TotalPrice33'
 
-     end
 
-     object cdsBillsQuantity34: TFloatField
 
-       FieldName = 'Quantity34'
 
-     end
 
-     object cdsBillsTotalPrice34: TFloatField
 
-       FieldName = 'TotalPrice34'
 
-     end
 
-     object cdsBillsQuantity35: TFloatField
 
-       FieldName = 'Quantity35'
 
-     end
 
-     object cdsBillsTotalPrice35: TFloatField
 
-       FieldName = 'TotalPrice35'
 
-     end
 
-     object cdsBillsQuantity36: TFloatField
 
-       FieldName = 'Quantity36'
 
-     end
 
-     object cdsBillsTotalPrice36: TFloatField
 
-       FieldName = 'TotalPrice36'
 
-     end
 
-     object cdsBillsQuantity37: TFloatField
 
-       FieldName = 'Quantity37'
 
-     end
 
-     object cdsBillsTotalPrice37: TFloatField
 
-       FieldName = 'TotalPrice37'
 
-     end
 
-     object cdsBillsQuantity38: TFloatField
 
-       FieldName = 'Quantity38'
 
-     end
 
-     object cdsBillsTotalPrice38: TFloatField
 
-       FieldName = 'TotalPrice38'
 
-     end
 
-     object cdsBillsQuantity39: TFloatField
 
-       FieldName = 'Quantity39'
 
-     end
 
-     object cdsBillsTotalPrice39: TFloatField
 
-       FieldName = 'TotalPrice39'
 
-     end
 
-     object cdsBillsQuantity40: TFloatField
 
-       FieldName = 'Quantity40'
 
-     end
 
-     object cdsBillsTotalPrice40: TFloatField
 
-       FieldName = 'TotalPrice40'
 
-     end
 
-     object cdsBillsQuantity41: TFloatField
 
-       FieldName = 'Quantity41'
 
-     end
 
-     object cdsBillsTotalPrice41: TFloatField
 
-       FieldName = 'TotalPrice41'
 
-     end
 
-     object cdsBillsQuantity42: TFloatField
 
-       FieldName = 'Quantity42'
 
-     end
 
-     object cdsBillsTotalPrice42: TFloatField
 
-       FieldName = 'TotalPrice42'
 
-     end
 
-     object cdsBillsQuantity43: TFloatField
 
-       FieldName = 'Quantity43'
 
-     end
 
-     object cdsBillsTotalPrice43: TFloatField
 
-       FieldName = 'TotalPrice43'
 
-     end
 
-     object cdsBillsQuantity44: TFloatField
 
-       FieldName = 'Quantity44'
 
-     end
 
-     object cdsBillsTotalPrice44: TFloatField
 
-       FieldName = 'TotalPrice44'
 
-     end
 
-     object cdsBillsQuantity45: TFloatField
 
-       FieldName = 'Quantity45'
 
-     end
 
-     object cdsBillsTotalPrice45: TFloatField
 
-       FieldName = 'TotalPrice45'
 
-     end
 
-     object cdsBillsQuantity46: TFloatField
 
-       FieldName = 'Quantity46'
 
-     end
 
-     object cdsBillsTotalPrice46: TFloatField
 
-       FieldName = 'TotalPrice46'
 
-     end
 
-     object cdsBillsQuantity47: TFloatField
 
-       FieldName = 'Quantity47'
 
-     end
 
-     object cdsBillsTotalPrice47: TFloatField
 
-       FieldName = 'TotalPrice47'
 
-     end
 
-     object cdsBillsQuantity48: TFloatField
 
-       FieldName = 'Quantity48'
 
-     end
 
-     object cdsBillsTotalPrice48: TFloatField
 
-       FieldName = 'TotalPrice48'
 
-     end
 
-     object cdsBillsQuantity49: TFloatField
 
-       FieldName = 'Quantity49'
 
-     end
 
-     object cdsBillsTotalPrice49: TFloatField
 
-       FieldName = 'TotalPrice49'
 
-     end
 
-     object cdsBillsQuantity50: TFloatField
 
-       FieldName = 'Quantity50'
 
-     end
 
-     object cdsBillsTotalPrice50: TFloatField
 
-       FieldName = 'TotalPrice50'
 
-     end
 
-   end
 
- end
 
 
  |