I have this problem : java.lang.Exception:  java.lang.StringIndexOutOfBoundsException: length=0; index=1
when I write into my variable "Prezzo" type double .
F.Articoli(Codice).Prezzo1 is Double
	
	
	
	
	
	
	
		
			
			
			
			
			
		
	
	
	
		
	
	
		
	
			
			when I write into my variable "Prezzo" type double .
F.Articoli(Codice).Prezzo1 is Double
			
				B4X:
			
		
		
		Sub Globals
Dim Prezzo As Double
End Sub
Private Sub aggiornaComanda(Codice As Int, Qta As Int)
        Log("aggiornaComanda: Codice=" & Codice & ", Qta=" & Qta)
    
    Try
        Dim i As Int, bAggiunto As Boolean=False
        
        Dim newIdComanda As Int = UtilityComanda.getMaxIndexComanda(F.Comanda)+1
        
    If F.UsaListini=0 Then
'    Log(GetType(F.ListinoCorrente))
    F.ListinoCorrente=1
    Else
        If F.ListinoCorrente <= 0 Then
            F.ListinoCorrente=F.ListinoBase
        End If
        If F.ListinoCorrente < 1 Or F.ListinoCorrente > 5 Then
            F.ListinoCorrente = 1
        End If
    End If
                
        Select Case F.ListinoCorrente
            Case 2
                Prezzo = F.Articoli(Codice).Prezzo2
            Case 3
                Prezzo = F.Articoli(Codice).Prezzo3
            Case 4
                Prezzo = F.Articoli(Codice).Prezzo4
            Case 5
                Prezzo = F.Articoli(Codice).Prezzo5
            Case Else
                Prezzo =F.Articoli(Codice).Prezzo1
        End Select 
				 
 
		 
 
		 
 
		 
 
		 
 
		 
 
		