登陆注册
书城管理价值链会计发展研究
1672100000030

第30章 价值链会计信息交换系统开发案例(1)

书签收藏评论目录封面

这时，我终于知道我应该去做什么。——史蒂夫·乔布斯

本章将给出一个开发案例，以解决在价值链相关企业的异构系统之间如何通过数据接口进行会计信息交换的问题。这一接口系统遵循前述《接口标准》(以下简称《标准》)和现行会计制度与会计准则，面向跨企业的计算机会计信息系统之间的数据交换应用。本章的读者范围主要是开发人员特别是会计软件用户单位的二次开发人员，但是一般会计人员也可从中得到关于跨企业交换会计信息的有益的启示。

$第一节 系统调查、分析与总体设计

一系统调查——案例单位会计信息系统基本情况

东都集团是一家服装企业，其价值链关联企业有东都时装设计公司、东都模特经纪公司、东都服装职业技术学院、多家制衣厂以及众多自有品牌加盟店。由于历史原因，制衣厂采用综合企业管理软件Master ERP(一种早期ERP软件)，而其他企业使用用友U8 ver8.6管理软件。该公司利用用友U8 ver8.6作为价值链虚拟企业会计信息整合平台，这样就需要从Master ERP系统中转出数据到U8 ver8.6。U8 ver8.6支持《信息技术——会计核算软件数据接口》，即可转入符合该《标准》的会计数据文件，但是Master ERP的输出文档并不符合《标准》的要求。这就需要在这两者之间开发一个中间接口程序，使Master ERP输出的数据文件转化为符合《标准》的数据文件。

Master ERP与U8 ver8.6的数据结构存在较大差异，以记账凭证为例，通过下列数据字典清除反映两者的数据结构

二 数据接口系统的数据流程图

该中间接口的工作流程，自读取Master ERP数据文件开始，经检验和转换，生成标准数据文件，以供U8 ver8.6接收并转入。

三 数据库设计

该接口系统没有自身专门的会计数据，但是由于需要对两个外部系统的数据进行转换，因此系统数据库主要是解决两个外部系统数据接口差异信息的对照存取，如下表中的“对应系统代码”和“对应系统名称”。具体转换时，系统将根据这些差异信息决定如何转换。此外，系统必须访问接口两端的两个系统，因此还要设计系统对两个外部数据库的访问方法和规则的设计。数据库系统平台仍然采用与Master ERP相同的数据库系统即MS SQL server。

(一) 基本信息对照数据表结构

(二) 基本信息数据表的SQL脚本

1.创建机构部门表(fibranch)

CREATE TABLE ［dbo］.［fibranch］ (

［number］ ［varchar］ (10) COLLATE

Chinese_PRC_CI_AS NOT NULL，

［name］ ［char］ (30) COLLATE

Chinese_PRC_CI_AS NULL，

［chief］ ［char］ (8) COLLATE Chinese_PRC_CI_AS NULL，

［address］［char］ (40) COLLATE Chinese_PRC_CI_AS NULL，

［tel］［char］ (15) COLLATE Chinese_PRC_CI_AS NULL，

［fax］［char］ (15) COLLATE Chinese_PRC_CI_AS NULL，

［employee］ ［int］ NULL，

［ufcode］ ［char］ (20) COLLATE Chinese_PRC_CI_AS NULL，

［ufname］ ［char］ (20) COLLATE Chinese_PRC_CI_AS NULL

) ON ［PRIMARY］

2.创建往来单位表(ficompany)

CREATE TABLE ［dbo］.［ficompany］ (

［number］ ［char］ (10) COLLATE

Chinese_PRC_CI_AS NOT NULL，

［name］ ［varchar］ (60) COLLATE

Chinese_PRC_CI_AS NOT NULL，

［address］ ［varchar］ (60) COLLATE

Chinese_PRC_CI_AS NULL，

［zp］ ［varchar］ (6) COLLATE Chinese_PRC_CI_AS NULL，

［tel］ ［varchar］ (20) COLLATE Chinese_PRC_CI_AS NULL，

［fax］ ［varchar］ (20) COLLATE Chinese_PRC_CI_AS NULL，

［lxr］ ［varchar］ (8) COLLATE Chinese_PRC_CI_AS NULL，

［account］ ［varchar］ (30) COLLATE

Chinese_PRC_CI_AS NULL，

［bank］ ［varchar］ (24) COLLATE

Chinese_PRC_CI_AS NULL

) ON ［PRIMARY］

3.创建费用预算类别表(fiexpense )

