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

如何合并相同的布局数据集?


IBM大型机论坛 -> JCL& VSAM
发表新话题   回复主题
查看上一个主题 :: 查看下一个主题  
作者 信息
林肯公园
警告:1

新的用户


已加入:2005年11月20日
帖子:44
地点:中国大连

 发布 发表:2006年1月16日星期一11:07上午
引用回复

大家好,
我可以使用系统程序SORT将序列相同的布局数据集合并为一个吗,如果可以,怎么办?


问候,
谢谢,

林肯公园。
回到顶部
查看用户资料 发送私信
高塔姆512

活跃用户


已加入:2005年10月5日
帖子:309
所在地:Vizag /美国

 发布 发表:2006年1月16日星期一11:36 am
引用回复

试试这个,这是SYNCSORT

码:
//作业声明
// MERGE1 EXEC PGM = 同步排序
// *
// SORTIN01 DD DSN=SALES91,DISP=(OLD,KEEP)
// *
// SORTIN02 DD DSN = SECOND>DATASET,DISP=(OLD,KEEP)
// *
//整理 DD DSN=OUTPUT>DATASET,
// *
// SYSIN DD *
合并字段=COPY
/ *


谢谢,
回到顶部
查看用户资料 发送私信
林肯公园
警告:1

新的用户


已加入:2005年11月20日
帖子:44
地点:中国大连

 发布 发表:2006年1月16日星期一11:50上午
引用回复

嗨Gautam512,

我找到了一个演示,其内容类型为“ RECORD TYPE = F,LENGTH = 225”

在“ MERGE FIELDS = COPY”行下,这是什么意思,

如果我想灌输分类法,我只要输入

//作业声明
// MERGE1 EXEC PGM = 同步排序
// *
// SORTIN01 DD DSN=SALES91,DISP=(OLD,KEEP)
// *
// SORTIN02 DD DSN = SECOND>DATASET,DISP =(OLD,KEEP)
// *
//整理 DD DSN=OUTPUT>数据集
// *
// SYSIN DD *
合并字段=COPY
排序字段=(4,19,CH,A)
包含条件=(898,1,CH,LE,C'2')

会好的 ?
回到顶部
查看用户资料 发送私信
高塔姆512

活跃用户


已加入:2005年10月5日
帖子:309
所在地:Vizag /美国

 发布 发表:2006年1月16日星期一12:02 pm
引用回复

嗨,

您是否提到了输出文件的DCB参数,否则,您必须在SYSIN中提供它。
还有一件事是,
我认为我们可以同时使用合并和排序

喜欢

码:
// SYSIN DD * 7
合并字段=(4,19,CH,A)
记录类型= V,长度=(100,,20)
包含COND =(898,1,CH,LE,C'2')
/ *
回到顶部
查看用户资料 发送私信
林肯公园
警告:1

新的用户


已加入:2005年11月20日
帖子:44
地点:中国大连

 发布 发表:2006年1月16日星期一12:16 pm
引用回复

嗨Gautam512,

I type the frist demo u gave, show me the JCLerror .
返回码是16
“未定义SORTIN”

需要您更多的解释,

问候,
谢谢,

林肯公园
回到顶部
查看用户资料 发送私信
高塔姆512

活跃用户


已加入:2005年10月5日
帖子:309
所在地:Vizag /美国

 发布 发表:2006年1月16日星期一12:25 pm
引用回复

试试吧,您已经在DFSORT论坛上发布了.....

码:
//作业声明
// *                                                        
// STEP001  EXEC  PGM=SYNCSORT                             
// SORTIN01   DD DSN = INPUT.FILENAME1,DISP = SHR     
// SORTIN02   DD DSN = INPUT.FILENAME2,DISP = SHR         
//整理 DD DSN = OUTPUT.FILENAME,     
//            DISP=(NEW,CATLG,DELETE),                   
//            DCB=*.SORTIN,                               
//            SPACE=(CYL,(30,30),RLSE)     
// SRTMSG   DD SYSOUT=*                                   
// SYSOUT   DD SYSOUT=* 
// SYSIN DD * 7
合并字段=(4,19,CH,A)
包含COND =(898,1,CH,LE,C'2')
/ *    


谢谢,
回到顶部
查看用户资料 发送私信
林肯公园
警告:1

新的用户


已加入:2005年11月20日
帖子:44
地点:中国大连

 发布 发表:2006年1月16日星期一12:40 pm
引用回复

嗨Gautam512,
错误信息 :

检测到无效的引用'* .SORTIN'-(J)12

对我来说真的很难。

致谢,

林肯公园
回到顶部
查看用户资料 发送私信
高塔姆512

活跃用户


已加入:2005年10月5日
帖子:309
所在地:Vizag /美国

 发布 发表:2006年1月16日星期一12:43 pm
引用回复

嗨,

由于输入文件的布局与输出相同,因此我使用了

