i want to store 20 digits . h will u do it in cobol ?
Answers were Sorted based on User's Feedback
Answer / paray2x
Most of the modern compilers support upto 31 digits. Try
compiling your program and you'll be able to find out.
Else, if your requirement is only to store and not do any
computation, you can have a group variable.
05 My-number.
10 My-number-part1 pic 9(15).
10 My-number-part2 pic 9(5).
| Is This Answer Correct ? | 13 Yes | 3 No |
Answer / nitesh sethi
Use ARiTH(EXTEND) as compile option and you can extend
numeric field upto 30 digits
| Is This Answer Correct ? | 4 Yes | 3 No |
Answer / yogesh
U can use either tables(ARRAYS) or can store those values
as elementary data items
| Is This Answer Correct ? | 0 Yes | 1 No |
In an EVALUATE statement, can I give a complex condition on a when clause?
input 1 input2 ouput1 output2 output 3 1 re 300 1 re 200 1 re 300 3 rc 500 1 re 200 2 rr 400 1 re 300 2 rr 400 1 rc 400 3 rc 500 1 rc 400 2 rr 700 2 rr 700 5 tt 900 5 tt 900 2 inputs r in flat file and output 1 is matched records,ouptput2 is unmatched of input1,output3 is unmatched of input2! how vl u get the output files using sequential order and to check with each and every records! let me know the procedure division ?
The order of precedence of arithmetic operators in an expression can be overridden with the use of (a) [] (b) () (c) {} (d) Any of the above
How will 128 be saved in s9 (3) comp-3 How will 12 be saved in s9 (2) comp
if a pic 9(3) value 354,b pic x(2) value '46' then a)a>b 2)a<b 3)error
How To move a value to an array using move verb?
How to replace the GOTO statement in COBOL without changing the structure of program. e.g. consider following code... I.D. E.D. D.D. P.D. compute C = A + B. GOTO para 100-display. compute D = C - D. GOTO 200-display. some other logic...... ........ GOTO 300-para. ...... ...... GOTO 400-para. Now I want to replacce all GOTO statements without changing the structure and otput of program.
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
If you were passing a table via linkage, which is preferable - a subscript or an index?
Where the Plan is located in CICS-DB2
I have a table with 3 dimensions like this : 01 ws-table 04 ws-page occurs 3 08 ws-column occurs 2. 12 ws-record occurs 20 pic x(40). How to code with PERFORM varying with 3 dimension...I forgot..
Which division and paragraphs are mandatory for a COBOL program?