0桁サーチの実際的使い方
AドライブにINIしたフロッピーを用意します。 CHF:A[ENTER] でAドライブに移行します。 以下の頁を作り、書き込みます。 在庫集計オートをA/1にWします。 PRO:E:1:ESC: で下のオートをプログラム登録します。
[ZAIKO]在庫表作成オ―ト] SH:?*1::: *先頭ダミ―、前月在庫表、当月仕入れ、当月納品頁を指定 "-"+@当月出庫=@当月出庫,@当月出庫>0: *当月出庫デ―タをマイナスに CFP:2:4-5: *商品コ―ド列と商品名列結合 CFP:2:5-7: *在庫、入庫、出庫の数量列結合 TM::4::1:5:: *当月在庫集計 *見場の調整 CF:T:8: EP:4:2:在庫数: CFP::1:8:: CT:月末在庫表: STOP:
在庫集計の為のフォーマット・ダミーをA/2にWします。 0桁の列が有る事にご注目下さい。 項目行と罫線だけで、データ行は入れません。
コ―ド | 商品名 | 前月末残 | 当月入庫 | 当月出庫 | 当月末残 | |||
コ―ド | 商品名 | 在庫数 | |||
101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 |
A-11 A-12 A-13 A-14 A-15 A-16 A-17 A-18 A-19 A-20 A-21 A-22 A-23 A-24 A-25 |
1,000 1,000 1,000 1,000 1,000 1,000 1,000 1,000 1,000 1,000 1,000 1,000 1,000 1,000 1,000 |
仕入れ日 | 支払日 | 相手先 | コ―ド | 商品名 | 数量 | 単価 | 0.05 | 合計 | 備考 | |||
19980901 19980901 19980901 19980910 | | A商会 B商店 A商会 田宮 | 101 104 105 105 | A-11 A-14 A-15 A-15 | | 10 30 1200 400 | | | 100 150 50 100 | 50 225 3000 2000 | 1050 4725 63000 42000 | お試し購入 |
受注日 | 納品日 | 相手先 | コ―ド | 商品名 | 数量 | 単価 | 0.05 | 合計 | 備考 | |||
19980901 19980901 19980902 19980910 | 19980902 19980902 19980910 19980925 | JOHN CARTER 那賀 功一 高宮 きょう子 乾 一 | 101 108 109 111 | A-11 A-18 A-19 A-21 | | | 2 5 12 120 | | 100 150 50 50 | 10 38 30 300 | 210 788 630 6300 | |
RUN:ZAIKO:[ENTER] で、検索する頁を聞いてきたら、上記例では 先頭ダミ―頁が書かれてる 2頁、 前月在庫表が書かれてる 3頁、 当月仕入れデータが書かれてる 5頁、 当月納品データが書かれてる 50頁 を、 2,3,5,50[ENTER] のように指定してやりますと、当月在庫表が出来上がります。 お試し下さい。痛快ですよ。(^^)/