* .SORTIN

更改为

DCB = *。SORTIN01

谢谢,
回到顶部
查看用户资料 发送私信
弗兰克·雅格

DFSORT开发人员


已加入:2005年2月15日
帖子:7129
地点:加利福尼亚州圣何塞

 发布 发表:2006年1月16日星期一10:54 pm
引用回复

林肯公园写道
引用:
我可以使用系统程序SORT将序列相同的布局数据集合并为一个吗,如果可以,怎么办?


您需要提供更多详细信息。

SORT意味着通过在一个或多个键上组合两个或多个数据集来创建输出数据集。数据集不必已经通过按键排序。

MERGE意味着通过在一个或多个键上组合两个或多个数据集来创建输出数据集。数据集DO必须已经通过键排序。

COPY意味着通过将两个或多个数据集一个接一个地组合而不考虑键来创建输出数据集。

你想做什么分类,合并还是复制?每个人所需的工作都不相同。

每个输入文件的RECFM和LRECL是什么?

如果您要进行排序或合并,每个输入文件中一个或多个键的位置,长度和格式是什么?

这是非常基础的东西,因此您显然对DFSORT和DFSORT的ICETOOL不熟悉。我建议通读“ z / OS DFSORT:入门”。这是一个很棒的教程,其中包含许多示例,将向您展示如何使用DFSORT,DFSORT的ICETOOL和DFSORT符号。您可以从以下位置在线访问它以及所有其他DFSORT书籍:

使用[URL] BBCode进行外部链接
回到顶部
查看用户资料 发送私信
林肯公园
警告:1

新的用户


已加入:2005年11月20日
帖子:44
地点:中国大连

 发布 发表:2006年1月17日,星期二,上午11:52
引用回复

大家好 ,

感谢您的帮助,

嗨弗兰克·雅格,

我已经下载并阅读了该文档,它为我提供了很多知识,非常感谢您。我还有更多疑问,如何获得有关他人的文档,例如IEFBR14,EZTPA00文件?

致谢,

林肯公园
回到顶部
查看用户资料 发送私信
弗兰克·雅格

DFSORT开发人员


已加入:2005年2月15日
帖子:7129
地点:加利福尼亚州圣何塞

 发布 发表:2006年1月17日,星期二,10:10 pm
引用回复

引用:
我如何获取有关其他人的文档,例如IEFBR14,EZTPA00文件?


我怀疑IEFBR14太简单了,无法提供任何文档。

至于其他实用程序/产品的文档,则需要其他人的帮助。
回到顶部
查看用户资料 发送私信
林肯公园
警告:1

新的用户


已加入:2005年11月20日
帖子:44
地点:中国大连

 发布 发表:2006年1月19日,星期四,上午9:45
引用回复

码:
// STEP001  EXEC  PGM=SORT,COND=EVEN               
                         
// SORTIN01 DD  DSN=S1.KE,DISP=SHR
// SORTIN02 DD  DSN=S2.KE,DISP=SHR
// SORTOUT1 DD  DSN = LJPVPJ1.UJPJ1J5.OUTP.MLOUT1,   
// SORTOUT2 DD DSN = LJPVPJ1.UJPJ1J5.OUTP.MLOUT2,                                           
// SYSIN DD *                                                         
  合并字段=(4,19,CH,A)                                           
 OUTFIL FNAMES = SORTOUT1,INCLUDE =(26,2,ZD,EQ,01)
 OUTFIL FNAMES = SORTOUT2,INCLUDE =(26,2,ZD,EQ,02)


通过我的代码,我想合并两个数据集并分别根据条件输出两个数据集。运行后,dateset sortout1和sortout2仅包含S2记录,为什么?
回到顶部
查看用户资料 发送私信
弗兰克·雅格

DFSORT开发人员


已加入:2005年2月15日
帖子:7129
地点:加利福尼亚州圣何塞

 发布 发表:2006年1月19日,星期四,晚上8:32
引用回复

我对您的输入记录的样子一无所知,所以我所能做的就是猜测您的条件仅包含来自S2的记录,也就是说,只有S2具有26,2,ZD为01或02的记录。
回到顶部
查看用户资料 发送私信
林肯公园
警告:1

新的用户


已加入:2005年11月20日
帖子:44
地点:中国大连

 发布 发表:2006年1月20日,星期五,上午5:40
引用回复

嗨弗兰克·雅格,
输入记录S1.KE&S2.KE具有相同的布局,位置26的第2列是01或02或03或04 .... .依此类推。
我的意思是确保S1.KE和S2.KE的输出sortout01都包括“ 01”,S1.KE和S2.Ke的输出sortout2都包括“ 02”。

谢谢!

林肯公园
回到顶部
查看用户资料 发送私信
弗兰克·雅格

DFSORT开发人员


已加入:2005年2月15日
帖子:7129
地点:加利福尼亚州圣何塞

 发布 发表:2006年1月20日,星期五,上午5:59
