7.3.2 処理定義の例

図7-3に示した業務の処理定義の例を,次に示します。

項目処理
 [得意先コード:項目処理]
 @レコード入力△TOKUI,?コード=得意先コード
 @判定開始△#コード=¥NIL
  @成立
   @電文表示△'参照するデータがありません。'
   @再入力△2
 @判定終了
 @代入△得意先名=#名前
 [コード:項目処理]
 @レコード入力△SHOHIN,?コード=コード
 @判定開始△#コード=¥NIL
  @成立
   @電文表示△'参照するデータがありません。'
   @再入力△2
 @判定終了
 @代入△商品名=#商品名
 @代入△単価=#単価
 [金額:項目処理]
 @代入△金額=単価*数量
 [合計:項目処理]
 @代入△合計=SUM(金額)
後処理
 @レコード登録△UDATA,A