Crear ficheros DBF en ejecucion
Publicado por Rafa (4 intervenciones) el 17/09/2001 18:30:20
Hola Amigos.
Como ya he indicado en otro mensaje, yo estoy trabajando con Clipper y quiero pasar a windows mi aplicación.
En mi aplicación creo los ficheros .DBF desde una opción con el siguiente código :
*
* Structura de fichero : TAR.DBF
*
function F_TAR
local cArch := "TAR.DBF"
local aCrea
if !file(cArch)
aCrea := {}
AADD(aCrea, { "COD_ART" , "C", 13, 0 } )
AADD(aCrea, { "NUM_TAR" , "C", 01, 0 } )
AADD(aCrea, { "PRECIO_V" , "N", 11, 2 } )
AADD(aCrea, { "COMI" , "N", 06, 2 } )
dbCreate( cArch, aCrea)
endif
aCrea := {}
Return Nil
¿ Se puede hacer esto con visual DB ?
o no hace falta que sigua buscando información sobre el tema.
Gracias.
Como ya he indicado en otro mensaje, yo estoy trabajando con Clipper y quiero pasar a windows mi aplicación.
En mi aplicación creo los ficheros .DBF desde una opción con el siguiente código :
*
* Structura de fichero : TAR.DBF
*
function F_TAR
local cArch := "TAR.DBF"
local aCrea
if !file(cArch)
aCrea := {}
AADD(aCrea, { "COD_ART" , "C", 13, 0 } )
AADD(aCrea, { "NUM_TAR" , "C", 01, 0 } )
AADD(aCrea, { "PRECIO_V" , "N", 11, 2 } )
AADD(aCrea, { "COMI" , "N", 06, 2 } )
dbCreate( cArch, aCrea)
endif
aCrea := {}
Return Nil
¿ Se puede hacer esto con visual DB ?
o no hace falta que sigua buscando información sobre el tema.
Gracias.
Valora esta pregunta


0