Hola te anexo el codigo necesario para poder generar el scrip de cada una de tus tablas que tengas en progress y pasarlas a SQL si tienes algun problema o necesitas optimizar este mismo codigo para que lo haga de forma automatica con todas las tablas de tu base mandame un mail y con gusto te ayudo en lo que pueda
DEFINE VARIABLE strarchivoSQL AS CHARACTER INIT "C:\scriptTabla1.sql" NO-UNDO.
OUTPUT TO VALUE(strarchivoSQL) NO-CONVERT NO-MAP. /* Genera el scrip para SQL*/
PUT UNFORMATTED "USE baseprueba; ". /*Selecciona la base de SQL*/
PUT UNFORMATTED "DROP TABLE IF EXISTS tabla1; " . /*Borra si exixte la tabla en SQL*/
PUT UNFORMATTED "CREATE TABLE tabla1 (". /*Crea Tabla en SQL*/
PUT UNFORMATTED "campo1 varchar(5) NOT NULL, " . /*Define Campos en SQL*/
PUT UNFORMATTED "campo2 varchar(50) NOT NULL, ".
PUT UNFORMATTED "campo3 varchar(15) NOT NULL, ".
PUT UNFORMATTED "campo4 varchar(5) NOT NULL, ".
PUT UNFORMATTED "campo5 varchar(2) NOT NULL, ". /*Define indice en SQL*/
PUT UNFORMATTED "PRIMARY KEY (campo1)".
PUT UNFORMATTED "); ".
FOR EACH Tabla1 NO-LOCK: /*Se barre el contenido de la tabla de progress a migrar*/
ASSIGN
strValores = "" /* variable que contendra los valores para cada campo en SQL*/
strValores = "'" + Tabla1.campo1 + "', " + /*Asignacion de valores a campos para SQL*/
"'" + Tabla1.campo2 + "', " +
"'" + Tabla1.campo3 + "', " +
"'" + Tabla1.campo4 + "', " +
"'" + Tabla1.campo5 + "'" .
/*se anexa al archivo el llenado de la tabla para SQL con valores de Progress */
PUT UNFORMATTED "INSERT INTO voluntario VALUES (" strValores "); ".
END.
PUT UNFORMATTED "" . /*Se agrega un salto de linea al final del archivo */
OUTPUT CLOSE.
