I encountered an error when I move spaces to a numeric
field?What should I do to move spaces on that field?help
please.
Answer Posted / ramesh
first numeric field rediffens alpha numeric field
then you check numeric and move spaces to redifened name
ex:
01 num pic 9(09).
01 num1 rediffens num.
02 num2 pic x(09).
if num is numeric
move spaces to num2
end-if.
| Is This Answer Correct ? | 20 Yes | 0 No |
Post New Answer View All Answers
I have a File that has duplicate records. I need only those records that occur more than thrice.?
What is the compute verb? How is it used?
how do you reference the ksds vsam file formats from cobol programs
Which is not true about evaluate statement
what are decleratives in cobol?
What is cobol?
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 ?
What is a SSRANGE and NOSSRANGE?
What is report-item in COBOL?
how do you reference the variable block file formats from cobol programs
Can a Search can be done on a table with or without Index?
) How do u handle errors in BMS macro
What is the difference between goback, stop run and exit program in cobol?
how to access the file from prodution from changeman tool and to submit a file to production
How arrays can be defined in COBOL?