QuickAdd Subroutine Example

The following example gets the status of the block NewBlock to the database. If NewBlock doesn't exist, the QuickAdd dialog will be opened, allowing the user to configure the block on the fly.

Dim iStatus As Integer

iStatus = QuickAdd("NewBlock1")