Partager via


dbc_AfterValidateData Event

Occurs after VALIDATE DATABASE completes.

PROCEDURE dbc_AfterValidateData
(lRecover, lNoConsole, lPrint, lFile [, cFilename]) 

-or-

PROCEDURE dbc_AfterValidateData
LPARAMETERS lRecover, lNoConsole, lPrint, lFile [, cFilename]

Parameters

  • lRecover
    Specifies whether the RECOVER keyword was included in the VALIDATE DATABASE command that triggered this event.
  • lNoConsole
    Specifies whether the NOCONSOLE keyword was included in the VALIDATE DATABASE command that triggered this event.
  • lPrint
    Specifies whether the PRINT keyword was included in the VALIDATE DATABASE command that triggered this event.
  • lFile
    Specifies whether the TO FILE clause was included in the VALIDATE DATABASE command that triggered this event.
  • cFilename
    Specifies the name of the output file named in the TO FILE clause of the VALIDATE DATABASE command. cFilename is optional, but if you omit it and use the TO FILE clause of VALIDATE DATABASE, you will receive the error "Must specify additional parameters." If you do not use TO FILE and include the cFilename parameter, it will be passed a value of .F.

Remarks

You can use the dbc_AfterValidateData event to track access to the database after data are validated.

Example

* Reports to the screen Event name, where it is called from and ;
* the parameters passed.
PROCEDURE dbc_AfterValidateData ;
         (lRecover, ;
          lNoConsole, ;
          lPrint, ;
          lFile, ;
          cFileName)
 ? '>>   ' + PROGRAM()
 ?? ' in ' + SUBSTR(SYS(16),RAT('\',SYS(16))+1)
 ? '     lRecover   = ' + TRANSFORM(lRecover)   + ' - ' ;
                    + TYPE('lRecover')
 ? '     lNoConsole = ' + TRANSFORM(lNoConsole) + ' - ' ;
                    + TYPE('lNoConsole')
 ? '     lPrint     = ' + TRANSFORM(lPrint)     + ' - ' ;
                    + TYPE('lPrint')
 ? '     lFile      = ' + TRANSFORM(lFile)      + ' - ' ;
                    + TYPE('lFile')
 ? '     cFileName  = ' + TRANSFORM(cFileName)  + ' - ' ;
                    + TYPE('cFileName ')+' /end/ '
ENDPROC

See Also

Enable or Disable DBC Events | dbc_BeforeValidateData Event