llenar campo fecha de una tabla

Hola Grupo:
Por que no llena el campo fecha de la tabla vehe.
Los demás campos se llenan bien, pero el campo fecha de la
tabla no hay llenado.
alguna idea.
Enrique

SELECT Fecha FROM vehe ;
WHERE LEFT(DTOS(Fecha),6) = LEFT(DTOS(mDia1),6) ;
INTO CURSOR Tempo

IF _Tally > 0
MessageBox("Mes Procesado...",16)
ELSE
MessageBox("Puede Agregar El Mes..",16)
create cursor DatosHoja ;
(folio n(8), patente c(8), Transporte c(20), fecha f(8), hora
c(8), bruto n(6), tara N(6), neto N(6), toneladas n(4), movil c(8), memo
c(6));

select DatosHoja
append from (getfile("XLS"))type xl8
selec vehe
append from dbf("DatosHoja")
Endif
Muchas Gracias

Santiago de Chile

Hola Grupo:
Por que no llena el campo fecha de la tabla vehe.
Los demás campos se llenan bien, pero el campo fecha de la
tabla no hay llenado.
alguna idea.
Enrique

SELECT Fecha FROM vehe ;
WHERE LEFT(DTOS(Fecha),6) = LEFT(DTOS(mDia1),6) ;
INTO CURSOR Tempo

IF _Tally > 0
MessageBox("Mes Procesado...",16)
ELSE
MessageBox("Puede Agregar El Mes..",16)
create cursor DatosHoja ;
(folio n(8), patente c(8), Transporte c(20), fecha f(8), hora
c(8), bruto n(6), tara N(6), neto N(6), toneladas n(4), movil c(8), memo
c(6));

select DatosHoja
append from (getfile("XLS"))type xl8
selec vehe
append from dbf("DatosHoja")
Endif
Muchas Gracias

Santiago de Chile

Tu código tiene varios errores
SELECT Fecha FROM vehe ;
WHERE DTOS(Fecha) = DTOS(mDia1) ;
INTO CURSOR Tempo
Cuando creás el cursor: entiendo que el campo Fecha querés que sea una fecha
(date)
por lo tanto deberías escribir create cursor . Fecha D, ..


"Enrique" escribió en el mensaje
news:
> Hola Grupo:
> Por que no llena el campo fecha de la tabla vehe.
> Los demás campos se llenan bien, pero el campo fecha de la
> tabla no hay llenado.
> alguna idea.
> Enrique
>
> SELECT Fecha FROM vehe ;
> WHERE LEFT(DTOS(Fecha),6) = LEFT(DTOS(mDia1),6) ;
> INTO CURSOR Tempo
>
> IF _Tally > 0
> MessageBox("Mes Procesado...",16)
> ELSE
> MessageBox("Puede Agregar El Mes..",16)
> create cursor DatosHoja ;
> (folio n(8), patente c(8), Transporte c(20), fecha f(8), hora
> c(8), bruto n(6), tara N(6), neto N(6), toneladas n(4), movil c(8), memo
> c(6));
>
> select DatosHoja
> append from (getfile("XLS"))type xl8
> selec vehe
> append from dbf("DatosHoja")
> Endif
> Muchas Gracias
>
> Santiago de Chile

Hola compañeros; gracias por sus comentarios, aún no puedo arreglar que el
campo fecha se llene, tengo una tabla con los mismos campos y tipo, el
siguiente es el código, pero así y todo no funciona:

create cursor DatosHoja ;
(folio n(6), patente c(12), transporte c(20), fecha d(8),hora c(8), bruto
N(6), tara n(6), neto n(6), tonelada N(4), movil c(8), memo C(6));

select DatosHoja
append from (getfile("XLS"))type xl8
selec vehe
append from dbf("DatosHoja")
Muchas Gracias
Enrique
Santiago de Chile


"Mario Dal Degan" wrote:

Tu código tiene varios errores
SELECT Fecha FROM vehe ;
WHERE DTOS(Fecha) = DTOS(mDia1) ;
INTO CURSOR Tempo
Cuando creás el cursor: entiendo que el campo Fecha querés que sea una
fecha
(date)
por lo tanto deberías escribir create cursor . Fecha D, ..


"Enrique" escribió en el mensaje
news:
> Hola Grupo:
> Por que no llena el campo fecha de la tabla vehe.
> Los demás campos se llenan bien, pero el campo fecha de
> la
> tabla no hay llenado.
> alguna idea.
> Enrique
>
> SELECT Fecha FROM vehe ;
> WHERE LEFT(DTOS(Fecha),6) = LEFT(DTOS(mDia1),6) ;
> INTO CURSOR Tempo
>
> IF _Tally > 0
> MessageBox("Mes Procesado...",16)
> ELSE
> MessageBox("Puede Agregar El Mes..",16)
> create cursor DatosHoja ;
> (folio n(8), patente c(8), Transporte c(20), fecha f(8), hora
> c(8), bruto n(6), tara N(6), neto N(6), toneladas n(4), movil c(8),
> memo
> c(6));
>
> select DatosHoja
> append from (getfile("XLS"))type xl8
> selec vehe
> append from dbf("DatosHoja")
> Endif
> Muchas Gracias
>
> Santiago de Chile

Donde dice "fecha d(8)" pone "fecha D" SIN CANTIDAD NI PARENTESIS

Enrique Muñiz
Depto. Desarrollos
Servicios & Sistemas