open the inventory table sorted on article name scan through the table and print to screen all articles where stock quantity is below minimum stock level indicate audibly and visibly that the job is donereal code:
close data clear use inventry order partname scan for inventry.stockqty<inventry.minqty ? inventry.partname endscan close data messagebox('Job is done',0,'Finished')>hi to all.