What will happen if a variable is declared as below..
Explain with an example? Working storage section:-

01 WS-VARX PIC X(10) VALUE 'ABCDEFGHIJ'.
01 WS-VARN REDEFINES WS-VARX PIC 9(5) VALUE '12345'.

What will happen I am going to Display the WS-VARX and WS-
VARN?

Answer Posted / neela

Hi KHB Naidhu,
pic x means it should be alphanumeric
pic 9 means it should be Numeric

so we have to move numeric values also to the pic x

for this qtion is correct what was explained my
mallikarjuna.

regards
Neela

Is This Answer Correct ?    2 Yes 1 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

what is the difference between COBOL2 AND COBOL390?

2453


what is the use of outrecord?

1769


can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there

1902


how we sort two input files based on a common column and giving one o/p file please send me the coding logic?

1647


INREC AND OUTREC? HOW TO SPLIT 5K RECORDS TO DIFFERENT FILES IN A FILE IN COBOL? RESTART IN COBOL-DB2? ISOLATION LEVELS?

417






How to get the last record in vsam file in cluster? And how can you get the kids file records into your cobol program?

737


What is amode(24)?

682


input= ,,,, mainframe training ,,, hyderabad .... location.... output1=$ mainframe training in hyderabad location$ output2=**** mainframe training in hyderabad location ****. In this pgn when we give input considering the spaces the output is displayed in this format.Like in the place of ,,,, $ should be displayed likewise.So please helpmeout.

1782


Name the sections present in data division.

701


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 ......

10599


how do you reference the printer file formats from cobol programs

660


Explain how to differentiate call by context by comparing it to other calls?

686


If you are current on the owner of a set, what is the difference between obtain next and obtain first?

641


i have 10 names in an array and my name is one of them also array is not in sorted order i need to display my name using index how will i do this

996


What is the local-storage section?

681