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

offeneAntraege. CreditsafeAPI

Browse Source
This commit is contained in:
d.breimaier
2025-10-08 17:33:47 +02:00
parent ce29fa679d
commit 89354f7739
3 changed files with 7 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
SDL/USTV/frmUSTVoffeneAntraege.vb
View File

@@ -792,7 +792,7 @@ Public Class frmUSTVoffeneAntraege
left join tblUStVAntrag on UStVAn_KuNr = temp.kdnr and UStVAn_ReDatVon <= temp.Rechnungsdatum and UStVAn_ReDatBis >= temp.Rechnungsdatum and [Länderverzeichnis für die Außenhandelsstatistik].LandNr = UStVAn_LandNr and isnull(UStVAn_AntragArt,'MWST') = 'MWST'
left JOIN tblSteuernummern On temp.Einreichland = tblSteuernummern.LandKz and KdNr = tblSteuernummern.AdressenNr
where 1 = 1 and isnull(kde_keineMWSt,0) = 0 " & sqlwhereLand & sqlwhereSteuerNr & sqlwhereLieferant &
" group by isnull(UStVAn_ID,0) , Lieferant, KdNr, Kundenname,Kundenland, Einreichland, isnull(tblSteuernummern.UStV,0), case WHEN UStVAn_AntragEingereichtAm IS NULL THEN 0 else 1 end "
" group by isnull(UStVAn_ID,0) , Lieferant, KdNr, Kundenname,Kundenland, Einreichland, isnull(tblSteuernummern.UStV,0), case WHEN UStVAn_AntragEingereichtAm IS NULL THEN 0 else 1 end order by Kundenname "
Dim SQLWhere = ""
@@ -1089,7 +1089,7 @@ Public Class frmUSTVoffeneAntraege
WHERE t1.KdNr = t2.KdNr
FOR XML PATH (''))
, 1, 1, ';') from tblKundenMWST t2
group by KdNr;", "FMZOLL")
group by KdNr order by kdNr;", "FMZOLL")
End If