Latest revision as of 23:06, 17 April 2018

You can download some examples from my repository on Git Hub Cobol Examples

Divisions of a Cobol Program

01234
    IDENTIFICATION DIVISION
*
    ENVIRONMENT DIVISION
*
      CONFIGURATION SECTION
* 
      INPUT-OUTPUT SECTION
*
    DATA DIVISION
*
       FILE SECTION
*
       WORKING-STORAGE SECTION
*
       LINKAGE SECTION
*
       SCREEN SECTION
*
    PROCEDURE DIVISION

Cobol Arithmetic Operations

ADDITION

Cobol language	Operation	Comments
ADD B TO A	A = A + B	-
ADD B C TO A	A = A + B + C	-
ADD 1 TO A B	A = A + 1; B = B + 1	-
ADD B C GIVING A	A = B + C	-

SUBTRACTION

Cobol language	Operation	Comments
SUBTRACT B FROM A	A = A - B	-
SUBTRACT B C FROM A	A = A - B - C	-
SUBTRACT B C FROM A GIVING D	D = A - B - C	-

DIVISION

Cobol language	Operation	Comments
DIVIDE 2 INTO A	A = A / 2	-
DIVIDE 2 INTO A GIVING B	B = A / 2	-
DIVIDE A BY 2 GIVING B	B = A / 2	-
DIVIDE A BY 2 GIVING B REMAINDER C	B = A / 2 REMINDER C	-

MULTIPLICATION

Cobol language	Operation	Comments
MULTIPLY B BY A	A = A * B	-
MULTIPLY B BY A GIVING C	C = A * B	-

@@ Line 1: / Line 1: @@
+You can download some examples from my repository on Git Hub [https://github.com/ebasso/cobol-exemplos Cobol Examples]
 = Divisions of a Cobol Program =
-    IDENTIFICATION DIVISION
+     IDENTIFICATION DIVISION
   *
-    ENVIRONMENT DIVISION
+     ENVIRONMENT DIVISION
-      CONFIGURATION SECTION
+ *
+       CONFIGURATION SECTION
   *
-      INPUT-OUTPUT SECTION
+       INPUT-OUTPUT SECTION
+  *
-    DATA DIVISION
+     DATA DIVISION
-      FILE SECTION
+ *
+        FILE SECTION
   *
-      WORKING-STORAGE SECTION
+        WORKING-STORAGE SECTION
   *
-      LINKAGE SECTION
+        LINKAGE SECTION
   *
-      SCREEN SECTION
+        SCREEN SECTION
   *
+     PROCEDURE DIVISION
+= Cobol Arithmetic Operations =
-= Operations =
+'''ADDITION'''
 {| class="wikitable"
 |-
@@ Line 35: / Line 41: @@
 | ADD B C GIVING A || A = B + C || -
 |}
+'''SUBTRACTION'''
 {| class="wikitable"
 |-
-! Cobol language !! Operation !! Header text
+! Cobol language !! Operation !! Comments
 |-
 | SUBTRACT B FROM A || A = A - B || -
@@ Line 46: / Line 54: @@
 | SUBTRACT B C FROM A GIVING D || D = A - B - C || -
 |}
+'''DIVISION'''
 {| class="wikitable"
@@ Line 63: / Line 73: @@
 || -
 |}
+'''MULTIPLICATION'''
 {| class="wikitable"
 |-
-! Cobol language !! Operation !! Header text
+! Cobol language !! Operation !! Comments
 |-
 | MULTIPLY B BY A || A = A * B || -
 |-
 | MULTIPLY B BY A GIVING C || C = A * B || -
-|-
-| SUBTRACT B C FROM A GIVING D || D = A - B - C || -
 |}