Separa fecha en impresión
En el programa ya tengo una base de datos de fechas y esas fechas son las que necesito imprimir. En formulario de impresión selecciono fecha y la pego al formulario en las propiedades le escribo el subtr y no me sirve me saca error.
ejmp.
Mi base de datos se llama ingreso y dentro esta la variable fecha.
Esto lo escribo en las propiedades del formulario de impresión así : subtr(ingreso. Fecha, 1,2) supuestamente para que me imprima los dos primeros dígitos de la fecha pero no me funciona.
Lo anterior esta en vfp 6.0
Nota: las fechas ya están escritas.
Gracias
jamr
ejmp.
Mi base de datos se llama ingreso y dentro esta la variable fecha.
Esto lo escribo en las propiedades del formulario de impresión así : subtr(ingreso. Fecha, 1,2) supuestamente para que me imprima los dos primeros dígitos de la fecha pero no me funciona.
Lo anterior esta en vfp 6.0
Nota: las fechas ya están escritas.
Gracias
jamr
1 Respuesta
Respuesta de thabocf
Espero y te sirva... (hace algún tiempo que no utilizo vfp)
Según recuerdo la función no es subtr es SubStr y para poder utilizar esta
función (substr) tiene que ser una cadena (expresión de caracteres) o un
campo memo... y que con esto.. pues que tu campo es fecha (date) por lo
que primero debes de convertir el valor a carácter, esto lo consigues con la
función dtos().. La función dtos() convierte el valor fecha en carácter o cadena
en formato AAAAMMDD ... por lo que lo que tu requieres es más o menos así:
Anio = SubStr(DtoS(Ingreso.Fecha,1,4) ---- (Año con 4 Digitos)
Mes = Substr(DtoS(Ingreso.Fecha,5,2) ---- (Mes)
Dia = SubStr(DtoS(Ingreso.Fecha,7,2) ---- (Dia)
A ver si con esto se soluciona tu problema...
Me comentas como te fue...
Según recuerdo la función no es subtr es SubStr y para poder utilizar esta
función (substr) tiene que ser una cadena (expresión de caracteres) o un
campo memo... y que con esto.. pues que tu campo es fecha (date) por lo
que primero debes de convertir el valor a carácter, esto lo consigues con la
función dtos().. La función dtos() convierte el valor fecha en carácter o cadena
en formato AAAAMMDD ... por lo que lo que tu requieres es más o menos así:
Anio = SubStr(DtoS(Ingreso.Fecha,1,4) ---- (Año con 4 Digitos)
Mes = Substr(DtoS(Ingreso.Fecha,5,2) ---- (Mes)
Dia = SubStr(DtoS(Ingreso.Fecha,7,2) ---- (Dia)
A ver si con esto se soluciona tu problema...
Me comentas como te fue...
