Mainframe
simonjo
这个作者很懒,什么都没留下…
展开
-
大型服务器的应用前景
大型服务器的应用前景 从1994年起,IBM开始对大型机进行深入的技术改造,采用了新的CMOS技术,极大地缩小了大型机的系统体积,降低了能耗和散热成本,提高了性能价格比。据Meta 估计,S/390机的价格每年至少降低35%,每MIPS的平均成本已从几万美元降低到1998年的5000美元,这在很大程度上是由于成本较低的CMOS系统取代了较早的ECL双极性系统。另一方面,分布式计算开始转载 2006-09-19 10:13:00 · 2028 阅读 · 0 评论 -
DB2静态/动态SQL语句与SQL注入攻击
今天在指导一个小型DB2项目开发时,突然想到了为什么SQL注入攻击之类的黑客技术在我接受的DB2的mainframe项目中根本没有提及,应该就是因为DB2的静态SQL语句机制。 我们先来看定义。静态SQL:在编程语言中,语句以hard code的方式写在程序中,但是其中允许有变量。这样的程序需要经过DB2预编译,将对这样的SQL语句的调用变成native language call。而原创 2009-06-01 10:33:00 · 4015 阅读 · 0 评论 -
利用ISPF查看Z的各组件的版本
使用以下命令,可以查看Z的各组件的版本:TSO ISPVCALL STATUS原创 2009-11-30 15:10:00 · 708 阅读 · 0 评论 -
解除DB2/z tablespace pending状态的便捷方法
使用以下command即可:-START DATABASE(MINITEST) SPACE(SMNB0001) ACCESS(FORCE) WARNING: 这种做法可能会产生数据不一致,尽量不要在生产环境中使用。原创 2010-02-02 15:48:00 · 1511 阅读 · 0 评论 -
ABEND=S222...
今天早上碰见了个ABEND,查了一下原来是超时然后driver主动cancel了job。汗的是,查manual得知,cancel一个作业并且没有take dump的话,ABEND code是S222……怀疑是不是哪个华人工程师的杰作,意思是告诉你,你太“2”了……原创 2010-03-03 09:53:00 · 1702 阅读 · 2 评论 -
Meet the DBD family: DBID, OBID, PSID, etc…
What a family! Misunderstood, avoided, misquoted, and sometimes even feared. Everyone has some opinion about them yet few people really take the time to understand them. So, I decided it was time to g转载 2010-04-12 14:26:00 · 10009 阅读 · 1 评论 -
主机应用程序开发基础
本文是面向主机开发初学者的一篇基础教程,是作者在主机应用程序开发方面的经验的小结。花费力气整理出来,是希望能够抛砖引玉,给各位mainframe入门学习者一个较为准确的参考,并藉以增缺补漏,修正各种本人也理解不准确的地方。本文首发于mainframer.cn,另有完整版本备份于作者的个人blog: http://blog.csdn.net/simonjo;转载、引用请标明原文地址及作者blog,谢谢!本文将以连载方式陆续更新。本文论述仅为作者个人见解,并不代表IBM立场或技术之承诺。原创 2011-03-29 10:50:00 · 2129 阅读 · 0 评论 -
COBOL动态与静态调用
转自http://www.mainframer.cn/tech.mrqa?action=view&id=2965转载 2011-04-06 09:51:00 · 3994 阅读 · 0 评论 -
DB2/z OLAP支持 (RANK, DENSERANK, ROW_NUMBER)
之前没接触过OLAP的东西,今天发现客户过来的query含有这个功能,就顺便查看一下造点test case。看了半天SQL reference,一头雾水;看了几个国内的blog,一头雾水;后来看了个英文blog,豁然开朗!这功能真是坑爹!简单记录如下:ROW_原创 2011-09-16 14:34:37 · 1081 阅读 · 0 评论 -
DB2/z DSNTEP2中改变SQL TERMINATOR
有时候在DSNTEP2中跑SQL,需要改SQL TERMINATOR,一般是在define procedure的时候,由于;会和native language的终结符冲突掉所以需要改。写入下面的命令就可以临时为之后的语句更改terminator了:--#SET TERMI原创 2011-08-29 13:58:58 · 1079 阅读 · 0 评论 -
DB2/z SQLCODE -20071 WLM ENVIRONMENT NAME MUST BE SPECIFIED function-name
现象:Define stored procedure时报此错原因:Default WLM在安装时没有指定,define SP语句亦没有指定解决:/d wlm,appenv=*查找所有WLM,找相应DB2 subsystem名开头的,一般是用SSIDWLM1,SSIDWLM原创 2011-08-29 14:18:10 · 933 阅读 · 0 评论 -
使用FTP在Mainframe上提交作业
使用FTP在Mainframe上提交作业的前提是,主机上面TCP/IP和FTP均已建立。(技术细节请refer: OS/390 TCP/IP Open Edition Users Guide) 登陆到主机的FTP以后,可以使用主机特有的FTP命令来传送本地文件为作业,并自动运行。首先,使用以下命令改变目前的服务状态为JES,文件将会传送到JES而不是文件系统:"quote s原创 2009-04-27 15:19:00 · 2301 阅读 · 2 评论 -
在REXX中使程序暂时等待的方法
REXX本身没有提供任何线程控制方法,它本身就不是一个支持多线程的语言。然而,我们可以通过调用TSO的方法,来实现使一个REXX程序暂时等待。(当然这种方法只在TSO环境中有效。)方法如下: Sleepawhile: Procedure CALL SYSCALLS ON ADDRESS SYSCALL "SLEEP" 5原创 2009-02-13 11:12:00 · 1033 阅读 · 0 评论 -
OS/390:一些零碎的知识点
这些是在公司做390培训时记下的一些零碎但很有用的知识点。 A volume is a DASD disk."A RAMAC DASD array are several individual disk drives, each of which reads and writes data on a disk pack(also called a volume). A dis原创 2006-10-10 10:45:00 · 1439 阅读 · 1 评论 -
如何判定DB2 archive log满
在Job TD11MSTR中,如果出现信息“IGD17272I VOLUME SELECTION HAS FAILED FOR INSUFFICIENT SPACE ”,则DB2 archive log满,需要删除后才能继续进行DB2操作。JOBNAME StepName CPU% ProcStep JobID Owner TD11MSTR TD11MSTR 0.16 IE原创 2008-01-27 16:31:00 · 2019 阅读 · 1 评论 -
常用的TSO命令
常用的TSO命令原帖地址:http://bluemainframe.com/comments.php?DiscussionID=73TSO命令由TSO用户在TSO环境下发出 (如在主菜单下选择P.6可进入TSO命令处理工具)。用于启动、停止软件系统,检查、设置系统软硬件设备的运行情况,运行系统作业等等。由于受篇幅所 限,本附录只能列出主要的TSO命令和常用的使用方法,详细情况可参考S/39转载 2008-05-05 17:39:00 · 5482 阅读 · 0 评论 -
VSAM文件IO操作返回码参考
VSAM Return Codes 00 - SUCCESSFUL COMPLETION 02 - DUPLICATE KEY, NON UNIQUE ALT INDEX 04 - READ, WRONG LENGTH RECORD 05 - OPEN, FIL转载 2008-05-09 10:26:00 · 4162 阅读 · 1 评论 -
关于MVS的blksize
blksize就是,大机在做一次IO操作时,一次读写的单位。这个一定要是记录长度(lrecl)的整数倍。原因很简单,不是整数倍的话,就会造成一次I/O操作会截断数据记录。对于通常的3390设备,建议一个blk给的最优计算公式为:INT(27998/LRECL)*LRECL原因是3390设备的一个块是27988byte,上面的公式可以算出最接近一个磁盘块,但又在一个块之中的blksize大小原创 2008-05-09 16:10:00 · 2182 阅读 · 0 评论 -
CICS返回码参考
CICS ASRA - This abend occured beacuse of invalid non numeric dataAICA - A looping task has been terminated with this abend code by CICS becau转载 2008-05-09 10:28:00 · 5390 阅读 · 0 评论 -
DFHBMSCA中各个变量的含义对照表
DFHBMSCA中各个变量的含义对照表Standard Attribute and Printer Control Character List, DFHBMSCA Constant Meaning DFHBMPEM转载 2008-05-28 14:21:00 · 2180 阅读 · 0 评论 -
常见CICS和DB2错误码
CICS ABEND CODES Following are the common ABEND codes related to exceptional conditions. APIA - ERROR AEID - EOF AEIM - NOTFND AEIN - DU原创 2008-06-05 11:44:00 · 6187 阅读 · 0 评论 -
在COBOL中调用REXX脚本[转载]
例子转自IBM z/OS V1R9.0 information center(http://publib.boulder.ibm.com/infocenter/zos/v1r9/index.jsp?topic=/com.ibm.zos.r9.rexa100/h1981605303.htm) //* -->uidIEC JOB - Specify your Job card h转载 2008-10-10 18:02:00 · 1664 阅读 · 0 评论 -
用JCL来压缩dataset
用JCL来压缩dataset的好处是,可以schedule,可以无视dataset被人占用(作业可以挂在上面等着)…… 以下是用来压缩PDS的Job,很简单,就是把一个PDS拷到它自己里面……//COMPPDS JOB CLASS=A,MSGCLASS=X,MSGLEVEL=(1,1),NOTIFY=&SYSUID //*THIS JOB IS USED TO COMPRESS A原创 2008-10-30 11:23:00 · 1801 阅读 · 3 评论 -
Mainframe上存储容量的换算
想必用过大机的人都接触过Block, Track, Cylinder的概念。Mainframe的存储管理一般就是基于这几个单位。那么,Mainframe上1个Cylinder是多少个Track?1个Track是多少个KB?1个Track包含多少个Block? 对于第一个问题,多数人都知道答案是15,基于一般的磁盘设备,15这个答案没有错,但是对于磁带,应该是没有柱面这个概念的。(这个有原创 2009-01-09 16:28:00 · 3783 阅读 · 0 评论 -
z/OS 使用FTP方式提交JCL作业
方式很简单,打开z/OS FTP session以后,用这个命令就可以转换成JES模式:quote site FILETYPE=JES然后,put上去的文件会被当作JOB执行,结果可以通过get拿回本地。通过job所在的queue可以看出来是否执行结束。原创 2013-08-12 13:00:52 · 1877 阅读 · 0 评论