使用SORT将文件拆分为不同的文件

阿宾 · 活跃用户 已加入：2006年8月14日 帖子：198

大家好，

请提供一些解决此问题的方法。

我有一个长度为5000的文件。

其布局为格式
01布局。
05 ws-key1图片x（20）
05填充图片x（20）
05 ws-key2图片x（10）
05 FILLEr pic x（4950）。

该文件包含约3500万条记录。

我必须将此文件洒到10个不同的文件中。但是此文件中的任何键值都不应重叠。

即，如果file1有一个键为key的记录，则其他文件的记录中没有相同键的记录。

请让我知道是否需要进一步澄清。

谢谢，
阿彬

沙丁鱼 · 发表：2007年3月12日星期一7:07 pm

更澄清吗？是的，请！

投入和预期产出的例子肯定会有所帮助。

阿宾 · 活跃用户 已加入：2006年8月14日 帖子：198

你好

感谢回复。

输入看起来像
1111111111111111111SOMEDATA1 1111111111
1111111111111111111SOMEDATA2 1111111111
2222222222222222222SOMEDATA3 2222222222
3333333333333333333SOMEDATA4 3333333333
3333333333333333333SOMEDATA5 3333333333
3333333333333333333SOMEDATA6 3333333333
4444444444444444444SOMEDATA7 4444444444
5555555555555555555SOMEDATA8 5555555555
6666666666666666666SOMEDATA9 6666666666
6666666666666666666SOMEDATA10 6666666666
9999999999999999999SOMEDATA11 9999999999

PS：输入文件按排序顺序

我想将此文件分为两部分
现在，当我拆分第一个文件时，应包含
1111111111111111111SOMEDATA1 1111111111
1111111111111111111SOMEDATA2 1111111111
2222222222222222222SOMEDATA3 2222222222
3333333333333333333SOMEDATA4 3333333333
3333333333333333333SOMEDATA5 3333333333
3333333333333333333SOMEDATA6 3333333333
第二个文件应包含
4444444444444444444SOMEDATA7 4444444444
5555555555555555555SOMEDATA8 5555555555
6666666666666666666SOMEDATA9 6666666666
6666666666666666666SOMEDATA10 6666666666
9999999999999999999SOMEDATA11 9999999999

PS：这只是一个示例数据。实际数据包含超过3500万条记录，我想分成10多个不同的文件，每个文件包含几乎相等数量的记录。

谢谢，
阿彬

Santhunaveen · 新的用户 已加入：2006年9月22日 帖子：33

你好

我们可以使用OUTFIL选项分割文件。检查以下示例。

码：

// **************************************************** ***********
// SPLITFLS EXEC PGM =排序
// **************************************************** ***********
// SYSPRINT DD SYSOUT = *
// SYSOUT DD SYSOUT = *
// SYSUDUMP DD SYSOUT = *
// SORTIN DD DSN = FILE1 ......，DISP = SHR
// SORTOF01 DD DSN = OUTPUTFILE1 .......，
// DISP =（NEW，CATLG，DELETE），UNIT = SYSDA，
// SPACE =（CYL，（1,1），RLSE），
// RECFM = FB，LRECL = 20
// SORTOF02 DD DSN = OUTPUTFILE2 .....，
// DISP =（NEW，CATLG，DELETE），UNIT = SYSDA，
// SPACE =（CYL，（1,1），RLSE），
// RECFM = FB，LRECL = 20
// SORTOF03 DD DSN = OUTPUTFILE3 ........，
// DISP =（NEW，CATLG，DELETE），UNIT = SYSDA，
// SPACE =（CYL，（1,1），RLSE），
// RECFM = FB，LRECL = 20
// SORTOF04 DD DSN = OUTPUTFILE3 ........，
// DISP =（NEW，CATLG，DELETE），UNIT = SYSDA，
// SPACE =（CYL，（1,1），RLSE），
// RECFM = FB，LRECL = 20
???????????????? //您可以根据需要提供任意数量的文件
????????????????
????????????????
// SYSIN DD *
排序字段=复制
OUTFIL FILES = 01，ENDREC = 200 //对于文件1您要分割多少条记录
OUTFIL FILES = 02，STARTREC = 201，ENDREC = 400 //对于文件2
OUTFIL FILES = 03，STARTREC = 401，ENDREC = 700 //对于文件3
OUTFIL FILES = 03，STARTREC = 401，ENDREC = 700 //对于文件4
......................................... //用于所有文件
....................................
.....................................
// SYSPRINT DD SYSOUT = *
// SYSOUT DD SYSOUT = *
// *

如果我错了，请纠正我。

沙丁鱼

实际的要求是将主文件拆分为几个文件，而不必将所有键都包含在内。

简单地使用字母序号将无法满足此要求。

威廉·汤普森

阿宾 · 活跃用户 已加入：2006年8月14日 帖子：198

嗨，威尔，

是的，记录按键排序。

如果您希望所有10个文件的大小几乎相同，那么您知道每个键范围中有多少个文件吗？

恐怕这是无法预料的。但是我们可以将总数除以所需文件数。假设输入包含3000000条记录
我想要10个文件。然后每个文件应包含近= 300000条记录

威廉·汤普森

是的，每隔30万次写入您要等待一个关键的中断，然后关闭该文件并打开一个新文件，对吗？
使用编程语言可以轻松完成，但是我不知道是否可以通过排序完成。
是排序要求还是您还有其他可能使用的资源？

阿宾 · 活跃用户 已加入：2006年8月14日 帖子：198

嗨，

您要等待每30万次写入，就需要等待密钥中断并关闭该文件并打开一个新文件，对吗？

你部分正确。我不想等待关键的突破，因为这将是一个批处理工作。

没错，我们可以使用编程语言来做得很好。但是，如果可以使用SORT，那就太好了。

斯里克里希

你好
我认为您可以创建动态控制卡，将文件分为10个文件。

无论如何，让我们等待弗兰克的回应，他可能会提出好主意。

谢谢
克里希

Santhunaveen · 新的用户 已加入：2006年9月22日 帖子：33

嗨，IQofaGerbil，

“实际的要求是将主文件分割成几个文件，而不必将密钥换行。”

如果文件已经排序，则...的问题在哪里包裹的钥匙......................

沙丁鱼

嗨，santhunaveen

好吧，从预期的输出

阿宾 · 活跃用户 已加入：2006年8月14日 帖子：198

嗨，沙鼠，

你说的没错

弗兰克·雅格

这非常棘手，需要进行一次合并和复制，但是这是DFSORT / ICETOOL作业，我相信它将完成您想要的工作：