dbc_BeforeDBSetProp (Evento)
Se produce antes de ejecutar DBSetProp( ).
PROCEDURE dbc_BeforeDBSetProp(cName, cType, cProperty, ePropertyValue)
–O bien–
PROCEDURE dbc_BeforeDBSetProp
LPARAMETERS cName, cType, cProperty, ePropertyValue
- cName
Especifica el valor del primer parámetro de la función DBSetProp( ), el nombre de la base de datos, campo, conexión con nombre, tabla o vista para la que DBSETPROP( ) modifica el valor. - cType
Especifica el valor del segundo parámetro de la función DBSetProp( ), el tipo de objeto del elemento nombrado en cName. - cProperty
Especifica el valor del tercer parámetro de la función DBSetProp( ), la propiedad para la que DBSETPROP( ) modifica el valor. - ePropertyValue
Especifica el valor del cuarto parámetro de la función DBSetProp( ), el valor que se asignará a la propiedad de cProperty.
Para ver información detallada acerca de los valores válidos para cType y cProperty, vea DBSETPROP( ) y DBGETPROP( ) en la Ayuda.
Observaciones
Se puede utilizar el evento dbc_BeforeDBSetProp para realizar el seguimiento de los intentos de acceso a la base de datos antes de la ejecución de DBSETPROP( ).
Devuelva .F. desde este procedimiento para evitar que se establezca el valor de la propiedad. Esto provocará que la función DBSetProp() devuelva .F.
Algunos valores de propiedad se pueden modificar mediante DBSetProp( ) o mediante un diseñador. Por ejemplo, puede modificar la propiedad Comment para una tabla tanto mediante DBSetProp( ) como desde el diseñador de tablas. Puesto que DBSetProp( ) realiza modificaciones directamente en la base de datos, dbc_BeforeModifyTable o dbc_AfterModifyTable no recogerán las modificaciones efectuadas por DBSETPROP( ). Para interceptar las modificaciones que se podrían haber hecho de cualquiera de los modos, es necesario utilizar dbc_BeforeDBSetProp, dbc_AfterDBSetProp, dbc_BeforeModifyTable y dbc_AfterModifyTable para comprobar cuáles son los cambios adecuados.
Ejemplo
* Reports to the screen Event name, where it is called from and ;
* the parameter passed.
PROCEDURE dbc_BeforeDBSetProp ;
(cName,;
cType,;
cProperty,;
ePropertyValue)
? '>> ' + PROGRAM()
?? ' in ' + SUBSTR(SYS(16),RAT('\',SYS(16))+1)
? ' Current DBC: ' + SUBSTR(DBC(),RAT('\',DBC())+1)
? ' cName = ' + TRANSFORM(cName) + ' - ' + TYPE('cName')
? ' cType = ' + TRANSFORM(cType) + ' - ' + TYPE('cType')
? ' cProperty = ' + TRANSFORM(cProperty) + ' - ' + TYPE('cProperty')
? ' ePropertyValue = ' + TRANSFORM(ePropertyValue) + ' - ' + TYPE('ePropertyValue')+' /end/ '
ENDPROC
Vea también
Activar o desactivar eventos DBC | dbc_AfterDBSetProp (Evento)