Function get newset firmware

function get_newest_firmware()
{
auto temp_file, rc;
auto line;
temp_file = "c:\\_retivista_firmware_list.txt";
dos_system("dir C:\\firmware\\rv /B/O-D > " & temp_file);
file_open(temp_file,"r");
rc = file_getline(temp_file, line); #Read file line by line.
pause(line); #Type contents into a Pause message
file_close(temp_file); #Close file
dos_system("del " & temp_file); #Delete file.
return(line);
}
fr = get_newest_firmware();