ID DIVISION.
PROGRAM-ID. PLO.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 VAR1 PIC 9(2).
01 VAR2 PIC X(2).
PROCEDURE DIVISION.
ACCEPT VAR2.
MOVE VAR2 TO VAR1.
STOP RUN.

if i give 'PI' in var2 then what will b output of progr.
any abend?????

Answer Posted / dev

ABEND=S000 U4038 REASON=00000001. I have tested the program.

Is This Answer Correct ?    3 Yes 1 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

What are the different types of condition in cobol and write their forms.

658


When is inspect verb is used in cobol?

673


Which Search verb is equivalent to PERFORM…VARYING?

685


Name some of the examples of COBOl 11?

2684


IF I mention stop run in CICS what happens?

1896






What is Pic 9v99 Indicates in COBOL?

726


Which division and paragraphs are mandatory for a COBOL program?

709


what is difference bt COND, REGION & TIME parameters at JOB & EXEC. give an exp.

8160


how to refer the data field?

1810


explain sorting techniques in cobol program?

689


What is the compute verb? How is it used?

659


What is the difference between PIC 9.99 and PIC9v99?

781


System Testing for Mainframe Developers What is System Testing? integration testing ? what's the procedure ..

1588


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

693


What is the difference between PIC 9.99 and 9v99 in COBOL?

732