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

In which area will you utilize 88 level items in cobol?

721


I have a File that has duplicate records. I need only those records that occur more than thrice.?

8651


i want a program using by if, evaluate , string, unstring, perform, occurs?

4054


Which division and paragraphs are mandatory for a COBOL program?

708


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

706






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

706


here is my requirement A1 is alphanumeric with value 'A1B2C3D4' as defined below 05 A1 PIC X(8) VALUE IS 'A1B2C3D4' but i need to have A2,A3 as ABCD & 1234 repectively...... A2 = ABCD A3 = 1234 Can you please explain me what are the different ways to do it?

6825


How can you get the ksds file records into your cobol program?

642


What are 77 levels used for?

659


Explain about different table spaces.

648


Discuss about changing dataset name in proc.

759


What is the default value(s) for an initialize? What keyword will allow for an override of the default?

659


Define static linking and dynamic linking.

662


Whats the difference between search & search ALL?

5264


What is the LINKAGE SECTION used in COBOL?

888