too many nested evaluations (infinite loop?)
    while executing
"fconfigure $fileId -translation $translation"
    invoked from within
"if [catch {open $filePath r} fileId] {
#		puts stderr $fileId
		set var {}
	} else {
		fconfigure $fileId -translation $translation
		set var [string ..."
    (procedure "Load" line 18)
    invoked from within
"Load $homePath/col/$loCoInRep/auxdoc/@passwords.txt passwords"
    (procedure "GetUserData" line 5)
    invoked from within
"GetUserData * {} {encryptedpassword}"
    (procedure "CheckPassword" line 23)
    invoked from within
"CheckPassword $userName $password $sessionTime"
    (procedure "CheckAdministratorPassword" line 16)
    invoked from within
"CheckAdministratorPassword $userName $administratorCodedPassword"
    (procedure "UpdateArchivingPolicy" line 9)
    invoked from within
"UpdateArchivingPolicy dpi.inpe.br/plutao/2013/05.31.18.47 dpi.inpe.br/plutao/2013/05.31.18.47.22 administrator @q&WWtY!Y"
    ("eval" body line 1)
    invoked from within
"eval $cmd"