MS2
This commit is contained in:
@@ -22,7 +22,7 @@ Public Class ClassImport_Windream
|
||||
'Die Datei nach windream importieren
|
||||
Dim streamresult = ClassWindream.Stream_File(QuellDatei_Path, Targetpath)
|
||||
If streamresult = True Then
|
||||
Dim sql As String = String.Format("SELECT DocID FROM VWPMO_WD_DOC_SEARCH_SYNC WHERE UPPER(FULL_FILENAME) = UPPER('{0}') AND CONVERT(DATE,Change_DateTime) = CONVERT(DATE,GETDATE())", CURRENT_FILEIN_WD)
|
||||
Dim sql As String = String.Format("SELECT DocID FROM VWPMO_WD_DOC_SYNC WHERE UPPER(FULL_FILENAME) = UPPER('{0}') AND CONVERT(DATE,Change_DateTime) = CONVERT(DATE,GETDATE())", CURRENT_FILEIN_WD)
|
||||
CURRENT_DOC_ID = ClassDatabase.Execute_Scalar(sql)
|
||||
sql = "SELECT * FROM TBDD_INDEX_AUTOM WHERE DOCTYPE_ID = " & DOCTYPE_ID
|
||||
Dim dt As DataTable = ClassDatabase.Return_Datatable(sql)
|
||||
|
||||
Reference in New Issue
Block a user