Foros Club Delphi - OnLine SQL Formatter

Revisando DelphiFeeds he llegado a esta página que me ha parecido interesante compartir con vosotros.
Online SQL PL/SQL Formatter

Puedes colocar una sentencia SQL como esta:

Código SQL [-]Select Codigo, DNI, Nombre Apellido from TablaClientes
where Codigo > 2000 and Tipo = 1 Order by Nombre, apellido

Y configurar como salida SQL y obtendrás esto:

Código SQL [-]SELECT   CODIGO,
         DNI,
         NOMBRE APELLIDO
FROM     TABLACLIENTES
WHERE    CODIGO > 2000
         AND TIPO = 1
ORDER BY NOMBRE,
         APELLIDO

Se pueden seleccionar varias entradas como: MSSQL, ORACLE, Access, MySQL,...

Pero no es eso lo más curioso, ni la razón de ponerlo aquí, sino que lo que me ha parecido más interesante son lasa diferentes salidas que se pueden configurar; De forma que si se selecciona como salida:

* DELPHI, se obtiene:

Código Delphi [-]var1 := 'SELECT   CODIGO,' ;
var1 := var1 + '          DNI,' ;
var1 := var1 + '          NOMBRE APELLIDO' ;
var1 := var1 + ' FROM     TABLACLIENTES' ;
var1 := var1 + ' WHERE    CODIGO > 2000' ;
var1 := var1 + '          AND TIPO = 1' ;
var1 := var1 + ' ORDER BY NOMBRE,' ;
var1 := var1 + '          APELLIDO' ;

* PHP, se obtiene:

Código PHP:


		
			
var1 = "SELECT   CODIGO," ;
var1 .= "          DNI," ;
var1 .= "          NOMBRE APELLIDO" ;
var1 .= " FROM     TABLACLIENTES" ;
var1 .= " WHERE    CODIGO > 2000" ;
var1 .= "          AND TIPO = 1" ;
var1 .= " ORDER BY NOMBRE," ;
var1 .= "          APELLIDO" ;

* JAVA STRING BUFFER, se obtiene:

Código:

StringBuffer  var1 = new StringBuffer();

var1.append("SELECT   CODIGO,");

var1.append("          DNI,");

var1.append("          NOMBRE APELLIDO");

var1.append(" FROM     TABLACLIENTES");

var1.append(" WHERE    CODIGO > 2000");

var1.append("          AND TIPO = 1");

var1.append(" ORDER BY NOMBRE,");

var1.append("          APELLIDO");

Y Así con algunos más, como C#, VC, VBasic, HTML, Cobol,...