自動插入生產管理系統記賬憑證到U8系統

［摘要］怎樣將生產管理系統中的數據提取出來形成記賬憑證并自動導入到會計核算軟件中進行統一的賬務處理是提高會計核算軟件制單效率的關鍵。本文以西南某生產企業為例，介紹其生產管理系統的設計及其與用友U8賬務處理系統的數據對接。

［關鍵詞］會計核算軟件；生產管理系統；SQLServer2000；VB

doi：10.3969/j.issn.1673-0194.2013.02.002

［中圖分類號］F232［文獻標識碼］A［文章編號］1673-0194（2013）02-0004-04

現在仍然有很多生產型企業使用自行開發或委托開發的生產管理系統，而其賬務處理工作則大多需要購買通過財政部門評審后上市銷售的商品化會計核算軟件來實現。怎樣將生產管理系統中的數據提取出來生成記賬憑證自動導入到會計軟件中是提高會計人員制單效率的關鍵。

１ 實現憑證自動導入的原因分析

本文所涉及的用友ＥＲＰ－Ｕ８作為企業資源規劃軟件，除了會計核算功能，自然有子系統可以實現生產管理系統各功能模塊的功能，而相關業務的記賬憑證也由系統自動生成并統一到賬務處理系統中進行會計核算業務處理，那我們為什么還要專門編寫程序實現將生產管理系統業務數據產生的記賬憑證自動導入到用友軟件系統中去，主要原因包括以下3個方面。

１．１ 生產管理系統沒有提供賬務處理系統

正如前文所描述的，企業的賬務處理工作需要購買通過財政部門評審后上市銷售的商品化會計核算軟件來實現。而我們企業的會計人員由于不具備計算機專業知識，所以只能根據生產管理系統的相關業務數據，手動編制記賬憑證錄入到會計核算軟件中，使得工作效率大大降低。甚至有的企業的購銷存系統本身就具備記賬憑證的處理功能，也苦于沒有方法而無法自動將憑證導入到會計核算軟件中。

１．２ 軟件不提供該功能

用友ＥＲＰ－Ｕ８既然實現了生產管理系統的功能，那么軟件設計開發公司就希望用戶能夠使用軟件中的相關模塊實現相關業務處理，這樣既可以擴大其市場份額，更為升級維護提供便利。另外，不同的系統設計人員設計的數據庫是不可能完全相同的，如果要提供與其他系統的數據對接，則要求軟件操作人員具備數據庫相關知識，進行正確的參數設置才能運行成功。對于普通用戶由于操作難度較大，所以實現該功能的意義也不大。

１．３ 全面替代需要時日

如果啟用用友ＥＲＰ－Ｕ８的生產管理相關功能模塊，就可以免去運行兩個系統的不便，也不必為兩個系統的數據共享而煩惱。但我們的企業由于已經完全適應為其量身定制的生產管理系統的運作，并且該系統也能滿足企業目前乃至將來較長一段時間的需求，加之運行新系統就會增加成本，也會對系統操作人員提出新的要求，所以從企業主到員工都沒有替代該系統的動力。

２ 會計核算軟件

會計電算化實際上就是將電子計算機技術應用到會計業務處理工作中的現代化管理模式。實現會計核算工作的軟件就可以稱之為會計核算軟件。我國第一家專業從事商品化會計軟件開發和推廣應用的企業是用友電子財務技術有限公司（簡稱用友），其設計開發的Ｕ８系列軟件占有相當大的市場份額。本文所涉及的生產企業采用實現會計核算功能的會計軟件就是用友公司設計開發的用友ＥＲＰ－Ｕ８。

２．１ 會計核算軟件的結構

根據財政部１９９４年頒布的《會計核算軟件基本功能規范》，會計核算軟件基本功能是指會計核算軟件必須具備的功能和完成這些功能的基本步驟；會計核算軟件的功能模塊，是指會計核算軟件中具備相對獨立地完成會計數據輸入、處理和輸出功能的各個部分；功能模塊可以劃分為賬務處理、應收應付款核算、固定資產核算、存貨核算、銷售核算、工資核算、成本核算、會計報表生成與匯總、財務分析等。

