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

CBAM

Browse Source
This commit is contained in:
Andreas Luxbauer
2024-02-26 12:42:52 +01:00
parent 6e023041f9
commit 39dd8a0501
36 changed files with 11903 additions and 629 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
SDL/Reports/Zoll/rptKontrolleLKW_Dakosy.vb
View File

@@ -52,7 +52,7 @@ Public Class rptKontrolleLKW_Dakosy
Dim firmaStr = ""
If FIRMA = "DURMAZ" Then
firmaStr = " AND ncts_ObjectName LIKE 'DU%' "
firmaStr = " AND (ncts_ObjectName LIKE 'DU%' OR ncts_firma='DURMAZ') "
ElseIf FIRMA = "IMEX" Then
firmaStr = " AND (ncts_ObjectName LIKE '402%' OR ncts_ObjectName LIKE '502%' OR ncts_ObjectName LIKE '5501%') "
ElseIf FIRMA = "AMBAR" Then

4
SDL/Reports/Zoll/rptKontrolleLKW_TELOTEC.vb
View File

@@ -54,7 +54,7 @@ Public Class rptKontrolleLKW_TELOTEC
'If FIRMA = "DURMAZ" Then mandant = "SUW"
Dim sqlStr As String = "SELECT [Transp_CrossIdnt] as Kennzeichen,cast(Hea_AccDT as date) AnmeldungsDatum ,COUNT(*) ,SUM(GVal) as GarantieWert
Dim sqlStr As String = "SELECT isnull([Transp_CrossIdnt],'X') as Kennzeichen,cast(Hea_AccDT as date) AnmeldungsDatum ,COUNT(*) ,SUM(GVal) as GarantieWert
FROM tblTelotec_Sicherheit inner join [tblTelotec_Anmeldung] on telanm_id = telgrt_telanmId
WHERE [tblTelotec_Anmeldung].[Hea_AccDT] BETWEEN '" & datVon.ToShortDateString & " 00:00:00' AND '" & datBis.ToShortDateString & " 23:23:59' AND telanm_Status BETWEEN '" & StatVon & "' and '" & StatBis & "' AND [telnam_aktuellsteNachricht]=1
AND GRN IN ( '" & brg_AT & "' , '" & brg_DE & "' , '" & brg_DE_NEU & "' )
@@ -80,7 +80,7 @@ Public Class rptKontrolleLKW_TELOTEC
Me.DataSource = kundenSQL.loadDgvBySql(sqlStr, "FMZOLL", 1000)
Dim sqlStrSUB As String = " SELECT [Transp_CrossIdnt] as Kennzeichen,cast(Hea_AccDT as date) AnmeldungsDatum, *
Dim sqlStrSUB As String = " SELECT isnull([Transp_CrossIdnt],'X') as Kennzeichen,cast(Hea_AccDT as date) AnmeldungsDatum, *
FROM tblTelotec_Sicherheit inner join [tblTelotec_Anmeldung] on telanm_id = telgrt_telanmId
WHERE [tblTelotec_Anmeldung].[Hea_AccDT] BETWEEN '" & datVon.ToShortDateString & " 00:00:00' AND '" & datBis.ToShortDateString & " 23:23:59' AND telanm_Status BETWEEN '" & StatVon & "' and '" & StatBis & "' AND [telnam_aktuellsteNachricht]=1
AND GRN IN ( '" & brg_AT & "' , '" & brg_DE & "' , '" & brg_DE_NEU & "' )