CREATE TABLE ［dbo］.［fiexpense］ (

［number］ ［varchar］ (10) COLLATE

Chinese_PRC_CI_AS NOT NULL，

［name］ ［char］ (20) COLLATE

Chinese_PRC_CI_AS NOT NULL，

［layer］ ［tinyint］ NOT NULL，

［ufcode］ ［char］ (20) COLLATE Chinese_PRC_CI_AS NULL，

［ufname］ ［char］ (20) COLLATE Chinese_PRC_CI_AS NULL

) ON ［PRIMARY］

4.创建会计科目表(fiitem)

CREATE TABLE ［dbo］.［fiitem］ (

［number］ ［varchar］ (10) COLLATE

Chinese_PRC_CI_AS NOT NULL，

［name］ ［char］ (40) COLLATE

Chinese_PRC_CI_AS NOT NULL，

［type］ ［char］ (1) COLLATE Chinese_PRC_CI_AS NULL，

［jord］ ［char］ (2) COLLATE Chinese_PRC_CI_AS NULL，

［person］ ［tinyint］ NULL，

［company］ ［tinyint］ NULL，

［currency］ ［tinyint］ NULL，

［quantity］ ［tinyint］ NULL，

［expense］ ［tinyint］ NULL，

［unit］ ［char］ (10) COLLATE Chinese_PRC_CI_AS NULL，

［ufcode］ ［char］ (20) COLLATE Chinese_PRC_CI_AS NULL，

［ufname］ ［char］ (20) COLLATE Chinese_PRC_CI_AS NULL

) ON ［PRIMARY］

5.创建往来个人表(fiperson )

CREATE TABLE ［dbo］.［fiperson］ (

［number］ ［char］ (10) COLLATE

Chinese_PRC_CI_AS NOT NULL，

［name］ ［varchar］ (10) COLLATE

Chinese_PRC_CI_AS NOT NULL，

［branch］ ［varchar］ (10) COLLATE

Chinese_PRC_CI_AS NULL，

［department］ ［varchar］ (10) COLLATE

Chinese_PRC_CI_AS NULL，

［ufcode］ ［char］ (20) COLLATE

Chinese_PRC_CI_AS NULL，

［ufname］ ［char］ (20) COLLATE Chinese_PRC_CI_AS NULL

) ON ［PRIMARY］

6.设置机构部门表主键

ALTER TABLE ［dbo］.［fibranch］ ADD

CONSTRAINT ［PK_fibranch］ PRIMARY

KEYCLUSTERED (［number］) ON ［PRIMARY］

7.设置往来单位表主键

ALTER TABLE ［dbo］.［ficompany］ ADD

CONSTRAINT ［PK_ficompany］ PRIMARY

KEYCLUSTERED(［number］) ON ［PRIMARY］

8.设置费用预算类别表主键

ALTER TABLE ［dbo］.［fiexpense］ ADD

CONSTRAINT ［PK_fiexpense］ PRIMARY

KEYCLUSTERED(［number］) ON ［PRIMARY］

9.设置会计科目表主键

ALTER TABLE ［dbo］.［fiitem］ ADD

CONSTRAINT ［PK_fiitem］ PRIMARY

KEYCLUSTERED(［number］) ON ［PRIMARY］

10.设置往来个人表主键

ALTER TABLE ［dbo］.［fiperson］ ADD

CONSTRAINT ［PK_fiperson］ PRIMARY

KEYCLUSTERED(［number］) ON ［PRIMARY］

四 系统功能及其菜单设计

该接口程序的主要功能有：(1)读取Master ERP系统转出的数据文档；(2)校验与转换Master ERP系统转出的数据文档，使之成为U8 ver8.6能直接读取的标准文档。检验主要是检查数据读取的正确性和一致性。只有经检验无误的数据才能进行转换，以确保数据交换的正确。

本接口程序采用PowerBuilder v9.0作开发平台。主界面设计结果，主功能菜单包括：基本信息、读取凭证、数据检验、数据转换和系统服务等。

$第二节 系统主要功能的技术实现

一 凭证转换数据库管理程序的设计

程序功能及其界面，可在此窗口建立Master ERP系统与用友U8之间的数据库联系，并控制两者基础数据的一致性。

1.“试连接”按钮的执行代码

if trim(sle_2.text)=″″ then

messagebox(″错误！″，&

"服务器名称错误，请重新输入数据库服务器名称！")

return

end if

//试连接

transaction sqlyear

sqlyear=create transaction

sqlyear.DBMS=″MSS Microsoft SQL Server″

sqlyear.Database=″ufdata_″+trim(sle_1.text)+″_″+currentyear

sqlyear.ServerName=trim(sle_2.text)

