Page 1 of 1
Planning,,, Un retoque o algo hago mal...
Posted: Tue Dec 08, 2015 9:42 pm
by Willi Quintana
Estimado Daniel, Primero te doy las gracias por tu gran trabajo con FiveWin, no quiero abusar de tu confianza, estoy usando la clase Planning, va a100,,
e observado un detalle, en la imagen ajunta, se aprecia que hay una reserva que termina el dia 27 de diciembre, se ve correctamente cuando el checkin va al comienzo dentro del rango de las fechas del PLannig, pero si el rango empieza al "medio" de una reserva, no aparece la mención,,, en el ejemplo la reserva termina el 27 en el 1er cuadro y en 2l 2do no se ve en el dia 27, debería verse una mitad..
Re: Planning,,, Un retoque o algo hago mal...
Posted: Wed Dec 09, 2015 7:33 pm
by nnicanor
Hola,
Podrías por favor compartir el código también conmigo ?
Slds,
Re: Planning,,, Un retoque o algo hago mal...
Posted: Wed Dec 09, 2015 10:37 pm
by Francisco Horta
Que tal willi,
Se ve estupendo tu trabajo, pudieras compartir esa parte de tu codigo y la clase tplan con la version que usas?
Mil gracias
Saludos
Re: Planning,,, Un retoque o algo hago mal...
Posted: Thu Dec 10, 2015 12:34 pm
by Daniel Garcia-Gil
Willi
He estado fuera de circulacion en el foro por un tiempo prolongado por motivo de grandes trabajos que tengo actualmente, para facilitarme el trabajo de asistencia, pordrias prepararme un ejemplo que se muestre el problema y me lo envias, gracias
Re: Planning,,, Un retoque o algo hago mal...
Posted: Thu Dec 10, 2015 7:06 pm
by Willi Quintana
Hola Daniel, gracias por responder.... mira el tema es simple...
En el cuadro 1 hago una reserva del 27 de noviembre 2015 al 31 de diciembre 2015, cambio el rango de fechas y la reserva no aparece en el cuadro 2 (falta el día del checkout)
EN el cuadro 3 hago una reserva del 31 de diciembre 2015 al 31 de enero del 2016, cambio el rango de fechas y la reserva no aparece en cuadro 4 (falta el día del checkin)
Salu2
WIlli
Re: Planning,,, Un retoque o algo hago mal...
Posted: Fri Dec 11, 2015 8:38 pm
by joseluisysturiz
Willi Quintana wrote:Hola Daniel, gracias por responder.... mira el tema es simple...
En el cuadro 1 hago una reserva del 27 de noviembre 2015 al 31 de diciembre 2015, cambio el rango de fechas y la reserva no aparece en el cuadro 2 (falta el día del checkout)
EN el cuadro 3 hago una reserva del 31 de diciembre 2015 al 31 de enero del 2016, cambio el rango de fechas y la reserva no aparece en cuadro 4 (falta el día del checkin)
Salu2
WIlli
Saludos Quintana, podrias compartir algo de codigo para iniciarme en esta clase.? estoy diseñando un sistema de SPA y creo esta clase podria servirme o la TCalex, saludos, gracias...
Re: Planning,,, Un retoque o algo hago mal...
Posted: Fri Dec 11, 2015 8:43 pm
by Willi Quintana
Claro amigo,,,,
Salu2
Re: Planning,,, Un retoque o algo hago mal...
Posted: Fri Dec 11, 2015 10:44 pm
by joseluisysturiz
Willi Quintana wrote:Claro amigo,,,,
Salu2
Mi correo es joseluisysturiz arroba yahoo.com, saludos, gracias...
Re: Planning,,, Un retoque o algo hago mal...
Posted: Mon Dec 14, 2015 12:50 am
by Daniel Garcia-Gil
Willi
No veo problemas en la clase... revisa donde cargas la data que se va a mostrar en el planning y verifica que estes tomando los ragos de fecha correctos...
por ejemplo
if DToS( RESERVA->CHECK_OUT ) >= DToS( ::oPlann:dStart ) .AND. DToS( RESERVA->CHECK_IN ) <= DToS( ::oPlann:dEnd )
a ver si eso te resuelve el problema y que no te genere uno nuevo
Re: Planning,,, Un retoque o algo hago mal...
Posted: Mon Dec 14, 2015 12:51 pm
by Willi Quintana
HOla Daniel,
Gracias por tu respuesta,,,
Efectivamente, estaba tomando mal el rango de las fechas, lo hacia asi :
if DToS( RESERVA->CHECK_OUT )
> DToS( ::oPlann:dStart ) .AND. DToS( RESERVA->CHECK_IN )
< DToS( ::oPlann:dEnd )
con tu respuesta ya esta funcionado correctamente...
Un consulta mas... no puedo colocar un LISTBOX encima del plannig,,,
Code: Select all
DEFINE PLANNING oPlann OF oWndP;
HEADER "Habitaciones / Fechas";
COLOR HEADER ( If( Dow( dDate ) == 1 .OR. Dow( dDate ) == 7, CLR_RED, oPlann:nClrText ) );
COLOR CELL ColorData( oData ) ;
START DAY MesIni(dCheckIn) ;
END DAY MesFinal(dCheckIn) ;
ON RIGHT SELECT ( oPlann := BuildPop(oMySQL, nRow, nCol, oPlann, dCheckIn, dCheckOut), EVAL( eCarga ) ) ;
ON CAPTURE ( oPlann := MoveReservation( oMySQL, oData, nRowId, oPlann ), EVAL(eCarga) ) ;
ON RESIZE DATA ( oPlann := ResizeReservation( oMySQL, oData, nRowId, oPlann ), EVAL(eCarga) ) //NOHALFDAY
oWndP:oClient := oPlann
oPlann:nTopMargin := 220 // margen superior
@ 25, 0 LISTBOX oLbx ;
FIELDS aHabit[oLbx:nAt, 2], ;
aHabit[oLbx:nAt, 3], ;
aHabit[oLbx:nAt, 4], ;
STR(aHabit[oLbx:nAt, 5],4,0) ;
HEADERS "A", "B", "C", "D", "E", "F", "G" ;
SIZE 400,100 ;
SIZES 10,10,10,10 PIXEL ;
OF oPlann
oLbx:SetArray(aHabit)
oPlann:oClient := oLbx <--------- con o sin esta línea no funciona,,, me de error:
El error:
Error description: Error BASE/1004 Class: 'NIL' has no exported method: NAT
Args:
[ 1] = U
Re: Planning,,, Un retoque o algo hago mal...
Posted: Mon Dec 14, 2015 4:12 pm
by Baxajaun
Buenas tardes Willi,
si publicas el código aquí, estará disponible para todos los compañeros.
Muchas gracias.
Saludos
Re: Planning,,, Un retoque o algo hago mal...
Posted: Mon Dec 14, 2015 7:43 pm
by Willi Quintana
Amigos,,,
Aquí esta todo el tema.. Solo hice unas modificaciones en los datos que se generan en las DBFs,,,,
https://bitbucket.org/fivetech/fivewin- ... /plann.zip