Как удалить дубликаты из входного файла и записать дубликаты в файл, не используя XSUM в JCL?

Question

Как удалить дубликат файла и записать дубликат в файл, не используя 'ICETOOL'

Я попробовал этот код, он работает нормально. Но я не могу использовать ICETOOL. Как это сделать без XSUM

    //SORTXSUM DD DSN=datasetname,
    //           DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,
    //            SPACE=(CYL,(1,4),RLSE),
    //            DCB=(RECFM=FBM,LERCL=80,BLKSIZE=800)

    //SYSIN DD *

    SORT FIELDS=(1,3,CH,A)
    SUM FIELDS=NONE,XSUM

    /*

Answer 1

Вы используете SyncSORT. SyncSORT предоставляет недокументированный SyncTOOL, который должен обеспечивать функциональность ICETOOL в DFSORT. При установке на сайтах SyncTOOL часто связывается с ICETOOL для облегчения миграции JCL.

SyncSORT в основном имеет те же функции, что и DFSORT. Одна из дополнительных возможностей SyncSORT - XSUM, XSUM это SORT функция, которая записывает дубликаты записей, которые в противном случае были бы опущены SUM заявление к конкретному DDNAME,

SyncTOOL имеет ряд операторов для объединения функций SORT и предоставления расширений высокого уровня для этих функций. Чтобы узнать, что они из себя представляют, единственная документация, на которую вы можете посмотреть, - это DFSORT, которая является оригинальным продуктом IBM, с которым конкурирует SyncSORT.

Если вы посмотрите на Chapter 7 из DFSORT Application Programming Guide вы узнаете о ICETOOL, Большая часть функциональности ICETOOL предоставляется SyncTOOL, в зависимости от того, насколько современным является ваш SyncTOOL.

XSUM принадлежит СОРТИРОВАТЬ. SyncTOOL/ICETOOL не сортируются. XSUM не является частью SyncTOOL/ICETOOL.

Вы не используете ICETOOL. Пример, который вы показали, использует SORT. Вы не используете ICETOOL.

У вас есть код, который работает для вас (хотя вы не смогли вставить его здесь правильно), который использует EXEC PGM=SORT и поставки XSUM на одной из контрольных карт.

Вы не использовали PGM=ICETOOL, и если бы вы это сделали, вы бы не смогли использовать XSUM на SYSIN (вам бы пришлось использовать TOOLIN для ICETOOL/SyncTOOL и может указывать только операторы SORT, если это разрешено синтаксисом, в xxxxCNTL файлы, которые вы не использовали.

Вы хороши, чтобы идти, и нет вопросов, чтобы ответить.

Кроме комментариев, прежде чем они будут удалены, вы не должны кодировать DCB или любые его подпараметры в выходном файле из SORT. SORT предоставит вам правильные. Вы не должны иметь пустых карточек в вашем JCL, это создаст //SYSIN DD * что в лучшем случае приведет вас в замешательство. SORT а также SUM должен предшествовать хотя бы один пробел.