sqlyear.LogId=″sa″

sqlyear.LogPass=trim(sle_3.text)

sqlyear.AutoCommit=true

sqlyear.DBParm=″″

connect using sqlyear；

if sqlyear.sqlcode 〈〉 0 then

messagebox(″用友系统数据库连接错误！″，"连接数据库服务器失败！请再试试！～r可能参数错误，或者已断开与服务器的连接！")

else

messagebox(″用友！″，"连接用友数据库服务器成功！")

end if

disconnect using sqlyear；

destroy sqlyear

2.“更新凭证转换相关的数据表”按钮的执行代码

if uf_connectsqlca()=-1 then

messagebox(″错误！″，″数据库连接错误！″)

return

end if

boolean ok［4］

string alter［4］

alter［1］=″ALTER TABLE ［fiitem］ ADD″+&

″ ［ufcode］ ［char］ (20) COLLATE″+&

″Chinese_PRC_CI_AS NULL，［ufname］ ［char］ (20) ″+&

″COLLATE Chinese_PRC_CI_AS NULL ″

alter［2］=″ALTER TABLE ［fibranch］ ADD ″+&

″ ［ufcode］ ［char］ (20) COLLATE″+&

″Chinese_PRC_CI_AS NULL，［ufname］ ［char］ (20) ″+&

″COLLATE Chinese_PRC_CI_AS NULL ″

alter［3］=″ALTER TABLE ［fiexpense］ ADD ″+&

″ ［ufcode］ ［char］ (20) COLLATE″+&

″Chinese_PRC_CI_AS NULL，［ufname］ ［char］ (20) ″+&

″COLLATE Chinese_PRC_CI_AS NULL ″

alter［4］=″ALTER TABLE ［fiperson］ ADD ″+&

″ ［ufcode］ ［char］ (20) COLLATE″+&

″Chinese_PRC_CI_AS NULL，［ufname］ ［char］ (20) ″+&

″COLLATE Chinese_PRC_CI_AS NULL ″

execute immediate ：alter［1］ using sqlca；

if sqlca.sqlcode=0 then ok［1］=true

execute immediate ：alter［2］ using sqlca；

if sqlca.sqlcode=0 then ok［2］=true

execute immediate ：alter［3］ using sqlca；

if sqlca.sqlcode=0 then ok［3］=true

execute immediate ：alter［4］ using sqlca；

if sqlca.sqlcode=0 then ok［4］=true

if not ok［1］ or ok［2］ or ok［3］ or ok［4］ then

messagebox(″提示！″，″数据库更新成功！″)

else

messagebox(″错误！″，″数据库更新失败！″)

end if

disconnect using sqlca；

3.“保存用友数据库连接参数”按钮的执行代码

if trim(sle_2.text)=″″ then

messagebox(″错误！″，&

"服务器名称错误，请重新输入数据库服务器名称！")

return

end if

//试连接

long filepointer

string readstring

string ufservername，ufsapassword，ufdatabasename

transaction sqlyear

sqlyear=create transaction

sqlyear.DBMS=″MSS Microsoft SQL Server″

sqlyear.Database=″ufdata_″+trim(sle_1.text)+&

″_″+currentyear

sqlyear.ServerName=trim(sle_2.text)

sqlyear.LogId=″sa″

sqlyear.LogPass=trim(sle_3.text)

sqlyear.AutoCommit=true

sqlyear.DBParm=″″

connect using sqlyear；

if sqlyear.sqlcode 〈〉 0 then

