Ver Mensaje Individual
  #7  
Antiguo 21-03-2014
Avatar de newtron
[newtron] newtron is offline
Membrillo Premium
 
Registrado: abr 2007
Ubicación: Motril, Granada
Posts: 3.464
Reputación: 21
newtron Va camino a la fama
Cita:
Empezado por José Luis Garcí Ver Mensaje
De hecho yo cambiaría tu tabla de



a



y lo que haría en el caso de prestamos más o menos el siguiente código

Código Delphi [-] //Hacemos el después de las comprobaciones Post de la tabla de prestamos if ibdMateriales.locate('ID',DsPrestamos.dataset.fieldbyname('IDMaterial').value,[lopartialkey, locasesensitive]) then begin ibdMAteriales.edit ibdMaterialesPRESTADO.value:='S'; ibdMAteriales.Post; end; IBT.CommitRetaining;



En el caso de la devolución

Código Delphi [-] //Hacemos el después de las comprobaciones (la fecha de devolución y demás Post de la tabla de prestamos if ibdMateriales.locate('ID',DsPrestamos.dataset.fieldbyname('IDMaterial').value,[lopartialkey, locasesensitive]) then begin ibdMAteriales.edit ibdMaterialesPRESTADO.value:='N'; ibdMAteriales.Post; end; IBT.CommitRetaining;


Espero te ayude mejor, pero recuerda esto sólo es valido, para prestamos y por artículos unitarios.
Yo esa opción no la usaría porque imagino que se dará la posibilidad de tener varios libros iguales con lo que tendrían que tener un pequeño control de existencias, es mejor mantener un número.

Saludos
__________________
Be water my friend.
Responder Con Cita