topic-46010

jbrita

Posts: 537

Joined: Mon Jan 16, 2006 03:42 PM

Validar Campo fecha y numero
Posted: Mon Oct 06, 2025 07:55 PM

Buenas tardes colegas, necesito de su ayuda..

estoy exportando una información de Excel a una tabla, lo que busco es validad}r el campo fecha y el campo total

Saludos

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: Validar Campo fecha y numero
Posted: Mon Oct 06, 2025 08:00 PM

Muéstranos tu código y lo que quieres validar durante el proceso. Creo que será más fácil ayudarte. ¿De acuerdo?

Gracias, tks.

Regards, saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

jbrita

Posts: 537

Joined: Mon Jan 16, 2006 03:42 PM

Re: Validar Campo fecha y numero
Posted: Mon Oct 06, 2025 08:05 PM

ahi esta

vColumna9 := DTOC(oHoja:Cells( Q,9 ):Value )      //fecha carga

vColumna12:= AllTrim(oHoja:Cells( Q,13 ):Value)   //patente

vColumna15:= AllTrim(oHoja:Cells( Q,16 ):Value)   //socio

vColumna16:= oHoja:Cells( Q,17):Value             //valor tramo

vColumna18:= oHoja:Cells( Q,19):Value             //DIAS SOBRE ESTADÍA

vColumna19:= oHoja:Cells( Q,20):Value             //VALOR SOBRE ESTADÍ

a veces da error, cuando la fecha viene por ejemplo 02/09/0025 o cuando esta vacia

algo asi

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: Validar Campo fecha y numero
Posted: Mon Oct 06, 2025 08:16 PM

¿No es mejor exportar a un .DBF, criticar los campos que contienen FECHAS y luego exportar el .DBF a Excel?

Ejemplo:

https://fivewin.com.br/index.php?/topic/27028-xls-para-dbf/#comment-279374

https://forums.fivetechsupport.com/viewtopic.php?p=170662#p170662

https://www.lawebdelprogramador.com/foros/Clipper-FiveWin/1078502-pasar-a-Excel.html#i1078502

Regards, saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

acuellar

Posts: 1710

Joined: Tue Oct 28, 2008 06:26 PM

Re: Validar Campo fecha y numero
Posted: Mon Oct 06, 2025 11:03 PM

Estimado jbrita
como dice Joao mejor es pasar a una DBF temporal con campo fecha

Code: Select all Collapse

     cXls:="c:\sistemas\planilla.xls"  ó cXls:=cGetFile("*.XLSx", "Seleccione la planilla") 
     oRange   := GetExcelRange( cXls, "DATOS", "A2:F100" )
      FW_ExcelToDBF( oRange, "FECHA,PATENTE,SOCIO,TRANO,DIAS,VALOR", .T. )
      oRange:=Nil

Saludos,

Adhemar C.

FiveTech Support Forums

Continue the discussion