Power Builder - Fecha, separada por DD, MM, YYYY

   
Vista:

Fecha, separada por DD, MM, YYYY

Publicado por Andres (331 intervenciones) el 04/10/2007 17:31:19
Amigos

Tengo una mantencion donde se comprobantes,
El ingreso consiste en solicitar al usuario
ANO:
MES
TIPO
NUMERO

El tema es que la data dw existe la columna fecha con formato datetime, tambien tiene una columna dia, donde se pide solo el dia del comprobante (debe ser del rango del mes indicado).
Como controlo cuando modifique el dia, que este no sea mayor al rango del mes o que no sea cero.

Atte

Andres
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Respuesta...

Publicado por Leopoldo Taylhardat (690 intervenciones) el 04/10/2007 19:24:53
Saludos validas con Isdate(string(fecha)) por ej...

integer dia, mes, ano
IF IsDate(string(dia)+'/'+string(mes)+'/'+string(ano) THEN
MessageBox('Atención','Fecha Correcta')
ELSE
MessageBox('Atención','Fecha Incorrecta')
END IF

ESPERO QUE TE SIRVA...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Respuesta...

Publicado por Andres (331 intervenciones) el 04/10/2007 19:52:45
Leopoldo

Hice las pruebas y resulta, pero en el evento itemchanged, como lo hago para que se quede en el campo del dia hasta que entregue un dato valido

Atte

Andres

Gracias por tu ayuda
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Respuesta...

Publicado por Leopoldo Taylhardat (690 intervenciones) el 05/10/2007 13:56:44
Saludos....

Le pones al mismo objeto en la validación cuando hay error...
this.SetFocus()

espero que te sirva...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Respuesta...

Publicado por Andres (331 intervenciones) el 05/10/2007 15:01:45
Leopoldo

Funciono perfecto, muchas gracias.

Este es el codigo

integer i
datetime ls_fecha
ls_ano = this.object.ano [row]
ls_mes = this.object.mes [row]
ls_dia = double(data)
IF IsDate(string(ls_dia)+'/'+string(ls_mes)+'/'+string(ls_ano)) THEN
// MessageBox('Atención','Fecha Correcta')
ls_fecha = f_fecha(ls_ano,ls_mes,ls_dia)
this.Object.fecha [row] = ls_fecha
this.Object.dia [row] = ls_dia
MessageBox("Atención Fecha Correcta",string(this.Object.fecha [row],"dd/mm/yyyy"))
for i = 1 TO dw_movtos.RowCount()
dw_movtos.object.dia [i] =this.object.dia [row]
dw_movtos.object.fecha[i] =this.object.fecha [row]
dw_movtos.object.fecha_emi[i] =this.object.fecha[row]
end for
cb_grabar .enabled = true
ELSE
// MessageBox('Atención','Fecha Incorrecta')
this.Trigger Event itemError (row,this.object.fecha,data)
this.SetFocus()
return 2
END IF
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar