User input/Text: Difference between revisions

Content added Content deleted

Inline

@@ Line 491: / Line 491: @@
 =={{header|BabyCobol}}==
 <syntaxhighlight lang="cobol">
-       * NB: whitespace insignificance and case insensitivity
+      * NB: whitespace insignificance and case insensitivity
-       * are used in the field name.
+      * are used in the field name.
-        IDENTIFICATION DIVISION.
+       IDENTIFICATION DIVISION.
-            PROGRAM-ID. USER INPUT.
+           PROGRAM-ID. USER INPUT.
-        DATA DIVISION.
+       DATA DIVISION.
 THREE DIGIT NUMBER PICTURE IS 9(3).
-        PROCEDURE DIVISION.
+       PROCEDURE DIVISION.
-            DISPLAY "Enter a number: " WITH NO ADVANCING
+           DISPLAY "Enter a number: " WITH NO ADVANCING
-            ACCEPT ThreeDigit Number.
+           ACCEPT ThreeDigit Number.
 </syntaxhighlight>