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
what is s000 u4087 error? please give the all error codes in cobol,jcl.
Explain sorting techniques in cobol program? Provide the sort file definition, the sort statement, its syntax and meaning
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
What is redefines clause in COBOL?
) How do u handle errors in BMS macro
Which is not true about evaluate statement
System Testing for Mainframe Developers What is System Testing? integration testing ? what's the procedure ..
Mention the guidelines to write a structured cobol program?
What are the different rules for performing sort operation?
How to fetch 1000 error records from VSAM file(Eg: 1000000 records present) while getting SOC7 abend ?
Why did you choose to work with ibm mainframe cobol programming?
Which is the default, TEST BEFORE or TEST AFTER for a PERFORM statement?
Hi pls anybody tell me about " ANALYSIS DOCUMENT PREPARATION AND ESTIMATION OF TASK " (in real time project)."I want to update a sequential file in my project" for that purpose i need both structures i mean analysis document and estimation of task.
What is the difference between Call and a Link?
EXPLAIN MAIN FRAME TESTING PROCESS...HOW TO FIX THE MAINFRAME BUGS?