neu
This commit is contained in:
@@ -17,13 +17,13 @@ Public Class usrCntlUSTV
|
|||||||
With dgvUSTV
|
With dgvUSTV
|
||||||
.ClearSelection()
|
.ClearSelection()
|
||||||
|
|
||||||
If KdSearchBox1.KdNr <= 0 Then Exit Sub
|
' If KdSearchBox1.KdNr <= 0 Then Exit Sub
|
||||||
If cboJahr._value = "" Then Exit Sub
|
If cboJahr._value = "" Then Exit Sub
|
||||||
|
|
||||||
.SET_SQL("SELECT TOP (1000) [UStVAn_ID],[UStVAn_KuNr],[UStVAn_Name],LandKz,[UStVAn_ReDatVon],[UStVAn_ReDatBis] ,[UStVAn_3470] ,[UStVAn_Währungscode],[UStVAn_USteuerbetrag],[UStVAn_Erstattungsbetrag],[UStVAn_USteuerbetragEUR],[UStVAn_ErstattungsbetragEUR],[UStVAn_Sachbearbeiter]
|
.SET_SQL("SELECT TOP (1000) [UStVAn_ID],[UStVAn_KuNr],[UStVAn_Name],LandKz,[UStVAn_ReDatVon],[UStVAn_ReDatBis] ,[UStVAn_3470] ,[UStVAn_Währungscode],[UStVAn_USteuerbetrag],[UStVAn_Erstattungsbetrag],[UStVAn_USteuerbetragEUR],[UStVAn_ErstattungsbetragEUR],[UStVAn_Sachbearbeiter]
|
||||||
FROM [tblUStVAntrag] inner join [Länderverzeichnis für die Außenhandelsstatistik] on UStVAn_LandNr=Landnr
|
FROM [tblUStVAntrag] inner join [Länderverzeichnis für die Außenhandelsstatistik] on UStVAn_LandNr=Landnr
|
||||||
where UStVAn_ReDatVon>='01.01." & cboJahr._value & "' AND UStVAn_ReDatBis<='31.12." & cboJahr._value & "' and UStVAn_KuNr=" & KdSearchBox1.KdNr & "
|
where UStVAn_ReDatVon>='01.01." & cboJahr._value & "' AND UStVAn_ReDatBis<='31.12." & cboJahr._value & "' " & If(KdSearchBox1.KdNr > 0, " and UStVAn_KuNr=" & KdSearchBox1.KdNr & "", "") & "
|
||||||
order by LandKz,[UStVAn_KuNr],[UStVAn_ReDatVon]", "FMZOLL")
|
order by UStVAn_KuNr,UStVAn_Name,LandKz,[UStVAn_KuNr],[UStVAn_ReDatVon]", "FMZOLL")
|
||||||
.LOAD()
|
.LOAD()
|
||||||
.RowTemplate.Height = 20
|
.RowTemplate.Height = 20
|
||||||
.AllowUserToOrderColumns = False
|
.AllowUserToOrderColumns = False
|
||||||
|
|||||||
Reference in New Issue
Block a user