Szállításból -> számla lehessen Pénztári bizonylat is.

2017-04-25 12:52:07 +02:00
parent 312bdf847a
commit 5f830a16b5
1 changed files with 6 additions and 0 deletions
@@ -3820,6 +3820,12 @@ CheckError:
            _InvoiceHeader.RecalculateInvoice(_InvoiceHeader, _onew)
            _onew.CommitChanges()

+            'Készpénz esetén pénztári bizonylat is !!!
+            If _ORI_Invoice_Popup.IsLiquidAssets AndAlso _ORI_Invoice_Popup.PaymentOption.PayMode = ePayMode.InCash And _ORI_Invoice_Popup.IsFinalInvoice Then
+                CreateGLCassa(_InvoiceHeader, _onew, _ORI_Invoice_Popup)
+            End If
+
+
            If _InvoiceHeader IsNot Nothing Then
                Dim _XAFPrintHelper_I As New XAFPrintHelper(_onew, Frame, _InvoiceHeader.InvoiceType.ReportDataV2, CriteriaOperator.Parse("InvoiceHeader.Oid = ?", _InvoiceHeader.Oid))
                _XAFPrintHelper_I.ShowPreviewV2()