Question { 56748 }

What is the difference between PIC 9.99 and 9v99?

Answer

The Pic 9.99 has a definite decimal point and contains 4 bytes, while the Pic 9v99 has a implied or assumed decimal point and contains 3 bytes.

Question { 9093 }

When is a scope terminator mandatory?

Answer

Implicit and explicit scope terminators are mandatory for the end of each logical statement.

Explicit scope terminators make it more easy to read the flow of the program logic.

Question { IBM, 12866 }

can we use go to statement inline-perform?

Answer

Yes you can, although that is not good programming practice.

Question { IBM, 12866 }

can we use go to statement inline-perform?

Answer

Yes you can but that is not good COBOL programming practice at all.

Question { CTS, 14120 }

is it possible to pass an SQL query inside a jcl which is
inside a cobol program?

Answer

Yes you can, as long as your project manager don't find out about your silly movements :-)

Question { ADP, 27424 }

1) can we display the index?

Answer

You can't directly display the Index. But you can create a normal numeric field in your working storage and set that to the Index.

Example:

01 WS-TABLE.
05 WS-CUSTOMER PIC X(25) OCCURS 10 INDEXED BY INDEX1.

01 WS-NUMERICS.
05 WS-INDEX-COUNT PIC 9(02) VALUE 0.

SET WS-INDEX-COUNT TO INDEX1.
DISPLAY WS-INDEX-COUNT.