i have a requrement in A as viswa!@#$%&^**reddy i need to
move viswareddy in B without junk values pls say how to do
ths reply fast

Answer Posted / vinod

01 a pic x(19) value 'viswa!@#$%&^**reddy'.
01 b pix x(11).
procedure division.
move a(1:5) to b(1:5).
move a(15:5) to b(6:5).
display b.

Is This Answer Correct ?    17 Yes 1 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

How to remove the spaces at the end of each record in the output file of variable length, via cobol program?

670


What do you understand by psb and acb?

659


i was faced one question- i have value -00001234.56 Suppress the zeroes and the output should be -1234.56 But Not - 1234.56 spaces should not be available after suppressing the zeroes. logic in jcl and cobol?

892


How many bytes S(8) comp field occupy and its maximum value?

1626


What are declaratives and what are their uses in cobol?

706






Can we change the password using ALTER? anyone tried and changed?

1542


I have to write to a outfile where the number of records in that file should be the header of that file using IMS.. can anyone help me in this issue

1927


What are the various section in data division and briefly explain them.

692


how do you reference the esds vsam file formats from cobol programs

627


What are INPUT PROCEDURE and OUTPUT PROCEDURE?

679


What is the Purpose of Pointer in the string?

640


Whats the difference between search & search ALL?

5258


What is the difference between structured cobol programming and object alternativelyiented cobol programming?

704


Why do we code s9 (4) comp. Inspite of knowing comp-3 will occupy less space?

706


How do you reference the following file formats from cobol programs?

693