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 / dimpy19
No abend
but unpredictable result
WORKING-STORAGE SECTION.
01 VAR1 PIC 9(2).
01 VAR2 PIC X(2).
PROCEDURE DIVISION.
ACCEPT VAR2.
MOVE VAR2 TO VAR1.
DISPLAY VAR1.
DISPLAY VAR2.
STOP RUN.
//STEP02 EXEC PGM=COB7
//STEPLIB DD DSN=DEA.SIQAGH.LOAD,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
PI
/*
output
P9
PI
| Is This Answer Correct ? | 0 Yes | 0 No |
Post New Answer View All Answers
In COBOL programming, what is PERFORM? What is VARYING?
What is the difference between perform … with test after and perform … with test before?
What is amode(24)?
Write the code to count the sum of n natural numbers.
what is s000 u4087 error? please give the all error codes in cobol,jcl.
Have you used the sort in your project?for this type of questions any working on real time project give the eg. with real time scenario.
Describe the cobol database components?
Explain how you can characterize tables in cobol?
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
What type of SDLC u followed? Why?
Write down the divisions of cobol program?
What are literals?
What is Pic 9v99 Indicates in COBOL?
What is the difference between Structured COBOL Programming and Object Oriented COBOL programming?
There are 5 fields and 1000 records in a file. Unload it into an array. Write the syntax for declaration and how will you unload it.