COBOL program to read the string ' BOMBAY' in reverse order as 'YABMOB'
Answer Posted / nanda
********************** Top of Data ***********
ID DIVISION.
PROGRAM-ID. ALLINONE.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-A PIC X(7) VALUE 'NANDA'.
01 WS-B PIC X(7).
PROCEDURE DIVISION.
MOVE FUNCTION REVERSE(WS-A) TO WS-B.
DISPLAY WS-B.
STOP RUN.
| Is This Answer Correct ? | 2 Yes | 0 No |
Post New Answer View All Answers
I have a program with an Array of 5000 occurences which is being passed from 5 sub levels to the front end screen. Thess 5 programs using each 5*2 = 10 different arrays with size as 5000. This is causing the transaction to utilize more storage consupmtion. I am looking to reduce the storage consumption. As part of that initially i thought Dynamic array may solve my problem. After viewing the comments given i see its same as normal array. IS there any other way we can resolve this issue?
In which area will you utilize 88 level items in cobol?
i need a small 3d program using inline and outline.
HOw can I get the negative sign while deduct high value from low value
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 ?
how do you reference the variable unblock file formats from cobol programs
how do you reference the printer file formats from cobol programs
how we sort two input files based on a common column and giving one o/p file please send me the coding logic?
What is a SSRANGE and NOSSRANGE?
What is perform what is varying?
How arrays can be defined in COBOL?
System Testing for Mainframe Developers What is System Testing? integration testing ? what's the procedure ..
What is link edit in cobol?
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
Explain what you understand by passing by value.