Skip to content

Commit a6050d2

Browse files
authored
Use 88-level conditional names for assignments
Signed-off-by: Janos Varga <113785741+vargajb@users.noreply.github.com>
1 parent 983432e commit a6050d2

File tree

1 file changed

+2
-2
lines changed
  • COBOL Programming Course #2 - Learning COBOL/Labs/cbl

1 file changed

+2
-2
lines changed

COBOL Programming Course #2 - Learning COBOL/Labs/cbl/SRCHSER.cobol

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -67,6 +67,6 @@
6767
*
6868
READ-RECORD.
6969
READ ACCT-REC
70-
AT END MOVE 'Y' TO LASTREC
70+
AT END SET END-OF-FILE TO TRUE
7171
END-READ.
72-
*
72+
*

0 commit comments

Comments
 (0)