２．２ 賬務處理系統

賬務處理系統是每個會計軟件的核心，它是會計軟件必不可少的功能模塊，其工作量也是所有功能模塊中最大的，其工作一般包括憑證的輸入、審核、記賬，賬本的查詢、輸出等。用友ＥＲＰ－Ｕ８的總賬系統就是賬務處理系統，它是用友軟件的核心功能模塊，其余所有的功能模塊都直接或間接與總賬模塊交換數據。作為會計軟件的核心模塊，賬務處理系統與其他部分功能模塊的數據聯系如圖１所示。

從圖中我們可以看出，其他系統的業務數據如果需要傳遞到總賬系統中進行統一核算，就必須以記賬憑證的形式將數據規范化后進行傳遞。

２．３ 數據結構分析

用友ＥＲＰ－Ｕ８軟件后臺數據庫采用的是Ｍｉｃｒｏｓｏｆｔ公司開發的ＳＱＬＳｅｒｖｅｒ２０００數據庫管理系統。ＳＱＬＳｅｒｖｅｒ２０００是Ｍｉｃｒｏｓｏｆｔ公司推出的ＳＱＬＳｅｒｖｅｒ數據庫管理系統的一個版本。具有使用方便，可伸縮性好與相關軟件集成程度高等優點。

啟動ＭｉｃｒｏｓｏｆｔＳＱＬＳｅｒｖｅｒ２０００的企業管理器，數據庫中就可以看到由軟件系統自動形成的數據庫以及數據庫中的數據表，這里該生產企業２０１２年００１號賬套對應的數據庫名為ＵＦＤＡＴＡ＿００１＿２０１２。導出該數據庫中數據表到Ｅｘｃｅｌ中可以方便對用友數據庫結構的分析，借助數據表中賬務處理工作形成的數據解析出數據表中各字段的含義。

為了將該企業生產管理系統中的數據提取出來形成記賬憑證數據自動導入到用友的賬務處理系統中，我們首先需要分析找出用友賬務處理系統形成的記賬憑證對應的憑證數據表，然后分析出該數據表中各字段的含義。借助ＭｉｃｒｏｓｏｆｔＳＱＬＳｅｒｖｅｒ２０００的事件探測器來快速定位憑證數據表的方法是先啟動ＭｉｃｒｏｓｏｆｔＳＱＬＳｅｒｖｅｒ２０００的事件探測器，建立新的跟蹤文件并運行，然后在用友的總賬系統中填制一張新的記賬憑證并保存該憑證。在這里我們填制一張提取備用金的１００００元的記賬憑證，這樣ＭｉｃｒｏｓｏｆｔＳＱＬＳｅｒｖｅｒ２０００的事件探測器會記錄下訪問時候的ＳＱＬ語句。

下面對提取備用金１００００元業務的記賬憑證進行分析，憑證類別設置為付款憑證，該張憑證應包含兩筆分錄如下：

借：１００１（庫存現金）１００００

貸：１００２０１０１（工行存款／溫江支行）１００００

事件探測器檢測到兩條ＩＮＳＥＲＴ語句，它們分別實現對兩筆分錄的信息記錄。以下便是ＭｉｃｒｏｓｏｆｔＳＱＬＳｅｒｖｅｒ２０００的事件探測器記錄下來的保存記賬憑證時候的ＳＱＬ語句（由于代碼比較相似，我們只列出其中一條語句）：

ＩＮＳＥＲＴＩＮＴＯＧＬ＿ａｃｃｖｏｕｃｈ

（ｉｂｏｏｋ，ｉｐｅｒｉｏｄ，ｃｓｉｇｎ，ｉｓｉｇｎｓｅｑ，ｉｎｏ＿ｉｄ，ｄｂｉｌｌ＿ｄａｔｅ，ｉｄｏｃ，ｃｔｅｘｔ１，ｃｔｅｘｔ２，ｃｂｉｌｌ，ｃｂｏｏｋ，ｃｃｈｅｃｋ，ｃｃａｓｈｉｅｒ，ｉｆｌａｇ，ｃｏｕｔａｃｃｓｅｔ，ｉｏｕｔｙｅａｒ，ｃｏｕｔｓｙｓｎａｍｅ，ｉｏｕｔｐｅｒｉｏｄ，ｃｏｕｔｓｉｇｎ，ｃｏｕｔｎｏ＿ｉｄ，ｄｏｕｔｂｉｌｌｄａｔｅ，ｂｖｏｕｃｈｅｄｉｔ，ｂｖｏ

ｕｃｈａｄｄｏｒｄｅｌｅ，ｂｖｏｕｃｈｍｏｎｅｙｈｏｌｄ，ｉｎｉｄ，ｃｄｉｇｅｓｔ，ｃｃｏｄｅ，ｃｅｘｃｈ＿ｎａｍｅ，ｍｄ＿ｆ，ｍｃ＿ｆ，ｍｄ，ｍｃ，ｎｄ＿ｓ，ｎｃ＿ｓ，ｃｏｕｔｓｙｓｖｅｒ，ｎｆｒａｔ，ｃｓｅｔｔｌｅ，ｃｎ＿ｉｄ，ｄｔ＿ｄａｔｅ，ｃｄｅｐｔ＿ｉｄ，ｃｃｕｓ＿ｉｄ，ｃｓｕｐ＿ｉｄ，ｃｉｔｅｍ＿ｉｄ，ｃｉｔｅｍ＿ｃｌａｓｓ，ｃｐｅｒｓｏｎ

＿ｉｄ，ｃｎａｍｅ，ｃｃｏｄｅ＿ｅｑｕａｌ，ｉｆｌａｇｂａｎｋ，ｉｆｌａｇｐｅｒｓｏｎ，ｄｏｕｔｄａｔｅ，ｃｏｕｔｂｉｌｌｓｉｇｎ，ｃｏｕｔｉｄ，ｂｖａｌｕｅｅｄｉｔ，ｂｃｏｄｅｅｄｉｔ，ｃｃｏｄｅｃｏｎｔｒｏｌ，ｂＰＣＳｅｄｉｔ，ｂＤｅｐｔ

ｅｄｉｔ，ｂＩｔｅｍｅｄｉｔ，ｂＣｕｓＳｕｐＩｎｐｕｔ，ｃＤｅｆｉｎｅ１，ｃＤｅｆｉｎｅ２，ｃＤｅｆｉｎｅ３，ｃＤｅｆｉｎｅ４，ｃＤｅｆｉｎｅ５，ｃＤｅｆｉｎｅ６，ｃＤｅｆｉｎｅ７，ｃＤｅｆｉｎｅ８，ｃＤｅｆｉｎｅ９，ｃＤｅｆｉｎｅ１０，

ｃＤｅｆｉｎｅ１１，ｃＤｅｆｉｎｅ１２，ｃＤｅｆｉｎｅ１３，ｃＤｅｆｉｎｅ１４，ｃＤｅｆｉｎｅ１５，ｃＤｅｆｉｎｅ１６）ＶＡＬＵＥＳ（０，３，＇付＇，２，１，＇２０１２．０３．１２＇，１，Ｎｕｌｌ，Ｎｕｌｌ，＇王曉

＇，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，＇＇，Ｎｕｌｌ，＇２０１２．０３

．１２＇，１，０，０，１，＇提取備用金

＇，＇１００１＇，Ｎｕｌｌ，０，０，１００００，０，０，０，Ｎｕｌｌ，０，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，＇１００２０１０１＇，ＮＵＬＬ，ＮＵＬＬ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，１，１，Ｎｕｌｌ，１，１，１，０，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ，Ｎｕｌｌ）

通過對以上ＳＱＬ語句進行分析，我們知道記賬憑證數據被存放在ＧＬ＿ａｃｃｖｏｕｃｈ數據表中，ＧＬ＿ａｃｃｖｏｕｃｈ數據表包含的字段較多，我們在記賬憑證數據表的結構中僅列出部分本例中用到的重要字段及其含義，見表１。

３ 生產管理系統

