Program for multiply verb, COBOL Programming

Assignment Help:

PROGRAM FOR MULTIPLY VERB:

We have to write a simple program to elaborate MULTIPLY verb. You can also use the edit characters in the program.

Identification division.

Program- id. Mulverb.

Environment division.

Data division.

Working-storage section.

77 a pic s9(3)v9(2) value 0.

77 b pic s9(3)v9(2) value 0.

77 c pic s9(4)v9(2) value 0.

77 e-c pic -z(4).z(2).

Procedure division.

Para-1.

Display(1 1) erase.

Display(3 5) "Enter first number :".

Accept a.

Display(5 5) "Enter second number :".

Accept b.

Multiply a by b giving c.

Move c to e-c.

Display(15 5) "Product = " e-c.

Stop run.

Description: This program gets 2 inputs from the user.

It multiplies them by using the MULTIPLY verb.

a*b is found and stored in c.

The unedited result is accessible in c.

We move c to e-c, where the edit characters are accessible.

Keep in mind that the variable e-c makes use of the - edit character.

The e-c will always be exhibited with result.

Related Discussions:- Program for multiply verb

Filler clause - cobol programming, FILLER CLAUSE: Consider the stateme...

FILLER CLAUSE: Consider the statements as shown below: 1) 01 f pic x(80) value all "-". This statement origins a line of 80 characters filled with "-"

Minus sign - edit characters for numeric data , Minus sign - edit character...

Minus sign - edit characters for numeric data: The minus sign can appear either at the leftmost or rightmost location of the picture. If an item is negative, a minus sign will

On size error option, ON SIZE ERROR OPTION: If after an arithmetic ...

ON SIZE ERROR OPTION: If after an arithmetic expression, the result exceeds the highest value which can be accommodated in the result; this error is termed as size error. T

Program for inventory , PROGRAM FOR INVENTORY We have to write a progr...

PROGRAM FOR INVENTORY We have to write a program to update the inventory file. Consider 2 files,viz, invfile an tranfile. Invfile has 3 fields pno,name,qty. Tranfile has 3 fil

Statements for sequential files , STATEMENTS FOR SEQUENTIAL FILES: A b...

STATEMENTS FOR SEQUENTIAL FILES: A basic operation on a file includes the reading and writing of its records. Whenever the file is sequential, there are three verbs for the

Use of evaluate statement, Evaluate is like a case statement & Evaluate s...

Evaluate is like a case statement & Evaluate stamenet can be used to replace nested Ifs. The difference b/w EVALUATE and case is that there is no 'break' is required for EVALUATE

Currency sign - edit characters for numeric data, Currency Sign - edit char...

Currency Sign - edit characters for numeric data: $ (Currency Sign): The single currency sign can appear at the leftmost place of a picture. In that situation the $ cha

Example of sign condition , Example of Sign condition: The illustratio...

Example of Sign condition: The illustration below describes the use of the sign condition. Illustration: 77 BALANCE PIC S9 (6) V99. . . I

Procedure division statements for the indexed files, PROCEDURE DIVISION sta...

PROCEDURE DIVISION statements for the indexed files: All the statements which are available for a relative file are also available for an indexed file. READ STTATEMENT :

Blank insertion and zero insertion, B (Blank Insertion) : The occurren...

B (Blank Insertion) : The occurrence of a B anyplace in the picture will insert a space character in the edited data. There can be more than one B in the picture. Examples:

Write Your Message!

Name

Email id

Message

Verfication Code

User Account

All Pages