如何改变这句话的存储位置

renlu617

OPEN (UNIT = 31, FILE = OUT(1:INDEX(OUT,' ')-1)//'BUDG.DAY')
            WRITE (31,'(''YR MO DA DOY   PREC  MESFL   FLOW   EVAP   '',
     *         ''SEEP   SNOW   SWAT   GWAT INTR+S'')')


这句话我理解是打开BUDG.DAY，进行存储，可是我怎么改变BUDG.DAY的位置使他在另外一个文件夹内输出？

珊瑚虫

OPEN (UNIT = 31, FILE ='输出的路径'// OUT(1:INDEX(OUT,' ')-1)//'BUDG.DAY')
问题中有代码请使用代码格式提问