1、流动资金贷款业务系统流动资金贷款业务系统第一章 概述第一节流动资金贷款及其分类一、流动资金贷款概念（一）流动资金贷款是指商业银行向借款人发放的用于正常生产经营周转或临时性资金需求的本外币贷款。（二）贷款对象是经国家工商行政管理机关（或主管机关）核准登记的企业（事业）法人、个体工商户、其他经济组织。主要用于满足借款人正常生产经营过程中为耗用或销售而储存的各类存货。季节性物资储备等生产经营周转性或临时性的资金需要。借款人不得挤占挪用流动资金贷款用于固定资产投资或其他不符合流动资金贷款用途的活动。第二节 流动资金贷款操作程序一、调查评价：银行根据客户提出的申请进入调查评价阶段，（一） 申请材料的审查
2、1、借款用途和还款来源 2、商务合同、订单或意向书 3、人民银行颁布的贷款卡（经过年检） 4、审查董事会决议 （二）确定贷款期限1、 生产经营周期 2、还款能力 3、贷款人的资金实力对于到期的流动资金贷款转为中期流动资金贷款要严格掌握条件，凡属于生产经营正常，生产规模较大，产品有市场，有信誉，归还贷款本息有保证的企业，特别是大中型的企业的到期流动资金贷款中正常生产所需的经常性占用周转部分，可以转为中期流贷。二、确定利率执行人行规定的贷款利率，并在借款合同中注明。三、审批四、发放五、贷后管理(一）有无违反合同条款的情况； （二）还本付息能力及落实还款情况；（三）流动资金占用和存货是否正常合理；（
3、四）有无挤占、挪用流动资金贷款从事固定资产投资、房地产炒作、垫资承包工程、购买有价证券；（五）有无违反国家外汇管理规定；（六）保证人保证资格和保证能力；（七）抵（质）物的变化； （八） 在他行存借款的情况。六、回收 按用款实际期限，贷款即将到期时，借款客户应筹集资金以按时归还银行借款。第三节 流动资金贷款业务系统开发的意义一、目前，计算机的价格已经十分低廉，性能却有了长足的进步。它已经被应用于许多领域，计算机之所以如此流行的原因主要有以下几个方面： （一）计算机可以代替人工进行许多繁杂的劳动； （二）计算机可以节省许多资源； （三）计算机可以大大的提高人们的工作效率； （四）计算机可以使敏感文
4、档更加安全，等等二、我国加入后，国家最终将放弃对国有商业银行提供无限量的信用支持，金融机构必然会在市场经济的大海中按自然规则物竞天择。要想在激励的竞争中立于不败之地，银行业必须加快金融电子化的步伐，采取有效措施，迅速建立以决策支持系统为核心的管理信息系统，高效地处理和利用信息，提高信息化水平，增强竞争实力。如何根据开发系统的规模、技术复杂的程度、管理水平的高低、技术人员的素质及开发时间的要求等不同要素，确定管理信息系统开发方法，确保以较小的投入取得最优的效果。 为了进一步提高管理水平，完善管理制度，建行提出了后台（财务）手工操作向财务信息化转变、松散管理向集中式网络化管理转变、核算型向管理型转
5、变、分散的解决方案向多种管理层面集成的完整解决方案转变等要求，并且在此基础上，进一步提出要统一会计核算制度、财务制度、综合经营计划及管理会计方法，优化财务会计核算功能。 第二章 系统分析第一节 编制业务流程图流动资金贷款业务操作流程见图第二节用户需求分析用户需求分析就是在用户需求调研的基础上，确定系统的总体结构方案，完成相应的需求分析报告。在确定系统的总体结构方案过程中，包括确定应用程序的结构、系统开发环境和系统的功能模块。用户需求调研结束之后，应该立即进行用户需求分析。第三节 应用程序结构确定一、 从用户应用角度来看，可把应用程序系统的组成部分分成数据存储层、业务处理层和界面表示层等3个层次
6、，而应用程序结构可归纳为：集中式应用程序结构、单用户应用程序结构、多层服务器应用程序结构、浏览器服务器应用程序结构、客户机服务器应用程序结构等5种类型。 二、数据存储层放在服务器上，业务处理层和界面表示层放在客户机上，因此又被称为“灵敏的客户机”结构。许多操作可以在本地的客户机上执行，只是当需要数据时，才向服务器发出请求。并使应用程序的处理更接近用户，使整个系统具有较好的性能，可以并行地处理应用程序的请求、减少了数据传输量、降低了服务器的负荷。由于条件所限，将此系统所有程序都置于一台计算机上，以便调试运行。第三章 系统设计第一节系统设计目标系统开发的总体任务是实现银行流动资金贷款业务管理的系统
7、化、规范化和自动化，从而达到提高银行流动资金贷款业务管理效率的目的。第二节开发设计思想一、系统将银行的流动资金贷款业务经营与管理有机地结合在一起,实行了贷款审批与本金的发放、收回及利息核算的管理账务网络化、电子化一条龙的计算机联体操作,形成贷款审批的统一授信、授权,信贷额度与会计放款交易相互控制的运作机制。在新的信贷管理系统中创建了客户档案管理子系统。二、客户资料在系统中集中登录、存储、查询,改变了过去客户信息分散、独立、封闭的现象。信贷业务人员可以利用系统随时掌握客户在招行所有机构结算往来、信用往来、授信额度等一切业务活动信息,同时通过对客户经营情况、财务报表、关联关系家谱资料进行汇集整合,
8、形成全行庞大的客户信息资源网。这一系统不仅提高了信息处理速度和质量,也使银行会计核算手段更为先进,实现了流动资金贷款业务信息化的操作处理。其贷款业务本金放款、到期还款的扣收、利息计算与收取等帐务操作,由系统自动化处理。第三节开发和运行环境选择一、微软公司的Visual Basic 6.0是Windows应用程序开发工具，使目前最为广泛的、易学易用的面向对象的开发工具。Visual Basic提供了大量的控件，这些控件可用于设计界面和实现各种功能，减少了编程人员的工作量，也简化了界面设计过程，从而有效的提高了应用程序的运行效率和可靠性。故而，实现本系统VB是一个相对较好的选择。二、Access2
9、000 就是关系数据库开发工具，数据库能汇集各种信息以供查询、存储和检索。Access 的优点在于它能使用数据表示图或自定义窗体收集信息。数据表示图提供了一种类似于 Excel 的电子表格，可以使数据库一目了然。另外，Access 允许创建自定义报表用于打印或输出数据库中的信息。Access也提供了数据存储库，可以使用桌面数据库文件把数据库文件置于网络文件服务器，与其他网络用户共享数据库。Access 是一种关系数据库工具，关系数据库是已开发的最通用的数据库之一。如上所述，Access 作为关系数据库开发具备了许多优点，可以在一个数据包中同时拥有桌面数据库的便利和关系数据库的强大功能。 三、二
10、者的结合 （一）微软的JET数据库引擎提供了与数据库打交道的途径，通过它以及Visual Basic 来访问数据库并对其进行各种操作。Visual Basic、Access以及其他微软的软件产品都是通过共用JET数据库引擎，从而提供了丰富的数据类型。 （二）DATA 控件在数据库中的信息与将信息显示给用户看的Visual Basic程序之间架起了一座桥梁。可以通过设置DATA控件的各个属性，告诉它要调用那个数据库的哪个部分。缺省情况下，DATA控件根据数据库中的一个或多个数据表建立一个dynaset-type（动态集合）类型的记录集合。一个记录集合是动态的也就意味着，当原来的数据表中的容改变了
11、以后，该记录集合中的记录也会随之改变。DATA控件还提供了用来浏览不同记录的各种跳转按钮。将DATA控件放置在窗体中之后，我们还必须在该控件与要处理的数据库之间建立联系。（三）综上，可确定使用下面的开发环境：1、网络操作系统：Windows XP；2、数据库服务器：MicrosoftAccess2000；3、服务器平台：Windows XP；4、客户机平台：Windows9598NT2000；5、前端开发工具：visualBasic6.0(企业版)；第四节系统功能分析一、本系统需要完成的功能主要有以下几点。（一）银行流动资金贷款业务的各种信息的输入，包括贷款申请、贷前调查、贷款评估、贷款审批的
12、输入等。（二）流动资金贷款业务的各种信息的查询、修改、添加、浏览和维护。 （三）流程中涉及到的报表的生成。（四）所有表单的相同项目的比较。（五）流动资金贷款业务管理系统的使用帮助。二、在本系统的设计过程中，为满足计算机管理的需要，采取了下面的一些原则：（一）统一各种原始单据的格式，统一帐目和报表的格式。（二）删除不必要的管理冗余，实现管理规范化、科学化。（三）程序代码标准化，软件统一化，确保软件的可维护性和实用性。（四）界面尽量简单化，做到实用、方便，尽量满足企业中不同层次人员的需要。第五节 系统功能模块设计一、在系统功能分析的基础上，考虑VB和Access的特点，设计出如图4.1所示的系统功
13、能模块图。 图3-1系统功能模块图二、系统模块（一）包括报表的打印及设置，申请贷款用户的信息和表单。（二）管理员可以通过管理界面添加或删除用户。（三）管理员或其他用户可以修改自己的密码。（四）管理人员可以对所有申请贷款企业的所有信息进行添加、删除、修改。三、流动资金贷款业务系统流程图 图3-2载入界面流程图 图3-5主界面流程图 图3-6贷款申请流程图第四章 数据库设计第一节 数据库需求分析在仔细调查银行流动资金贷款业务管理过程的基础上，设计出本系统所处理的数据操作流程图图4-1数据库操作流程图第二节 数据库概念结构设计这一设计阶段是在需求分析的基础上，设计出能够满足用户需求的各种实体，以及它
14、们之间的关系，为后面的逻辑结构设计打下基础。根据上面的设计规划出的各个模块实体的E-R图及其关系描述如下： 图4-2贷款申请书模块E-R图图4-3贷前调查模块E-R图第三节 数据库逻辑结构设计在上面的实体以及实体之间关系的基础上，形成各个表格之间的关系。 流动资金贷款业务管理系统数据库中的各个表的设计结果如下面的几个表格所示，每个表格表示数据库中的一个表。字段名称数据类型可否为空字段长度用户名文本NULL10密码文本NULL15权限文本NULL10字段名称数据类型可否为空字段长度贷款申请文件号文本NOT NULL6贷款申请时间日期/时间NULL无申请单位信息文本NULL20市信保意见文本NUL
15、L15申请贷款金额数字NULLINTEGER贷款利息率数字NULLINTEGER调查人文本NULL10字段名称数据类型可否为空字段长度申请贷款号文本NOT NULL6贷款原因文本NULL20预计还款时间日期/时间NULL无还款能力文本NULL20调查人文本NULL10贷款金额数字NULLINTEGER企业代表文本NULL10用途文本NULL20第五章 系统实施 第一节用户界面的实现一、启动画面启动画面是为了给用户一个良好的印象，加深软件的亲和力，没有实际的功能，在Form1窗体中加入了Image和Time组件。启动画面的窗体主要的源代码如下：Private Sub Frame1_DragDro
16、p(Source As Control, X As Single, Y As Single)End SubPrivate Sub Form_Click()Unload MeLoad frmloginfrmlogin.ShowEnd SubPrivate Sub Form_Unload(Cancel As Integer)Unload MeLoad frmloginfrmlogin.ShowEnd Sub一、用户登录窗体的的实现（一）本窗体是为了让工作人员按照用户名和密码进行登录，并且跟据用户名检查Keyer表中的“权限”字段，以分辩使用人员是否有权限进入管理界面。窗体界面如下：（二）源代码如下
17、Private Sub cmdok_Click()If namedacom = ThenMsgBox 用户名不能为空！, vbOKOnly + vbExclamation, 警告！Exit SubEnd IfIf namedacom 流动资金贷款 ThenMsgBox 没有该用户, vbOKOnly + vbExclamationExit SubElseIf passTxt = 111111 ThenUnload frmloginLoad Form1Form1.ShowElseIf num 0 Loop End IfEnd IfEnd IfEnd Sub（三）用户权限验证第二节 客户管理界面一
18、、用户界面包括：打开文档、关闭文档、浏览文档、新增记录、删除记录、关于、帮助。二、管理项目包括：贷款申请、贷前调查、信用评价、公司受信业务、贷款发放、贷款展期、贷款回收。窗体界面如下：二、贷款申请包括：申请担保情况、申请担保企业提供文件、拟贷款银行建议、市信保中心意见，窗体如下：第三节 数据表格：二、贷前调查 二、贷前调查源代码如下：Private Index As IntegerPrivate DbName As StringPrivate Table As StringPrivate Sub Form_Load()loadInfoDbName = dksqs.mdbTable = ndky
19、hyjEnd SubPrivate Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)On Error Resume NextIf Button.Caption = 打开档案 Then loadInfoElseIf Button.Caption = 关闭档案 Then closeInfoElseIf Button.Caption = 浏览档案 Then browseInfoElseIf Button.Caption = 新增记录 Then newInfoElseIf Button.Caption = 编辑记录 ThenEls
20、eIf Button.Caption = 删除记录 Then Data1.Recordset.Delete Data1.Recordset.MoveLast Data1.RefreshEnd IfEnd SubPrivate Sub browseInfo()On Error Resume Next Table = TableFrom(Index) DbName = dbNameFrom(Index) Data1.DatabaseName = App.Path + mdb + DbName Data1.RecordSource = Table Data1.RefreshEnd SubPrivat
21、e Sub newInfo()On Error Resume Next Data1.Recordset.AddNew Data1.Recordset.Update Data1.Recordset.MoveLast Data1.RefreshEnd SubPrivate Sub loadInfo()TreeView1.Nodes.ClearIndex = 1TreeView1.Nodes.Add , tvwLast, , 贷款申请书, 5TreeView1.Nodes.Add Index, tvwChild, , 申请担保贷款情况, 4TreeView1.Nodes.Add Index, tvw
22、Child, , 申请担保企业提供文件, 6TreeView1.Nodes.Add Index, tvwChild, , 拟贷款银行意见, 3TreeView1.Nodes.Add Index, tvwChild, , 市信保中心意见, 27TreeView1.Nodes.Add , tvwLast, , 贷前调查情况, 9TreeView1.Nodes.Add 6, tvwChild, , 调查人, 30TreeView1.Nodes.Add 6, tvwChild, , 企业基本情况, 11TreeView1.Nodes.Add 6, tvwChild, , 企业借款原因, 15TreeV
23、iew1.Nodes.Add 6, tvwChild, , 企业还款能力, 29TreeView1.Nodes.Add 6, tvwChild, , 借款担保方式, 33TreeView1.Nodes.Add 6, tvwChild, , 调查结论, 8TreeView1.Nodes.Add , tvwLast, , 信用评价, 7TreeView1.Nodes.Add , tvwLast, , 公司授信业务, 18TreeView1.Nodes.Add , tvwLast, , 贷款发放, 14TreeView1.Nodes.Add , tvwLast, , 贷款展期, 2TreeView1
24、.Nodes.Add , tvwLast, , 贷款收回, 31End SubPrivate Sub closeInfo()TreeView1.Nodes.ClearIndex = 1End SubPrivate Sub TreeView1_Click()On Error GoTo errIndex = TreeView1.SelectedItem.Indexerr:End SubPrivate Function dbNameFrom(Index As Integer) As String If Index 1 And Index 6 And Index 13 Then dbNameFrom
25、= dqdcqk.mdb ElseIf Index = 13 Then dbNameFrom = xypj.mdb ElseIf Index = 14 Then dbNameFrom = gssxyw.mdb ElseIf Index = 15 Then dbNameFrom = dkff.mdb ElseIf Index = 16 Then dbNameFrom = dkzq.mdb ElseIf Index = 17 Then dbNameFrom = dksh.mdb End IfEnd FunctionPrivate Function TableFrom(Index As Intege
26、r) As String Select Case Index Case 2: TableFrom = sqdbdkqk Case 3: TableFrom = sqdbqytgwj Case 4: TableFrom = ndkyhyj Case 5: TableFrom = sxbzxyj Case 7: TableFrom = dcr Case 8: TableFrom = qyjbqk Case 9: TableFrom = qyjkyy Case 10: TableFrom = qyhknl Case 11: TableFrom = jkdbfs Case 12: TableFrom
27、= dcjl Case 13: TableFrom = xypj Case 14: TableFrom = gssxyw Case 15: TableFrom = dkff Case 16: TableFrom = dkzq Case 17: TableFrom = dksh End SelectEnd FunctionPrivate Sub TreeView1_DblClick()browseInfoEnd Sub第四节 系统的维护为了让系统在投入使用以后，能够正确运行必须进行系统维护。一、硬件维护硬件维护主要从设备包养，规范使用等方面着手。要维持设备正常工作，网络畅通。及时够入新设备，以保
28、证系统运行稳定。二、软件维护在系统运行时，发现的软件程序的不足，要进行程序修改，对软件作及时的升级，开发更多的补丁程序等。三、数据维护在系统运行过程中，必须对系统的数据进行必要的更新维护。对系统数据的增、删、改等方面的维护工作。 参考文献1 Bob Reselman , Richard Peasley , Wayne Pruchniak.Visual Basic 6.0 使用指南.电子工业出版社2 Ned Snell.中文版Microsoft Office 97 自学通. 机械工业出版3 Microsoft .Visual Basic 6.0 中文版控件大全.电子工业出版社4 Craig Ed
29、dy ，Timothy Buchanan.中文Access 2000 24学时教程. 机械工业出版社5黄梯云， 管理信息系统，经济科学出版社6甘仞初，信息系统开发，经济科学出版社7 宋刚.三和银行大连分行的外资企业贷款.大连理工大学,2001 8 刘海方.论适应市场的商业银行信贷经营机制.中国社会科学院研究生院,20029 于跃峰.乡镇企业贷款决策引致银行信贷风险研究.中国农业大学,200210 完璧.东京三菱银行上海分行信息化推进方案的研究.上海海事大学,200311 倪英洁.存款保险与我国银行业稳定性发展研究.河海大学,2005学,200312 黄向庆.我国银行业不良资产成因分析及信贷资产质量管理体系的构建.南京农业大学, 13Charles Petzold，Programming
