01 var1 pic s9(9)v99.
01 var2 pic x(30).
procedure division.
move 12345.99 to var1.
move12345.99 to var2.
display var1.
display var2.
what is the output?
Answer Posted / john benito
Will abend.
Pic clause is not allowed in 01 level.
| Is This Answer Correct ? | 3 Yes | 28 No |
Post New Answer View All Answers
Which is the default, TEST BEFORE or TEST AFTER for a PERFORM statement?
What is Pic 9v99 Indicates in COBOL?
EXPLAIN MAIN FRAME TESTING PROCESS...HOW TO FIX THE MAINFRAME BUGS?
How do define dynamic array in cobol. how do you define single dimensional array and multidimensional array in your cobol?
How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that
how do you reference the esds vsam file formats from cobol programs
What are the pertinent COBOL commands?
System Testing for Mainframe Developers What is System Testing? integration testing ? what's the procedure ..
Difference between array and sub-script ?
How many bytes S(8) comp field occupy and its maximum value?
what are decleratives in cobol?
How to remove 2 duplicate records and copy only one using job control language?
What is the Purpose of POINTER Phrase in STRING command in COBOL?
Name some of the examples of COBOl 11?
2 input fles: 2 flat files, with different number of records. both are having unique key for each record and already sorted in ascending order . match these files using unique key and in output only matching key value has to be written. please procide cobol logic