#Recovers a ARCHIVELOG database to a Point-In-Time
# Assumes database is in MOUNT state
run {
allocate channel c1 type disk;
allocate channel c2 type disk;
set until time "to_date('25-JUL-2001:13:58:00','DD-MON-RRRR:HH24:MI:SS')";
restore database;
recover database;
sql 'alter database open resetlogs';
release channel c1;
release channel c2;
}