mmm
muestra la estructura de tus tablas, que base de datos estas usando, como te conectas, como guardas la informacion
aqui te coloco un pseudocodigo
Código Delphi
[-]
Select * from tablaVentas where FechaVencimiento <= :Fecha
te jalaria todo lo que ya venvio y/o vence en una fecha determinada