fix: add output to specify which table formats are being used (#1676)

Author: uramirez8707

data_override/include/data_override.inc

@@ -194,9 +194,9 @@ if (grid_center_bug) then
 endif
 
 if (use_data_table_yaml) then
-   call mpp_error(NOTE, "You are using YAML.")
+   call mpp_error(NOTE, "data_override_init: You are using the yaml version of the data table.")
 else
-   call mpp_error(NOTE, "You are using the legacy table.")
+   call mpp_error(NOTE, "data_override_init: You are using the legacy version of the data table.")
 end if
 
   atm_on = PRESENT(Atm_domain_in)

diag_manager/diag_manager.F90

@@ -4212,9 +4212,13 @@ SUBROUTINE diag_manager_init(diag_model_subset, time_init, err_msg)
     END IF
 
     if (use_modern_diag) then
+      CALL error_mesg('diag_manager_mod::diag_manager_init',&
+               & 'You are using the yaml version of the diag table', NOTE)
       CALL fms_diag_object%init(diag_subset_output, time_init)
     endif
    if (.not. use_modern_diag) then
+     CALL error_mesg('diag_manager_mod::diag_manager_init',&
+               & 'You are using the legacy version of the diag table', NOTE)
      CALL parse_diag_table(DIAG_SUBSET=diag_subset_output, ISTAT=mystat, ERR_MSG=err_msg_local)
      IF ( mystat /= 0 ) THEN
        IF ( fms_error_handler('diag_manager_mod::diag_manager_init',&

field_manager/field_manager.F90

@@ -561,13 +561,13 @@ subroutine field_manager_init(nfields, table_name)
   if (file_exists("field_table")) &
     call mpp_error(FATAL, "You cannot have the legacy field_table if use_field_table_yaml=.true.")
 
-  call mpp_error(NOTE, "You are using the yaml version of the field_table")
+  call mpp_error(NOTE, "field_manager_init:: You are using the yaml version of the field_table")
   call read_field_table_yaml(nfields, table_name)
 #endif
 else
   if (file_exists("field_table.yaml")) &
     call mpp_error(FATAL, "You cannot have the yaml field_table if use_field_table_yaml=.false.")
-  call mpp_error(NOTE, "You are using the legacy version of the field_table")
+  call mpp_error(NOTE, "field_manager_init:: You are using the legacy version of the field_table")
   call read_field_table_legacy(nfields, table_name)
 endif