- 博客(99)
- 收藏
- 关注
RSS订阅原创 z/OS 使用FTP方式提交JCL作业
方式很简单，打开z/OS FTP session以后，用这个命令就可以转换成JES模式：quote site FILETYPE=JES然后，put上去的文件会被当作JOB执行，结果可以通过get拿回本地。通过job所在的queue可以看出来是否执行结束。
2013-08-12 13:00:52
1839
原创 DB2/z OLAP支持 (RANK, DENSERANK, ROW_NUMBER)
之前没接触过OLAP的东西，今天发现客户过来的query含有这个功能，就顺便查看一下造点test case。看了半天SQL reference，一头雾水；看了几个国内的blog，一头雾水；后来看了个英文blog，豁然开朗！这功能真是坑爹！简单记录如下：ROW_
2011-09-16 14:34:37
1059
原创 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
915
原创 DB2/z DSNTEP2中改变SQL TERMINATOR
有时候在DSNTEP2中跑SQL，需要改SQL TERMINATOR，一般是在define procedure的时候，由于;会和native language的终结符冲突掉所以需要改。写入下面的命令就可以临时为之后的语句更改terminator了：--#SET TERMI
2011-08-29 13:58:58
1066
原创 COBOL中实现线程等待的方法
COBOL中没有提供wait的方法，但是也不要使用简单的loop来实现等待，这样会浪费处理器资源，造成不必要的开支（主机的CPU是按MIPS计费的）。
2011-05-03 13:40:00
1740
原创 主机应用程序开发基础
本文是面向主机开发初学者的一篇基础教程，是作者在主机应用程序开发方面的经验的小结。花费力气整理出来，是希望能够抛砖引玉，给各位mainframe入门学习者一个较为准确的参考，并藉以增缺补漏，修正各种本人也理解不准确的地方。本文首发于mainframer.cn，另有完整版本备份于作者的个人blog: http://blog.csdn.net/simonjo；转载、引用请标明原文地址及作者blog，谢谢！本文将以连载方式陆续更新。本文论述仅为作者个人见解，并不代表IBM立场或技术之承诺。
2011-03-29 10:50:00
2104
原创 DB2/z DCLGEN/SPUFI -805 的解决
使用DB2/z DCLGEN/SPUFI时，有时会遇到DB2I安装不完全导致的-805错误，主要是由于没有执行绑定，导致DB2I的程序找不到package。报错一般如下：DSNT408I SQLCODE = -805, ERROR: DBRM OR PACKAGE NAME XXXX..DSNECP68.18- 003707155A011D NOT FOUND IN PLAN DSNEDCL. REASON 03
2010-10-08 15:56:00
3194
3
转载 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
9970
1
原创 删除弃置的isolate VSAM文件
有些时候，由于文件系统的分散配置，会导致VSAM文件的cluster和data file不匹配，此时，用IDCAMS各个删除这些unrelated VSAM files，就需要加上VVR指令（VSAM volume records）。 示例如下：//DELVSAM JOB ...//DEL EXEC PGM=IDCAMS
2010-03-23 14:36:00
1136
2
原创 ABEND=S222...
今天早上碰见了个ABEND，查了一下原来是超时然后driver主动cancel了job。汗的是，查manual得知，cancel一个作业并且没有take dump的话，ABEND code是S222……怀疑是不是哪个华人工程师的杰作，意思是告诉你，你太“2”了……
2010-03-03 09:53:00
1673
2
原创 Load/Unload XML data in DB2
If XML data in the table is less than 32K for each record, then you can directly unload the data as char. If XML data exceeds 32K for some records, then you have to unload the common data and the XML
2010-02-03 17:32:00
1196
原创 解除DB2/z tablespace pending状态的便捷方法
使用以下command即可：-START DATABASE(MINITEST) SPACE(SMNB0001) ACCESS(FORCE) WARNING: 这种做法可能会产生数据不一致，尽量不要在生产环境中使用。
2010-02-02 15:48:00
1488
转载 关于物化视图，MQT
之前还在郁闷，DB2里面MQT和物化视图有什么区别，后来一搜索，就是一个东西： DBMSTerminologyWhenHowWhoMS SQL ServerIndexed ViewsImmediateIncrementalSystemIBM DB2Materialized Query TablesImmediate a
2009-11-30 15:14:00
855
转载 这鸡蛋真难吃
a：这鸡蛋真难吃。b：比以前已经进步很多了。 a: 这鸡蛋真难吃b: 你叫什么名字？你是干什么的！你站在什么立场上说话？a：这鸡蛋真难吃。b：没有毛场长，你连这鸡蛋都吃不上a：这鸡蛋真难吃。b：要对咱们家的鸡有耐心，它一定会下出更好吃的蛋。 a：这鸡蛋真难吃。b：隔壁家也吃过这样的鸡蛋，现在是初级阶段。a：这鸡蛋真难吃。b：隔壁家的鸡蛋是好吃，可是不符合我们家的具体情况
2009-10-27 00:17:00
808
原创 Tips: 注释多行JCL
JCL本身并不支持跨行注释，但是巧用ISPF editor的change功能，就能简便的注释多行JCL。 JCL注释每行以//*开始，在注释起始行前用.A标记开始，然后在注释结束行前打.B标记结束，之后，使用如下命令替换.A和.B之间的行的//为//*：c all // //* .A .B 图解如下：注释之前这样：注释之后便成这样：
2009-09-28 16:12:00
1708
转载 解决Nokia PC SUITE无法识别DELL E6400 WIDCOMM bluetooth的问题
原帖地址：http://discussions.nokia.co.uk/discussions/board/message?board.id=pcsuite&message.id=31774 Dear all,I fought the same problem with my new Dell E6400 notebook! The problem is that when you upd
2009-09-09 15:26:00
1525
原创 DB2 命令收集
-DIS DATABASE(AAAA) SPACENAM(*)Display all table space status in a database-START DATABASE(AAAA) SPACE(BBBB) ACCESS(FORCE)Force the tablespace to be in RW status, repairs all copy/check/recovery
2009-09-09 15:09:00
670
原创 DB2静态/动态SQL语句与SQL注入攻击
今天在指导一个小型DB2项目开发时，突然想到了为什么SQL注入攻击之类的黑客技术在我接受的DB2的mainframe项目中根本没有提及，应该就是因为DB2的静态SQL语句机制。 我们先来看定义。静态SQL：在编程语言中，语句以hard code的方式写在程序中，但是其中允许有变量。这样的程序需要经过DB2预编译，将对这样的SQL语句的调用变成native language call。而
2009-06-01 10:33:00
3957
原创 DB2外键删除规则的特殊约束（DB2 FOREIGN KEY ON DELETE RULES special constraints）
今天遇到不少DB2 foreign key的referencial constraint的问题，翻了SQL reference才知道，某些情况下，创建delete rule是有限制的。而网上基本上没有人写过这些限制，所以写点总结，填下空白：1． 如果父表和子表是同一张表，即自己引用自己，则必须指定CASCADE or NO ACTION；SET NULL只能在外键中的某些column允许
2009-05-14 16:57:00
6531
1
原创 使用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
2274
2
转载 The Iron Laws of Software Development
The Iron Laws of Software Development You cant give an estimate until youve come up with a design. You cant come up with a design until you understand the requirements. You wont really
2009-04-22 16:24:00
592
原创 在REXX中使程序暂时等待的方法
REXX本身没有提供任何线程控制方法，它本身就不是一个支持多线程的语言。然而，我们可以通过调用TSO的方法，来实现使一个REXX程序暂时等待。（当然这种方法只在TSO环境中有效。）方法如下： Sleepawhile: Procedure CALL SYSCALLS ON ADDRESS SYSCALL "SLEEP" 5
2009-02-13 11:12:00
1014
原创 Mainframe上存储容量的换算
想必用过大机的人都接触过Block, Track, Cylinder的概念。Mainframe的存储管理一般就是基于这几个单位。那么，Mainframe上1个Cylinder是多少个Track？1个Track是多少个KB？1个Track包含多少个Block？ 对于第一个问题，多数人都知道答案是15，基于一般的磁盘设备，15这个答案没有错，但是对于磁带，应该是没有柱面这个概念的。（这个有
2009-01-09 16:28:00
3695
原创 用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
1782
3
转载 在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
1641
转载 一个写得很好的Linux学习笔记
linux目录架构 / 根目录 /bin 常用的命令 binary file 的目錄 /boot 存放系统启动时必须读取的档案，包括核心 (kernel) 在内 /boot/grub/menu.lst GRUB设置 /boot/vmlinuz 内核 /b
2008-09-16 09:19:00
672
原创 在Windows批处理中获取系统日期、时间戳记
在写Windows批处理脚本时，常常需要获取系统日期、时间戳记，用作文件名、文件夹名、log等等。本文介绍了如何获取自订的系统日期、时间戳记。 首先，在Windows中，系统日期由以下参数获得： %date% 系统时间则由以下参数获得： %time% 我们在Windows XP中输入以下命令：echo %date%，得到的结果类似以下（输出结果可能因系统
2008-09-09 16:18:00
6565
原创 自己写的每日自动备份脚本
之前自己写的每日自动备份邮件、桌面、收藏等东西的作业，windows脚本如下：ren "E:/Mail Backup/Outlook Daily Backup.zip" "Outlook Daily Backup_old.zip" > "E:/Daily Backup.log" "C:/Program Files/7-Zip/7z.exe" a -tzip "E:/Mail Backu
2008-06-25 14:45:00
3201
原创 常见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
6089
转载 DFHBMSCA中各个变量的含义对照表
DFHBMSCA中各个变量的含义对照表Standard Attribute and Printer Control Character List, DFHBMSCA Constant Meaning DFHBMPEM
2008-05-28 14:21:00
2158
原创 关于MVS的blksize
blksize就是，大机在做一次IO操作时，一次读写的单位。这个一定要是记录长度（lrecl）的整数倍。原因很简单，不是整数倍的话，就会造成一次I/O操作会截断数据记录。对于通常的3390设备，建议一个blk给的最优计算公式为：INT(27998/LRECL)*LRECL原因是3390设备的一个块是27988byte，上面的公式可以算出最接近一个磁盘块，但又在一个块之中的blksize大小
2008-05-09 16:10:00
2150
转载 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
5320
转载 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
4100
1
转载 定时运行一个Java程序的方法
定时运行一个Java程序的方法以前都是使用线程的sleep方法的，总感觉不妥当，现在找到了这个解决办法，还没有测，觉得应该是恰当的： javax.swing.Timer tm = new javax.swing.Timer(1000, new ActionListener() { //1000 is 1 second
2008-05-05 17:46:00
1587
转载 常用的TSO命令
常用的TSO命令原帖地址：http://bluemainframe.com/comments.php?DiscussionID=73TSO命令由TSO用户在TSO环境下发出 （如在主菜单下选择P.6可进入TSO命令处理工具）。用于启动、停止软件系统，检查、设置系统软硬件设备的运行情况，运行系统作业等等。由于受篇幅所 限，本附录只能列出主要的TSO命令和常用的使用方法，详细情况可参考S/39
2008-05-05 17:39:00
5404
转载 上帝与Google，玉帝与Baidu
最早的时候,上帝很无聊,平时只能看看电视听听广播,偶尔玩玩超级玛丽,再就是和圣母玛丽亚通通电话.时间长了,这种生活越发枯燥.上帝觉得这样的生活太乏味,于是他说:“要有网”.然后就有了互联网,计算机都可以连在一起,这是第一天. 光是有互联网也不行，起码得有点东西看吧。上帝说：“要有网站”。然后就有了全世界各种各样的大小网站，上帝在网站上看新闻、看图片，顺便还到论坛上发发贴，觉得互联网有
2008-04-30 14:32:00
746
1
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人