Jelajahi Sumber

清单汇总,明细中未显示桩号、数量

MaiXinRong 9 tahun lalu
induk
melakukan
dc2d29f0df
3 mengubah file dengan 81 tambahan dan 70 penghapusan
  1. 77 69
      DataModules/BillsGatherDm.dfm
  2. 3 0
      DataModules/BillsGatherDm.pas
  3. 1 1
      Frames/BillsGatherFme.dfm

+ 77 - 69
DataModules/BillsGatherDm.dfm

@@ -305,81 +305,86 @@ object BillsGatherData: TBillsGatherData
       79080F4E65656450726F636573734E616D65090001044E616D65060B44726177
       696E67436F6465094669656C644E616D65060B44726177696E67436F64650844
       617461547970650218084461746153697A6502320549734B6579080F4E656564
-      50726F636573734E616D65090001044E616D65060F4375724465616C5175616E
-      74697479094669656C644E616D65060F4375724465616C5175616E7469747908
+      50726F636573734E616D65090001044E616D6506085175616E74697479094669
+      656C644E616D6506085175616E74697479084461746154797065020608446174
+      6153697A6502080549734B6579080F4E65656450726F636573734E616D650900
+      01044E616D65060A546F74616C5072696365094669656C644E616D65060A546F
+      74616C50726963650844617461547970650206084461746153697A6502080549
+      734B6579080F4E65656450726F636573734E616D65090001044E616D65060F43
+      75724465616C5175616E74697479094669656C644E616D65060F437572446561
+      6C5175616E746974790844617461547970650206084461746153697A65020805
+      49734B6579080F4E65656450726F636573734E616D65090001044E616D650611
+      4375724465616C546F74616C5072696365094669656C644E616D650611437572
+      4465616C546F74616C5072696365084461746154797065020608446174615369
+      7A6502080549734B6579080F4E65656450726F636573734E616D65090001044E
+      616D65060D43757251635175616E74697479094669656C644E616D65060D4375
+      7251635175616E746974790844617461547970650206084461746153697A6502
+      080549734B6579080F4E65656450726F636573734E616D65090001044E616D65
+      060F4375725163546F74616C5072696365094669656C644E616D65060F437572
+      5163546F74616C50726963650844617461547970650206084461746153697A65
+      02080549734B6579080F4E65656450726F636573734E616D65090001044E616D
+      6506114375724761746865725175616E74697479094669656C644E616D650611
+      4375724761746865725175616E74697479084461746154797065020608446174
+      6153697A6502080549734B6579080F4E65656450726F636573734E616D650900
+      01044E616D650613437572476174686572546F74616C5072696365094669656C
+      644E616D650613437572476174686572546F74616C5072696365084461746154
+      7970650206084461746153697A6502080549734B6579080F4E65656450726F63
+      6573734E616D65090001044E616D65060F5072654465616C5175616E74697479
+      094669656C644E616D65060F5072654465616C5175616E746974790844617461
+      547970650206084461746153697A6502080549734B6579080F4E65656450726F
+      636573734E616D65090001044E616D6506115072654465616C546F74616C5072
+      696365094669656C644E616D6506115072654465616C546F74616C5072696365
+      0844617461547970650206084461746153697A6502080549734B6579080F4E65
+      656450726F636573734E616D65090001044E616D65060D50726551635175616E
+      74697479094669656C644E616D65060D50726551635175616E74697479084461
+      7461547970650206084461746153697A6502080549734B6579080F4E65656450
+      726F636573734E616D65090001044E616D65060F5072655163546F74616C5072
+      696365094669656C644E616D65060F5072655163546F74616C50726963650844
+      617461547970650206084461746153697A6502080549734B6579080F4E656564
+      50726F636573734E616D65090001044E616D6506115072654761746865725175
+      616E74697479094669656C644E616D6506115072654761746865725175616E74
+      6974790844617461547970650206084461746153697A6502080549734B657908
+      0F4E65656450726F636573734E616D65090001044E616D650613507265476174
+      686572546F74616C5072696365094669656C644E616D65061350726547617468
+      6572546F74616C50726963650844617461547970650206084461746153697A65
+      02080549734B6579080F4E65656450726F636573734E616D65090001044E616D
+      65060F4164644465616C5175616E74697479094669656C644E616D65060F4164
+      644465616C5175616E746974790844617461547970650206084461746153697A
+      6502080549734B6579080F4E65656450726F636573734E616D65090001044E61
+      6D6506114164644465616C546F74616C5072696365094669656C644E616D6506
+      114164644465616C546F74616C50726963650844617461547970650206084461
+      746153697A6502080549734B6579080F4E65656450726F636573734E616D6509
+      0001044E616D65060D41646451635175616E74697479094669656C644E616D65
+      060D41646451635175616E746974790844617461547970650206084461746153
+      697A6502080549734B6579080F4E65656450726F636573734E616D6509000104
+      4E616D65060F4164645163546F74616C5072696365094669656C644E616D6506
+      0F4164645163546F74616C507269636508446174615479706502060844617461
+      53697A6502080549734B6579080F4E65656450726F636573734E616D65090001
+      044E616D6506114164644761746865725175616E74697479094669656C644E61
+      6D6506114164644761746865725175616E746974790844617461547970650206
+      084461746153697A6502080549734B6579080F4E65656450726F636573734E61
+      6D65090001044E616D650613416464476174686572546F74616C507269636509
+      4669656C644E616D650613416464476174686572546F74616C50726963650844
+      617461547970650206084461746153697A6502080549734B6579080F4E656564
+      50726F636573734E616D65090001044E616D65060F456E644465616C5175616E
+      74697479094669656C644E616D65060F456E644465616C5175616E7469747908
       44617461547970650206084461746153697A6502080549734B6579080F4E6565
