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

我们如何在ICETOOL中模拟JOINKEYS


IBM大型机论坛 -> DFSORT / ICETOOL
 发表新话题     回复主题
查看上一个主题 :: 查看下一个主题  
作者 信息
胡曼24

新的用户


已加入:2012年9月20日
帖子:35
所在地:美国

 发布 发表:2021年1月15日星期五8:10 pm
 引用回复

我正在尝试在旧系统中执行许多步骤(从IBM自动生成)的长期工作。在其中一个步骤中,有一个SORT程序。但是,似乎此系统不支持JOINKEYS。我不是DFSORT专家。有什么方法可以在ICETOOL中模拟JOINKEYS?

这是步骤:

码:

// STEP025   EXEC  PGM=SORT,COND=(0,NE,STEP020)
// * SORTLIB DD DSN = _sortdsn_,DISP = SHR
// SYSOUT DD SYSOUT = *
// IN1 DD DSN =&&DATA2,DISP=(OLD,DELETE)
// IN2 DD DSN =&&DATAF,DISP=(OLD,PASS)
// * ORTOUT DD SYSOUT = *
// SORTOUT DD DSN =&&DATAV,DISP=(NEW,PASS),
//          SPACE=(CYL,(100,20),RLSE),
//          UNIT=SYSDA,DCB=(RECFM = FB,LRECL = 614,BLKSIZE = 24560)
// SYSIN DD *
   JOINKEYS F1 = IN1,FIELDS =(13,12,A)
   JOINKEYS F2 = IN2,FIELDS =(205,12,A)
    REFORMAT FIELDS=(F1:1,12,F2:1,204,F1:25,398)
    OPTION COPY
/ *

为您编码
回到顶部
查看用户资料 发送私信
谢尔盖肯

活跃成员


已加入:2008年4月29日
职位:937
所在地:马里兰

 发布 发表:2021年1月15日星期五9:00 pm
 引用回复

ICETOOL执行 所有 使用对DFSORT的调用进行操作。

DFSORT 不能 无法支持JOINKEYS;仔细检查您的代码,或在此处发布 所有 需要的信息:
-源代码(JCL和SORT语句)
- 输入数据
-错误消息
-输出数据(如果有)
回到顶部
查看用户资料 发送私信
恩里科·索里切蒂

高级主持人


已加入:2007年3月14日
帖子:10715
所在地:意大利

 发布 发表:2021年1月15日星期五9:35 pm
 引用回复

引用:
DFSORT 不能不支持JOINKEYS


TS已告知可用的DFSORT版本非常旧

请参阅此处,DFSORT何时开始支持joinkeys

www.ibm.com/support/pages/sites/default/files/inline-files/$FILE/sorttrck.pdf
回到顶部
查看用户资料 发送私信
谢尔盖肯

活跃成员


已加入:2008年4月29日
职位:937
所在地:马里兰

 发布 发表:2021年1月15日星期五10:04 pm
 引用回复

无论如何,ICETOOL无法支持DFSORT不支持的功能。
ICETOOL只是向其“雇员”执行任务的“经理”,即DFSORT。

这个世界上没有经理可以做他的员工没有为他准备的事情。  sterb050.gif
回到顶部
查看用户资料 发送私信
胡曼24

新的用户


已加入:2012年9月20日
帖子:35
所在地:美国

 发布 发表:2021年1月15日星期五11:05 pm
 引用回复

我不知道是否可以用其他DFSORT / ICETOOL语句模拟JOIN函数。
回到顶部
查看用户资料 发送私信
罗希特·乌马尔吉卡(Rohit Umarjikar)

全球主持人


已加入:2010年9月21日
帖子:2575
地点:美国纽约

 发布 发表:2021年1月15日星期五11:17 pm
 引用回复

我得到的是TS想知道如何不使用JOINKEYS就能达到相同的结果。

如果是这样,那么您可以尝试
1. SPLICE(如果您的旧系统支持的话)
2.尝试对键进行MERGE / SORT,然后使用seqnum方法重新格式化/ GROUP。

如果我有时间,我会尝试。
回到顶部
查看用户资料 发送私信
乔格·芬代森

活跃用户


已加入:2015年8月15日
帖子:388
地点:德国班贝格

 发布 发表:2021年1月15日星期五11:33 pm
 引用回复

ICETOOL SPLICE具有某些功能,可能会取代JOINKEYS应该执行的功能。但是,某些必需的功能是在稍后阶段添加的,可能对您的系统不可用。

乍一看,我会说这是可以模仿的,但是我已经很长时间没有使用ICETOOL了。
回到顶部
查看用户资料 发送私信
乔格·芬代森

活跃用户


已加入:2015年8月15日
帖子:388
地点:德国班贝格

 发布 发表:2021年1月16日星期六12:04上午
 引用回复

AFAICR,键必须位于同一位置才能使用ON关键字,然后一个将使用一些WITH(..)字段,而另一些将使用WITH *关键字(例如WITHANY和WITHALL等)。输入数据集的顺序对于获得正确的结果可能很重要。
回到顶部
查看用户资料 发送私信
胡曼24

新的用户


已加入:2012年9月20日
帖子:35
所在地:美国

 发布 发表:2021年1月16日星期六12:53 am
 引用回复

@Rohit Umarjikar是的。我听说我们可以使用序列号来实现,但是我不知道它的方法。
回到顶部
查看用户资料 发送私信
罗希特·乌马尔吉卡(Rohit Umarjikar)

全球主持人


已加入:2010年9月21日
帖子:2575
地点:美国纽约

 发布 发表:2021年1月22日星期五4:42上午
 引用回复

胡曼24,
请为这些技巧添加书签,非常有用。从第14页开始,如何使用SPLICE回答您,请看JOINKEYS VS SPLICE的三个示例。试试看,让我们知道
在不同的地方重复输入
回到顶部
查看用户资料 发送私信
查看上一个主题 :: :: 查看下一个主题  
 发表新话题     回复主题 查看书签
所有时间均为格林尼治标准时间+ 6小时
论坛索引 -> DFSORT / ICETOOL

 


类似主题
话题 论坛 回覆
 没有新帖 ICETOOL作业可提取ML1数据 DFSORT / ICETOOL 7
 没有新帖 JOINKEYS匹配两个输入文件... DFSORT / ICETOOL 3
 没有新帖 十六进制组比较并写入... DFSORT / ICETOOL 5
 没有新帖 将多个记录拼接成单个记录 DFSORT / ICETOOL 7
 没有新帖 使用ICETOOL根据...设置返回码 DFSORT / ICETOOL 4
搜索我们的论坛:

 回到顶部