Partager via


dbc_BeforeAppendProc Event

Occurs before an APPEND PROCEDURES command completes.

PROCEDURE dbc_BeforeAppendProc(cFileName, nCodePage, lOverwrite) 

-or-

PROCEDURE dbc_BeforeAppendProc
LPARAMETERS cFileName, nCodePage, lOverwrite

Parameters

  • cFileName
    Specifies the name of a text file from which the stored procedures are to be appended.
  • nCodePage,
    Specifies the code page of the text file from which the stored procedures are to be appended. Visual FoxPro copies the contents of the text file and, as it does so, automatically converts those contents to the code page you specify.
  • lOverwrite
    Specifies whether the OVERWRITE keyword was included in the APPEND PROCEDURE command. If OVERWRITE was omitted, the current stored procedures in the database are appended to the existing stored procedures, otherwise they replace any existing procedures.

Remarks

You can use the dbc_BeforeAppendProc to track attempted access to the database before stored procedures are appended.

Return .F. from this procedure to prevent the contents of the text file from being appended to the database stored procedures.

Example

* 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

See Also

Enable or Disable DBC Events | dbc_AfterAppendProc Event