戻る|進む

DCL:GRPH２:UCPACK : 日付に関する座標軸ルーチン:メソッド(元サブルーチン)の説明

5.3.5 ucpget/ucpset(ucpstx)

1.

機能

UCPACKで使う内部変数を参照/変更する. (ucpstxは実行時オプションによる変更を許す. )

2.

呼び出し方法

ipara = NumRu::DCL.ucpget(cp)
NumRu::DCL.ucpset(cp,lpara)
NumRu::DCL.ucpstx(cp,ipara)

3.

パラメーターの説明

cp	(C*8)	内部変数の名前.
ipara	(I,R,L)	内部変数の値.

以下にcpとして指定できる名前のリストを記す.

'NDAY'	(I)	ucxady/ucyadyを使うとき,何日ごとに目盛と日付を描くかを指定する.'NDAY'が不定なら0, 1, 2, 5, 10, 15の中から適当な値が選ばれる(0以下のときは軸を描くだけで目盛と日付は描かない);陽に与えられていればその値を使う(初期値は不定).これはメソッド(元関数) 'NUCDAY'が決める.
'NCHAR'	(I)	ucxamn/ucyamnを使うとき,月名を何文字描くかを指定する. 'NCHAR'が不定なら0, 1, 2, 3, 9の中から適当な値が選ばれる(0のときは軸を描くだけで目盛と月名は描かない);陽に与えられていればその値を使う(初期値は不定).これはメソッド(元関数)'NUCCHR'が決める.
'LOWER'	(L)	ucxady/ucyadyで描く月名の2文字目以下を小文字にするかどうかを指定する..true.なら小文字にする; .false.なら大文字のままにする(初期値は.false.).
'IUNDEF'	(I)	値が不定であることを示す内部変数(初期値は -999).

4.

備考

(a)

内部変数を管理するための下請けルーチンとして 以下のものがある.

ncp = NumRu::DCL.ucpqnp()	内部変数の総数 ncpを求める.
idx = NumRu::DCL.ucpqid(cp)	内部変数 cpの位置 idxを求める.
cp = NumRu::DCL.ucpqcp(idx)	idxの位置にある内部変数の名前 cpを参照する.
ipara = NumRu::DCL.ucpqvl(idx)	idxの位置にある内部変数の値 iparaを参照する.
NumRu::DCL.ucpsvl(idx,ipara)	idxの位置にある内部変数の値 iparaを変更する.

(b)

UCpGETは上に述べたUCPQIDを呼んで 内部変数の位置を求め, ucpqvlによって値を参照する; ucpsetはucpqidを呼んで内部変数の位置を求め, ucpsvlによって値を設定する. したがって指定した内部変数名が見つからないとき, エラーメッセージはucpqidが出力する.

(c)

内部変数の型に応じ, IPARAとして適切な型の 定数あるいは変数を指定すること.