messagebox(″用友系统数据库连接错误！″，&

"连接数据库服务器失败！请再试试！～r可能+&

参数错误，或者已断开与服务器的连接！")

else

//保存

下一章全书完
同类推荐
  • 推销致富圣经

    推销致富圣经

    管理赵凡禹
    《推销致富圣经》将告诉你如何创造推销机会；如果你总是在拜访时无功而返，《推销致富圣经》将传授你与客户零距离公关的技巧；如果你所使用的产品介绍法难以激发客户的购买欲望，《推销致富圣经》将告诉你如何发现客户；如果你不知道如何在开场的瞬间就虏获客户的心，《推销致富圣经》将指点你正确的介绍方法是怎样的；如果在与客户的博弈中你常常处于下风，《推销致富圣经》将让你学会如何让客户说“Yes”：如果你曾经在距成交一步之遥时功亏一篑，《推销致富圣经》将告诉你如何让客户下决心签约；如果每日奔波劳顿，如果你正苦于客户无处可寻，你仍然无法实现业绩滚雪球式增长，《推销致富圣经》则为你提供了人脉维护的精要与奥秘
  • 听龙永图谈经济与经营之道

    听龙永图谈经济与经营之道

    管理张保文 李爱莲
    中国经济已走到全球化发展的关键时刻。中国经济如何在战略大调整中保持旺盛生命力，中国企业如何才能与世界500强企业比肩，中国品牌如何在国际道路上披荆斩棘，中国企业如何应对经济危机？中国复关及入世谈判的首席谈判代表，原国家外经贸部副部长、博鳌亚洲论坛理事、秘书长龙永图先生对上述问题提供了自己见解。
  • 企业基本功：中小企业经营模式与管理规范大全

    企业基本功：中小企业经营模式与管理规范大全

    管理凡禹
    本书遵循实用的原则，较为全面地解答了企业经营管理中常见的难题。我们就企业如何进行经营策划、经营管理、经营运作等核心实务工作和如何处理企业经营管理中的法律事务等问题进一步展开了说明，是一本企业经营管理者手上必备的实用细节全书。一册在手，企业管理中的难题就会迎刃而解！
  • 超市营销新思维

    超市营销新思维

    管理赵凡禹
    本书由企业管理出版社出版，全书共分为十个章节，第一章认识超市营销；第二章超级市场开发策略；第三章超级市场形象营销策略；第四章超级市场促销策略；第五章超级市场价格营销策略；第六章超级市场顾客需求营销策略；第七章超市品牌形象策略；第八章超级市场公关营销策略；第九章超级市场发展营销策略；第十章超级市场营销活动控制与考核。
  • 最牛投资客

    最牛投资客

    管理周德文
    为什么研究温州的图书不胜枚举，但迄今为止，依然没出现第二个“温州”、第二群“温州人”冈为真正的财富密码，依然掌握在温州人手中。
热门推荐
  • 神话◎王妃是海贼

    神话◎王妃是海贼

    幻情秦嬴儿
    几位如幻似梦风华绝代的惊世男子，一场笑中带痛的绝世爱恋，一泉能够带来自由永生的生命之水，两个延续亿年的爱之诅咒。一个在欣喜与伤痛中，成长起来的艾海儿……××××××××××××××××××××忘却那生活中烦扰的忧愁，闭上双目，倾听大海的吟唱。释放你那想象的双翼，允许自己感受一下漂泊的浪漫。儿时幻想的海盗的宝藏，在那泛黄的古老藏宝图中声声召唤。是否早已忘却了自己那惊心动魄的爱之梦境？让我们一同体会那自由、狂妄、傲慢、神秘、刺激之中蕴含的淡淡忧伤……盟夏，悄悄崛起的神圣帝国！南风祈——夏北国、夏南国、夏东国口中的殿下。一位总是立在屏风后面的高贵男子……南风北——夏北国的年轻君王。自幼便没有尝试过任何的情感波动。暮逍遥——被所有海盗尊称为海王的男子！劫持了指给南风北做王妃的齐鲁国公主！艾琪，一个来到大海背面的女生！成为海盗一员的她，竟然被暮逍遥命令假扮已经跳海的齐鲁国公主潜入夏北国！阴谋！爱情！征战！探险！宝藏！让这些粗糙的文字，唤起你内心深处，某个被遗忘角落中的情绪吧……全文解禁的小白校园文《现代灰姑娘》浪漫秦朝穿越《错爱大秦》（强推）悲情不小白的校园文《撒旦右手》古典江湖言情《狼魅》（1女N男）（强推）在哪儿找呢？左边有个该作者的其他作品……请点击。这点空间留出来解释一些事情。第一：所有的VIP网站的收费标准是统一的。1：100。红袖不会比其它的贵，这点有经验的读者应该很清楚哈。第二：或许红袖的系统会抽风，出现订阅不成功，或者充值不成功的现象。如果该书读者出现类似的麻烦，而又不清楚该如何寻找编辑，那么可以按照以下格式，在我的评论区留言。我会在第一时间找编辑。“死缠烂打”也会帮各位亲尽快解决问题。交易信息交易号：交易类型：支付状态：支付说明：付款方：收款方：付款时间：交易结束时间：商品信息商品或服务名称：总金额：类型：第三：谢谢各位读者对我的支持。很多读者以前没入过VIP，也有很多，没开通网银。这条路，很漫长，也很难走。幸好，还有你们。。鞠躬了。
  • 尸心不改

    尸心不改

    幻情老娘取不出名字了
    控尸门的欢乐二缺弟子江篱炼了一具美得人神共愤引得天雷阵阵的男尸，以为好日子开始了，结果没想到门派惨遭灭门。--情节虚构，请勿模仿
  • 辅佐相公夺帝位：妾身六儿

    辅佐相公夺帝位：妾身六儿

    古言如果囧
    （已完结，放心戳）她是京城赵府的六小姐，因与心上人私奔过而被所有人骂成赵府婊子，名声狼籍。亲姐姐当上贵妃的第一道懿旨是把她嫁给一个西域奴为妻，她以为忍受贫苦安生过日子就行，可她的相公一夜之间竟变成先帝遗孤…她的野心也慢慢开始大了起来，朝权利的巅峰爬着，辅佐他成为皇帝，步步为后…
  • 礼仪与道德修养（道德修养集成）

    礼仪与道德修养（道德修养集成）

    励志李光辉
    礼，是思想道德修养。仪，使其表现，即礼节。因此，礼仪不是培训出来的，是修养出来的，它是道德修养的外在表现。自古中国就是礼仪之邦，秉承和发扬这一优良传统，是作为21世纪接班人的青少年们的必修课。本书具体阐述了礼仪和道德修养之间的密切关系，帮助青少年们提高整体素质。
  • 南南小姐的花样年华

    南南小姐的花样年华

    现言画知星
    "老婆大人，您回来了！”高大英俊，玉树临风，不可一世的秦大总裁终于沦落到在家当家庭煮夫的命运。看到自家老婆上班回来，主动迎门，并体贴的给脱下外套。“恩！”南南只是从鼻孔里发出一个音节，然后斜着眼睛瞅着系着紫色围裙的某人，不住的点头。“这围裙很适合你呢！”“谢谢老婆夸奖！”秦总表示再接再厉！在老婆休息之后，秦秋拨通了秘书的电话。“公司最近有什么麻烦的方案和决策通通都给我发过来，我解决！不准累着我的老婆！”秦氏总部南南坐在办公室无聊的摆弄着签字笔。“莫非公司最近要倒闭了吗？只是动手签签字，没一样有挑战性的工作，怎么感觉自己像个二世祖呢！”一旁秘书一头黑线，心里腹诽‘您身后有个二十四孝好老公，还有什么好担心的！’“呵呵，总裁您淡定！作为一个跨国企业的老总就是这么轻松来着！”
  • 明治天皇：孝明帝驾崩卷（下册）

    明治天皇：孝明帝驾崩卷（下册）

    传记(日)山冈庄八
    《明治天皇》再现了日本从幕末走向明治维新的历史变革，以优美的文笔，宏大的场景，详细描绘了日本近代决定国运的倒幕运动的整个过程。本书塑造了一个个鲜活的日本近代史人物形象，以及他们的坚定信念，对“安政大狱”、“樱田门之变”等重大历史事件的描述详实生动，是一部了解近代日本不可多得的佳作。
  • 重生之星途熠熠

    重生之星途熠熠

    现言好人颜妍
    前世，她是历经磨难的灰姑娘。父母惨死，沉重的生活压力，失业，失恋，连友情也遭遇背叛。重获新生后，她要做涅槃的金凤，讨回属于她的一切，一步一步，问鼎娱乐圈。始终痴心等待、温柔守候她的初恋男友岳奕；一贯淡漠清冷，却唯独待她不同的矜贵总裁陆浅桓；对她念念不忘的青梅竹马，天王巨星纪梓尘。她该选择谁与她共度新生？情节虚构，切勿模仿
  • 说文解艺

    说文解艺

    文学杜书瀛
    ，或还似懂非懂，生发开去，我先看目录。这是我做不到的。而人们近年常常批评一些人之写序，杜书瀛兄嘱序于我，说有的是“友情出场”，很大一部分竟是我没有读过的，于是把书稿看了一遍，有些学理性强的文章还没消化，有的是为了“促销”，但我觉得应该来写这篇小序。 书序可以有种种写法，有些著名的序言体文字，是就所序这一本书的中心内容或某一论点加以补充，有的通篇不过是些“感想”……总之应该列为写序之大忌的，甚或是借题发挥，本身就形成一篇论文，限于学力，——我现在要写的正不出这个范围
  • 尸心不改

    尸心不改

    幻情老娘取不出名字了
    控尸门的欢乐二缺弟子江篱炼了一具美得人神共愤引得天雷阵阵的男尸，以为好日子开始了，结果没想到门派惨遭灭门。--情节虚构，请勿模仿
  • 一场游戏一场梦（珍藏一生的经典散文）

    一场游戏一场梦（珍藏一生的经典散文）

    小说金庚石主编
    本书包括跳动的涟漪，岁月如诗，爱在心灵深处，真爱无疆，温馨的亲情，爱的世界，生命中的那些感动。