Switch de Conexión entre Host (PL/SQL)

Hace unos minutos Arthur y Cesariux me preguntaron acerca de cómo hacer un Switch de Conexión entre Host, pues bien... les explicaré! ^^

Sabemos que en el tnsnames.ora de Oracle se encuentran unas líneas todas super raras pues copiaremos sólo ésta parte:

(DESCRIPTION =
(ADDRESS = (PROTOCOL = TCP)(HOST = localhost)(PORT = 1521))
(CONNECT_DATA =
(SERVER = DEDICATED)
(SERVICE_NAME = orcl)
)
)

Ahora usaremos el user y el pass con el que nos conectaremos al host destino, en éste caso usaremos el User: system y como Pass: tec

Y ahora hacemos nuestra cadena de conexión ^^ de la siguiente forma:

conn system/tec @(DESCRIPTION = (ADDRESS = (PROTOCOL = TCP)(HOST = localhost)(PORT = 1521)) (CONNECT_DATA = (SERVER = DEDICATED) (SERVICE_NAME = orcl) ))

Para comprobar que todo funciona trabajaremos con dos sitios: 192.168.1.100 y 192.168.1.1001 Iniciando en el .100 y para ésto supongamos que tenemos en cada sitio una tabla con nombre: 'sitio' [Que original] Obvio, cada tabla contiene datos distintos ^^

Script: 'Switch.sql'

conn system/tec @(DESCRIPTION = (ADDRESS = (PROTOCOL = TCP)(HOST = 192.168.1.100)(PORT = 1521)) (CONNECT_DATA = (SERVER = DEDICATED) (SERVICE_NAME = orcl) ))

prompt Te encuentras en Sitio 1;

select * from sitio;

conn system/tec @(DESCRIPTION = (ADDRESS = (PROTOCOL = TCP)(HOST = 192.168.1.101)(PORT = 1521)) (CONNECT_DATA = (SERVER = DEDICATED) (SERVICE_NAME = orcl) ))

prompt Te encuentras en Sitio 2;

select * from sitio;

Fin de Script

Y ésto es todo de una Conexión mediante cadena de host!