Следующее предложение в COBOL
В языке программирования COBOL у нас есть три типа логических операторов:
1. Операторы последовательности: используются, когда нам нужно многократно выполнять какой-то фрагмент кода до некоторой последовательности. Например, чтение каждой записи/данных из какого-либо файла до конца.
2. Операторы выбора: используются, когда мы хотим запустить программу на основе результатов некоторых условий, таких как условие IF-ELSE, или мы можем сказать true - ложный тип условия.
3. Операторы итерации: это не что иное, как операторы цикла, используемые, когда мы хотим повторно выполнить какой-либо код на основе некоторого условия.
Следующее предложение:
В COBOL Next Sentence будет использоваться для передачи управления следующему исполняемому оператору, следующему за состояниями, в которых он находит точку (т.е. точка « . »). Как мы знаем, COBOL будет считать период окончанием текущего оператора.
Синтаксис:
NEXT SENTENCE
Пример:
Cobol
COBOL program for Next SentenceIDENTIFICATION DIVISION.PROGRAM-ID. NEXTSENTENCE.DATA DIVISION. WORKING-STORAGE SECTION. 01 WS-EMP-NAME PIC X(20). 01 WS-EMP-RATING PIC 9(01). 01 WS-BONUS PIC 9(06)V99. 01 WS-SALARY PIC 9(06)V99 VALUE 600000.00. 01 WS-INCREMENTED-SALARY PIC 9(07)V99. 01 WS-PERCENT PIC 9(03)V99 VALUE ZEROES. 01 WS-FLAG PIC X(01). PROCEDURE DIVISION. DISPLAY "ENTER THE NAME OF EMPLOYEE: " ACCEPT WS-EMP-NAME DISPLAY "ENTER THE RATING OF EMPLOYEE OUT OF 5: " ACCEPT WS-EMP-RATING DISPLAY "EMPLOYEE NAME IS: " WS-EMP-NAME DISPLAY "EMPLOYEE SALARY IS: " WS-SALARY DISPLAY "EMPLOYEE RATING IS: " WS-EMP-RATING IF WS-EMP-RATING < 3 NEXT SENTENCE ELSE MOVE "T" TO WS-FLAG DISPLAY "ENTER THE BONUS OF EMPLOYEE: " ACCEPT WS-BONUS ADD WS-BONUS,WS-SALARY TO WS-INCREMENTED-SALARY COMPUTE WS-PERCENT = (WS-BONUS/WS-SALARY)*100 DISPLAY "INCREMENTAL PERCENTAGE : " WS-PERCENT " %" DISPLAY "NEW SALARY IS : " WS-INCREMENTED-SALARY END-IF. IF WS-FLAG = "T" DISPLAY "CONGRATULATION..." ELSE DISPLAY "NO BONUS FOR EMPLOYEE..." END-IF.STOP RUN. |
Выход:
Объяснение:
В данном примере мы рассматриваем ежегодную аттестацию сотрудника в какой-либо организации, если рейтинг работника выше «3», то он должен получить премию, а его заработная плата должна быть увеличена. поэтому мы печатаем увеличенную зарплату и увеличенный процент сотрудника в положительном тестовом сценарии.
Для отрицательного тестового случая, если рейтинг сотрудника меньше 3, мы используем СЛЕДУЮЩЕЕ ПРЕДЛОЖЕНИЕ, которое пропустит добавление заявления о бонусе и напрямую выйдет из программы, отображая финальное утверждение.