为何SORT的SPLIT选项会使同一PDS的多个成员生成重复记录？

问题现象 #

你尝试通过SORT的OUTFIL SPLIT功能，将排序后的记录拆分到同一PDS的两个成员中，使用的JCL代码如下：

//FAILJ    JOB
//STEP1    EXEC PGM=SORT
//SORTIN   DD *
I
B
D
A
E
F
G
C
H
//SORTOUT  DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//MEMA     DD DSN=MY.PDS(MEMA),DISP=OLD
//MEMB     DD DSN=MY.PDS(MEMB),DISP=OLD
//SYSIN    DD *
 SORT FIELDS=(1,1,CH,A)
 OUTFIL FNAMES=(MEMA,MEMB),SPLIT

执行后，MY.PDS(MEMA)和MY.PDS(MEMB)均被写入相同的记录：

B
D
F
H

但你预期MY.PDS(MEMA)应包含排序后的奇数位置记录：

A
C
E
G
I

原因解析 #

标准OUTFIL SPLIT的工作机制 #

在IBM官方DFSORT（或兼容的商业SORT如Syncsort）中，SPLIT参数的作用是将排序后的记录按顺序循环分配给FNAMES列表中的输出文件。针对2个输出文件，分配规则为：

• 第1、3、5、7、9条记录 → MEMA
• 第2、4、6、8条记录 → MEMB
  最终MEMA得到5条记录，MEMB得到4条记录，这与你的预期一致。

异常行为的核心原因 #

你遇到的两个成员输出相同的情况，并非标准SORT的正常行为，而是由以下两种可能导致：

1. SORT实现的bug或功能缺失：部分开源SORT兼容版本（常见于Hercules等模拟器环境）没有完整复刻DFSORT的OUTFIL SPLIT多文件分配逻辑，错误地将同一组记录写入了所有指定的输出文件，而非循环分配。
2. PDS成员的处理逻辑异常：虽然你使用DISP=OLD以覆盖模式打开PDS成员，但正常情况下SORT会为每个输出文件维护独立的写指针。如果SORT实现对PDS成员的文件句柄处理存在问题，可能导致多个输出指向同一写缓冲区，最终写入重复内容。

注意：你JCL中的SORTOUT DD SYSOUT=*不会影响OUTFIL的输出——当使用OUTFIL语句时，默认不会生成主输出（SORTOUT），除非你在OUTFIL中显式指定FNAMES=SORTOUT，因此该DD语句不是异常的诱因。

Hercules与真实主机的差异 #

真实IBM大型机上的标准DFSORT/Syncsort完全遵循OUTFIL SPLIT的规范，不会出现这种重复输出的问题。而Hercules作为模拟器，其环境中的SORT程序通常是：

• 开源移植版：这类版本往往只实现了SORT的基础功能，对OUTFIL等高级语法的支持不完整；
• 老旧商业版本：可能存在已在新版本中修复的bug；
• 未正确配置：未启用支持高级OUTFIL功能的模块。

因此，你遇到的异常是Hercules环境的兼容性问题，而非真实主机的正常表现。

内容的提问来源于stack exchange，提问作者Zug