Cambiar el formato de fecha

[Noe]

Hola Foro !!!
Esperando me puedan ayudar. les doy las gracias de antemano.

Como puedo cambiar el formato de arc_plano.fecini(01012010) a este
01/01/2010 para que lo muestre en el reporte.

Select arc_plano.numemp,arc_plano.fecini,arc_plano.fecfin,;

plantilla.paterno,plantilla.materno,plantilla.nombre,plantilla.codpue,;
plantilla.nivel,plantilla.plaza ;
From arc_plano Left Outer Join plantilla ;
On arc_plano.numemp = plantilla.numemp ;
Order By plantilla.paterno,plantilla.materno Into Cursor
c_respaldo
Report form rep_respaldo Preview

Gracias. espero respuesta

[Ing.Daniel Bojorge]

01012010 no lo veo como un formato de fecha más bien lo veo como un string.

Si es un string, pues creo que tendrías que "construir" tu fecha tomando los dos primeros dígitos para el día, los otros dos el mes y los otros dos para el año.

Dios L@s Bendiga

Saludos,

Daniel (Con 1 Estrella DCE de Microsoft)
Nicaragua

"Si ustedes permanecen unidos a mí, y si permanecen fieles a mis enseñanzas, pidan lo que quieran y se les dará.
(Juan 15:7 DHH)
Bendito el varón que se fía en el SEÑOR, y cuya confianza es el SEÑOR.
(Jeremías 17:7 RV2000)

--
_______________________________________________________________
Has recibido este mensaje porque estás suscrito al Grupo "Mundo Visual
FoxPro" de Grupos de Google.

Para anular la suscripción a este grupo, envía un mensaje a:
mundovisualfox...@googlegroups.com

[eduardo]

Si lo estas trayendo desde un archivo plano deberias primero
transformarlo a formato fecha.
Cfecha = Ctod (subs(arc_plano.fecini,1,2) + '/' +
subs(arc_plano.fecini,3,2) + '/' + subs(arc_plano.fecini,5,4) )
Saludos
Eduardo

[Noe]

Hola Eduardo !!

Gracias por responder los datos los tengo en una tabla. pude haberlo
hecho de esta manera crear otro campo en la tabla (fecha) y con un
scan
ejemplo
Scan
dd=Substr(fecini,1,2)
mm=Substr(fecini,3,2)
aa=Substr(fecini,5,4)
fx=dd+'/'+mm+'/'+aa
replace fecha with ctod(fx)
Endscan

y posteriormente imprimir el reporte con el codigo

Select arc_plano.numemp,arc_plano.FECHA,arc_plano.fecfin,;

plantilla.paterno,plantilla.materno,plantilla.nombre,plantilla.codpue,;
plantilla.nivel,plantilla.plaza ;
From arc_plano Left Outer Join plantilla ;
On arc_plano.numemp = plantilla.numemp ;
Order By plantilla.paterno,plantilla.materno Into Cursor
c_respaldo
Report form rep_respaldo Preview

pera la preguna es se puede hacer solamente con el SELECT ?

[Yvan GMAIL]

Select arc_plano.numemp,ctod(Substr(fecini,1,2) + "/" + Substr(fecini,3,2) +
"/" + Substr(fecini,5,4)) as fecha,;

plantilla.paterno,plantilla.materno,plantilla.nombre,plantilla.codpue,;
plantilla.nivel,plantilla.plaza ;
From arc_plano Left Outer Join plantilla ;
On arc_plano.numemp = plantilla.numemp ;
Order By plantilla.paterno,plantilla.materno Into Cursor
c_respaldo
Report form rep_respaldo Preview

con respecto al scan.. lo reducir�a a replace all..

Yvan Carranza
http://groups.google.com.pe/group/mundovisualfoxpro

Hola Eduardo !!

--
_______________________________________________________________
Has recibido este mensaje porque est�s suscrito al Grupo "Mundo Visual

FoxPro" de Grupos de Google.

Para anular la suscripci�n a este grupo, env�a un mensaje a:
mundovisualfox...@googlegroups.com

__________ Informaci�n de ESET NOD32 Antivirus, versi�n de la base de firmas
de virus 4881 (20100219) __________

ESET NOD32 Antivirus ha comprobado este mensaje.

http://www.eset.com

__________ Informaci�n de ESET NOD32 Antivirus, versi�n de la base de firmas de virus 4882 (20100220) __________

ESET NOD32 Antivirus ha comprobado este mensaje.

http://www.eset.com

[eduardo]

Podrias usar la funcion ctod transformando el formato ddmmaaa a
aaaammdd
eduardo

[Noe]

Hola Yvan !!

Gracias ..... era lo que yo queria.

Gacias a todos los que intervinieron....

RESUELTO.

On 20 feb, 08:20, "Yvan GMAIL" <yvan.carra...@gmail.com> wrote:
> Select arc_plano.numemp,ctod(Substr(fecini,1,2) + "/" + Substr(fecini,3,2) +
> "/" + Substr(fecini,5,4)) as fecha,;
> plantilla.paterno,plantilla.materno,plantilla.nombre,plantilla.codpue,;
>   plantilla.nivel,plantilla.plaza ;
>   From arc_plano Left Outer Join plantilla ;
>     On arc_plano.numemp = plantilla.numemp ;
>     Order By plantilla.paterno,plantilla.materno Into Cursor
> c_respaldo
> Report form rep_respaldo Preview
>
> con respecto al scan.. lo reducir a a replace all..
>

> Yvan Carranzahttp://groups.google.com.pe/group/mundovisualfoxpro

> http://www.eset.com- Ocultar texto de la cita -
>
> - Mostrar texto de la cita -