‖一括処理部品集‖nendo.html 《戻る》 《玄関へ》
《 処理対象の年度を設定をする 》
【内容】
扱う表などを年度ごとに区分した方が都合がよい場合、
はじめに対象年度を設定しておきます。
【用例】
名札 年度
&年度="",&システム名="『栄養士補佐』
"
&年度=#COND(&月>3,&年,&月<4,&年-1) @
名札 年度設定
繰り返し
キー入力 (15,41),プロンプト=#連結(&システム名
\ A
," 処理対象年度を西暦の4桁で入力してください。")
\
,モード=半角,上書き=する,初期値=&年度,終了状態=&ESC,&年度
条件 (&ESC=0 .or &年度=0
.or &年度="") 分岐 初期
B
条件 (&年度<1993 .or &年度>2100)
分岐 年度設定
メニュー2 &POP1,1,(15,41),#連結(&システム名
\
,"処理年度は",#全角(#STR(&年度)),"年です。よろしいか?")
\
,"は い,訂正する,終 了"
条件 (&POP1=1) 繰り返し中止
条件 (&POP1=2) 分岐 年度設定
C
条件 (&POP1=3) 手続き実行 要
繰り返し終了
手続き終了
【解説】
@ 内蔵時計を利用し、年月より処理対象とする年度の初期値を用意します。
A 年度のキー入力を促します。
B 適当な年度の値が入力されなかった場合、スタートに戻すか
再入力を促します。
C 年度の訂正ができます。