Проверка системного и пользовательских каталогов на наличие "потерянных" записей
Представляю пример использования DFSORT для формирования задания на удалению из системного и пользовательских каталогов записей о наборах данных, расположенных на томах, исключенных из конфигурации z/OS. Список активных томов формируется с помощью программы ACBJBAOB от NAVIQUEST. На шаге PARSE0 исключаются тома, имена которых начинаются на IBM (так как в нашей среде это ленты) и MIGRA (т.к. такие наборы данных были мигрированы средствами HSM). Сгенерированное с помощью DFSORT задание на удалениеDELINDSN содержит синтаксис только для наборов данных типа NONVSAM. ЗаданиеDELINDSN сохраняется в н.д. FINTLIBS.JOB.DELETE.CATL.DSN. Если появятся записи другого типа, то заданиеDELINDSN на удаление нужно поправить вручную.
Файл с заданием выложен в разделе "Каталог файлов" под темой с названием, аналогичным данному материалу (ссылка).
Могу только добавить, что можно доработать в плане определения имени мастер-каталога динамически, а так же задание на удаление генерировать в синтаксисе, правильном для удаляемой записи (cluster там, или usercat), но это ещё более усложнит джобик, а поскольку подавляющее большинство "повисших" записей у нас было NONVSAM (всего было свыше 1600 "повисших" в воздухе записей каталогов), да и перед удалением надо бы глазками посмотреть, а не автоматом сразу удалять, то решили, что не стоит усложнять джобик ради несущественных улучшений. Может, кто таки возьмёт и доработает?
Ещё вопрос по программе определения активных томов в z/OS. Может, кто знает какую другую программу? ACBJBAOB уж очень неторопливо работает.
Я очень похожую задачу - поиск ссылок из каталога на несуществующие НД и некаталогизированные НД - решаю с помощью пары утилит с cbttape. Не помню номера, но сами утилиты - DSDSM08 и IEBLIST, их можно найти (навскидку при простом поиске - 510 и 566). Если надо, сюда выложу. Работают за допустимое для нас время.
DSDSM08 - scan catalog looking for dsns cataloged on a wrong volume можно посмотреть, действительно может помочь упростить джоб. а вот IEBLIST по описанию, вроде, как не нужен. Хотя теперь, с использованием LISTUCB работает шустро, можно немного упростить, за счёт REXX-овой части. Но на DSDSM08 надо посмотреть - готовясь иметь огромное количество документов в наборах данных надо усиленно набирать опыт в работе с ICF разными способами Лучше спокойно учиться до, чем метаться в панике после
при поддержке целостности смотреть надо с двух сторон - какие ссылки есть в каталоге, но нет на дисках, и наоборот. так что утилиты регулярно гоняю те и другие. а так - да, способов решения поставленной задачи много, выбирай подходящие.
о, про момент обратной выверки я не то, чтобы забыл, но упустил сейчас из виду, вот IEBLIST как раз под это дело может подойти. Я то смотрел в русле узкой задачи - удаляются старые тома, без очистки каталогов ICF (не удаляются и не раскаталогизируются наборы на удаляемых томах), и надо приводить каталоги в порядок, регулярно проверяя, что там администратор СХД натворил
