Приложение 1. Пример файла сценария

Утилита сохраняет БД при запуске и затем каждый день в 15:35 добавляет накопленные в БД изменения. Если при запуске lhbx задать ключ -fl FILE.LOG, то история сохранения будет накапливаться в файле FILE.LOG:

/* ------------------------------------------------------------ */
Variables:
USERNAME     ="SYSTEM";  /* user name */
USERPASSWORD ="MANAGER8"; /* user password */
ARCDEVICE    ="./";      /* for new files */
ARCFNAME     ="";        /* new name for old file */
CHKSUF       =".lhb";    /* suffix for checkpoint file */
/* ------------------------------------------------------------ */
Rights:
Everyday (time = '15:35')
{
backup ("s -u "+USERNAME+"/"+USERPASSWORD+" -f
"+ARCDEVICE+"db.lhb"+" -qc DF -inc");
logprint (CTIMESTAMP() + "---File" + "db" + CHKSUF +
"updated.\n");
Exception: /*for everyday*/
print ("Error=" + TOSTR(CERROR) +
",LinError=" + TOSTR(LINERROR) +
",SysError=" + TOSTR(SYSERROR));
logprint (CTIMESTAMP()+ "---Error=" + TOSTR(CERROR)+
",LinError=" + TOSTR(LINERROR) +
",SysError=" + TOSTR(SYSERROR));
stop;
} /* Everyday  */
/* ----------------------------------------------------------- */
Special:
before /* just after the start */
{
backup ("s -u "+USERNAME+"/"+USERPASSWORD+" -f
"+ARCDEVICE+"db.lhb"+" -qc DF -startinc");
logprint (CTIMESTAMP() + "---File" + "db" + CHKSUF +
"created.\n" );
}
after /* after stop or Ctrl-C */
{
print ("---Stop backup system");
if (CERROR != 0)
logprint (CTIMESTAMP() + "---Error present: " +
TOSTR(CERROR));
logprint (CTIMESTAMP() + "---Stop backup system\n");
}
iferr /* global */
{
print ("Error=" + TOSTR(CERROR) +
",LinError=" + TOSTR(LINERROR) +
",SysError=" + TOSTR(SYSERROR));

logprint (CTIMESTAMP()+ "---Error=" + TOSTR(CERROR)+
",LinError=" + TOSTR(LINERROR) +
",SysError=" + TOSTR(SYSERROR));
stop;
}
/* ----------------------------------------------------------- */