回答箱 No.55-1:  ‘@項目名’を使って行間計算をしたい

  ◆ 質問箱 No.055  質問者:    罍 昭夫  1997年06月 185号 P.16
      ◆ 質問箱 目次へ
No.55-1   ‘@項目名’を使って行間計算をしたい 回答者
   藤原 良允
1997年07月
186号 P.26
   ◆ No.55(1997-06月号)の回答-01  (P-4G)
■   2つの案を考えました。「‘@項目名’を使って・・・」という質問者の希望には完璧には沿っていませんが、目的は達していると思います。
   表1は質問者のものをそのまま掲げました。

  • (1)案: 書込み列指定のときだけ@項目名を使用する。
    「小計1はTマイナス2行目に、小計2はTマイナス1行目に、合計はT行目に、いつも、そのように存在するものとして、」下記の通りです。
          CAL;R(T-2)+R(T-1)=RT/@確定 ;HOME;
  • (2)案: オートで計算する。
    「小計1と小計2の欄が任意の行にあり、そして、それらよりも下の行に合計欄があるものとして、」下記の通りです。
       1  <ケイサン>
       2         FOR X1=H TO T;
       3           LET V1=[X1,@ ];
       4           IF V1="小計1" THEN LET V2=[X1.@確定 ];
       5           IF V1="小計2" THEN LET V3=[X1,@確定 ];
       6           IF V1="合計" THEN GOTO 計算;
       7          NEXT;
       8 $計算:  LET Z2=VAL(V2);  LET Z3=VAL(V3); LET Z4=Z2+Z3;
       9           LET V4=NUM$(Z4); LET [X1,@確定 ]=V4;
      10        STOP;

戻る