IBM大型机论坛索引
 
登录
 
IBM大型机论坛索引 大型机:搜索 IBM Mainframe论坛:常见问题解答 寄存器
 

自动化处理空间异常


IBM大型机论坛 -> 清单& REXX
发表新话题   回复主题
查看上一个主题 :: 查看下一个主题  
作者 信息
老实人

新的用户


已加入:2008年11月5日
帖子:23
地点:德里

发布发表:2009年3月18日,星期三3:43 pm
引用回复

嗨,朋友们,
我想出一个主意,如果你能帮助我实现同样的想法。

实际上,我们在生产工作中得到了很多空间,
我想到要开发一种可处理如下空间异常变化的工具或JCL:

1.在为输出数据集分配空间时,我想添加另一个临时数据集并为其分配更大的空间,一旦执行程序,该空间将被删除。
2.假设给定的o / p数据集空间将容纳50行数据,但是我们的程序将产生60行数据,那么它将给出空间异常结束。
但是所有60行数据都将在该临时数据集中具有更大的大小。
3.一旦显示出空间弯曲,它就会进入PARA,然后将计算所有记录的临时数据集的大小。
那么逻辑是将o / p数据集减去temp数据集的大小,以便获得所需的INPARSE IN SPACE。
4.现在,它将仅将增加的空间与当前o / p数据集的空间相加,然后重新运行程序或作业...
所以现在分配了确切的空间,并且没有产生空间异常结束.....

请建议我这是否可行或对此有任何新的简便逻辑...
很抱歉,如果张贴在错误的线程中。



谢谢
回到顶部
查看用户资料 发送私信
外籍人士

全球主持人


已加入:2007年3月14日
帖子:8794
地点:威尔士威尔士

发布发表:2009年3月18日,星期三,下午4:34
引用回复

我总是发现预防胜于治疗。

一种方法是根据SMF或DCOLLECT记录趋势化数据集的使用趋势,并生成有关多范围数据集的报告,然后在异常终止之前增加空间。

此外,与您的存储人员交谈以讨论可以轻松解决问题的多卷数据集。
回到顶部
查看用户资料 发送私信
起源786

活跃用户


已加入:2005年9月28日
帖子:210
地点:伦敦圣凯瑟琳码头

发布发表:2009年3月18日,星期三,下午4:34
引用回复

嗨,您想回答几个问题:

1.什么构成您的生产工作?也就是说,它们可能是一些正在运行的批处理cobol程序,一些rexx宏,一些cics / mq / db2程序。基本上,您需要先评估您的环境。

2.您的空间异常发生在哪里?是顺序文件/ vsam文件等吗?

3.如果您已经知道输出将超出分配的空间,为什么不永久增加它呢?还是某种可变的输出?即,如果您知道今天有一些工作由于空间问题而终止,使用临时数据集将是一个临时解决方案。而是永久地固定工作。

4.当您说“ ...它到了一个PARA,然后将计算临时数据集的大小...”时,我希望您的意思是cobol程序?

5.您如何知道分配的空间和所需空间的增量。如果工作异常终止,您将如何发现该工作将要产生多少数据?
回到顶部
查看用户资料 发送私信
纳纳斯N

活跃成员


已加入:2007年9月6日
帖子:792
地点:印度金奈

发布发表:2009年3月18日,星期三,下午4:58
引用回复

可用产品,BMC STOP X37,CA ALLOCATE。
回到顶部
查看用户资料 发送私信
老实人

新的用户


已加入:2008年11月5日
帖子:23
地点:德里

发布发表:2009年3月18日,星期三5:40 pm
引用回复

感谢您的答复
首先,我想回答Genesis786

1.生产作业包含批处理cobol程序,它甚至可以是ims db甚至db2程序。

2.通常我们处理顺序文件的空间异常终止

3.实际上我不知道输入的大小,它并不总是一个报告,但有时会出现很多空间异常弯曲,所以考虑采用一个临时的数据集,该数据集的大小很大,在计算出输入的实际大小后,它将被删除一次该程序被执行。

4.实际上,我的意思是PARA表示如果我们可以用rexx或我们可以使用的所有函数编写这些逻辑,那么我们可以将其放入其中。

5.要知道空间的增量,我正在使用临时数据集,该数据集的大小很大,并且只能容纳所有输入数据,并且一旦计算了增量空间的逻辑并将其添加到o / p数据集然后被删除...(所以我的意思是一个临时数据集)。

GNANAS N很好,我可以知道在哪里可以找到CA ALLOCATE产品的frm吗?我可以知道它的代码如何工作吗?

请我需要知道我们是否可以通过rexx或任何代码来实现???

谢谢
回到顶部
查看用户资料 发送私信
纳纳斯N

活跃成员


已加入:2007年9月6日
帖子:792
地点:印度金奈

发布发表:2009年3月19日,星期四下午2:28
引用回复

引用:
...我可以知道在哪里可以找到CA ALLOCATE产品的frm吗?我可以知道它的代码如何工作吗?

无需编写REXX或工具...

认证机构 分配来自 认证机构 .
BMC Stop X37来自 BMC.

请检查他们的网站。
回到顶部
查看用户资料 发送私信
外籍人士

全球主持人


已加入:2007年3月14日
帖子:8794
地点:威尔士威尔士

发布发表:2009年3月19日,星期四,下午2:37
引用回复

更不用说您需要付费的短信了,所以为什么不与您的存储人员交谈以使用短信,而不是为会做同样事情的其他产品付费。
回到顶部
查看用户资料 发送私信
老实人

新的用户


已加入:2008年11月5日
帖子:23
地点:德里

发布发表:2009年3月19日,星期四下午2:43
引用回复