-      6450726F636573734E616D65090001044E616D6506114375724465616C546F74
-      616C5072696365094669656C644E616D6506114375724465616C546F74616C50
+      6450726F636573734E616D65090001044E616D650611456E644465616C546F74
+      616C5072696365094669656C644E616D650611456E644465616C546F74616C50
       726963650844617461547970650206084461746153697A6502080549734B6579
-      080F4E65656450726F636573734E616D65090001044E616D65060D4375725163
-      5175616E74697479094669656C644E616D65060D43757251635175616E746974
+      080F4E65656450726F636573734E616D65090001044E616D65060D456E645163
+      5175616E74697479094669656C644E616D65060D456E6451635175616E746974
       790844617461547970650206084461746153697A6502080549734B6579080F4E
-      65656450726F636573734E616D65090001044E616D65060F4375725163546F74
-      616C5072696365094669656C644E616D65060F4375725163546F74616C507269
+      65656450726F636573734E616D65090001044E616D65060F456E645163546F74
+      616C5072696365094669656C644E616D65060F456E645163546F74616C507269
       63650844617461547970650206084461746153697A6502080549734B6579080F
-      4E65656450726F636573734E616D65090001044E616D65061143757247617468
-      65725175616E74697479094669656C644E616D65061143757247617468657251
+      4E65656450726F636573734E616D65090001044E616D650611456E6447617468
+      65725175616E74697479094669656C644E616D650611456E6447617468657251
       75616E746974790844617461547970650206084461746153697A650208054973
-      4B6579080F4E65656450726F636573734E616D65090001044E616D6506134375
-      72476174686572546F74616C5072696365094669656C644E616D650613437572
+      4B6579080F4E65656450726F636573734E616D65090001044E616D650613456E
+      64476174686572546F74616C5072696365094669656C644E616D650613456E64
       476174686572546F74616C507269636508446174615479706502060844617461
