The error you get is in the native camera driver. Add a one second delay until you reenable the camera. It seems to fix this issue.
You can create these subs:
B4X:
Sub TakePicture
ProgressDialogShow2("Saving image...", False)
disableCameraTimer.Enabled = True
CamEx.TakePicture
End Sub
Sub DisableCameraTimer_Tick
disableCameraTimer.Enabled = False
ProgressDialogHide
End Sub