Consider the following COBOL entries:
05 X PIC 99 VALUE 10.
SUBTRACT 20 FROM X.
The resultant value of X wil be
Answer Posted / swappy
Answer #3 is correct. Since there is no sign clause it will
just ignore the -ve sign and resultant will be 10.
Also Prabhu, there is no problem with the level no. There
will not be any error due to the level no.
Is This Answer Correct ? | 4 Yes | 1 No |
Post New Answer View All Answers
How do you reference the fixed block file formats from cobol programs
Which is the default, TEST BEFORE or TEST AFTER for a PERFORM statement?
What is the Purpose of Pointer in the string?
What is the difference between PIC 9.99 and 9v99 in COBOL?
how to convert the recors form vsam file to db2 table tru file aid
What is static and dynamic call in cobol?
How to know whether the module is dynamical or statistical?
What are the different types of condition in cobol and write their forms.
How do you get the data to code the BMS macro?
Write a program to enter and display the names of students in a class using the occurs clause.
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
1.Is it possible to move the data from 99.99 to 99v99? 2.What is the CICS-vsam Compilation process? 3.In My GDG 5 generation will be there GDG3 got an abend what will happen? 4.In my GDG first generation is +1 And I want to add the new generation what will happen previous generation? 5.How can you give the PIC clause below conditions A). s9 (reddy), B). s9 (5) occurs 5 times? 6.How override the proc from a particular step? and what is symbolic and override Procs?
How to remove the spaces at the end of each record in the output file of variable length, via cobol program?
here is my requirement A1 is alphanumeric with value 'A1B2C3D4' as defined below 05 A1 PIC X(8) VALUE IS 'A1B2C3D4' but i need to have A2,A3 as ABCD & 1234 repectively...... A2 = ABCD A3 = 1234 Can you please explain me what are the different ways to do it?
What are various search techniques in cobol? Explain.