一、RPG预备知识.pptVIP

RPG讲座 AS/400的历史及其发展 自80年代末起， AS/400一直是小型服务器的先驱，凭借其庞大的用户基础，强大的应用支持，为IBM及其商业伙伴带来丰厚的利润，尽管它正面临着UNIX以及NT的威胁，但AS/400 已经进入了第三代IBM 正在继续为它进行投资，至少从现在来看，这套系统仍保持着相当的实力，能够成为网络时代的服务器的主流。 实际上，对注重打包的应用，可靠性 ，管理能力以及全球服务于支持的企业来说， AS/400 早已成为首选的系统。 AS_400名称的由来 在IBM正式发布AS/400之前，它的代号被称为“Silverlake”。IBM公司在开始研制AS/400的下一代系统时为之取了一个名字为“Superior”的代号。许多人认为在正式公布这一代新系统时，不会再叫AS/400了。在计算机业界有这么一种看法，任何一种计算机系统都只有6年左右的生命期，从1950年至今，只有极个别例外，包括AS/400。这种看法的依据是，计算技术的发展日 新月异，一个历经6年的系统将不可能再合时宜。这对那些依赖于硬件技术的系统也许是正确的。?  到了1993年，业界有许多专家预言IBM的AS/400将消亡，取而代之的将是AS/500”。因为到1994年，AS/400已经6岁了。针对新的机器“Superior”，IBM有机会更名AS/400（有人建议使用AS/6000）， 但最终IBM还是决定继续延用AS/400这一业界最为人们认可的名称之一。一个品牌的创立并非易事，因此，当一个商品的名称已获得用户很高的认可度时，只有傻瓜才会想着去改变它。 AS_400名称的由来 AS/400这一名字的由来也颇具戏剧性。早在1988年，IBM本可将AS/400命名为System/38，因为那时的AS/400只不过是在System/38的基础上增加了许多新功能，完全可以视其为System/38的升级版本。但IBM其实已厌倦使用“System/3x”的名称，他们要想创出一点新意。恰好当时IBM内部正在制定一 套新的产品命名规则。IBM有一个项目叫作SAA(SystemApplication?Architecture），SAA旨在建立 一种通用的应用软件，能运行于ＩＢＭ所有主流系统上。相似的系统名能更好地体现这种通用性，因此ＩＢＭ的几种主流系统都带有“System”这一单词，如Enterprise?System/90（ES/9000），Personal?System/2（PS）等，所不同的只是第一个单词。对AS/400第一个单词的选择在Rochester?Lab.还引发了一场争论，有人建议用“Advanced”，有人则要用“Application”。最后争论的结果选择了后者。但随后在介绍AS/400的先进系列时，ＩＢＭ又缓用了“Advanced”。 AS_400名称的由来 那么在选择数字时为什么选择了“400”呢？由于AS/400是源于System/36和System/38的， Rochester?Lab.首先想到的是“37”和“39”，但马上决定用“40”。“Application?System/40” 这一名字在Rochester?Lab.呼之欲出。但没有想到IBM另一机构“Personal?Systems?Organization” 申请占用全部的1位和2位数字，他们抱怨使用1位数字只能发布9种不同的产品，没有人会去买PS/0。 最后，Rochester?Lab.做了让步，他们在“40”之后再加了一个“0”，这样“AS/400”终于诞生了。 什么是面向过程的语言？ 面向过程的程序：用计算机能理解的逻辑来描述和表达待解决的问题及具体的解决过程。其核心是数据结构+算法。如C，RPG等。可以精确完备地描述具体的求解过程但无法清楚表述含多个相互关联的过程的复杂系统。 AS400的文件目录结构（2） 另外要说的一点，AS400中的文件中可以有几个成员（MEMBER）构成，但是文件并不是目录。 AS400目录的三级结构，是由QSYS，库名，文件名构成。 访问文件的方式: 库名/文件名,或是只使用文件名。只使用文件名的时候，系统按库列表的顺序，从上而下在各个库中查找，以找到的第一个作为程序使用的文件。 MYLIB/MYFILE MYFILE 什么是RPG RPG是Report Program Generator的缩写． RPG程序语言使你开发业务应用软件更加简单。 RPG是一种进