Up|<<Prev|Next>>

5.11 最新の定義を撤回する: NF_ABORT

この関数はもう、呼び出す必要がありません。 ファイルが定義モード中に、不具合が生じ変更を決定できない場合には、 NF_CLOSE によって自動的に呼び出されます。 関数 NF_ABORT は 定義モードに無い場合には、単にNetCDFファイルを閉じます。 もし、ファイルが生成されている最中で、まだ定義モードにある場合には、ファイルは削除されます。 NF_REDEF への呼び出しによって定義モードに入った場合には、NetCDFファイルは定義モードに入る以前のステータスに復旧され、ファイルは閉じられます。

 

INTEGER FUNCTION NF_ABORT(INTEGER NCID)

 

NCID

以前の NF_OPEN or NF_CREATE 呼び出しで返されたNetCDF ID。

 

エラーが発生していなければ、 NF_ABORT は NF_NOERR の値を返します。それ以外の場合には、返されたステータスがエラーを示します。エラーの原因として下記が挙げられます。

 

この例では NF_ABORT を使って、 foo.nc というファイルの再定義から撤退する。

INCLUDE 'netcdf.inc'
   ... 
INTEGER STATUS, NCID, LATID
   ... 
STATUS = NF_OPEN('foo.nc', NF_WRITE, NCID)
IF (STATUS .NE. NF_NOERR) CALL HANDLE_ERR(STATUS)
   ... 
STATUS = NF_REDEF(NCID)
IF (STATUS .NE. NF_NOERR) CALL HANDLE_ERR(STATUS)
   ... 
STATUS = NF_DEF_DIM(NCID, 'LAT', 18, LATID)
IF (STATUS .NE. NF_NOERR) THEN  ! 次元定義失敗
   CALL HANDLE_ERR(STATUS)
   STATUS = NF_ABORT(NCID)  ! 再定義中止
   IF (STATUS .NE. NF_NOERR) CALL HANDLE_ERR(STATUS)
ENDIF
   ...

Up|<<Prev|Next>>