01 NAME1 PIC X(13) VALUE "COBOL PROGRAMMING".
01 NAME2 PIC X(13).
now I want to display the value of NAME1 in reverse order
i.e value should be displayed as "GNIMMARGORP LOBOC"
HOW can I do that ??? please let me know if any one knows
it.
Answer Posted / sairanga
procedure division.
move name1(17:1) to name2(1:1).
move name1(16:1) to name2(2:1).
move name1(15:1) to name2(3:1).
.
.
.
move name1(2:1) to name2(16:1).
move name1(1:1) to name2(17:1).
display name2.
stop run.
| Is This Answer Correct ? | 3 Yes | 1 No |
Post New Answer View All Answers
What is amode(24), amode(31), rmode(24) and rmode(any) (applicable to only mvsesa enterprise server) ?
What are all the divisions of a COBOL program?
Mention the guidelines to write a structured cobol program?
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
What are the cobol coding sheets?
What are the different rules of SORT operation?
What happens when we move a comp-3 field to an edited (say z (9). Zz-)?
A table has two indexes defined. Which one will be used by the SEARCH?
example for sub strings ? and refernce modifications whit output pls
If you are current on the owner of a set, what is the difference between obtain next and obtain first?
EXPLAIN MAIN FRAME TESTING PROCESS...HOW TO FIX THE MAINFRAME BUGS?
please..could u give an example about USAGE IS POINTER ..and explain why and when we use it ?
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 the problem of ordered sequential files access?
how can i see junk values in dclgen or in hostvariable of comp ?