Android Question How do I resolve? Problems with MAP files..

Code looks like this

Sub LoadIni(fPath As String,filename As String)
    Return
    'ReadIni(key As String,fPath As String,filename As String)
    Dim i As Int
    'To read above Record use this:
    'myhost = ReadIni("HOST",File.DirDefaultExternal,"ARC.ini")
    Map1 = File.ReadMap(fPath,filename)
    For i = 0 To Map1.Size - 1
      If Map1.GetKeyAt(i) = "ServerIP" Then
        ServicesvrIP = Map1.GetValueAt(i)
      Else If Map1.GetKeyAt(i) = "ServerPort" Then
        ServicesvrPORT = Map1.GetValueAt(i)
      Else If Map1.GetKeyAt(i) = "LocalID" Then
        ServiceARCid = Map1.GetValueAt(i)
      Else If Map1.GetKeyAt(i) = "RingToneToUse" Then
        SelectedTone = Map1.GetValueAt(i)
      Else If Map1.GetKeyAt(i) = "PasswordLockToUse" Then
        LockoutPassword = Map1.GetValueAt(i)
      End If
    Next
End Sub

Sub SaveIni(fPath As String,filename As String)
    Return
    'WriteIni(mykey As String,myvalue As String,fPath As String,filename As String)
    'To write record HOST=127.0.0.1 to ARC.ini, make this Call:
    'WriteIni("HOST","127.0.0.1",File.DirDefaultExternal,"ARC.ini")
    If Not(File.Exists(fPath,filename)) Then File.WriteMap(fPath, filename, Map1)  'to create it if not exist
    Map1 = File.ReadMap(fPath,filename)
            Map1.Put("ServerIP", ServicesvrIP)
            Map1.Put("ServerPort", ServicesvrPORT)
            Map1.Put("LocalID", ServiceARCid)
            Map1.Put("RingToneToUse", SelectedTone)
            Map1.Put("PasswordLockToUse", LockoutPassword)
    File.WriteMap(fPath, filename, Map1)
End Sub

Sub LoadIni(fPath As String,filename As String)
    'Return
    'first check if the file exists, if not save the defaults
    If File.Exists(fPath,filename) = False Then
        'default parameters
        ServicesvrIP    = "192.168.1.121"
        ServicesvrPORT  = 7234
        ServiceARCid    = "Android ARC"
        SelectedTone    = "Tone 1"
        LockoutPassword = "1234"
        SaveIni(fPath,filename)
    End If
    'ReadIni(key As String,fPath As String,filename As String)
    Dim i As Int
    'To read above Record use this:
    'myhost = ReadIni("HOST",File.DirDefaultExternal,"ARC.ini")
    Map1 = File.ReadMap(fPath,filename)
    For i = 0 To Map1.Size - 1
      If Map1.GetKeyAt(i) = "ServerIP" Then
        ServicesvrIP = Map1.GetValueAt(i)
      Else If Map1.GetKeyAt(i) = "ServerPort" Then
        ServicesvrPORT = Map1.GetValueAt(i)
      Else If Map1.GetKeyAt(i) = "LocalID" Then
        ServiceARCid = Map1.GetValueAt(i)
      Else If Map1.GetKeyAt(i) = "RingToneToUse" Then
        SelectedTone = Map1.GetValueAt(i)
      Else If Map1.GetKeyAt(i) = "PasswordLockToUse" Then
        LockoutPassword = Map1.GetValueAt(i)
      End If
    Next
End Sub

'load the ARC settings..
    LoadIni (File.DirDefaultExternal,"ARC.ini")