The following fragment shows how to use INVOKE and FINISH to work
with two databases:
&RDB& INVOKE DATABASE WORKERS =
&RDB& FILENAME 'DISK2:[DEPT4]EMPLOYEES'
&RDB& INVOKE DATABASE PARTS =
&RDB& FILENAME 'DISK2:[DEPT4]PARTS'
.
.
.
! [This part of the program can combine data from
both databases]
.
.
.
&RDB& FINISH WORKERS
.
.
.
! [This part of the program uses only
the PARTS database]
.
.
.
&RDB& FINISH PARTS
Between the second INVOKE statement and the first FINISH, you can
access both databases at once.