生產管理系統在整個企業信息集成系統中承上啟下，是生產活動與管理活動信息溝通的橋梁，負責采集從接受訂貨到制成最終產品全過程的各種數據和狀態信息，目的在于優化管理活動，它強調的是當前視角，即精確的實時數據。

本文所涉及的生產企業早在２０００年就聘請了大量的軟件設計開發人員為企業量身定制管理信息系統。隨著系統的不斷升級完善，該系統實現了從接受訂貨到制成最終產品全過程的各種數據和狀態信息的數據采集，為企業提供了精確的生產活動數據，幫助企業優化管理。同時該企業還將該系統在行業內進行推廣，幫助它的合作企業實現現代化信息管理，大大提高了企業生產管理的效率。

３．１ 系統模塊設計

該企業采用訂單式生產管理，其生產管理系統包括銷售管理、計劃管理、采購管理、庫房管理、車間管理、質量管理等功能，各功能模塊關系見圖２所示。

由銷售部門根據銷售合同或者銷售預測錄入訂單信息，當訂單生效后系統將自動完成產品物料的分解作為采購及生產的依據。采購部門根據生產計劃和庫房存貨數據制訂采購計劃。生產部門根據車間加工能力確認自產和外協工序，制訂好后將形成自產與外協工廠的派工清單，生產車間從庫房領用材料根據加工跟蹤單來安排生產，加工后的半成品或者產成品重新入庫。質檢部門在檢驗產品錄入檢驗信息作為公司對質量分析的依據和對加工單位質量考核及收款的依據。

３．２ 數據庫設計

該生產管理系統后臺數據庫采用Ｍｉｃｒｏｓｏｆｔ公司開發的ＳＱＬＳｅｒｖｅｒ２０００數據庫管理系統。數據庫中主要包含ｂｕｙｐｒｄ定價單數據表、ｐｒｏｓｔｏａｃｃｌｉｓｔ庫存商品財務表、ｐｒｏｓｔｏ庫存商品表、ｐｒｏｃｏｄｅ庫存商品代碼表、pｒｏｇｘｃｏｄｅ產品工序表……等數據表。庫存商品財務表中存放每筆進出庫商品的信息，庫存商品表存放庫存商品匯總信息。在ＭｉｃｒｏｓｏｆｔＳＱＬＳｅｒｖｅｒ２０００企業管理器中通過設置插入、修改和刪除觸發器保證庫存商品表ｐｒｏｓｔｏ數據由庫存商品賬務表ｐｒｏｓｔｏａｃｃｌｉｓｔ的數據自動匯總而成。

由于數據庫中數據表眾多，這里只列出后面程序代碼中涉及到的定價單數據表的結構，見表２（由于定價單數據表字段較多，表中只列出了部分重要字段，包括生成記賬憑證所涉及到的字段）。

４ 程序設計

該企業生產管理系統軟件選擇ＶＢ６．０（ＶｉｓｕａｌＢａｓｉｃ）實現程序設計，ＶＢ是Ｍｉｃｒｏｓｏｆｔ公司設計開發的一個可視化程序開發工具軟件，提供所見即所得的界面設計，采用基于對象的設計方法縮短軟件開發周期，面向對象程序設計簡化代碼易維護。導入憑證到用友ＥＲＰ－Ｕ８的用戶界面如圖3所示。

這里以核算應付賬款為例，實現該生產管理系統中的應付業務數據生成記賬憑證導入用友Ｕ８系統的程序代碼如下：

ＰｒｉｖａｔｅＳｕｂＣｍｄｙｆ＿Ｃｌｉｃｋ（）

ＤｉｍｃｏｎｎＡｓＮｅｗＡＤＯＤＢ．Ｃｏｎｎｅｃｔｉｏｎ

ＤｉｍｒｓＡｓＡＤＯＤＢ．Ｒｅｃｏｒｄｓｅｔ

ＤｉｍｓｔｒｓｑＡｓＳｔｒｉｎｇ

Ｄｉｍｉｙｆｈｋ，ｉｊｘｓＡｓＤｏｕｂｌｅ

Ｄｉｍｉｉｄ，ｉｎｏｉｄＡｓＬｏｎｇ

