tfTapeName_Click (Type:Event){ Read text from textfield_Tapename; QueryDB (Tapename) If Tapename isn't in the Database then GetMFGDate() from user ELSE Tapename Is in Database Get MFGDATE() from QueryDB(Tapename) If MFGDATE too old then GetMFGDATE() from user until user acknowledges over-ride or enters a good MFGDATE GetDestination() from Textfield_Destination Until Destination is entered and is valid per TapePolicy GetDestination() from User Write Tapename, MFGDATE, Destination, Current time and date to Listview_Entered_Data. }