All Read and Write statements in Subroutines must use the return code IOSTAT (FORTRAN) | CAST Appmarq