ＳｅｌｅｃｔＣａｓｅＣｏｍｂｏ２．ＬｉｓｔＩｎｄｅｘ

Ｃａｓｅ０

……

Ｃａｓｅ１

ｃｏｎｎ．ＣｏｎｎｅｃｔｉｏｎＳｔｒｉｎｇ＝＂Ｐｒｏｖｉｄｅｒ＝ＳＱＬＯＬＥＤＢ；ＤａｔａＳｏｕｒｃｅ＝ＡＢＣ；ＤＡＴＡＢＡＳＥ＝ｍｇｍｅｎｔ；ＵＩＤ＝ｓａ；ｐｗｄ＝１２３＂＇連生產管理系統數據庫

ｓｔｒｓｑｌ＝＂ＳＥＬＥＣＴＰｃＣｌｉｅｎｔ＿ｉｄ，ＳＵＭ（ＰｒｏｄｕｃｔＰｒｉｃｅ）ＡＳｘｆｙｆｈｋＦＲＯＭｂｕｙｐｒｄｗｈｅｒｅＰｃＣｌｉｅｎｔ＿ｉｄ＝＇＂＆Ｔｒｉｍ（Ｔｅｘｔ１）＆＂＇ＧＲＯＵＰＢＹＰｃＣｌｉｅｎｔ＿ｉｄ＂‘匯總供應商應付賬款

ｃｏｎｎ．Ｏｐｅｎ

Ｓｅｔｒｓ＝ｃｏｎｎ．Ｅｘｅｃｕｔｅ（ｓｔｒｓｑｌ）

ｉｙｆｈｋ＝ｒｓ．Ｆｉｅｌｄｓ（＂ｘｆｙｆｈｋ＂）

ｃｏｎｎ．Ｃｌｏｓｅ

ｃｏｎｎ．ＣｏｎｎｅｃｔｉｏｎＳｔｒｉｎｇ＝＂Ｐｒｏｖｉｄｅｒ＝ＳＱＬＯＬＥＤＢ；ＤａｔａＳｏｕｒｃｅ＝ＡＢＣ；ＤＡＴＡＢＡＳＥ＝ＵＦＤＡＴＡ＿００１＿２０１２；ＵＩＤ＝ｓａ；ｐｗｄ＝１２３＂＇連用友數據庫

ｓｔｒｓｑｌ＝＂ＳＥＬＥＣＴＭＡＸ（ｉ＿ｉｄ）ＡＳｘｆｉｉｄＦＲＯＭＧＬ＿ａｃｃｖｏｕｃｈ＂‘自動獲取記錄序號

ｃｏｎｎ．Ｏｐｅｎ

Ｓｅｔｒｓ＝ｃｏｎｎ．Ｅｘｅｃｕｔｅ（ｓｔｒｓｑｌ）

ｉｉｄ＝ｒｓ．Ｆｉｅｌｄｓ（＂ｘｆｉｉｄ＂）＋１

ｃｏｎｎ．Ｃｌｏｓｅ

ｓｔｒｓｑｌ＝＂ＳＥＬＥＣＴＭＡＸ（ｉｎｏ＿ｉｄ）ＡＳｘｆｉｎｏｉｄＦＲＯＭＧＬ＿ａｃｃｖｏｕｃｈｗｈｅｒｅｉｓｉｇｎｓｅｑ＝＂＆（Ｃｏｍｂｏ１．ＬｉｓｔＩｎｄｅｘ＋１）‘自動獲取憑證編號

ｃｏｎｎ．Ｏｐｅｎ

Ｓｅｔｒｓ＝ｃｏｎｎ．Ｅｘｅｃｕｔｅ（ｓｔｒｓｑｌ）

ｉｎｏｉｄ＝ｒｓ．Ｆｉｅｌｄｓ（＂ｘｆｉｎｏｉｄ＂）＋１

ｃｏｎｎ．Ｃｌｏｓｅ

