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 |
What is difference between comp & comp-4?
In INITIALIZE what is Repalcing Word will do
write a program to eliminate duplicate records in a input file and send them to output file.
what is the maximum error code in mainframe
have in 100 records in a flat file i want to move records like 1,3,5,7,9,11,.. to Output file1 and 2,4,6,8,10,12,14 .. records moved to Output file2..Pls Provide real time answer..
The below is the declaration for a variable ws 01 ws pic 9(3). if you want to insert space how will you do that. in which level u should do it
i need a small 3d program using inline and outline.
Write a program to concert an Indexed file into Sequential file?
What does MAXCC 3 means? It is used in one my codes.
Difference between cobol and cobol-ii?
What is the meaning of 'TALLING' verb in cobol?
How do we get current date from system with century?