Vb Oracle

[Tempestaxmen]

Ciao, ho dei report fatti in crystal report che devono essere convertiti in reporting services.
Le tabelle da cui prendere le informazioni sono su Oracle.
Il mio problema è quello di convertire i seguenti comandi:

select Nome, ...
from...
where Nome LIKE @NomeUtente (avendo NomeUtente come parametro di ingresso)

ho provato a scrivere

where CONTAINS(Nome, @NomeUtente) > 0

ma mi dice:

"ORA-00936: espressione mancante"

e poi devo convertire un semplicissimo if-then-else

Potete darmi una mano?

Grazie mille.

[Tempestaxmen]

Beh, la prima parte l'ho risolta scrivendo:

where Nome LIKE :NomeUtente

per la parte di If-Then-Else avete suggerimenti?

Io ho scritto:

Public Shared Function CalcoloResiduoNegativo(ByVal SommaImporto As Decimal, ByVal SommaImportoFatt As Decimal) As Decimal

Dim Totale As Decimal = SommaImporto - SommaImportoFatt

If (Totale > 0) Then Return Totale

Else Return 0

End Function


Ma quando vado a far girare il report mi dice:

'Else' must be preceded by a matching 'If' or 'ElseIf'

[LeleFT]

Attenzione a dove posti: VB viene trattato nell'apposito sub-forum.
Inoltre dovresti specificare anche la versione del linguaggio usato.

Sposto su VisualBasic e .NET Framework.


Ciao.

[kalosjo]

Originariamente inviato da Tempestaxmen
Beh, la prima parte l'ho risolta scrivendo:

where Nome LIKE :NomeUtente

per la parte di If-Then-Else avete suggerimenti?

Io ho scritto:

Public Shared Function CalcoloResiduoNegativo(ByVal SommaImporto As Decimal, ByVal SommaImportoFatt As Decimal) As Decimal

Dim Totale As Decimal = SommaImporto - SommaImportoFatt

If (Totale > 0) Then Return Totale

Else Return 0

End Function


Ma quando vado a far girare il report mi dice:

'Else' must be preceded by a matching 'If' or 'ElseIf'

If (Totale > 0) Then 
    Return Totale
Else 
    Return 0
End if

[Tempestaxmen]

Anche inserendo "End if" mi dà lo stesso errore

[kalosjo]

Ma l'hai scritto come l'ho scritto io?
O hai solo aggiunto end if?

[oregon]

Originariamente inviato da Tempestaxmen
Anche inserendo "End if" mi dà lo stesso errore

Hai notato come sono state scritti i Return da kalosjo?

Non ti ha mica detto che dovevi aggiungere un End If al tuo codice ... ti ha detto che lo dovevi RISCRIVERE completamente ...

[Tempestaxmen]

Scusate, ora fuziona.
Avevo solo aggiunto "End if".
Gli dava fastidio il fatto che "Return Totale" fosse scritto sulla stessa riga di Then?

Grazie per l'aiuto.

[oregon]

Originariamente inviato da Tempestaxmen
Gli dava fastidio il fatto che "Return Totale" fosse scritto sulla stessa riga di Then?

Ovviamente sì ... se studi la sintassi della If ti accorgi del perche' ...

[kalosjo]

Esattamente

La sintassi cambia nel caso vi sia un else

Senza else

if blablabla then blablablabla

Con else

  if condizione then
     'codice da eseguire se la condizione è verificata
  else
     'codice da eseguire se la codizione non è verificata
  end if