一括処理部品集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 年度の訂正ができます。  

【参考】



                      END of FILE  戻る》 玄関へ