Added VN.Receive_Status out variable
Changed Ada.Text_IO to VN.Text_IO