dbc_BeforeCopyProc (Evento)
Se produce antes de que se inicie el comando COPY PROCEDURE.
PROCEDURE dbc_BeforeCopyProc(cFileName, nCodePage, lAdditive)
–O bien–
PROCEDURE dbc_BeforeCopyProc
LPARAMETERS cFileName, nCodePage, lAdditive
Parámetros
- cFileName
Especifica el nombre de un archivo de texto al que van a copiar los procedimientos almacenados. - nCodePage,
Especifica la página de códigos del archivo de texto al que se van a copiar los procedimientos almacenados. Visual FoxPro copia el contenido del archivo de texto y, a medida que lo hace, lo convierte automáticamente a la página de códigos especificada. - lAdditive
Especifica si se incluyó la palabra clave ADDITIVE en el comando COPY PROCEDURE que desencadenó este evento.
Observaciones
Se puede utilizar el evento dbc_BeforeCopyProc para realizar el seguimiento de los intentos de acceso a la base de datos antes de que se copien los procedimientos almacenados.
Devuelva .F. desde este procedimiento para evitar la copia de los procedimientos almacenados.
Ejemplo
* Reports to the screen Event name, where it is called from and ;
* the parameter passed.
PROCEDURE dbc_BeforeCopyProc ;
(cFileName,;
nCodePage,;
lAdditive)
? '>> ' + PROGRAM()
?? ' in ' + SUBSTR(SYS(16),RAT('\',SYS(16))+1)
? ' Current DBC: ' + SUBSTR(DBC(),RAT('\',DBC())+1)
? ' cFileName = ' + TRANSFORM(cFileName) + ' - ' + TYPE('cFileName')
? ' nCodePage = ' + TRANSFORM(nCodePage) + ' - ' + TYPE('nCodePage')
? ' lAdditive = ' + TRANSFORM(lAdditive) + ' - ' + TYPE('lAdditive')+' /end/ '
ENDPROC
Vea también
Activar o desactivar eventos DBC | dbc_AfterCopyProc (Evento)