-      53697A6502080549734B6579080F4E65656450726F636573734E616D65090001
-      044E616D65060F5072654465616C5175616E74697479094669656C644E616D65
-      060F5072654465616C5175616E74697479084461746154797065020608446174
-      6153697A6502080549734B6579080F4E65656450726F636573734E616D650900
-      01044E616D6506115072654465616C546F74616C5072696365094669656C644E
-      616D6506115072654465616C546F74616C507269636508446174615479706502
-      06084461746153697A6502080549734B6579080F4E65656450726F636573734E
-      616D65090001044E616D65060D50726551635175616E74697479094669656C64
-      4E616D65060D50726551635175616E7469747908446174615479706502060844
-      61746153697A6502080549734B6579080F4E65656450726F636573734E616D65
-      090001044E616D65060F5072655163546F74616C5072696365094669656C644E
-      616D65060F5072655163546F74616C5072696365084461746154797065020608
-      4461746153697A6502080549734B6579080F4E65656450726F636573734E616D
-      65090001044E616D6506115072654761746865725175616E7469747909466965
-      6C644E616D6506115072654761746865725175616E7469747908446174615479
-      70650206084461746153697A6502080549734B6579080F4E65656450726F6365
-      73734E616D65090001044E616D650613507265476174686572546F74616C5072
-      696365094669656C644E616D650613507265476174686572546F74616C507269
-      63650844617461547970650206084461746153697A6502080549734B6579080F
-      4E65656450726F636573734E616D65090001044E616D65060F4164644465616C
-      5175616E74697479094669656C644E616D65060F4164644465616C5175616E74
-      6974790844617461547970650206084461746153697A6502080549734B657908
-      0F4E65656450726F636573734E616D65090001044E616D650611416464446561
-      6C546F74616C5072696365094669656C644E616D6506114164644465616C546F
-      74616C50726963650844617461547970650206084461746153697A6502080549
-      734B6579080F4E65656450726F636573734E616D65090001044E616D65060D41
-      646451635175616E74697479094669656C644E616D65060D4164645163517561
-      6E746974790844617461547970650206084461746153697A6502080549734B65
-      79080F4E65656450726F636573734E616D65090001044E616D65060F41646451
-      63546F74616C5072696365094669656C644E616D65060F4164645163546F7461
-      6C50726963650844617461547970650206084461746153697A6502080549734B
-      6579080F4E65656450726F636573734E616D65090001044E616D650611416464
-      4761746865725175616E74697479094669656C644E616D650611416464476174
-      6865725175616E746974790844617461547970650206084461746153697A6502
-      080549734B6579080F4E65656450726F636573734E616D65090001044E616D65
-      0613416464476174686572546F74616C5072696365094669656C644E616D6506
-      13416464476174686572546F74616C5072696365084461746154797065020608
-      4461746153697A6502080549734B6579080F4E65656450726F636573734E616D
-      65090001044E616D65060F456E644465616C5175616E74697479094669656C64
-      4E616D65060F456E644465616C5175616E746974790844617461547970650206
-      084461746153697A6502080549734B6579080F4E65656450726F636573734E61
-      6D65090001044E616D650611456E644465616C546F74616C5072696365094669
-      656C644E616D650611456E644465616C546F74616C5072696365084461746154
-      7970650206084461746153697A6502080549734B6579080F4E65656450726F63
-      6573734E616D65090001044E616D65060D456E6451635175616E746974790946
-      69656C644E616D65060D456E6451635175616E74697479084461746154797065
-      0206084461746153697A6502080549734B6579080F4E65656450726F63657373
-      4E616D65090001044E616D65060F456E645163546F74616C5072696365094669
-      656C644E616D65060F456E645163546F74616C50726963650844617461547970
-      650206084461746153697A6502080549734B6579080F4E65656450726F636573
-      734E616D65090001044E616D650611456E644761746865725175616E74697479
-      094669656C644E616D650611456E644761746865725175616E74697479084461
-      7461547970650206084461746153697A6502080549734B6579080F4E65656450
-      726F636573734E616D65090001044E616D650613456E64476174686572546F74
-      616C5072696365094669656C644E616D650613456E64476174686572546F7461
-      6C50726963650844617461547970650206084461746153697A6502080549734B
-      6579080F4E65656450726F636573734E616D65090000}
+      53697A6502080549734B6579080F4E65656450726F636573734E616D65090000}
   end
   object sdvDetailGclBills: TsdDataView
     Active = False
@@ -415,6 +420,9 @@ object BillsGatherData: TBillsGatherData
       end
       item
         FieldName = 'DrawingCode'
+      end
+      item
+        FieldName = 'Quantity'
       end>
     OnFilterRecord = sdvDetailGclBillsFilterRecord
     Left = 40

+ 3 - 0
DataModules/BillsGatherDm.pas

@@ -224,6 +224,9 @@ procedure TBillsGatherData.WriteGatherRecord(AGcls: TList);
         Rec.ValueByName('DrawingCode').AsString := vDetailGcl.LeafXmj.DrawingCode;
       end;
 
+      Rec.ValueByName('Quantity').AsFloat := vDetailGcl.Quantity;
+      Rec.ValueByName('TotalPrice').AsFloat := vDetailGcl.TotalPrice;
+
       Rec.ValueByName('CurDealQuantity').AsFloat := vDetailGcl.CurDealQuantity;
       Rec.ValueByName('CurDealTotalPrice').AsFloat := vDetailGcl.CurDealTotalPrice;
       Rec.ValueByName('CurQcQuantity').AsFloat := vDetailGcl.CurQcQuantity;

+ 1 - 1
Frames/BillsGatherFme.dfm

@@ -266,7 +266,7 @@ object BillsGatherFrame: TBillsGatherFrame
         Font.Height = -12
         Font.Name = #23435#20307
         Font.Style = []
-        FieldName = 'Pos'
+        FieldName = 'Peg'
         Width = 180
         ReadOnly = True
       end