简析输入会计科目输入处理设计与实现
本站原创 摘要： 在简要阐述会计科目表的数据要求及文件结构的基础上，分析与设计了会计科目的数据输入表单及数据输入处理流程，提供了实现会计科目数据输入功能的VFP程序代码。
关键词：会计科目；信息系统；数据输入处理；VFP程序
1009-3044（2013）04-0666-03
Design and Realization of Accounting Items Input Processing财务会计毕业论文
LI Guo-hong
（Department of Management Engineering， Zhengzhou University， Zheng源于：毕业论文致谢格式http://www.328tibet.cn
zhou 450001， China）
Abstract： On the basis of briefly clarifying the data requirement and the file structure of the accounting items table， this paper analyzes and designs the data input form and the data input processing flow chart of accounting items. It then supplied with the Visual FoxPro program codes to realize the accounting items data input function.有关会计专业的毕业论文
Key words： accounting item； information system； data input processing； VFP program
会计科目输入是会计电算化系统的一项重要的系统初始化工作，通过该操作将各级会计科目的科目编号、科目名称、借贷方向和期初余额等信息保存在会计科目表文件中，为录入凭证、登记总账、生成损益表等功能的实现打下基础。为此，就必须设计合理的表单和输入处理流程，实现在尽可能减轻用户输入负担的前提下，将科目信息通过表单输入到会计科目表文件。笔者曾以“管理信息系统数据输入模块的设计与实现——兼论会计科目的输入设计”为题，探讨了新会计制度改革前的会计科目输入处理与设计，实现了会计科目的输入功能。该文对新会计制度改革后的会计科目输入处理进行了重新设计，表单界面较为合理，对相关属性的设置进一步减少了用户输入负担，同时，其程序流程也采用了另一种新的设计思路与方法，提供了实现科目输入功能的Visual FoxPro（简称VFP）程序代码。
1 会计科目表及其文件结构财务论文范文
会计科目表包含科目编号、科目名称、借贷方向、期初余额等信息，表中的科目编号数据必须符合以下条件：科目编号位数不低于4、科目编号不能重复、科目编号位数大于4时必须是偶数位数且存在上级科目。向会计科目表中输入科目信息时，应由程序自动判断所输入的数据是否满足这些条件，只有满足这些条件才可存入会计科目表中，不满足条件的数据不应被保存且应提示出错信息。
[字段＼&类型＼&宽度＼&小数位数＼&含义＼&kmbh＼&字符型＼&10＼&＼&科目编号＼&kmmc＼&字符型＼&36＼&＼&科目名称＼&jdfx＼&字符型＼&1＼&＼&借贷方向＼&qcye＼&数值型＼&12＼&2＼&期初余额＼&]
会计科目表的数据保存在会计科目表文件中。假设在VFP环境下，会计科目表文件为kjkm.dbf，保存在默认目录下，表的结构如表1所示，其中各字段的宽度可按实际情况进行定义。例如，一般情况下，一级科目的科目编号占四位，其余各级科目的科目编号都是其上级科目编号后再加两位数字（字符），这样，当实际可以输入1002010203之类的四级科目而不允许输入五级科目时，表中kmbh（科目编号）字段的宽度就应设置为10，这里给出的只是参考值。财务论文
2 会计科目输入表单设计及相关属性设置
设计如图1所示的表单，以便向会计科目表中输入相关数据。其中，“会计科目”、“科目编号”、“科目名称”、“借贷方向”、“期初余额”为对应标签的Caption属性；“确定（Q）”、“取消（X）”、“退出（T）”为命令按钮，其Caption属性对应设置为：确定（＼为便于控制输入数据的类型和位数不超出允许的范围，可事先设置好各文本框接收数据的类型及输入掩码，设置方法是用鼠标右键单击各文本框，在出现的快捷菜单选“生成器”，再在弹出的“文本框生成器”对话框的“格式”选项卡设置数据类型和输入掩码。依据表1和图1，结合实际输入的数据（如科目名称由汉字及相关字符组成，借贷方向由字符“1”或“2”表示），可设置各文本框的数据类型和输入掩码如表2所示。其中每个9表示可输入0～9之间的一个数字，每个X表示可输入一个任意字符（输入一个汉字对应2个X），9或X的个数表示最多可以输入的数字或字符的位数。另外，若借贷方向由字母表示（例如借用j表示、贷用d表示），可将输入掩码设置为A。
[文本框＼&数据类型＼&输入掩码＼&备注＼&Text1＼&字符型＼&9999999999＼&10个9＼&Text2＼&字符型＼&XXX……XXX＼&共36个X，省略号部分表示30个X＼&Text3＼&字符型＼&9＼&9表示只接收一位数字；若只接收英文字母，则设置为A＼&Text4＼&数值型＼&999999999.99＼&带小数点共12位＼&]
3 科目输入程序流程设计
会计科目的相关数据要通过科目输入表单保存在会计科目表（文件）中。由于数据符合一定的条件时才能输入到会计科目表中，所以必须设计合理的程序流程，使程序简单高效、易于理解。数据输入的程序流程设计有以下两种思路。1）先设置表单中的数据都正确时的条件（例如b=0）；然后将表单中的数据不符合要求的各种情况都设置为不满足上述条件（例如设置为b=1或b=2），并进行相关提示；最后，用条件语句实现满足条件时保存数据（例如，如果b=0就保存数据）。文献所示的科目输入处理流程就采用这种思路。
2）第二种思路是，将表单中数据符合输入要求的各种情况均设置为满足某个条件（例如k=1），各种不符合要求的情况需要进行相关提示，并在必要时设置为不满足该条件（例如设置为k=0），然后用条件语句实现满足条件时保存数据（例如，如果k=1就保存数据）。按照这种思路，利用N-S图设计会计科目输入的程序流程如图2所示。相对于文献所示的科目输入程序流程，该流程显得更加合理和易于理解。
4 科目输入的VFP程序代码
运行图1所示的科目输入表单，单击“确定（Q）”按钮（或按Alt+Q组合键）时，应能按照图2所示的科目输入流程进行相应的数据处理。根据图2，编写“确定（Q）”按钮的Click过程对应的VFP程序代码如下，其中&&右面表示注释内容。
set exact on
kmbh1=thiorm.text
if length1<4
messagebox（"科目编号至少为4位！"，0+48，"提示"）
thiorm.text
use kjkm
locate for alltrim（kmbh）=alltrim（kmbh1）
if found（）
messagebox（"科目编号不能重复！"，0+48，"提示"）
thiorm.text
if length1>4
if length1%2=0 &&科目编号位数为偶数
locate for alltrim（kmbh）=left（alltrim（kmbh1），length1-2）
if .not. found（）
messagebox（"无上级科目，请先输入上级科目！"，0+48，"提示"）
thiorm.text
else &&存在上级科目
k=1 &&按允许添加数据为变量k赋值
endif
else &&科目编号位数不是偶数财务方面论文
messagebox（"科目编号位数不对，请重新输入！"，0+48，"提示"）
thiorm.text
endif
else &&科目编号不重复且位数为4
k=1 &&k=1表示允许添加数据
摘自：毕业论文标准格式http://www.328tibet.cn
endif
if k=1 &&如果k=1，则添加数据会计专业毕业实习报告
append blank
replace kmbh with kmbh1
replace kmmc with thiorm.text
endif
use
endif
set exact off
关于会计的范文
参考文献：
李国红.管理信息系统数据输入模块的设计与实现——兼论会计科目的输入设计[J].中国管理信息化：会计版， 2006（11）：19-22.
关键词：会计科目；信息系统；数据输入处理；VFP程序
1009-3044（2013）04-0666-03
Design and Realization of Accounting Items Input Processing财务会计毕业论文
LI Guo-hong
（Department of Management Engineering， Zhengzhou University， Zheng源于：毕业论文致谢格式http://www.328tibet.cn
zhou 450001， China）
Abstract： On the basis of briefly clarifying the data requirement and the file structure of the accounting items table， this paper analyzes and designs the data input form and the data input processing flow chart of accounting items. It then supplied with the Visual FoxPro program codes to realize the accounting items data input function.有关会计专业的毕业论文
Key words： accounting item； information system； data input processing； VFP program
会计科目输入是会计电算化系统的一项重要的系统初始化工作，通过该操作将各级会计科目的科目编号、科目名称、借贷方向和期初余额等信息保存在会计科目表文件中，为录入凭证、登记总账、生成损益表等功能的实现打下基础。为此，就必须设计合理的表单和输入处理流程，实现在尽可能减轻用户输入负担的前提下，将科目信息通过表单输入到会计科目表文件。笔者曾以“管理信息系统数据输入模块的设计与实现——兼论会计科目的输入设计”为题，探讨了新会计制度改革前的会计科目输入处理与设计，实现了会计科目的输入功能。该文对新会计制度改革后的会计科目输入处理进行了重新设计，表单界面较为合理，对相关属性的设置进一步减少了用户输入负担，同时，其程序流程也采用了另一种新的设计思路与方法，提供了实现科目输入功能的Visual FoxPro（简称VFP）程序代码。
1 会计科目表及其文件结构财务论文范文
会计科目表包含科目编号、科目名称、借贷方向、期初余额等信息，表中的科目编号数据必须符合以下条件：科目编号位数不低于4、科目编号不能重复、科目编号位数大于4时必须是偶数位数且存在上级科目。向会计科目表中输入科目信息时，应由程序自动判断所输入的数据是否满足这些条件，只有满足这些条件才可存入会计科目表中，不满足条件的数据不应被保存且应提示出错信息。
[字段＼&类型＼&宽度＼&小数位数＼&含义＼&kmbh＼&字符型＼&10＼&＼&科目编号＼&kmmc＼&字符型＼&36＼&＼&科目名称＼&jdfx＼&字符型＼&1＼&＼&借贷方向＼&qcye＼&数值型＼&12＼&2＼&期初余额＼&]
会计科目表的数据保存在会计科目表文件中。假设在VFP环境下，会计科目表文件为kjkm.dbf，保存在默认目录下，表的结构如表1所示，其中各字段的宽度可按实际情况进行定义。例如，一般情况下，一级科目的科目编号占四位，其余各级科目的科目编号都是其上级科目编号后再加两位数字（字符），这样，当实际可以输入1002010203之类的四级科目而不允许输入五级科目时，表中kmbh（科目编号）字段的宽度就应设置为10，这里给出的只是参考值。财务论文
2 会计科目输入表单设计及相关属性设置
设计如图1所示的表单，以便向会计科目表中输入相关数据。其中，“会计科目”、“科目编号”、“科目名称”、“借贷方向”、“期初余额”为对应标签的Caption属性；“确定（Q）”、“取消（X）”、“退出（T）”为命令按钮，其Caption属性对应设置为：确定（＼
[文本框＼&数据类型＼&输入掩码＼&备注＼&Text1＼&字符型＼&9999999999＼&10个9＼&Text2＼&字符型＼&XXX……XXX＼&共36个X，省略号部分表示30个X＼&Text3＼&字符型＼&9＼&9表示只接收一位数字；若只接收英文字母，则设置为A＼&Text4＼&数值型＼&999999999.99＼&带小数点共12位＼&]
3 科目输入程序流程设计
会计科目的相关数据要通过科目输入表单保存在会计科目表（文件）中。由于数据符合一定的条件时才能输入到会计科目表中，所以必须设计合理的程序流程，使程序简单高效、易于理解。数据输入的程序流程设计有以下两种思路。1）先设置表单中的数据都正确时的条件（例如b=0）；然后将表单中的数据不符合要求的各种情况都设置为不满足上述条件（例如设置为b=1或b=2），并进行相关提示；最后，用条件语句实现满足条件时保存数据（例如，如果b=0就保存数据）。文献所示的科目输入处理流程就采用这种思路。
2）第二种思路是，将表单中数据符合输入要求的各种情况均设置为满足某个条件（例如k=1），各种不符合要求的情况需要进行相关提示，并在必要时设置为不满足该条件（例如设置为k=0），然后用条件语句实现满足条件时保存数据（例如，如果k=1就保存数据）。按照这种思路，利用N-S图设计会计科目输入的程序流程如图2所示。相对于文献所示的科目输入程序流程，该流程显得更加合理和易于理解。
4 科目输入的VFP程序代码
运行图1所示的科目输入表单，单击“确定（Q）”按钮（或按Alt+Q组合键）时，应能按照图2所示的科目输入流程进行相应的数据处理。根据图2，编写“确定（Q）”按钮的Click过程对应的VFP程序代码如下，其中&&右面表示注释内容。
set exact on
kmbh1=thiorm.text
1.value
length1=len（alltrim（kmbh1））if length1<4
messagebox（"科目编号至少为4位！"，0+48，"提示"）
thiorm.text
1.setfocus
else &&科目编号位数不低于4毕业会计论文use kjkm
locate for alltrim（kmbh）=alltrim（kmbh1）
if found（）
messagebox（"科目编号不能重复！"，0+48，"提示"）
thiorm.text
1.setfocus
else &&科目编号位数不低于4，且科目编号不重复if length1>4
if length1%2=0 &&科目编号位数为偶数
locate for alltrim（kmbh）=left（alltrim（kmbh1），length1-2）
if .not. found（）
messagebox（"无上级科目，请先输入上级科目！"，0+48，"提示"）
thiorm.text
1.value=left（alltrim（kmbh1），length1-2）
thiorm.text2.value=space（0）
thiorm.text3.value=space（0）
thiorm.text4.value=0.00
thiorm.text2.setfocus会计专科毕业论文
k=0 &&按不允许添加数据为变量k赋值，假设允许添加数据时k=1else &&存在上级科目
k=1 &&按允许添加数据为变量k赋值
endif
else &&科目编号位数不是偶数财务方面论文
messagebox（"科目编号位数不对，请重新输入！"，0+48，"提示"）
thiorm.text
1.setfocus
k=0 &&k=0表示不允许添加数据endif
else &&科目编号不重复且位数为4
k=1 &&k=1表示允许添加数据
摘自：毕业论文标准格式http://www.328tibet.cn
endif
if k=1 &&如果k=1，则添加数据会计专业毕业实习报告
append blank
replace kmbh with kmbh1
replace kmmc with thiorm.text
2.value
replace jdfx with thiorm.text3.value
replace qcye with thiorm.text4.value
thiorm.text1.value=space（0）
thiorm.text2.value=space（0）财务会计论文
thiorm.text3.value=space（0）
thiorm.text4.value=0.00
thiorm.text1.setfocus
endifendif
use
endif
set exact off
关于会计的范文
参考文献：
李国红.管理信息系统数据输入模块的设计与实现——兼论会计科目的输入设计[J].中国管理信息化：会计版， 2006（11）：19-22.