ｓｔｒｓｑｌ＝＂ＩＮＳＥＲＴＩＮＴＯＧＬ＿ａｃｃｖｏｕｃｈ（ｉ＿ｉｄ，ｉｐｅｒｉｏｄ，ｃｓｉｇｎ，ｉｓｉｇｎｓｅｑ，ｉｎｏ＿ｉｄ，ｉｎｉｄ，ｄｂｉｌｌ＿ｄａｔｅ，ｉｄｏｃ，ｃｂｉｌｌ，ｃｄｉｇｅｓｔ，ｃｃｏｄｅ，ｍｄ）ＶＡＬＵＥＳ（＂＆ｉｉｄ＆＂，＂＆Ｍｏｎｔｈ（Ｄａｔｅ）＆＂，＇＂＆Ｃｏｍｂｏ１．Ｔｅｘｔ＆＂＇，＂＆（Ｃｏｍｂｏ１．ＬｉｓｔＩｎｄｅｘ＋１）＆＂，＂＆ｉｎｏｉｄ＆＂，１，＇＂＆Ｄａｔｅ＆＂＇，３，＇李丹＇，＇購買原材料應付＇，＂＆Ｔｒｉｍ（Ｔｅｘｔ２）＆＂，＂＆ｉｙｆｈｋ＆＂）＂

ｃｏｎｎ．Ｏｐｅｎ

ｃｏｎｎ．Ｅｘｅｃｕｔｅ（ｓｔｒｓｑｌ）

ｃｏｎｎ．Ｃｌｏｓｅ

ｉｉｄ＝ｉｉｄ＋１

ｓｔｒｓｑｌ＝＂ＩＮＳＥＲＴＩＮＴＯＧＬ＿ａｃｃｖｏｕｃｈ（ｉ＿ｉｄ，ｉｐｅｒｉｏｄ，ｃｓｉｇｎ，ｉｓｉｇｎｓｅｑ，ｉｎｏ＿ｉｄ，ｉｎｉｄ，ｄｂｉｌｌ＿ｄａｔｅ，ｉｄｏｃ，ｃｂｉｌｌ，ｃｄｉｇｅｓｔ，ｃｃｏｄｅ，ｍｃ）ＶＡＬＵＥＳ（＂＆ｉｉｄ＆＂，＂＆Ｍｏｎｔｈ（Ｄａｔｅ）＆＂，＇＂＆Ｃｏｍｂｏ１．Ｔｅｘｔ＆＂＇，＂＆（Ｃｏｍｂｏ１．ＬｉｓｔＩｎｄｅｘ＋１）＆＂，＂＆ｉｎｏｉｄ＆＂，１，＇＂＆Ｄａｔｅ＆＂＇，３，＇李丹＇，＇購買原材料應付＇，＂＆Ｔｒｉｍ（Ｔｅｘｔ３）＆＂，＂＆ｉｙｆｈｋ＆＂）＂

ｃｏｎｎ．Ｏｐｅｎ

ｃｏｎｎ．Ｅｘｅｃｕｔｅ（ｓｔｒｓｑｌ）

ｃｏｎｎ．Ｃｌｏｓｅ

……

ＥｎｄＳｅｌｅｃｔ

ＥｎｄＳｕｂ

５ 總結

該系統經過功能完善，上線運行穩定，獲得一致好評。系統實現了生產管理系統相關業務數據記賬憑證的自動編制工作，記賬憑證數據導入用友后臺數據庫中，進行集中統一的存儲和核算。通過該功能將用友的賬務處理系統與企業的生產管理系統結合起來，大大提高了系統的效率，擴充了系統的功能，減輕了會計人員的工作負荷，其他相似企業值得借鑒。

主要參考文獻

［１］代逸生，陸峻梅．財務業務一體化會計信息系統中的記賬憑證自動生成［Ｊ］．中國管理信息化，２００６（８）．

［２］清華大學領導力培訓，中國設備管理網．什么是ＭＥＳ生產管理系統［ＦＢ／ＯＬ］．ｈｔｔｐ：//ｗｗｗ．ｔｈｌｄｌ．ｏｒｇ．ｃｎ／ｎｅｗｓ／１００８／４８０１７．ｈｔｍｌ.

［３］薛飛，何福良，魯利民．會計電算化［Ｍ］．成都：西南財經大學出版社，2010.