How to define variable 9(20) in COBOL, because compiler
does not allow us to declare variables with Pic 9(18). Can
anyone please let me know the answer... I know one answer
to this question which is to use Compiler option Arith
(Extend) during Compilation. It extends the maximum limit
to 9(32)..Just wanted to know if there is any other way to
extend this?
Answers were Sorted based on User's Feedback
Answer / abc
try with this:
01 VARIABLE-ABC.
03 VAR-1 PIC 9(18).
03 VAR-2 PIC 9(2).
This may work, please try and see.
| Is This Answer Correct ? | 10 Yes | 1 No |
Answer / vikram
01 VAR-1 PIC 9(18).
change the datatype then it's possible
01 VAR-1 PIC x(20).
| Is This Answer Correct ? | 1 Yes | 0 No |
try with this:
01 VARIABLE-ABC.
03 VAR-1 PIC 9(18).
03 VAR-2 PIC 9(2).
or
use PROCESS ARITH(EXTEND) before IDENTIFICATION DIVISION
ARITH option syntax
.-COMPAT-.
>>-ARITH(-+-EXTEND-+-)-----------------------------------------><
When you specify ARITH(EXTEND):
The maximum number of digit positions that you can specify in the PICTURE clause for packed-decimal, external-decimal, and numeric-edited data items is raised from 18 to 31.
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / sachin borase
Use the varchar.
01 var-char-variable.
49 ws-letch s9(4) comp.
49 ws-text 9(20).
| Is This Answer Correct ? | 2 Yes | 9 No |
how many bytes do SPPPP999 will store?
If you are current on the owner of a set, what is the difference between an obtain next and obtain first? Actually in which topic will we use dis???Plz explain it clearly
What will happen if you code GO BACK instead of STOP RUN in a stand-alone COBOL program i.e. a program which is not calling any other program ?
What is link edit in cobol?
What is the LINKAGE SECTION used for?
) what is the difference between AID and HANDLE AID?
what is meaning by design document? who can repared for this?
what is Pic 9v99 Indicates?
Can you REWRITE a record in an ESDS file? Can you DELETE a record from it?
6 Answers ABC, IBM, Mphasis, Wipro,
At the minimum, which division of COBOL is enough to be coded?
How to pass return codes from cobol to jcl?
What is the difference between SEARCH and SEARCH ALL?