to és tonna figyelembevétele
This commit is contained in:
+2
-2
@@ -771,7 +771,7 @@ Public Class VATReportVC
|
||||
If _InvoiceRows_07.DeliveryNoteOutRows.StorageOutRowsInRows IsNot Nothing Then
|
||||
If _InvoiceRows_07.DeliveryNoteOutRows.StorageOutRowsInRows.StorageInRows.DeliveryNoteInRows IsNot Nothing Then
|
||||
Select Case _InvoiceRows_07.DeliveryNoteOutRows.StorageOutRowsInRows.StorageInRows.DeliveryNoteInRows.Units.ShortName
|
||||
Case "to"
|
||||
Case "to", "tonna"
|
||||
_InvoiceRows_07.DeliveryNoteOutRows.StorageOutRowsInRows.StorageInRows.DeliveryNoteInRows.WeightMode = eWeightMode.eTotalWeightperQuantity
|
||||
_InvoiceRows_07.DeliveryNoteOutRows.StorageOutRowsInRows.StorageInRows.DeliveryNoteInRows.Weight = _InvoiceRows_07.DeliveryNoteOutRows.StorageOutRowsInRows.StorageInRows.DeliveryNoteInRows.QTT * 1000
|
||||
_InvoiceRows_07.DeliveryNoteOutRows.StorageOutRowsInRows.StorageInRows.DeliveryNoteInRows.Save()
|
||||
@@ -796,7 +796,7 @@ Public Class VATReportVC
|
||||
For Each _StorageOutRowsInRows_07 In _InvoiceRows_07.StorageOutRowsInRows
|
||||
If _StorageOutRowsInRows_07.StorageInRows.DeliveryNoteInRows IsNot Nothing Then
|
||||
Select Case _StorageOutRowsInRows_07.StorageInRows.DeliveryNoteInRows.Units.ShortName
|
||||
Case "to"
|
||||
Case "to", "tonna"
|
||||
_StorageOutRowsInRows_07.StorageInRows.DeliveryNoteInRows.WeightMode = eWeightMode.eTotalWeightperQuantity
|
||||
_StorageOutRowsInRows_07.StorageInRows.DeliveryNoteInRows.Weight = _StorageOutRowsInRows_07.StorageInRows.DeliveryNoteInRows.QTT * 1000
|
||||
_StorageOutRowsInRows_07.StorageInRows.DeliveryNoteInRows.Save()
|
||||
|
||||
Reference in New Issue
Block a user