cobol

0зной

1ответ

Есть ли способ автоматически заполнить массив после получения ввода пользователем?

У меня есть массив из 5 элементов, и каждый из элементов содержит символ. Я хочу принять ввод пользователя в одной строке. Например: ABCDE. И я предполагаю, что элемент 1 массива должен иметь A и элем

0зной

1ответ

Как использовать концепцию-курсор в коболе?

У меня есть база данных больших деталей, которая будет отображаться на одной карте CICS. Я подумал о том, чтобы использовать концепцию с помощью курсора, вставляя каждую пару строк и отображая ее на к

0зной

2ответ

cobol application on W8

У меня есть приложение, написанное на Cobol, которое работает на ПК с XPSP3 32bit. Я сменил свой компьютер, и теперь у меня есть окна 8.1 64 бит. Я попытался запустить программу на ПК с W8, но не рабо

0зной

1ответ

Есть ли способ писать комментарии в современном Cobol?

Я тоже пытаюсь понять, как я могу добавлять комментарии к моей программе COBOL. Я знаю, что в современной версии COBOL есть способ писать комментарии, но я не уверен, как это сделать.

0зной

1ответ

«DEALER.DAT» 148 Неверный режим открытия или режим доступа для записи

У меня нет ошибок, и я использую визуальные студии для компиляции. У меня есть два входных файлы и два выходных файлы, которые предполагаются использовать транзакции для обновления данных в файле диле

-4зной

1ответ

Кто-нибудь знает, как написать этот алгоритм в COBOL: суммарные значения массива с суммой, равной X

У меня есть 12 учетных сумм, связанных с двумя разными счетами, представленными в этом порядке: -18.91, -8.48, -3654.47, -3379.07, - 648,91, -2025,30, -1121,27, -1132,26, -22,68, -324,45, -861.50 и -2

0зной

2ответ

Как отобразить абсолютное значение

Учитывая следующий код: IDENTIFICATION DIVISION. PROGRAM-ID. FABS. ENVIRONMENT DIVISION. DATA DIVISION. WORKING-STORAGE SECTION. 01 NUM PIC 9 VALUE ZEROS. 01 ABSVAL PIC

4зной

1ответ

88 Уровень Количество

10 ERROR-FLAG PIC X VALUE 'N'. 88 ERROR-FOUND VALUE 'Y'. 88 ERROR-NOT-FOUND VALUE 'N'. Если я: SET ERROR-NOT-FOUND TO TRUE Тогда я: SET ERROR-FOUND TO TRUE Теперь, какова

2зной

1ответ

Возможно ли MOVE для имени переменной, созданного во время выполнения?

Я пишу программу, которая меняет цвет поля, если это дубликат записи. Для этого я использую вложенный результат, чтобы сравнивать каждый элемент друг с другом. Когда он находит дубликат, я хотел бы ПЕ