dbc_ModifyData (Evento)

Se produce inmediatamente después de que se ejecute MODIFY DATABASE. Utilícelo para evitar que se abra la ventana del diseñador de bases de datos.

PROCEDURE dbc_ModifyData(cDatabaseName, lNoWait, lNoEdit )

-O bien-

PROCEDURE dbc_ModifyData
LPARAMETERS[cDatabaseName, lNoWait, lNoEdit ]

Parámetros

• CDatabaseName
  Especifica el nombre de la base de datos que se está modificando.
• lNoWait
  Especifica si se incluyó la palabra clave NOWAIT en el comando MODIFY DATABASE, lo que provocaría que continuara la ejecución del programa después de abrir el Diseñador de bases de datos.
• lNoEdit
  Especifica si se incluyó la palabra clave NOEDIT en el comando MODIFY DATABASE, lo que impediría la modificación de la base de datos.

Observaciones

Se puede utilizar el evento dbc_ModifyData para realizar el seguimiento del acceso a la base de datos mientras ésta se está modificando. Devuelva .F. desde este procedimiento para evitar la modificación de la base de datos.

Ejemplo

PROCEDURE dbc_ModifyData ;
         (CDatabaseName, ;
            lNoWait, ;
            lNoEdit)
? '     cDatabaseName = ' + cDatabaseName + ' - ' ;
                      + TYPE('cDatabaseName ')
 ? '     lNoWait       = ' + TRANSFORM(lNoWait) + ' - ' ;
                       + TYPE('lNoWait')
 ? '     lNoEdit       = ' + TRANSFORM(lNoEdit) + ' - ' ;
                       + TYPE('lNoEdit')+' /end/ '
* Stop user from changing the database in the Designer.
IF lNoEdit
   RETURN .T.
ELSE
   RETURN .F.
ENDIF
ENDPROC

Vea también

MODIFY DATABASE | Activar o desactivar eventos DBC | Diseñador de bases de datos | Modificar la arquitectura de las bases de datos