У меня есть файл VSAM с информацией о клиенте, а номер клиента - одно из полей. В CICS пользователь должен ввести номер клиента. Если и только если номер клиента присутствует в файле VSAM, будет отправлена следующая карта.Проверка данных из файла VSAM с использованием CICS + Cobol
Как проверить номер клиента из файла VSAM?
CUSTOMER NO звучит так, как будто это число, вы должны подтвердить, что это число.
Чтобы проверить, существует ли в CICS, вы можете использовать команду CICS READ, см. Cics Read; т.е.
Exec CICS
Read File(..)
INTO(data-area) RIDFLD(data-area)
blah blah blah ...
end exec.
где RIDFLD является запись ключа
Я хотел бы предложить нахождения существующей программы где вы работаете (я предполагаю, что вы не студент) и использовать его в качестве примера. В наши дни очень редко писать программу с нуля на мэйнфрейме. Существует почти всегда существующий пример, который вы можете посмотреть на копию.
Также вы должны показать нам, что вы попробовали !!!
Я не могу придумать, как это сделать по-другому :-) Мне не нравятся вещи, которые являются цифрами только потому, что у них нет имени, но это происходит (много). Сначала я выполнил поиск, а затем проверил числовое значение, только если не нашел, но результат тот же. –
Там просто ** есть **, чтобы быть программой на вашем сайте, которая уже делает это. У вас есть коллеги, чтобы помочь, если вы не знаете, как их найти. Делать это так же, как это уже сделано, лучше, чем придумывать по-другому (не то, чтобы на самом деле было очень много другого способа сделать это). –
Я согласен с Биллом, потому что для всего, что вам нужно написать на мэйнфрейме, будет существовать пример, спросить и осмотреться, изучить основы и узнать, как использовать сканирование. Большинство программистов-мейнфреймов «собирают» программы, которые они могут использовать в качестве примера/копии. –