edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

version, fakt, Formuale, Ubersicht, etc.

Browse Source
This commit is contained in:
d.breimaier
2026-02-06 09:19:49 +01:00
parent 5416e6f102
commit c1e158eeb7
12 changed files with 724 additions and 159 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
VERAG_PROG_ALLGEMEIN/Classes/cRMC.vb
View File

@@ -341,7 +341,7 @@ Public Class cRMC
Dim SQLFirst As String = ""
If getInvoiceData Then
SQLFirst = "SELECT [rmc_kdNr], [rmc_kdName], [rmc_landKZ], [rmc_reDatum], [rmc_reNr], [rmc_waehrung], case WHEN rmc_daid IS NULL THEN 0 else 1 end as PDF_Rechnung, case WHEN rmc_daId_InvAtt IS NULL THEN 0 else 1 end as PDF_Anhang "
SQLFirst = "SELECT [rmc_kdNr], [rmc_kdName], [rmc_landKZ], [rmc_reDatum], [rmc_reNr], [rmc_waehrung],[rmc_betragNetto],([rmc_betragBrutto] - [rmc_betragNetto]) as MWST,[rmc_betragBrutto], case WHEN rmc_daid IS NULL THEN 0 else 1 end as PDF_Rechnung, case WHEN rmc_daId_InvAtt IS NULL THEN 0 else 1 end as PDF_Anhang "
Else
SQLFirst = "SELECT DISTINCT r.rmc_kdNr,r.rmc_kdName "
End If