anchor.diff:            errorMsg = 'RAFFENETTI 2 2E INTEGRALS not present on file'
             if(present(foundERI)) then
               write(6,'(A)') errorMsg
  +            call fileinfo%load()
             else
               call mqc_error_l(trim(errorMsg),6,'found',found)
             endIf
  
positive.code:               &and/or BA MO 2E INTEGRALS not present on file'
              if(present(foundERI)) then
                write(6,'(A)') errorMsg
              else
                call mqc_error_l(trim(errorMsg),6,'found',found)
              endIf
  
negative.code:             errorMsg = 'AA MO 2E INTEGRALS and/or BB MO 2E INTEGRALS not present on file'
              if(present(foundERI)) then
                write(6,'(A)') errorMsg
                call fileinfo%load()
              else
                call mqc_error_l(trim(errorMsg),6,'found',found)
              endIf
  