dc_error.f90 File Reference

Go to the source code of this file.

Data Types
interface	dc_error::DumpError

Modules
module	dc_error

Functions/Subroutines
integer function, public	dc_error::errorcode ()
subroutine, public	dc_error::geterrormessage (msg)
subroutine, public	dc_error::storeerror (number, where, err, cause_c, cause_i)
subroutine	dumperror ()

Variables
integer, parameter, public	dc_error::dc_noerr = 0
integer, save, private	dc_error::errno = DC_NOERR
integer, save, private	dc_error::cause_int = DC_NOERR
logical, save, private	dc_error::cause_int_valid = .false.
character(string), save, private	dc_error::cause_string = ""
character(string), save, private	dc_error::cause_location = ""
integer, parameter, public	dc_error::gt_efake = -100
integer, parameter, public	dc_error::gt_enomoredims = -101
integer, parameter, public	dc_error::gt_edimnodim = -102
integer, parameter, public	dc_error::gt_edimmultidim = -103
integer, parameter, public	dc_error::gt_edimotherdim = -104
integer, parameter, public	dc_error::gt_ebaddimname = -105
integer, parameter, public	dc_error::gt_enotvar = -106
integer, parameter, public	dc_error::gt_enomem = -107
integer, parameter, public	dc_error::gt_eotherfile = -108
integer, parameter, public	dc_error::gt_eargsizemismatch = -109
integer, parameter, public	dc_error::gt_enomatchdim = -110
integer, parameter, public	dc_error::gt_elimited = -111
integer, parameter, public	dc_error::gt_ebadvar = -112
integer, parameter, public	dc_error::gt_echarshort = -113
integer, parameter, public	dc_error::gt_enounlimitdim = -114
integer, parameter, public	dc_error::gt_ebadattrname = -115
integer, parameter, public	dc_error::gt_ebadhistory = -116
integer, parameter, public	dc_error::gt_ebadallocatesize = -117
integer, parameter, public	dc_error::gt_erankmismatch = -118
integer, parameter, public	dc_error::gt_enoturl = -119
integer, parameter, public	dc_error::gt_ebadgt4commagraphy = -120
integer, parameter, public	dc_error::gr_enotgr = -300
integer, parameter, public	dc_error::dc_enotinit = -400
integer, parameter, public	dc_error::dc_ealreadyinit = -401
integer, parameter, public	dc_error::dc_ebadunit = -402
integer, parameter, public	dc_error::dc_ebadcaltype = -403
integer, parameter, public	dc_error::dc_ebadtimezone = -404
integer, parameter, public	dc_error::dc_efilenameempty = -405
integer, parameter, public	dc_error::dc_ebadfileopmode = -406
integer, parameter, public	dc_error::dc_enounitnum = -407
integer, parameter, public	dc_error::dc_enofileexist = -408
integer, parameter, public	dc_error::dc_enofileread = -409
integer, parameter, public	dc_error::dc_enofilewrite = -410
integer, parameter, public	dc_error::dc_enegative = -411
integer, parameter, public	dc_error::dc_earglack = -412
integer, parameter, public	dc_error::dc_enoassoc = -413
integer, parameter, public	dc_error::dc_enoentry = -414
integer, parameter, public	dc_error::dc_enodimtime = -415
integer, parameter, public	dc_error::dc_edimtime = -416
integer, parameter, public	dc_error::dc_etoolargetime = -417
integer, parameter, public	dc_error::dc_ebaddate = -418
integer, parameter, public	dc_error::dc_einconsistcaldate = -419
integer, parameter, public	dc_error::hst_enotindefine = -500
integer, parameter, public	dc_error::hst_eindefine = -501
integer, parameter, public	dc_error::hst_eintfile = -502
integer, parameter, public	dc_error::hst_ebadname = -503
integer, parameter, public	dc_error::hst_enottermgthist = -504
integer, parameter, public	dc_error::hst_enodependtime = -505
integer, parameter, public	dc_error::hst_ebadvarname = -506
integer, parameter, public	dc_error::hst_enotimedim = -507
integer, parameter, public	dc_error::hst_enoaxisname = -508
integer, parameter, public	dc_error::hst_evarinuse = -509
integer, parameter, public	dc_error::hst_ealreadyregvarfix = -510
integer, parameter, public	dc_error::hst_ebadslice = -511
integer, parameter, public	dc_error::hst_ebadnewfileint = -512
integer, parameter, public	dc_error::hst_emaxdimsdepended = -513
integer, parameter, public	dc_error::hst_eindivisible = -514
integer, parameter, public	dc_error::hst_ebadterminus = -515
integer, parameter, public	dc_error::hst_ebadorigin = -516
integer, parameter, public	dc_error::hst_empinoaxisdata = -517
integer, parameter, public	dc_error::usr_errno = -1000

Function/Subroutine Documentation

dumperror()

subroutine dumperror ( )

private

Definition at line 942 of file dc_error.f90.

References dc_error::geterrormessage(), and dc_types::string.

Referenced by gtvarcopyattrall(), gtvarcopyvalue(), gtvarcreatecopyc(), historysettime(), gtool_history_internal::set_fake_dim_value(), and dc_error::storeerror().

  !
  ! GetErrorMessage からエラーメッセージを取得後、
  ! それを sysdep#AbortProgram に渡してプログラムを終了させます。
  !
  ! Get error messages from "GetErrorMessage", and put the messages
  ! to sysdep#AbortProgram, and stop the program.
  !
  use dc_types, only: string
  use dc_error, only: geterrormessage
  use sysdep, only: abortprogram
  character(len = STRING):: message
continue
  call geterrormessage(message)
  call abortprogram(message)

Here is the call graph for this function:

Here is the caller graph for this function: