ivanszabo/Nuvolar
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Egyéb javítások

Browse Source
This commit is contained in:
ivanszabo
2018-03-28 17:35:45 +02:00
parent 1282db15ca
commit 0ac6bd19e7
8 changed files with 36 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Nuvolar.Module/BusinessObjects/Business/StorageTransactions/Storage/StorageDateVC.vb
+16 -3
View File
@@ -84,7 +84,12 @@ Public Class StorageDateVC
_StorageDateClearingPrice = New StorageDateClearingPrice(_uow)
_StorageDateClearingPrice.RowIndex = 1
_StorageDateClearingPrice.CustomersFrom = _InvoiceRows.InvoiceHeader.CustomersFrom
_StorageDateClearingPrice.DateExecution = _InvoiceRows.InvoiceHeader.DateExecution.Date
If _InvoiceRows.DeliveryNoteOutRows IsNot Nothing Then
_StorageDateClearingPrice.DateExecution = _InvoiceRows.DeliveryNoteOutRows.DeliveryNoteOutHeader.DateExecution
Else
_StorageDateClearingPrice.DateExecution = _InvoiceRows.InvoiceHeader.DateExecution.Date
End If
_StorageDateClearingPrice.InvoiceRows = _InvoiceRows
_StorageDateClearingPrice.Products = _InvoiceRows.OrderInRows.Products
_StorageDateClearingPrice.QTT_Out = _InvoiceRows.QTT
@@ -213,7 +218,11 @@ Public Class StorageDateVC
_StorageDateClearingPrice = New StorageDateClearingPrice(_uow)
_StorageDateClearingPrice.RowIndex = 1
_StorageDateClearingPrice.CustomersFrom = _InvoiceRows.InvoiceHeader.CustomersFrom
_StorageDateClearingPrice.DateExecution = _InvoiceRows.InvoiceHeader.DateExecution.Date
If _InvoiceRows.DeliveryNoteOutRows IsNot Nothing Then
_StorageDateClearingPrice.DateExecution = _InvoiceRows.DeliveryNoteOutRows.DeliveryNoteOutHeader.DateExecution
Else
_StorageDateClearingPrice.DateExecution = _InvoiceRows.InvoiceHeader.DateExecution.Date
End If
_StorageDateClearingPrice.InvoiceRows = _InvoiceRows
_StorageDateClearingPrice.Products = _InvoiceRows.OrderInRows.Products
_StorageDateClearingPrice.QTT_Out = _InvoiceRows.QTT
@@ -644,7 +653,11 @@ Public Class StorageDateVC
_StorageDateClearingPrice = New StorageDateClearingPrice(_uow)
_StorageDateClearingPrice.RowIndex = 1
_StorageDateClearingPrice.CustomersFrom = _InvoiceRows.InvoiceHeader.CustomersFrom
_StorageDateClearingPrice.DateExecution = _InvoiceRows.InvoiceHeader.DateExecution.Date
If _InvoiceRows.DeliveryNoteOutRows IsNot Nothing Then
_StorageDateClearingPrice.DateExecution = _InvoiceRows.DeliveryNoteOutRows.DeliveryNoteOutHeader.DateExecution
Else
_StorageDateClearingPrice.DateExecution = _InvoiceRows.InvoiceHeader.DateExecution.Date
End If
_StorageDateClearingPrice.InvoiceRows = _InvoiceRows
_StorageDateClearingPrice.Products = _InvoiceRows.OrderInRows.Products
_StorageDateClearingPrice.QTT_Out = _InvoiceRows.QTT