Planning,,, Un retoque o algo hago mal...

Planning,,, Un retoque o algo hago mal...

Postby Willi Quintana » Tue Dec 08, 2015 9:42 pm

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..

Image
User avatar
Willi Quintana
 
Posts: 1019
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú

Re: Planning,,, Un retoque o algo hago mal...

Postby nnicanor » Wed Dec 09, 2015 7:33 pm

Hola,

Podrías por favor compartir el código también conmigo ?

Slds,
Nicanor Martinez M.
Auditoria y Sistemas Ltda.
MicroExpress Ltda.
FW + FWH + XHARBOUR + HARBOUR + PELLES C + XDEVSTUDIO + XEDIT + BCC + VC_X86 + VCC_X64 + MINGW + R&R Reports + FastReport + Tdolphin + ADO + MYSQL + MARIADB + ORACLE
nnicanor@yahoo.com
nnicanor
 
Posts: 302
Joined: Fri Apr 23, 2010 4:30 am
Location: Colombia

Re: Planning,,, Un retoque o algo hago mal...

Postby Francisco Horta » Wed Dec 09, 2015 10:37 pm

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
____________________
Paco
Francisco Horta
 
Posts: 845
Joined: Sun Oct 09, 2005 5:36 pm
Location: la laguna, mexico.

Re: Planning,,, Un retoque o algo hago mal...

Postby Daniel Garcia-Gil » Thu Dec 10, 2015 12:34 pm

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
User avatar
Daniel Garcia-Gil
 
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 pm
Location: Isla de Margarita

Re: Planning,,, Un retoque o algo hago mal...

Postby Willi Quintana » Thu Dec 10, 2015 7:06 pm

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

Image
User avatar
Willi Quintana
 
Posts: 1019
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú

Re: Planning,,, Un retoque o algo hago mal...

Postby joseluisysturiz » Fri Dec 11, 2015 8:38 pm

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

Image

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... :shock:
Dios no está muerto...

Gracias a mi Dios ante todo!
User avatar
joseluisysturiz
 
Posts: 2064
Joined: Fri Jan 06, 2006 9:28 pm
Location: Guatire - Caracas - Venezuela

Re: Planning,,, Un retoque o algo hago mal...

Postby Willi Quintana » Fri Dec 11, 2015 8:43 pm

Claro amigo,,,,
Salu2
User avatar
Willi Quintana
 
Posts: 1019
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú

Re: Planning,,, Un retoque o algo hago mal...

Postby joseluisysturiz » Fri Dec 11, 2015 10:44 pm

Willi Quintana wrote:Claro amigo,,,,
Salu2

Mi correo es joseluisysturiz arroba yahoo.com, saludos, gracias...
Dios no está muerto...

Gracias a mi Dios ante todo!
User avatar
joseluisysturiz
 
Posts: 2064
Joined: Fri Jan 06, 2006 9:28 pm
Location: Guatire - Caracas - Venezuela

Re: Planning,,, Un retoque o algo hago mal...

Postby Daniel Garcia-Gil » Mon Dec 14, 2015 12:50 am

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
User avatar
Daniel Garcia-Gil
 
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 pm
Location: Isla de Margarita

Re: Planning,,, Un retoque o algo hago mal...

Postby Willi Quintana » Mon Dec 14, 2015 12:51 pm

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  Expand view

       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
User avatar
Willi Quintana
 
Posts: 1019
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú

Re: Planning,,, Un retoque o algo hago mal...

Postby Baxajaun » Mon Dec 14, 2015 4:12 pm

Buenas tardes Willi,

si publicas el código aquí, estará disponible para todos los compañeros.

Muchas gracias.

Saludos
User avatar
Baxajaun
 
Posts: 968
Joined: Wed Oct 19, 2005 2:17 pm
Location: Gatika. Bizkaia

Re: Planning,,, Un retoque o algo hago mal...

Postby Willi Quintana » Mon Dec 14, 2015 7:43 pm

Amigos,,,
Aquí esta todo el tema.. Solo hice unas modificaciones en los datos que se generan en las DBFs,,,,
https://bitbucket.org/fivetech/fivewin-contributions/downloads/plann.zip
User avatar
Willi Quintana
 
Posts: 1019
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 63 guests

cron