01 xxx pic 9(4).
01 yyy pic 9(6).

move 123456 into yyy.
move yyy to xxx.

display yyy.

what would be the value of yyy

Answer Posted / mahaveer

Here if u display YYY it will 123456
and if u display xxx it will 3456

Hope its clear

Is This Answer Correct ?    4 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

Write the code implementing the perform … varying.

722


What is cobol?

841


Why occurs cannot be used in 01 level in COBOL?

808


how to move the records from file to array table. give with code example

2315


How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that

2838






What is the difference between perform … with test after and perform … with test before?

1002


1.Is it possible to move the data from 99.99 to 99v99? 2.What is the CICS-vsam Compilation process? 3.In My GDG 5 generation will be there GDG3 got an abend what will happen? 4.In my GDG first generation is +1 And I want to add the new generation what will happen previous generation? 5.How can you give the PIC clause below conditions A). s9 (reddy), B). s9 (5) occurs 5 times? 6.How override the proc from a particular step? and what is symbolic and override Procs?

5496


Can a Search can be done on a table with or without Index?

924


What are literals?

725


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

720


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.

5230


What is Pic 9v99 Indicates in COBOL?

837


write a cobol logic. i have file that has 10 records .1 record go to first output file and second record goes to 2 output and etc

874


What is the Purpose of Pointer in the string?

721


What is link edit in cobol?

858