Dos conexiones

Hola, me quedo claro la parte de como debemos declarar las conexiones, sin embargo si deseo hacer una modificación a una base de las conexiones como se establece, lo estoy realizando de la siguiente manera.
SQLCA1 = CREATE Transaction
if var_servicio="Multas" then
CONNECT USING SQLCA1;
UPDATE Z31 SET "Z31"."Z31_STATUS"='C'
WHERE substr("Z31"."Z31_KEY",21,9) ='000980546'
commit USING SQLCA1;
messagebox ("Información","Se ha modificado el registro",StopSign!)
Disconnect USING SQLCA1;
Saludos