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

Nemtom commit szarság

Browse Source
This commit is contained in:
ivanszabo
2018-05-08 15:54:14 +02:00
parent 766436dc59
commit 2698dd20aa
170 changed files with 327 additions and 294 deletions
Download Patch File Download Diff File Expand all files Collapse all files
SISBusiness.Module/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Reports/VAT/VATReportVC.vb
+18 -19
View File
@@ -156,26 +156,25 @@ Public Class VATReportVC
_uow.Delete(_VATReportGroupCustomers2M_Collection)
Select Case GLOBAL_SQLType
Case eSQLType.MySQL
_SQL = " UPDATE InvoiceVATRows t1 JOIN Invoiceheader t2 ON"
_SQL += " t1.InvoiceHeader = t2.Oid"
_SQL += " SET t1.DateVAT = t2.DateExecution"
_SQL += " WHERE t1.DateVAT IS NULL AND t2.GCRecord IS NULL"
Case eSQLType.MSSQL
_SQL = " UPDATE InvoiceVATRows SET DateVAT=t2.DateExecution"
_SQL += " from InvoiceVATRows t1 JOIN Invoiceheader t2 ON"
_SQL += " t1.InvoiceHeader = t2.Oid"
_SQL += " WHERE t1.DateVAT Is NULL And t2.GCRecord Is NULL"
Case eSQLType.PostgreSQL
_SQL = "UPDATE ""InvoiceVATRows"" set ""DateVAT""=t2.""DateExecution"""
_SQL += " from ""InvoiceVATRows"" t1 JOIN ""InvoiceHeader"" t2 ON"
_SQL += " t1.""InvoiceHeader""=t2.""Oid"""
_SQL += " WHERE t1.""DateVAT"" IS NULL AND t2.""GCRecord"" IS NULL"
End Select
'Select Case GLOBAL_SQLType
' Case eSQLType.MySQL
' _SQL = "UPDATE InvoiceVATRows t1 JOIN InvoiceHeader t2 ON t1.InvoiceHeader = t2.Oid "
' _SQL += " SET t1.DateVAT=t2.DateExecution"
' _SQL += " WHERE t1.DateVAT IS NULL AND t2.GCRecord IS NULL"
' Case eSQLType.MSSQL
' _SQL = " UPDATE InvoiceVATRows SET DateVAT=t2.DateExecution"
' _SQL += " from InvoiceVATRows t1 JOIN InvoiceHeader t2 ON"
' _SQL += " t1.InvoiceHeader = t2.Oid"
' _SQL += " WHERE t1.DateVAT Is NULL And t2.GCRecord Is NULL"
' Case eSQLType.PostgreSQL
' _SQL = "UPDATE ""InvoiceVATRows"" set ""DateVAT""=t2.""DateExecution"""
' _SQL += " from ""InvoiceVATRows"" t1 JOIN ""InvoiceHeader"" t2 ON"
' _SQL += " t1.""InvoiceHeader""=t2.""Oid"""
' _SQL += " WHERE t1.""DateVAT"" IS NULL AND t2.""GCRecord"" IS NULL"
'End Select
_uow.ExecuteNonQuery(_SQL)
_uow.CommitChanges()
'_uow.ExecuteNonQuery(_SQL)
'_uow.CommitChanges()
'ÁFA P.Ü. szemlélet ellenõrzése -----------------------------------------
Me.CheckVATAvowalType(_ocur, _VATReport.DateFrom, _VATReport.DateTo)