SELECT Tdato001.idnegocio, Tdato001.fecha, Tdato001.cliente,;
Tdato001.id_demandado, Tdato001.codabop, Tdato001.codclpro,;
Tdato001.codclti, Tdato001.fechaveti, Tdato001.nobliga, Tdato001.radjudi,tdato001.sugerencia,;
Tdato001.codjuz, Tdato001.codciu,tdato001.ufecha,tdato001.id_alju,tdato001.fechalju,;
tdato001.id_ctri,tdato001.fechactri,tdato001.valor,ideman2,ideman3,ideman4,tdato001.fechater,;
tdato001.notificados,tdato001.clasenotifica,tdato001.idembg,tdato001.idcladema,tdato001.terminado,;
Tdata011.apellidos+""+Tdata011.nombre AS Ncliente,;
Tdata015.apellido+" "+Tdata015.nombre AS demandado,tdata015.direccion,;
Tdato006.nombrejuz,;
Tdato004.nombre as nomabg ,Tdato004.apellido as apella,;
tdato007.nombreproceso,;
tdato008.nombreciu,;
tdato009.nombretitulo,;
Tdata045.descripcion;
FROM;
data1!tdato001 ;
INNER JOIN data1!tdata011 ;
ON Tdato001.cliente = Tdata011.id_cliente ;
INNER JOIN data1!tdata015 ;
ON Tdato001.id_demandado = Tdata015.id_cddo;
INNER JOIN data1!tdato004 ;
ON Tdato001.codabop = Tdato004.cedula;
INNER JOIN data1!tdato007 ;
ON Tdato001.codclpro = Tdato007.codproce;
INNER JOIN data1!tdato009 ;
ON Tdato001.codclti = Tdato009.codtitu;
WHERE Tdato001.idnegocio = lcCodigo1 INTO CURSOR cur_001