運用 40


1.運用手順

「t1_costing」ライブラリを利用した原価計算の手順は概ね以下のようになります
-------------------------------------------------------------------------------------------
1.原価計算の対象となるプロジェクト(以下「Prj」)を部門別に調査しPrjファイルに登録する
2.Prjを統括する部門を基本に、原価集計単位としての部門を設定し、原価部門マスタを作成する
3.部門が統括するPrjとその配賦基準値(仮の数値)を決めて、部門ごとに配賦基準ファイルを作成する
4.仕訳作成時に、Prj直課経費/原価部門経費が発生すれば当該Codeを「プロジェクトCode」欄に入力する
5.原価計算開始時に、原価計算期間の仕訳を抽出する(「展開一番」での作業)・・・WXJファイルの作成
6.「t1_costing」のスクリプトを以下の順で実行する
a.C_SelWXJ_MkFApt
b.C_SumAPt_MkFAptPD
c.C_SumAPt_MkFAptAC・・・原価を仕掛品に振替える仕訳を起票する(「展開一番」での作業)
d.C_ChkAlc_Prj_Div・・・Prj及び部門Codeについて、マスタ・トランザクション間の整合性をチェック
7.各配賦基準ファイルの各Prjに対応する配賦基準値を(作業時間報告書などから)入力する
8.「t1_costing」のスクリプトを以下の順で実行する
e.C_ChkAlc_Prj・・・配賦基準ファイルとPrjファイルの整合性をチェック
f.C_RefPrjPre_SetPrj
g.C_RefDivPre_SetPrj
h.C_OprPrj_8Fin・・・終了処理、完成Prjを売上原価に振替える仕訳を起票する(「展開一番」での作業)
i.C_OprPrj_9Del
j.C_OprPrj_1CF・・・Prjファイルの繰越処理
2.ログファイル

「t1_costing」ライブラリのスクリプトの多くは、ログファイルに実行時間や処理件数・金額などを出力するように設計されています
ログファイルの名前は「CstLog_hhhh」です、スクリプト実行時に存在しなければ自動で作成し、存在していればデータを追記します
ユーザは、テキストエディタなどで確認し、必要に応じて削除・保存して下さい

【例1】「C_SelWXJ_MkFApt」スクリプトは、「展開一番」で抽出した仕訳(WXJ_hhhh.txt)から原価計算に使用する仕訳を抜き出しアクセプトファイル(CstApt_hhhh.txt)を作成します、このスクリプト実行後には以下のデータがログファイルに記録されます
-------------------------------------------------------------------------------------------
Script...C_SelWXJ_MkFApt
Start 2015/01/07 10:38:41
---------------------------------------------
D: 48(Rec) 103,556,444(JY)
C: 2(Rec) -186,186(JY)
Total: 50(Rec) 103,370,258(JY)
---------------------------------------------
End 2015/01/07 10:38:41

この例では、スクリプト名と実行開始日時・実行終了日時、及び、原価計算に受け入れた仕訳の件数と金額が貸借別に表示されています
アクセプトファイルのデータは、「展開一番」の仕訳と、会計日(J_Date)と伝票番号(J_SlipNo)で対応させることができます

【例2】「C_SumApt_MkFAptPD」スクリプトは、アクセプトファイルのデータを、Prj別及び原価部門別に纏めたデータを作成します、このスクリプト実行後には以下のデータがログファイルに記録されます
-------------------------------------------------------------------------------------------
Script...C_SumApt_MkFAptPD
Start 2015/01/07 10:40:18
---------------------------------------------
Total 50(Rec) Summary 14(Rec)
In 103,370,258(Yen) Out 103,370,258(Yen)
---------------------------------------------
End 2015/01/07 10:40:18

この例では、50件のデータが14件のデータに纏められています、入力データ(CstApt_hhhh)と出力データ(CstAptPD_hhhh)の金額合計は(当然ですが)一致しています
また、この金額は、「展開一番」から原価計算に取り込んだ金額とも一致しています

【例3】「C_RefAptPD_MkFCstPreX」スクリプトは、Prj別及び原価部門別データを(次工程の処理に備えて)それぞれのファイルに分離します、このスクリプト実行後には以下のデータがログファイルに記録されます
-------------------------------------------------------------------------------------------
Script...C_RefAptPD_MkFCstPreX
Start 2015/01/07 11:09:53
---------------------------------------------
Prj Posting 11(Rec) 5,980,739(yen)
Div Posting 3(Rec) 97,389,519(yen)
Total Posting 14(Rec) 103,370,258(yen)
---------------------------------------------
End 2015/01/07 11:09:53

この例では、14件に纏められたデータのうち、Prj直課原価ファイルに11件(5,980,739円)、原価部門原価ファイルに3件(97,389,519円)が処理されています
また、この合計金額は、「展開一番」から原価計算に取り込んだ金額とも一致しています


【例4】「C_RefPrjPre_SetPrj」スクリプトは、Prj直課原価をPrjマスタのPrjに直課します、このスクリプト実行後には以下のデータがログファイルに記録されます
-------------------------------------------------------------------------------------------
Script...C_RefPrjPre_SetPrj
Start 2015/01/07 16:33:54
---------------------------------------------
Prj Posting 11(Rec) 5,980,739(yen)
---------------------------------------------
End 2015/01/07 16:33:54

