modif modul.pas, uCashIn.pas