引用回复

如我所说,如果您仅从S2获得记录,则只有S2在26-27中具有01或02作为2字节ZD值。我不明白您还希望我告诉您什么。

如果要查看S1和S2中每个2字节ZD值有多少条记录,可以运行以下DFSORT / ICETOOL作业。如果某个值未随其计数一起出现,则表示该值不在该文件中(例如,如果您看不到带有计数的3,则该文件中不会出现3)。这将证明在位置26-27中只有S2具有1和2作为2字节ZD值,或者在位置26-27中实际上没有您认为的功能。

码:

// STEP1 EXEC  PGM=ICETOOL
//工具   DD  SYSOUT=*
// DFSMSG    DD  SYSOUT=*
// S1 DD  DSN=S1.KE,DISP=SHR
// S2 DD  DSN=S2.KE,DISP=SHR
// SHOWS1 DD SYSOUT = *
//SHOWS2 DD SYSOUT = *
// TOOLIN DD *
发生于(S1) LIST(SHOWS1) ON(26,2,ZD) ON(VALCNT) BLANK
发生于(S2) LIST(SHOWS2) ON(26,2,ZD) ON(VALCNT) BLANK
/ *
回到顶部
查看用户资料 发送私信
林肯公园
警告:1

新的用户


已加入:2005年11月20日
帖子:44
地点:中国大连

 发布 发表:2006年1月20日,星期五,上午6:37
引用回复

嗨弗兰克·雅格,

告诉你我的要求:
S1.KE和S2.KE具有相同的布局:
例如
S1.KE
----------------
姓名编号
----------------
0 1 26 2
----------------
A 01
B 02
C 01
D 02
E 03
F 04
S2.KE
----------------
姓名编号
----------------
0 1 26 2
----------------
G 01
高02
我01
J 02
K 03
L 04
然后排序
确保
dateset sortout1包含以下仅ID = 01的记录
----------------
姓名编号
----------------
0 1 26 2
----------------
A 01
C 01
G 01
我01
sortout2包含以下仅ID = 02的记录

.... ...............................................

就这样

问候与感谢
林肯公园。
回到顶部
查看用户资料 发送私信
弗兰克·雅格

DFSORT开发人员


已加入:2005年2月15日
帖子:7129
地点:加利福尼亚州圣何塞

 发布 发表:2006年1月20日星期五7:01上午
引用回复

请在数据周围使用ubb代码标签,或在DFSORT论坛中重新发布,以便我为您服务。
回到顶部
查看用户资料 发送私信
林肯公园
警告:1

新的用户


已加入:2005年11月20日
帖子:44
地点:中国大连

 发布 发表:2006年1月20日星期五8:03上午
引用回复

嗨弗兰克·雅格,

告诉你我的要求:
S1.KE和S2.KE具有相同的布局:
例如
S1.KE
----------------
姓名编号
----------------
0 1 26 2
----------------
A 01
B 02
C 01
D 02
E 03
F 04
S2.KE
----------------
姓名编号
----------------
0 1 26 2
----------------
G 01
H 02
I 01
J 02
K 03
L 04
然后排序
确保
dateset sortout1包含以下仅ID = 01的记录
----------------
姓名编号
----------------
0 1 26 2
----------------
A 01
C 01
G 01
I 01
sortout2包含以下仅ID = 02的记录

.... ...............................................

就这样

问候与感谢
林肯公园]
码:
码:
码:
回到顶部
查看用户资料 发送私信
林肯公园
警告:1

新的用户


已加入:2005年11月20日
帖子:44
地点:中国大连

 发布 发表:2006年1月20日星期五8:05上午
引用回复

大家好

对不起,按担心按钮是我的错
....
回到顶部
查看用户资料 发送私信
弗兰克·雅格

DFSORT开发人员


已加入:2005年2月15日
帖子:7129
地点:加利福尼亚州圣何塞

 发布 发表:2006年1月20日星期五9:50 pm
引用回复

请在DFSORT论坛中发帖,以便在必要时为您解决问题。作为DFSORT论坛的主持人,我对该论坛拥有编辑权限。我没有此论坛的编辑权限。
回到顶部
查看用户资料 发送私信
查看上一个主题 :: :: 查看下一个主题  
发表新话题   回复主题 查看书签
所有时间均为格林尼治标准时间+ 6小时
论坛索引 -> JCL& VSAM

 


类似主题
话题 论坛 回覆
没有新帖 比较两个数据集并覆盖材质... DFSORT / ICETOOL 7
没有新帖 比较两个数据集并获得第一个... DFSORT / ICETOOL 7
没有新帖 需要一个宏来比较数据集并... 所有其他大型机主题 2
没有新帖 SMF记录布局 DFSORT / ICETOOL 10
没有新帖 合并GDG版本 JCL& VSAM 5
搜索我们的论坛:

回到顶部