Приходится разбираться с чужим кодом на VB6, подскажите пожалуйста что за номера вначале строк (не везде в коде) ?
Вроде как не метки для оператора GoTo, поскольку за метками должно следовать двоеточие.



54400 strSQL = strSQL & " FROM T_B_OPM_HIST hist" & vbCrLf
54410 strSQL = strSQL & " left join (" & vbCrLf
54420 strSQL = strSQL & " SELECT ea.peaid, pea.EAKTO, ea.Titel, ea.VerantID AS EAVerantID, eaanw.Name || ', ' || eaanw.Vorname AS AVerant" & vbCrLf
54430 strSQL = strSQL & " ,CAST(CASE " & vbCrLf
54440 strSQL = strSQL & "