この例では、11件のデータ(Prj直課原価)がPrjに直課されています、直課額の合計はPrj直課原価ファイルの合計額に一致しています

【例5】「C_RefDivPre_SetPrj」スクリプトは、原価部門原価をPrjファイルのPrjに配賦します、このスクリプト実行後には以下のデータがログファイルに記録されます
-------------------------------------------------------------------------------------------
Script...C_RefDivPre_SetPrj
Start 2015/01/07 17:19:31
---------------------------------------------
Prj Posting 14(Rec) 97,389,519(yen)
---------------------------------------------
End 2015/01/07 17:19:31

この例では、14件のデータ(原価部門原価)がPrjファイルのPrjに配賦されています、配賦額の合計は原価部門原価ファイルの合計額に一致しています
この件数には、配賦基準額がゼロ(配賦額ゼロ)のPrjが含まれます


以上のように、ログファイルには、原価計算で使用するデータのインテグリティを確認できる情報が記録されているので、各計算のステップごとに原価データが正確に漏れなく処理されたことを確認することができます
ユーザスクリプトから、これらの「t1_costing」スクリプトを連続して実行する場合でも、最後にログファイルを確認するようにして下さい(内部統制上のコントロールポイントです)
3.Prjファイル関連のその他のスクリプト

【Prj一覧表の作成】
「C_SumPrj_PC_ApdZList」スクリプトは、Prjの範囲を指定して、指定した金額欄の一覧を集計リストファイル(「ZList_hhhh」)に出力します、このスクリプト実行後には以下のデータが集計リストファイルに出力されます

-------------------------------------------------------
プロジェクト集計
-------------------------------------------------------
プロジェクト範囲(PrjCode) 141220 〜 143040　 金額 Q2
-------------------------------------------------------
141220 [6] 道路誘導システム 国土交通省 4,773,504
141240 [7] ダイオキシン類環境調査 K大学 13,922,720
141250 [7] Y河川水質調査 T工業大学 0
142220 [7] 堆肥中PCB測定業務 株N食品 -247,734
142650 [5] 漁業情報図作成作業 財海洋資源 3,468,281
142651 [5] BKMN分布分析 環境省 11,891,250
142690 [5] 大気粉塵分析 S県土木事務所 4,954,687
142700 [5] 気象情報配信 MホテルHD 14,864,062
143010 [8] CMSS設計業務 J半導体 0
143011 [8] 画像解析支援業務 L電子 12,421,741
143013 [5] X遺伝子分析業務 財理化学機構 1,337,726
143020 [5] 低周波音測定業務 株音響工学 12,421,741
143030 [5] セキュリティ評価 M総研 5,159,800
143040 [5] ハニーポット設置支援 総務省 12,421,741
-------------------------------------------------------
Prj Total 97,389,519
-------------------------------------------------------
この例は、【例5】で原価部門原価を各Prjに配賦した結果を、「Prj一覧表」で確認するものです
データの並びは、Prj番号、[StatusFlag]、Prj名、契約(取引)先、金額フィールド(パラメタで指定、この例では「Q2」)です、出力範囲を全Prjに指定しているので、合計金額は【例5】の金額に一致しています
データの各行はタブを挟んで出力しているため、これをコピーして「Excel」にペーストすればそのまま利用できます(第四列目の金額欄は、スクリプトで3桁区切りを入れた文字列にしているので、「Excelで当該範囲を指定してから「セルの書式設定」−「数値」を選択し数字に戻してから利用するとよいでしょう)
C_SumPrj_PC_ApdZList(141220,143040,"Q2")
なお、「PrjCode」の他に「StatusFlag」で範囲を指定してPrj一覧表を出力する「C_SumPrj_SF_ApdZList」スクリプトもあります
使い方は同じです、「PrjCode」の代わりに「StatusFlag」の値をセットします

【Prjファイル金額欄の集計(合計)】
「C_SumPrj_StVPrj」スクリプトは、Prjファイルの金額欄の範囲を指定して、その集計(合計)値を指定した金額欄にセットします
例えば、経過月1・2・3の原価が M1・M2・M3金額欄にセットされていれば、パラメタを以下のようにすれば、第一四半期の原価をQ1金額欄にセットすることができます
C_SumPrj_StVPrj("M1,"M3","Q1")

【Prjファイル金額欄の演算】
「C_CalPrj_StVPrj」スクリプトは、Prjファイルの金額欄二つ指定して演算(加減乗除)を行い、その結果を指定した金額欄にセットします
例えば、第一四半期と第二四半期の原価が、Q1とQ2の金額欄にセットされていれば、パラメタを以下のようにすれば、第二四半期の原価増加額をG1金額欄にセットすることができます
C_CalPrj_StVPrj(1,"Q2","Q1","G1").........「1」は減算を指示するパラメタ

【Prjファイル金額欄のリセット】
「C_SetZero_Prj」スクリプトは、Prjファイルの全ての金額欄をゼロにします
例えば、PrjCodeが千番台のPrjの金額欄をゼロにするには、パラメタを以下のようにします
C_SetZero_Prj(1000,1999)




Last Update 2015/08/20