Seguimos buscando a Arshak. Ayudanos compartiendo!
Encuesta no oficial de docentes
Resultados de la encuesta no oficial de docentes
Probaste el SIGA Helper?

Donar $100 Donar $200 Donar $500 Donar mensualmente


Enviar respuesta 
 
Calificación:
  • 1 votos - 5 Media
  • 1
  • 2
  • 3
  • 4
  • 5
Buscar en el tema
FUNCION PARA OBTENER FECHA DE PROCESO ALGORITMOS
Autor Mensaje
suru88 Sin conexión
Campeon del cubo Rubik
.
****

Ing. en Sistemas
Facultad Regional Buenos Aires

Mensajes: 120
Agradecimientos dados: 3
Agradecimientos: 6 en 6 posts
Registro en: Aug 2010
Mensaje: #1
FUNCION PARA OBTENER FECHA DE PROCESO ALGORITMOS Dudas y recomendaciones Algoritmos y Estructuras de Datos
como es la funcion para obtener el dia del proceso? como se usa?
yo necesito obtener el dia el mes y el año del proceso por separado... como hago??? gracias
23-09-2010 19:26
Envíale un email Encuentra todos sus mensajes Agregar agradecimiento Cita este mensaje en tu respuesta
gonnza Sin conexión
User Verde

*********

Ing. en Sistemas
Facultad Regional Buenos Aires

Mensajes: 17.356
Agradecimientos dados: 900
Agradecimientos: 889 en 356 posts
Registro en: Mar 2010
BlogSpot Google+ YouTube
Mensaje: #2
RE: FUNCION PARA OBTENER FECHA DE PROCESO ALGORITMOS
no entiendo tu pregunta.
queres saber como, en Pascal (supongo q te referis a eso, porque estaras cursando "algoritmos" o eso entiendo) obtener la fecha, mes y año ?

se hace asi



program obtenerfecha;
uses crt, dos;
var anio,mes, fechadia, diasem: word;
begin

getdate(anio,mes, fechadia, diasem);
write('anio:',anio,' mes:',mes,' dia:',fechadia, ' ','dia nro:', diasem);
readkey;
end.




esto te devuelve

anio:2010 mes: 9 dia: 23 , dia nro: 4



Para hacerlo, tenes que en Uses incluir la librearia "dos"

y luego usar la funcion

getdate(word: anio; word:mes; word: fechadeldia; word: diasem)



(Creo que eran asi los parametros que se anotaban =P)
donde anio te devolvera el anio, mes el mes, fecha del dia te devolvera la fecha, y diasem el dia de la semana (siendo que lunes es 1, hoy es jueves, asique te devuelve 4)


Esper que te sirva, saludos !

[Imagen: v34BEFt.gif]
23-09-2010 19:54
Encuentra todos sus mensajes Agregar agradecimiento Cita este mensaje en tu respuesta
rulo Sin conexión
Ultra Nerd Mod
By demons driven!
*********

Ing. en Sistemas
Facultad Regional Buenos Aires

Mensajes: 4.333
Agradecimientos dados: 51
Agradecimientos: 67 en 37 posts
Registro en: Apr 2009
BlogSpot
Mensaje: #3
RE: FUNCION PARA OBTENER FECHA DE PROCESO ALGORITMOS
Si es la fecha del sistema es lo que dijo mi tocayo aca arriba.Si lo que querés decir es que te dieron la fecha en formato AAAAMMDD y la queres tener por separado,eso se soluciona facil,con una conversion de fecha.



procedure modfecha (fecha:longint,var dia:int, var mes:int, var anio:word)
var p word;
begin
p:=(fecha mod 10000);
dia:=(p mod 100);
mes:=((p-dia)/100);
anio:=((fecha-p)/1000);
end




En teoría funciona,pero por las dudas te insto a que lo compruebes =P.
OJO que solo funciona para cuando la fecha esta en formato AAAAMMDD
Si esta en MMDDAAAA tenés que usar otro algoritmo parecido.Igual no son muy difíciles de sacar.Si te ponés lo podés hacer vos mismo.Cualquier cosa avisame.

Saludos!

Cita:Absolve me, save my reign
Have you forgotten me?
(Este mensaje fue modificado por última vez en: 23-09-2010 21:33 por rulo.)
23-09-2010 21:25
Encuentra todos sus mensajes Agregar agradecimiento Cita este mensaje en tu respuesta
suru88 Sin conexión
Campeon del cubo Rubik
.
****

Ing. en Sistemas
Facultad Regional Buenos Aires

Mensajes: 120
Agradecimientos dados: 3
Agradecimientos: 6 en 6 posts
Registro en: Aug 2010
Mensaje: #4
RE: FUNCION PARA OBTENER FECHA DE PROCESO ALGORITMOS
muchas gracias era el getdate lo q buscaba! gracias che
23-09-2010 23:24
Envíale un email Encuentra todos sus mensajes Agregar agradecimiento Cita este mensaje en tu respuesta
Buscar en el tema
Enviar respuesta 




Usuario(s) navegando en este tema: 2 invitado(s)