JavaScript Editor js editor     Web development 

Main Page

Occurs before the PACK DATABASE command runs.

PROCEDURE dbc_PackData(В ) 


You can use the dbc_PackData event to track access to the database before a PACK DATABASE runs.

Return .F. from this procedure to prevent the database from being packed. You will get a "File access denied" error when attempting to pack the database when returning .F..


В Copy Code
* Reports to the screen Event name, where it is called from and ;
* the parameter passed.
PROCEDURE dbc_PackData
 ? '  -  ' + PROGRAM()
 ??' in ' + SUBSTR(SYS(16),RAT('\',SYS(16))+1)
 ? '     Current DBC: ' + SUBSTR(DBC(),RAT('\',DBC())+1)+' /end/ '

See Also

JavaScript Editor js editor     Web development