Occurs after VALIDATE DATABASE completes. There are two versions of the syntax.

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

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

Example

Copy Code

* 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