diff --git a/Manuals/FDS_User_Guide/FDS_User_Guide.tex b/Manuals/FDS_User_Guide/FDS_User_Guide.tex index e258c401b54..e6069e39426 100644 --- a/Manuals/FDS_User_Guide/FDS_User_Guide.tex +++ b/Manuals/FDS_User_Guide/FDS_User_Guide.tex @@ -14609,6 +14609,7 @@ \chapter{Error Codes} 1044 \> \ct{Cannot set EXTERNAL_FILE=T for a RAMP used for an output clock ...} \> Section~\ref{info:external_control} \\ 1045 \> \ct{QUANTITY ... requires a PART_ID for particles with mass.} \> Section~\ref{tab:particleoutputquantities} \\ \\ +1050 \> \ct{The file ... does not exist. Set RESTART=.FALSE.} \> Section~\ref{info:restart} \\ 1051 \> \ct{RESTART initial time equals T_END.} \> Section~\ref{info:restart} \\ 1052 \> \ct{On TIME, do not set both RAMP_TIME and RAMP_DT.} \> Section~\ref{info:simulation_time_ramp} \\ 1053 \> \ct{One TIME, if one of DT_EXTERNAL_HEARTBEAT or} \> Section~\ref{info:external_control} \\ diff --git a/Source/dump.f90 b/Source/dump.f90 index eaa07080ffb..32862c809fb 100644 --- a/Source/dump.f90 +++ b/Source/dump.f90 @@ -1528,12 +1528,10 @@ SUBROUTINE WRITE_SMOKEVIEW_FILE ! If this is a RESTART case but an old .smv file does not exist, shutdown with an ERROR. -IF( MY_RANK==0) THEN - INQUIRE(FILE=FN_SMV,EXIST=EX) - IF (.NOT.EX .AND. APPEND) THEN - WRITE(MESSAGE,'(A,A,A)') "ERROR: The file, ",TRIM(FN_SMV),", does not exist. Set RESTART=.FALSE." - CALL SHUTDOWN(MESSAGE) ; RETURN - ENDIF +INQUIRE(FILE=FN_SMV,EXIST=EX) +IF (.NOT.EX .AND. APPEND) THEN + WRITE(MESSAGE,'(A,A,A)') "ERROR(1050): The file, ",TRIM(FN_SMV),", does not exist. Set RESTART=.FALSE." + CALL SHUTDOWN(MESSAGE) ; RETURN ENDIF ! If this is a RESTART case, there is no need to open the .smv file except for Process 0.