Can we move X(9) to 9(9). If yes what are the ways for
doing this?
Answer Posted / varun v
yes you can..use REDEFINES for the same purpose.
Working storage section:-
01 WS-VARX PIC X(9) VALUE SPACES.
01 WS-VARN REDEFINES WS-VARX PIC 9(9).
Now you can move X(9) variable to WS-VARX.Eventually it is
moved to the 9(9) variable WS-VARN.
| Is This Answer Correct ? | 12 Yes | 5 No |
Post New Answer View All Answers
What is rmode(any) ?
What are all the divisions of a COBOL program?
Our issue is there seems to be a disconnect, or no link, between our SELECT statement and our SD. We had SELECT SORT-FILE and SELECT SORT-FILE ASSIGN TO SORTWRK. ASSIGN TO SORTWRK1 SORTWRK2 SORTWRK3 SORTWRK4. with SD SORT_FILE RECORD CONTAINS 7833 CHARACTERS. In either case, at run time, the system ignored our SORTWRK# DD statements and allocated 16 sort works with the SORTWK## naming convention. Any ideas why the system does not recognize the connection? We do not even need the SORTWRK DD statements. Thanks
How to print 10 to 1 if the input have only 10 digit number?
I have program P1 which calls file F1 which has 100 records and following structure 001 .................. 002 .................. 003 .................. 098 .................... 099 ................... 100 .................... Now I want to read these files and write these records in file F2 in following manner. 001 ...... 051 ..... 002 ...... 052 ..... 003 ...... 053 ..... .......... ....... .......... ....... .......... ....... 048 ........ 098 ...... 049 .......... 099 ....... 050 .... 100 ......
Write a program to explain size error.
Program A (Normal COBBAT) calling a B Program (DB2COBOL, COBBATDB which is using a VSAM file. its a dynamic call. How we will handle VSAM file decleration in our from JCL from where we are running A PGM. And should we have PLAN for A pGM also. if possible can some one post a sample JCL. Thanks for help in advance.
What is the difference between a binary search and a sequential search what are the pertinent cobol?
What type of SDLC u followed? Why?
IF I mention stop run in CICS what happens?
What is Pic 9v99 Indicates in COBOL?
what is amode(24), amode(31), rmode(24) and rmode(any)?
)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?
Write the code to count the sum of n natural numbers.
Which Search verb is equivalent to PERFORM…VARYING?