Actually, as my subroutine shows, I am just interested in a routine that returns the temperature in deg F, in a variable (TempF).

That is why in my example, I have allready removed all the SEROUT statements. And that is where my confusion comes in... after removing all the SEROUT statements I could see the (I believe) redundancy in the code portion we are discussing. BUT after removing the redundancy... I was not getting a correct reading of temperature.

More testing is needed, it may have been the wee hours that I was doing the testing.

Thanks