[Sintaxis] Crear generar un TXT

[Dasije]

Una de las formas más fácil y rápida de crear un fichero de texto, como puede ser para exportar datos por ejemplo, sería así:

Crear fichero:

TraceStart(trCreation+trFile,"tickets_subidos.txt")

Volcar información:

Trace("ticket"+";"+"linea")

Terminar:

TraceEnd()

Saludos.


Nitzer, JRBonafonte, Fito,

[Fito]

Para aportar otra forma, sería así:

Supongamos que tenemos un archivo de artículos y queremos hacer un csv, separado por ";", con el código, descripción, existencia.

sArchivoCSV is string  = ""  // definimos una variable para "acumular" los datos
        
FOR EACH Arti     // leemos todo el archivo de articulos y pasamos los valores a
                        // la variable
    sArchivoCSV += Arti.Codigo + ";" + Arti.Descrip + ";" + Arti.Existencia + CR
    // fijense que mezclé campos numéricos y alfanuméricos sin aplicar ninguna 
    // funcion para convertir tipo de dato. Windev lo hace solo.
END
IF sArchivoCSV<>"" THEN
    fSaveText("Archivo.CSV",sArchivoCSV)
END

Saludos.

Fito...