' Version Date: 23.11.2020
Function GetArticleNumberFromSecondaryIndentifier(Identifier)
	SQL = ""
	' EAN-Code / Alternative Artikelnummer 1 / Alternative Artikelnummer 2 / Artikelnummer / S/N
	SQL = SQL & "("
	SQL = SQL & "(C002 = '" & Identifier & "') Or "
	SQL = SQL & "(C068 = '" & Identifier & "') Or "
	SQL = SQL & "(C075 = '" & Identifier & "') Or "
	SQL = SQL & "(C114 = '" & Identifier & "') Or "
	SQL = SQL & "(C115 = '" & Identifier & "')"
	SQL = SQL & ") "
	' Nur Nach Hauptartikel/Ausprägungs(kind)artikel suchen
	' SQL = SQL & "And C014 IN (0, 2)"
	
	' Nach Mandant und Wirtschaftsjahr filtern
	SQL = SQL & SQLQuery_BasicWhere

	Set Result = CWLStart.CurrentCompany.SearchRecord(TABLE_21, SQL)

	If DEBUG_ON = True Then
		AddDebugLine "Searching for SerialNumber-Regex by ArticleNumber " & vbNewline
		AddDebugLine "Result Columns: " & Result
		AddDebugLine "Result Rows: " & Result.RowCount
		AddDebugLine "SQL: " & SQL
		
		ShowDebugBox "GetArticleNumberFromSecondaryIndentifier"
	End If

	If Result.RowCount > 0 Then
		GetArticleNumberFromSecondaryIndentifier = Result.Value("c010")
	Else
		GetArticleNumberFromSecondaryIndentifier = ""
	End If
End Function