Добавить запись с двоичным значением
У меня есть файл с длиной FB =80. Я хочу добавить фиксированное значение числовое 1
в позиции 81, если значение в позиции 80='Y'
Это добавленное значение должно быть S9(9) BINARY
при просмотре из тетради.
Добавленное поле будет использовано в SUM FIELDS
в отдельном шаге.
Как мне кодировать SORT SYSIN
карта?
1 ответ
OPTION COPY
INREC IFTHEN=(WHEN=(80,1,CH,EQ,C'Y'),OVERLAY=(81:+1,TO=BI,LENGTH=2))
Нет необходимости в том, чтобы это было отдельным от вас шагом с SUM in. Очевидно, что вы не будете использовать OPTION COPY.
Если вы используете SUMming для записей, отличных от Y в столбце 80, вам понадобится IFTHEN=(WHEN=INIT, чтобы сначала установить все на ноль.
Поскольку это задача мэйнфрейма, вы бы получили более ранний ответ, если бы использовали этот тег.