Calendar profile problems after migration from 7.0. to 8.5.2

Some new features was addet to calendar profile.   After convert some users from 7.0.4 to 8.5.2 some problems arrived.

I deleted the profile using the LotusScript  and instruct the user to recreate the profile.

Just put the code bellow in a button and send to the user.

Sub Click(Source as Button)
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Set db=session.CurrentDatabase
Set doc=db.GetProfileDocument("CalendarProfile")
Call doc.remove(True)
If doc Is Nothing Then
MsgBox "Profile Document Was Successfully Removed"
MsgBox "Profile Document WAS NOT Removed",48
End if
End Sub