R5 shared database script
Shared database script samples are as follows.
Shared database script sample
Text enclosed in asterisks (**) indicates comments.
**Pause a random interval so multiple processes are staggered well. Pause 0-5 minutes (5 min. = 300000 ms)**
Pause 0-300000
**If an error occurs, wait 1-2 minutes before retrying.**
ErrorDelay 60000-120000
BeginCrit
**Create a discussion database**
changeto "[MailServer]!![DiscussionDB]" [DiscTemplate] -KeepOpen
open
**Reset initial document count by deleting a large value of existing documents**
getall
@If [NBTestReset]
delete [MaxDocToDelete]
@EndIf
**Make sure there are enough documents in mail database (one time only)**
populate [NumMailNotesPerUser]
close
**Open the current view**
Open
**Close the view**
1close
EndCrit
**Start the part of the script which loops**
BeginLoop
**Open a discussion database**
changeto "[Mailserver]!![DiscussionDB]" [DiscTemplate] -KeepOpen
**Open the current view**
open
getall
**Read 20 documents from current view**
entries 1 20
**Wait 5-10 seconds to peruse the view**
Pause 5000-10000
**Page down the view 2 times, spending 3-10 seconds to read each window**
entries 21 20
pause 3000 - 10000
entries 41 20
pause 3000 - 10000
**Set the unread list to 30 randomly selected documents**
unread 30
**Open next 3 unread documents and read each for 10-30 seconds**
navigate 1 next_unread
pause 10000 - 30000
navigate 1 next
pause 10000 - 30000
navigate 1 next
pause 10000 - 30000
add [DiscDbAddDocRate] 100
**Delete 2 old documents when closing database**
close
**Pause at desktop 4 - 8 minutes while having meeting in office**
pause 240000 - 480000
**Repeat entire sequence over again (go back to BeginLoop statement)**
rewind