Rem ( Se crea el manejador de la base de datos externa )
BD: crear manejador ( dbext, ODBC (compatible Microsoft SQL Server), SQL_DATA_ORIGIN, , , )
Rem ( Se procede a efectuar la conexión )
BD: conectar ( dbext, SQL_USR, "", DB_OK_CONNECT, DB_RETURN_CONNECT )
Rem ( Se ejecuta la sentencia SQL )
BD: SQL ( dbext, SQL, DB_NUM_FILAS, )
Rem ( Se extrae el título de cada columna de la base de datos externa )
BD: get nombre de columna por número ( dbext, 1, COL_NAME_1 )
BD: get nombre de columna por número ( dbext, 2, COL_NAME_2 )
BD: Get nombre de columna por número ( dbext, 3, COL_NAME_3 )
BD: Get nombre de columna por número ( dbext, 4, COL_NAME_4 )
Rem ( Se modifican las variables globales usadas en el título de cada columna de la rejilla de resultados )
Rem ( Se recorre la lista obtenida y se extrae, por cada fila, el contenido de cada columna )
BD: recorrer lista ( dbext )
Set ( DB_CONTADOR, DB_CONTADOR + 1 )
BD: get dato de columna por número ( dbext, 1, COL1 )
BD: get dato de columna por nombre ( dbext, COL_NAME_2, COL2 )
BD: get dato de columna por número ( dbext, 3, COL3 )
BD: get dato de columna por número ( dbext, 4, COL4 )
Rem ( Con los datos obtenidos se da de alta un registro en la tabla temporal )
Modificar campo ( COL_1, COL1 )
Modificar campo ( COL_2, COL2 )
Modificar campo ( COL_3, COL3 )
Modificar campo ( COL_4, COL4 )
Mensaje ( "Error de conexión",Información,, )