Correctly place misplaced period.
This commit is contained in:
parent
a48e8dab05
commit
73342ad5be
1 changed files with 2 additions and 1 deletions
3
WOPO.COB
3
WOPO.COB
|
@ -508,7 +508,8 @@
|
|||
MOVE USER-NAME TO WORK
|
||||
CALL "RE-ESCAPE" USING WORK, WOPO-COUNTER
|
||||
MOVE WORK TO USER-NAME
|
||||
D DISPLAY "USER NAME. ", USER-NAME.
|
||||
D DISPLAY "USER NAME. ", USER-NAME
|
||||
.
|
||||
IF NOT DONE THEN
|
||||
PERFORM BEGIN-REPLY
|
||||
STRING USER-NAME
|
||||
|
|
Loading…
Reference in a new issue