getDbPointer
if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;
if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;
if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;
if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;
if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;
if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;
if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;
if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;
if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;