|
查看上一个主题 :: 查看下一个主题
|
| 作者 |
信息 |
胆小
新的用户
已加入：2008年11月5日
帖子：21
地点：钦奈
|
|
|
|
有人可以告诉我们，我们只能移动文件中的偶发记录来输出吗
我有50条记录，我想将它们从第3条记录移至第10条记录，并将第25条记录移至第40条记录到输出文件中。 |
|
| 回到顶部 |
|
 |
c
高级会员
已加入：2006年7月28日
职位：1702
所在地：澳大利亚
|
|
|
|
你好
尝试这个
| 码： |
SORT FIELDS=COPY
INREC OVERLAY=(81:SEQNUM,8,ZD)
出FIL INCLUDE=((81,8，ZD，GE，03，AND，81,8，ZD，LE，10),OR,
(81,8，ZD，GE，25，AND，81,8，ZD，LE，40)),
BUILD=(1,80)
|
这基于LRECL = 80和RECFM = FB
格里 |
|
| 回到顶部 |
|
|
外籍人士
全球主持人
已加入：2007年3月14日
帖子：8794
地点：威尔士威尔士
|
|
|
|
谢谢格里，那是我另一只松鼠  |
|
| 回到顶部 |
|
|
恩里科·索里切蒂
高级主持人
已加入：2007年3月14日
帖子：10715
所在地：意大利
|
|
|
|
但是，如果您具有正确的DFSORT ptf，则可以使用新的子集运算符
SUBSET .... RRN(3,10) RRN(25,40)
在DFSORT论坛中搜索SUBSET |
|
| 回到顶部 |
|
|
弗兰克·雅格
DFSORT开发人员
已加入：2005年2月15日
帖子：7129
地点：加利福尼亚州圣何塞
|
|
|
|
胆小鬼
您可以使用z / OS DFSORT V1R5 PTF UK90013附带的DFSORT ICETOOL的新SUBSET运算符轻松地完成此操作（2008年7月）。例如：
| 码： |
// S1 EXEC PGM=ICETOOL
//工具 DD SYSOUT=*
// DFSMSG DD SYSOUT=*
//在DD DSN = ... input file
// OUT DD DISP = ... output file
// TOOLIN DD *
子集来自(IN) TO(OUT) INPUT KEEP RRN(3,10) RRN(25,40)
/ *
|
有关新的SUBSET功能以及PTF UK90013可用的其他新功能的完整详细信息，请参见：
使用[URL] BBCode进行外部链接
|
|
| 回到顶部 |
|
|
胆小
新的用户
已加入：2008年11月5日
帖子：21
地点：钦奈
|
|
|
|
非常感谢大家。
我是ICETOOLS的新手
当我运行JCL时，
| 码： |
SYT002I "TOOLIN"使用界面
SUBSET FROM(IN) TO(OUT) INPUT KEEP RRN(3,10) RRN(25,40)
SYT048E 声明不以有效的操作员开头
SYT030I 返回代码12的操作完成 |
有人可以帮忙吗
S |
|
| 回到顶部 |
|
|
c
高级会员
已加入：2006年7月28日
职位：1702
所在地：澳大利亚
|
|
|
|
你好
从您显示的消息中，您似乎没有使用DFSORT / ICETOOL
格里 |
|
| 回到顶部 |
|
|
迪克·谢勒
主持人荣誉
已加入：2006年11月23日
帖子：19245
位置：矩阵内部
|
|
|
|
您好，
您正在运行Syncsort，而不是DFSORT。
建议您尝试使用早期发布的代码Gerry，因为新的DFSORT SUBSET运算符为 只要 DFSORT可用。 |
|
| 回到顶部 |
|
|
c
高级会员
已加入：2006年7月28日
职位：1702
所在地：澳大利亚
|
|
|
|
嗨，迪克，
即使使用DFSORT也无济于事。
我的DFSORT版本是古老的，不可能更改。
以下是我的DFSORT版本。
ICE201I 0记录类型...
0表示您没有2008年7月或2006年4月的DFSORT功能。您在DFSORT功能性PTF方面落后。要求系统程序员安装z / OS DFSORT PTF UK90013。
您可能具有2004年12月的DFSORT函数（IFTHEN，OVERLAY，SFF，UFF等），该函数对应于z / OS DFSORT V1R5 PTF UQ95214。尝试使用以下功能之一-如果在使用该功能时遇到错误，则甚至没有安装2004年12月的PTF。
格里 |
|
| 回到顶部 |
|
|
迪克·谢勒
主持人荣誉
已加入：2006年11月23日
帖子：19245
位置：矩阵内部
|
|
|
|
嗨，格里，
否，但是Sai正在使用Syncsort，并且如果该产品在他们的系统上甚至是最新的，那么ifthen应该可以工作。 。 。
伊芬&OVERLAY在Syncsort 1.2.x iirc中可用。 |
|
| 回到顶部 |
|
|
c
高级会员
已加入：2006年7月28日
职位：1702
所在地：澳大利亚
|
|
|
|
嗨，迪克，
我只是在商店里私下谈论DFSORT的版本，很难升级它。
格里 |
|
| 回到顶部 |
|
|
迪克·谢勒
主持人荣誉
已加入：2006年11月23日
帖子：19245
位置：矩阵内部
|
|
|
|
嗨，格里，
| 引用： |
| 我只是在商店里私下谈论DFSORT的版本，很难升级它。 |
令人惊讶的是（无论如何对我来说）有多少组织允许他们的软件落在后面。通常可以使业务案例不属于最早升级的案例，但是当软件过时数年时，“陈旧的东西”的风险大于进行升级的风险-不算缺少增强的性能和新功能。
乱跑。 。
发牢骚。 。 。
d |
|
| 回到顶部 |
|
|
弗兰克·雅格
DFSORT开发人员
已加入：2005年2月15日
帖子：7129
地点：加利福尼亚州圣何塞
|
|
|
|
格里
我假设您意识到升级“问题”是您的商店而不是DFSORT的问题。实际上，我们将新功能作为PTF发布，以使其易于安装。我不知道为什么您的商店选择不安装PTF，但这通常不是商店的运作方式。 |
|
| 回到顶部 |
|
|
c
高级会员
已加入：2006年7月28日
职位：1702
所在地：澳大利亚
|
|
|
|
嗨弗兰克，
我完全同意您的观点，它与DFSORT无关，从前面的消息中可以看到我的DFSORT版本落后。
我最好不要再说了。
格里 |
|
| 回到顶部 |
|
|
亚鲁
高级会员
已加入：2007年7月3日
职位：1287
地点：印度金奈
|
|
|
|
坦率，
| 引用： |
| 我不知道为什么您的商店选择不安装PTF，但这通常不是商店的运作方式。 |
我的商店也一样。我从这个论坛上了解了DFSORT的最新版本（2008年7月），并希望在我的商店中安装PTF。
但是什么也没做，但我的老店仍然使用旧版本。在实际上不需要JCL的时候，我们会花更多的时间:(。 |
|
| 回到顶部 |
|
|
亚鲁
高级会员
已加入：2007年7月3日
职位：1287
地点：印度金奈
|
|
|
|
技术人员
这指的是什么？ 同步排序错误消息通常以WER开头。请对此进行说明。 |
|
| 回到顶部 |
|
|
迪克·谢勒
主持人荣誉
已加入：2006年11月23日
帖子：19245
位置：矩阵内部
|
|
|
|
嗨，AAru，
| 引用： |
使用SYT002I“ 工具”接口
从（输入）到（输出）输入的子集保留RRN（3,10）RRN（25,40）
SYT048E声明不以有效的运算符开头
SYT030I操作已完成返回代码12 |
SYT消息是Synctool消息-就像WER消息是syscsort消息一样。 |
|
| 回到顶部 |
|
|
亚鲁
高级会员
已加入：2007年7月3日
职位：1287
地点：印度金奈
|
|
|
|
迪克
| 引用： |
SYT消息是Synctool消息-就像WER消息是syscsort消息一样。
|
哎呀，忘了。这种情况发生在一个完整的假期后回来的时候：(
无论如何，谢谢。 |
|
| 回到顶部 |
|
|
|
|
