【正文】 成本對(duì)象本期在 XXX車間未投產(chǎn)”…3. 檢查生產(chǎn)領(lǐng)料單是否已記帳判斷方法： 存在于 t_Voucher中，且=39。如果單據(jù)已記帳，程序中斷，提示：“已存在材料費(fèi)用生成憑證，不能進(jìn)行費(fèi)用分配”。如果領(lǐng)用的物料是本期有完工的自制件，其成本計(jì)算的順序是：(1)成本系統(tǒng)計(jì)算出自制件的制造成本；(2)根據(jù)制造制造成本更新入庫(kù)成本；(3)根據(jù)入庫(kù)成本計(jì)算發(fā)出成本。4. 刪除材料費(fèi)用分配表 : cbMaterielInfo 本期數(shù)據(jù)Delete FROM cbMaterielInfo WHERE FYear=xxxx AND FPeriod= y********** 注：5~ 6 步驟為：處理直接材料費(fèi)用 *************************************5. 判斷本期是否存在直接材料費(fèi)用，如果不存在，執(zhí)行第（7）步。MaterielMakeID39。MaterielShareID39。39。但是如果物料未指定默認(rèn)對(duì)應(yīng)成本項(xiàng)目，則 ，還要根據(jù)要素費(fèi)用對(duì)應(yīng)的成本項(xiàng)目：更新 **********注：7~ ？？ 步驟為：處理間接材料費(fèi)用**************************************7. 開(kāi)始部門(mén)循環(huán)；8. 判斷該部門(mén)是否存在間接材料費(fèi)用判斷方法：IcStockBill. FCostObjName IN ( 39。, 39。,39。 )25 / 53如果此部門(mén)不存在間接材料費(fèi)用，返回第 7步，繼續(xù)處理下一個(gè)部門(mén)的數(shù)據(jù)。9. 部門(mén)投產(chǎn)檢查判斷該部門(mén)本期間是否投產(chǎn)：(1) 判斷 cbInQty中是否有該部門(mén)的本期投產(chǎn)信息； (2) 判斷 cbBalance中該部門(mén)是否有期初在產(chǎn)品產(chǎn)量。10. 提取該部門(mén)可參與費(fèi)用分配的所有記錄，寫(xiě)入待分配數(shù)據(jù)表：ResultResult表結(jié)構(gòu)字 段 含 義 數(shù) 據(jù) 來(lái) 源FInterID 領(lǐng)料單 ID FentryID 領(lǐng)料單分錄 ID FselfCostObjID 物料對(duì)應(yīng)成本對(duì)象 ID領(lǐng)料單分錄如果是自制件，此自制件對(duì)應(yīng)的成本對(duì)象 ID注意：這個(gè)成本對(duì)象 ID不是領(lǐng)料單單據(jù)頭上的成本對(duì)象 IDFqtyDecimal 數(shù)量精度 t_Icitem獲得FcostItemID 成本項(xiàng)目 t_IcItem獲得Fqty 領(lǐng)料單數(shù)量 Fprice 領(lǐng)料單單價(jià) Famount 領(lǐng)料單金額 從 IcStockBill(Entry)中提取數(shù)據(jù)，滿足下列條件的單據(jù)才能參與分配：IcStockBill.FDate= 39。 AND FDate 39。 本期. FTrantype=24 領(lǐng)料單. FCancellation=0 未作廢. FStatus0 已審核. FdeptID=361 領(lǐng)用部門(mén)為：基本生產(chǎn)車間. FCostObjName Not in (39。) 成本對(duì)象不為“轉(zhuǎn)入制造費(fèi)用”. FPurposeID=12022 領(lǐng)料類型為：一般耗用. FDepID= xx 提取一個(gè)部門(mén)的數(shù)據(jù) 如果選擇中“材料費(fèi)用分配時(shí)只分配尚未分配費(fèi)用”項(xiàng)，則還會(huì)加一個(gè)條件：AND not exists (Select * From cbMaterielInfo where FYear=2022 AND FPeriod=9 AND FInterID= AND FEntryID=)待分配的費(fèi)用：ResultFInterID FentryID FSelfCostObjID FQtyDecimal FCostItemID FQty Fprice FAmount1201 1 網(wǎng)卡 4 直接材料 3 100 3001201 2 4 直接材料 40 100 400011. 要要素費(fèi)用默認(rèn)對(duì)象的成本項(xiàng)目更新只更新為成本項(xiàng)目為零的記錄。14. 解析計(jì)算公式，從計(jì)算從公式中分離出各個(gè)分配標(biāo)準(zhǔn)單元：a、b、cSELECT FName FROM cbStandardUnit WHERE 39。 Like 39。 + FName + 39。15. 根據(jù)分配標(biāo)準(zhǔn)單元 a、b、c 創(chuàng)建臨時(shí)表：OnlineCostObj，F(xiàn)Qty 字段代表分配標(biāo)準(zhǔn)數(shù)值，F(xiàn)quotiety 字段代表費(fèi)用分配百分比。OnlineCostObjFcostObjID FdeptID FcostItemID a b c Fqty Fquotiety16. 確認(rèn)哪些成本對(duì)象可以負(fù)擔(dān)費(fèi)用將當(dāng)前期間該部門(mén)有投入產(chǎn)量的成本對(duì)象寫(xiě)入OnlineCostObjOnlineCostObjFcostObjID FdeptID FcostItemID a b c Fqty Fquotiety家用電腦 一車間 直接材料辦公電腦 一車間 直接材料打 印 機(jī) 一車間 直接材料網(wǎng) 卡 一車間 直接材料17. 用 CBRationStandardInfo 表中的數(shù)據(jù)來(lái)更新OnlineCostObj 表 a、b、c 三列數(shù)據(jù)，并計(jì)算出分配標(biāo)準(zhǔn)數(shù)值：Fqty= a * b + c UpDate t1 SET = FROM OnlineCostObj t1 inner join CBRationStandardInfo t2 ON (= AND = AND =0)WHERE =2022 AND = 9 AND = 6OnlineCostObjFcostObjID FdeptID FcostItemID a b c Fqty Fquotiety家用電腦 一車間 直接材料 2 3 4 10辦公電腦 一車間 直接材料 4 5 0 20打 印 機(jī) 一車間 直接材料 0 7 0 0網(wǎng) 卡 一車間 直接材料 0 0 10 10說(shuō)明：用什么表來(lái)更新OnlineCostObj 要看具體的分配標(biāo)準(zhǔn)單元——如果分配標(biāo)準(zhǔn)單元是實(shí)際總工時(shí)，則用 CBManHourInfo表中的數(shù)據(jù)來(lái)更新OnlineCostObj ；如果分配標(biāo)準(zhǔn)單元是投入產(chǎn)量，則用 cbInQty表中的數(shù)據(jù)來(lái)更新OnlineCostObj ；如果是自定義的分配標(biāo)準(zhǔn)，則用 CBRationStandardInfo表中的數(shù)據(jù)來(lái)更新OnlineCostObj 參考：標(biāo)準(zhǔn)數(shù)據(jù)錄入對(duì)照表18. 刪除OnlineCostObj 表中分配標(biāo)準(zhǔn)數(shù)值（FQty）為零的數(shù)據(jù)，并結(jié)算出費(fèi)用分配百分比（Fquotiety）分配標(biāo)準(zhǔn)數(shù)值為零的成本對(duì)象不能負(fù)擔(dān)費(fèi)用：Delete OnlineCostObj where Fqty=0對(duì)分配標(biāo)準(zhǔn)數(shù)值求和：SELECT isNull(SUM(FQTY),0) FROM OnlineCostObj27 / 53計(jì)算出費(fèi)用分配百分比：Update OnlineCostObj Set FQuotiety=FQty/40OnlineCostObjFcostObjID FdeptID FcostItemID a b c Fqty Fquotiety家用電腦 一車間 直接材料 2 3 4 10 辦公電腦 一車間 直接材料 4 5 0 20 網(wǎng) 卡 一車間 直接材料 0 0 10 10 19. 創(chuàng)建臨時(shí)表MaterielInfo此表結(jié)構(gòu)與 cbMaterielInfo結(jié)構(gòu)相同，是 cbMaterielInfo的模擬表。上述Result 和MaterielInfo 表的笛卡爾積應(yīng)該是 6條記錄，但是分配結(jié)果表MaterielInfo 中只有 5條記錄，原因是： “網(wǎng)卡”是自制件，一車間既生產(chǎn)網(wǎng)卡又領(lǐng)用網(wǎng)卡，為了避免自己耗用自己的情況，費(fèi)用分配時(shí)加了一個(gè)條件：，過(guò)濾掉了“網(wǎng)卡” 耗用“網(wǎng)卡”的記錄。28 / 53分配后的總費(fèi)用 元與分配前的總費(fèi)用有一個(gè)差額。數(shù)量調(diào)差同理。三、其他費(fèi)用分配 對(duì)其他費(fèi)用表：CbCostExpenseInfo 的費(fèi)用單據(jù)進(jìn)行分配，分配結(jié)果寫(xiě)入其他費(fèi)用分配表：cbExpenseDistributeInfo。分配原理同材料費(fèi)用分配。參與分配的單據(jù)的條件參考：“費(fèi)用分配功能 — 分配對(duì)象”對(duì)照表。五、輔助生產(chǎn)費(fèi)用分配輔助生產(chǎn)費(fèi)用分配分兩步進(jìn)行：第一步：用代數(shù)分配法計(jì)算出單位勞務(wù)成本，再將輔助生產(chǎn)車間發(fā)生的所有費(fèi)用分?jǐn)偟礁魇芤娌块T(mén)。并將分配結(jié)果寫(xiě)入輔助生產(chǎn)費(fèi)用二次分配表:cbAssistDistrbuteInfo 。判斷依據(jù)是: IcStockBill 和 cbCostExpenseInfo的的部門(mén)屬性為輔助生產(chǎn)車間。? 計(jì)算出勞務(wù)的單位成本例：一車間是基本生產(chǎn)車間，維修車間、供電車間是輔助生產(chǎn)車間。原因是：如果僅維修車間和供電車間相互提供勞務(wù)，X、Y 不會(huì)有問(wèn)題。但是這種算法能夠保證基本生產(chǎn)車間所負(fù)擔(dān)到成本是正確的： 3 X + 200 Y = 10000+ 20220 。3. 調(diào)差由于小數(shù)的四舍五入，分配前的費(fèi)用與分配后的費(fèi)用（）可能不等。cbAssExpenseInfo… FYear FPeriod FDeptID FuseDeptID FServiceID FQty FPrice Famount …2022 9 維修 供 電 維修 2 5000 100002022 9 維修 一車間 維修 3 5000 150002022 9 供電 維 修 電 100 150 150002022 9 供電 一車間 電 200 150 15000說(shuō)明：cbAssExpenseInfo既是產(chǎn)量錄入—?jiǎng)趧?wù)耗用量表，也是輔助生產(chǎn)費(fèi)用一次分配表。分配標(biāo)準(zhǔn)：取“費(fèi)用分配標(biāo)準(zhǔn)設(shè)置—輔助生產(chǎn)費(fèi)用分配標(biāo)準(zhǔn)設(shè)置”，=1 。分配結(jié)果寫(xiě)入輔助生產(chǎn)費(fèi)用二次分配表：cbAssistDistrbuteInfo 。七、費(fèi)用分配相關(guān)表1. 材料費(fèi)用分配表 cbMaterielInfo字 段 含 義 數(shù) 據(jù) 來(lái) 源Fyear 會(huì)計(jì)年度Fperiod 期間FitemID 物料內(nèi)碼 這部分?jǐn)?shù)據(jù)是在“產(chǎn)量錄入—?jiǎng)趧?wù)耗用量錄入”功能中錄入的這部分?jǐn)?shù)據(jù)是在“輔助生產(chǎn)費(fèi)用一次分配”后系統(tǒng)自動(dòng)更新的30 / 53FcostObjID成本對(duì)象內(nèi)碼直接材料費(fèi)用： 間接材料費(fèi)用：本部門(mén)本期有投產(chǎn)的、分配標(biāo)準(zhǔn)數(shù)值不為零成本對(duì)象FInterID 領(lǐng)料單碼 FentryID 領(lǐng)料單分錄 FstdID 分配標(biāo)準(zhǔn) FcostItemID成本項(xiàng)目先取 ,如果取不到則取Fstandarddata 分配標(biāo)準(zhǔn)數(shù)據(jù) 費(fèi)用分配過(guò)程計(jì)算得出Fprice 單價(jià) 費(fèi)用分配過(guò)程計(jì)算得出Fqty 分配數(shù)量 費(fèi)用分配過(guò)程計(jì)算得出Famount 分配金額 費(fèi)用分配過(guò)程計(jì)算得出2. 廢品損失材料費(fèi)用分配表 cbWMaterielInfo，表結(jié)果與 cbMaterielInfo相同。5. 制造費(fèi)用分配表cbExpenseDistributeInfo字 段 含 義 數(shù) 據(jù) 來(lái) 源FYear 會(huì)計(jì)年度FPeriod 期間FDeptID 部門(mén) IDFStandardID 分配標(biāo)準(zhǔn) ID FCostObjID 成本對(duì)象 IDFStandardData 分配標(biāo)準(zhǔn)數(shù)值 計(jì)算得出FAmount 分配金額 計(jì)算得出FCostItemID成本項(xiàng)目 ID先取費(fèi)用單據(jù)的 FcostItemID,如果取不到則取6. 廢品費(fèi)用制造費(fèi)用分配表cbWExpenseDistributeInfo,表結(jié)構(gòu)和 cbExpenseDistributeInfo相同。FAmount 勞務(wù)成本 一次費(fèi)用分配后，系統(tǒng)計(jì)算得出。10. 殘值退料表殘值退料費(fèi)用分配表 cbWBMaterielInfo字 段 含 義 數(shù) 據(jù) 來(lái) 源Fyear 會(huì)計(jì)年度Fperiod 期間FitemID 物料內(nèi)碼 FcostObjID 成本對(duì)象內(nèi)碼 FInterID 殘值退料單 ID FEntryID 殘值退料單分錄 ID FCostItemID殘值退料 先取 ,如取不到則取 cbCostItem中第一個(gè)標(biāo)準(zhǔn)成本項(xiàng)目為“直接材料”的成本項(xiàng)目。但是各費(fèi)用分配表中有一部分?jǐn)?shù)據(jù)是錯(cuò)誤的——生產(chǎn)領(lǐng)料如果是本期有完工的自制件，那么其費(fèi)用分配表中分配金額是錯(cuò)誤的，分配數(shù)量、分配系數(shù)是正確的。33 / 53第九節(jié)第九節(jié) 成本計(jì)算成本計(jì)算一、成本計(jì)算總體介紹 圖：成本計(jì)算總圖成本計(jì)算總圖說(shuō)明——更新更新庫(kù)存單據(jù)及費(fèi)用分配表End本期有完工有領(lǐng)料半成品出庫(kù)出庫(kù)核算本期有完工有領(lǐng)料半成品出庫(kù)入庫(kù)核算? 根據(jù)費(fèi)用分配表計(jì)算出成本對(duì)象的投入總成本；? 根據(jù)成本對(duì)象的投入總成本計(jì)算出