好吧,现在购买新产品是不可能的,

只是想知道您中的任何人是否可以帮助我编码我给的逻辑.....
或任何其他简单的逻辑.....

谢谢
回到顶部
查看用户资料 发送私信
外籍人士

全球主持人


已加入:2007年3月14日
帖子:8794
地点:威尔士威尔士

发布发表:2009年3月19日,星期四,下午3:18
引用回复

为什么不直接与您的存储人员交谈并询问多容量DATACLAS。

存储人员大约需要10分钟来设置并激活所有内容。
回到顶部
查看用户资料 发送私信
老实人

新的用户


已加入:2008年11月5日
帖子:23
地点:德里

发布发表:2009年3月19日,星期四,下午3:27
引用回复

感谢EXPAT,但我的朋友他们使用的是BMC STOPX37,有时它会出错,因此我们每个月会获得100多个空间中止...

所以想到应用一些逻辑并永久修复空间异常弯曲...
任何想法,如果逻辑wud工作我之前在顶部指定的wat?

只是当出现空间异常结束时,wud就会到达一个将要处理的函数,正如我告诉我的那样,空间wud的增量增加会加上给定o / p数据集空间的空间,程序将重新运行,所以现在它不会放弃任何空间...
请提出建议。
回到顶部
查看用户资料 发送私信
dbzTHEdinosauer

全球主持人


已加入:2006年10月20日
帖子:6967
位置:瓷宝座

发布发表:2009年3月19日,星期四,下午3:40
引用回复

引用:
只是当空间异常发生时,它就会起作用


什么功能???

不,只是当空间异常发生时....它将-
您打算如何中断中止?
回到顶部
查看用户资料 发送私信
老实人

新的用户


已加入:2008年11月5日
帖子:23
地点:德里

发布发表:2009年3月19日,星期四,下午3:44
引用回复

不完全是功能,只是我建议的一个想法,例如,如果程序异常中止,那么它会进入PARA或控制位置,然后它会按照一些逻辑步骤增加所需空间并重新运行整个程序,所以这次它会自由弯曲。
回到顶部
查看用户资料 发送私信
外籍人士

全球主持人


已加入:2007年3月14日
帖子:8794
地点:威尔士威尔士

发布发表:2009年3月19日,星期四,下午4:01
引用回复

如之前在该线程中所述,并成功在许多我管理存储环境并与产品支持JCL猴子取得联系的站点中成功实现。每天从70到100个空间的上升空间减少到几乎为零。

1)与您的存储人员一起实施多卷数据集。如前所述,大概不到10分钟的工作时间。

2)监视哪些数据集将进入多个扩展区/卷,然后在异常发生之前更改空间分配。 ISMF应该足够容易地进行报告。

您为什么要浪费大量时间,使事情变得复杂,而花费相对较少的时间和精力即可获得出色的结果。还是这只是另一种情况 “我想这样做,我会这样做,所以!!!
回到顶部
查看用户资料 发送私信
佩德罗

全球主持人


已加入:2006年9月1日
帖子:2214
地点:硅谷

发布发表:2009年3月19日,星期四,9:16 pm
引用回复

遵循Expat的建议。

至于你的逻辑:
引用:
但是所有60行数据都将在该临时数据集中具有更大的大小。

如果程序中止50行,则不清楚如何获取最后10行数据。通常,直到工作结束,您才知道有多少行。如果您提前知道将有几行,则只需在作业运行之前正确分配文件即可。
回到顶部
查看用户资料 发送私信
迪克·谢勒

主持人荣誉


已加入:2006年11月23日
帖子:19245
位置:矩阵内部

发布发表:2009年3月19日,星期四,9:53 pm
引用回复

您好,

引用:
如果程序异常终止,则它会到达PARA或控制位置,然后按照逻辑步骤增加所需的空间并重新运行整个程序,因此这次程序将异常终止。
即使某个经理同意了此尝试,也朝错误的方向前进(不算复杂性)。

预防是必经之路-特别是因为解决方案几乎可以肯定地存在于系统中。 。 。

尝试纠正/重新运行会导致更多的混乱和问题,而不是仅仅从一开始就防止弯曲。 。 。
回到顶部
查看用户资料 发送私信
c

高级会员


已加入:2006年7月28日
职位:1702
所在地:澳大利亚

发布发表:2009年3月20日,星期五,上午8:58
引用回复

嗨,Expat,

引用:
如之前在该线程中所述,并成功在许多我管理存储环境并与产品支持JCL猴子取得联系的站点中成功实现。每天从70到100个空间的上升空间减少到几乎为零。


我被称为很多事情,但从来没有猴子,不知道是否 icon_lol.gif 要么 icon_cry.gif


格里
回到顶部
查看用户资料 发送私信
外籍人士

全球主持人


已加入:2007年3月14日
帖子:8794
地点:威尔士威尔士

发布发表:2009年3月20日,星期五12:33 pm
引用回复

格里

好多年以前我曾经是一个人 icon_lol.gif
并且也被称为其他一些东西 icon_lol.gif
回到顶部
查看用户资料 发送私信
查看上一个主题 :: :: 查看下一个主题  
发表新话题   回复主题 查看书签
所有时间均为格林尼治标准时间+ 6小时
论坛索引 -> 清单& REXX

 


类似主题
话题 论坛 回覆
没有新帖 ABEND = 04E原因(00E50013) DB2 4
没有新帖 DB2表空间空间限制 DB2 3
没有新帖 关于如何解决3022问题的任何想法... IMS数据库/ DC 3
没有新帖 处理弯曲以防止终止 CICS 0
没有新帖 终止删除最后写入的记录 异常与调试 10
搜索我们的论坛:

回到顶部