タダツカ棚卸電卓「DenTaku_01.irev」ＲＣ版
TadaTuka Tools ; irev.Calc Series　
〜この棚卸電卓は、原価と数量の二つの値を掛け算し、その結果と合計などを表示する単純なものです。〜

下のテキスト・フィールドに計算の元となる原価と数量をコンマ（,）で区切って入力します。
元となるデータはコピー&ペーストでテキスト・フィールドに入力することも可能です。
=================================================================
入力データの形式は；原価，数量　です。全て半角で入力してください。
=================================================================

--------------------------------------------------------------------------------------------------------------
" /* テーブルのヘッダー部の表示 */ put "" & "" & "原価" & "" & "" & "数量" & "" & "" & "在庫金額" & "" & "" /* テーブルの各セルの表示 */ repeat for each line tLine in tProcessedData put "" put "" & item 1 of tLine & "" & "" & item 2 of tLine & "" & "" & item 3 of tLine & "" if isNumber(item 3 of tLine) is true then add item 1 of tLine to tSumKG put item 1 of tLine & comma after tFItem1 add item 2 of tLine to tSumPrice put item 2 of tLine & comma after tFItem2 add item 3 of tLine to tSum put item 3 of tLine & comma after tFItem3 add 1 to tLines end if put "" end repeat /* テーブルのフッター部の表示と計算 */ /* フッター部　合計表示 */ put "" & "" & "原単価合計" & "" & "" & "数量合計　" & "" & "" & "在庫額合計" & "" & "" & "有効データ数" & "" & "" /* フッター部　合計計算 */ put "" & "" & sum(tFItem1) & "" & "" & sum(tFItem2) & "" & "" & sum(tFItem3) & "" & "" & tLines & "" & "" /* フッター部　平均表示 */ put "" & "" & "平均原単価" & "" & "" & "平均数量　" & "" & "" & "平均在庫額" & "" & "" & "総データ数　" & "" & "" /* フッター部　平均計算 */ put "" & "" & average(tFItem1) & "" & "" & average(tFItem2) & "" & "" & average(tFItem3) & "" & "" & the number of lines of tRawData & "" & "" /* フッター部　最大表示 */ put "" & "" & "原価最高値" & "" & "" & "数量最高値" & "" & "" & "在庫最高値" & "" & "" & "
■■■■■■
" & "" & "" /* フッター部　最大計算 */ put "" & "" & max(tFItem1) & "" & "" & max(tFItem2) & "" & "" & max(tFItem3) & "" & "" & "
□□□□□□
" & "" & "" /* フッター部　最小表示 */ put "" & "" & "原価最小値" & "" & "" & "数量最小値" & "" & "" & "在庫最小値" & "" & "" & "ゼロ乗算数" & "" & "" /* フッター部　最小計算 */ put "" & "" & min(tFItem1) & "" & "" & min(tFItem2) & "" & "" & min(tFItem3) & "" & "" & tZeroError & "" & "" /* フッター部　中間表示 */ put "" & "" & "原価中間値" & "" & "" & "数量中間値" & "" & "" & "在庫中間値" & "" & "" & "計算不能数" & "" & "" /* フッター部　中間計算 */ put "" & "" & ((max(tFItem1)+min(tFItem1))/2) & "" & "" & ((max(tFItem2)+min(tFItem2))/2) & "" & "" & ((max(tFItem3)+min(tFItem3))/2) & "" & "" & tNotValid & "" & "" put "" --put tProcessedData after URL("file:Cal_Table_Data.txt") end if /*　ここまでがirevスクリプトでの処理　*/ ?> --------------------------------------------------------------------------------------------------------------
(C)2009.08.03 TAjimiYORI - TadaTuka Tools " irev.Calc " - YOKOTA Fumitaka
改定履歴：090803　初版；090805　計算ロジック変更；090806　表示項目追加
　　　　；090807　入力データの形式表示追加
 --------------------------------------------------------------------------------------------------------------