1. 取引先一覧の1ページを最終ページに登録し(P;N;)、最終ページの全データをFILL指令で消去、'取CO'列に既存取引先コード最終番号の次の番号(801?) からナンバーリングした上記のような表を作成登録する。
   
2. 取引先一覧を｢カナ｣でSORTし直し、インデックス'TORICO'と'TORIK'をかけ直して、FORM入力時に、取引先が新規の場合はK列でスペースを入力して上記の表を表示させる。
   
3. IWRITE指令で取引先一覧にコード801の各項目データを書き込む(FORM定義表)。
   
4. 入力終了したら、｢カナ｣でSORTし直し、インデックスをかけ直しておく。
   

□