Codigo fuente

Código fuente de un Sistema de Video Club en Visual Basic
[pic]

Descripción del Programa:
Pantalla de cobro.
Desde esta pantalla se puede realizar:
• Alquilar de películas.
• Venta de productos.
• Devolución de Alquileres.
• Dar de baja alquileres.
• Ver los detalles de alquileres: los que están pendientes, alquileres retrasados, si están abonados o no etc...
Paraver una previa de la imagen de esta ventana hacé Click Acá (Presioná F11 para ver a pantalla completa en el Ie).

En el Grid inferior que es un ListView, muestra los productos de la venta actual, mientras que el ListView superior muestra el detalle solo de alquileres.

Mediante la tecla F12 se accede a la pantalla de cobro o mediante un botón en la parte inferior, el que dice "Cobrar".

Paraalquilar una película se debe ingresar el código del cliente en el apartado "Alquiler de Películas". Cuando se presiona Enter, muestra el nombre de dicho cliente, si es que está previamente registrado, si el cliente no existe muestra un aviso.

Si el cliente existe, luego pasa al TextBox "Código de Película" para ingresar el código de la misma que se le va a alquilar o vender. Cuando sepresiona Enter se comprueba, si hay copias disponibles de la película. También verifica en ese momento si dicho cliente ya alquiló esa película en alguna otra ocación.

Si no hay copias disponibles de la misma, avisa que socio la tiene alquilada y cuando es la fecha de devolución. Si todo está bien, se agrega dicha película al control ListView: "Listado de ventas y alquiler".
Lo mismo ocurre siqueremos vender un producto en la sección de abajo, se comprueba si hay Stock disponible para dicho producto.

Para eliminar un producto de la lista "Ventas y alquileres" hay que hacer dobleClick sobre dicho producto o película, o para anular toda la venta actual hay un botón respectivamente "Anular Venta" que cancela todo.

También hay una opción mediante un CheckBox para "No cobrar alquileres",osea supongamos que viene el cliente 5, y se lleva una película y un atado de cigarrillos, al seleccionar "No cobrar alquileres", se cobrarán solo los productos.

El programa no tiene opción para fiar o para grabar deudas.(Una posible opción para agregar)

Si elegimos la opción no cobrar películas, se grabará en la base de datos, en la tabla "Alquileres", en el campo "Abonado" el valor Si o NoUna cosa importante es que No se puede alquilar una película a un socio no registrado, pero si se puede vender un producto obviamente a un cliente cualquiera, y en la base de datos se grabará en la tabla "Movimientos" como código de cliente "No registrado".

Para devolver una película hay que ingresar el código del cliente en el TextBox "Código Cliente". Al presionar enter, se listanautomáticamente si el cliente tiene películas en su poder, y esto lo hace en el ListView de "Listado de Alquileres".

Los alquileres con demora o retraso aparecen con un ícono al costado en color Rojo, los de color verde no tienen retraso, están al día.

Para devolver una película, hay que hacer dobleClick en la misma para agregarla a la lista de "Venta y Alquileres", pero previamente tenemos que haberingresado un cliente en el TextBox "Código de Cliente" si no se hace esto no se podrá hacer la devolución.

El programa chequea también si es el cumpleaños del socio cuando se ingresa el código del mismo.
[pic]
Pantalla de control
Desde esta pantalla, se dan de alta, baja, modificaciones, búsquedas etc..., de los datos de Socios, Películas, Productos y Proveedores.
Para ver una previa de estapantalla click Acá
Desde la sección de Clientes podemos dar de baja, alta, modificaciones etc.. de los datos de los socios.

La sección de películas tiene una opción para especificar "Si la película es estreno o No", cuantas veces fue alquilada, el cobro de alquiler de dicha película, el monto de retraso, el valor de venta, el formato de la misma (Dvd, Vhs, etc..), el género, el proveedor al...