Registro de fechas
Hola:
espero que me puedan ayudar, estoy realizando un sistema pero necesito registrar la fecha de ingreso de los empleados de una empresa desgraciadamente hay personas que no recuerdan exactamente cuando ingresaron por lo tanto existe la necesidad en algunos casos de solo registrar el aƱo y en otros el mes y el aƱo. Mi variable debe de estar como tipo date y no me deja registrar solo aƱo , o solo mes y aƱo.
¿¿¿Como le puedo hacer???
espero que me puedan ayudar, estoy realizando un sistema pero necesito registrar la fecha de ingreso de los empleados de una empresa desgraciadamente hay personas que no recuerdan exactamente cuando ingresaron por lo tanto existe la necesidad en algunos casos de solo registrar el aƱo y en otros el mes y el aƱo. Mi variable debe de estar como tipo date y no me deja registrar solo aƱo , o solo mes y aƱo.
¿¿¿Como le puedo hacer???
En tu tabla crea tres campos caracter, dia, mes y aƱo.
En tu formulario donde capturas la informacion tres textbox que acepten por separado dichos datos.
Para recuperar dicha informacion en formato date:
set strictdate to 0
if len(alltrim(mitabla.dia))=1
store '0'+alltrim(mitabla.dia) to mdia
else
store alltrim(mitabla.dia) to mdia
endif
if len(alltrim(mitabla.mes))=1
store '0'+alltrim(mitabla.mes) to mmes
else
store alltrim(mitabla.mes) to mmes
endif
store alltrim(mitabla.aƱo) to mano
fechaing=ctod(dia+'/'+mes+'/'+ano)
Espero te sirva
En tu formulario donde capturas la informacion tres textbox que acepten por separado dichos datos.
Para recuperar dicha informacion en formato date:
set strictdate to 0
if len(alltrim(mitabla.dia))=1
store '0'+alltrim(mitabla.dia) to mdia
else
store alltrim(mitabla.dia) to mdia
endif
if len(alltrim(mitabla.mes))=1
store '0'+alltrim(mitabla.mes) to mmes
else
store alltrim(mitabla.mes) to mmes
endif
store alltrim(mitabla.aƱo) to mano
fechaing=ctod(dia+'/'+mes+'/'+ano)
Espero te sirva
