Следующее распределение пространства дает мне ошибку sB37 JCL. Размер кобола выходного файла составляет 100 байт, а размер lrecl — 100 байт. Как вы думаете, что вызывает эту ошибку? Я попытался увеличить размер до 500 100 и все равно получаю ту же ошибку.
Код:
//OUTPUT1 DD DSN=A.B.C,DISP=(NEW,CATLG,DELETE),
// DCB=(LRECL=100,BLKSIZE=,RECFM=FBM),
// SPACE=(CYL,(10,5),RLSE)
Постарайтесь увеличить не только пространство, но и объем. Включите VOL=(,,,#) в свой DD. # - количество значений, которые вы хотите выделить
Пример: SPACE=(CYL,(10,5),RLSE),VOL=(,,,3) — включает 3 тома.
Дополнительно можно увеличить размер, но старайтесь оставаться в разумных пределах :)
Additionally, you can increase the size, but try to stay within reasonable limits :)? Не могли бы вы объяснить это, пожалуйста, иначе это запутает будущих читателей. OP уже увеличил пространство в 50 раз. Каковы ваши разумные пределы и почему. Без объяснений это просто бессмысленные слухи. Объясни, потом посмотрим, встанет ли.
- person Bill Woodger; 11.08.2014
документация для B37 говорит, что разработчик приложения должен реагировать так, как указано для сообщения IEC030I. документация для IEC030I частично говорит...
Вероятная ошибка пользователя. Во всех случаях выделяйте столько единиц, сколько требуется объемов.
... как указано в другом ответе. Однако имейте в виду, что в документации по параметру VOL оператора DD говорится...
Если вы не укажете количество томов или укажете от 1 до 5, система позволит использовать до пяти томов; если указать от 6 до 20, система разрешает 20 томов; если вы укажете число больше 20, система разрешит 5 плюс число, кратное 15 томам. Вы можете переопределить максимальное количество томов в классе данных с помощью подпараметра Volume-Count. Максимальное число томов для набора данных на монтируемой ленте, управляемой с помощью SMS, или набора данных на неуправляемой ленте — 255.
... поэтому для распределения DASD вам лучше всего указать количество томов больше 5 (по крайней мере).
//OUTPUT1 DD DSN=A.B.C,DISP=(NEW,CATLG,DELETE),
// DCB=(LRECL=100,BLKSIZE=,RECFM=FBM),
// SPACE=(CYL,(10,5),RLSE)
Попробуйте это вместо этого. Обратите внимание, что вторичный объект будет использовать преимущества большого набора данных, в то время как без этого параметра наибольший вторичный параметр, который имеет какой-либо смысл, составляет ‹ 300. О, и если это действительно программа на языке COBOL, убедитесь, что в FD указано «БЛОК 0»!!! !! Если это не «БЛОК 0», вам может даже не понадобиться менять JCL, потому что это не фиксированная блочная машина. Он был просто исправлен и разблокирован, так что места почти всегда не хватало. И, наконец, вы можете пересмотреть, почему у вас есть М в RECFM с самого начала. Обратите также внимание, что я убрал LRECL, BLKSIZE и RECFM. Это потому, что FD в программе COBOL — это все, что вам нужно, и помещать его в JCL не только избыточно, но и опасно, потому что теперь любые изменения придется делать в нескольких местах.
//OUTPUT1 DD DSN=A.B.C,DISP=(NEW,CATLG,DELETE),
// DSNTYPE=LARGE,UNIT=(SYSALLDA,59),
// SPACE=(CYL,(10,1000),RLSE)
Существует ограничение в 65 535 треков на один том. Поэтому, если вы укажете ПРОБЕЛ, превышающий этот предел, система просто проигнорирует его.
Вы можете увеличить это ограничение до 16 777 215 дорожек, добавив параметр DSNTYPE=LARGE. Или вы можете указать, что ваш набор данных является многотомным, добавив VOL=(,,,3)
Вы также можете использовать здесь параметр DATACLAS=xxxx, однако сначала вам нужно его найти. Самый простой способ — связаться с местной командой по хранению и попросить ее. Или, если вы знакомы с навигацией ISPF, вы можете ввести команду ISMF;4, чтобы открыть панель.
используйте следующие параметры, прежде чем нажать Enter.
CDS Name . . . . . . 'ACTIVE'
Data Class Name . . *
Он должен создать список всех доступных классов данных. Найдите тот, который вам подходит (имеет достаточное количество количества томов, не ограничивает основное и дополнительное пространство).
