dbc_BeforeAppendProc (Evento)
Se produce antes de que se complete un comando APPEND PROCEDURES.
PROCEDURE dbc_BeforeAppendProc(cFileName, nCodePage, lOverwrite)
–O bien–
PROCEDURE dbc_BeforeAppendProc
LPARAMETERS cFileName, nCodePage, lOverwrite
Parámetros
- cFileName
Especifica el nombre de un archivo de texto a partir del cual se van a anexar los procedimientos almacenados. - nCodePage,
Especifica la página de códigos del archivo de texto a partir del que se van a anexar 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. - lOverwrite
Especifica si se incluyó la palabra clave OVERWRITE en el comando APPEND PROCEDURE. Si se omitió OVERWRITE, los procedimientos actualmente almacenados en la base de datos se anexan a los procedimientos almacenados existentes; si no es así, reemplazan a los procedimientos almacenados existentes.
Observaciones
Se puede utilizar el evento dbc_BeforeAppendProc para realizar el seguimiento de los intentos de acceso a la base de datos antes de anexar los procedimientos almacenados.
Devuelva .F. desde este procedimiento para evitar que el contenido del archivo de texto se anexe a los procedimientos almacenados en la base de datos.
Ejemplo
* Reports to the screen Event name, where it is called from and ;
* the parameter passed.
PROCEDURE dbc_BeforeAppendProc ;
(cFileName,;
nCodePage,;
lOverwrite)
? '>> ' + 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')
? ' lOverwrite = ' + TRANSFORM(lOverwrite) + ' - ' ;
+ TYPE('lOverwrite')+' /end/ '
ENDPROC
Vea también
Activar o desactivar eventos DBC | dbc_AfterAppendProc (Evento)