if we display var1 then what will b displayed in below
condition.
77 var1 pic s9(2) value -10.
77 var1 pic s9(2) value -11.
" " " -12.
" " " -13.
-14
...
...
-19.
Answers were Sorted based on User's Feedback
Answer / s
It will give Compilation error as the variable is not
uniquely defined
Is This Answer Correct ? | 10 Yes | 0 No |
Answer / piyush mani
u r wrt but if we declare diff var for above values then result will b like
value result
-10 1{
-11 1J
-12 1K
-13 1L
.........
THANKS
Is This Answer Correct ? | 5 Yes | 1 No |
Should I use STOP RUN in the sub program??why?
which is Best IBM Mainframe Training and Placement Institute in Ameerpet Hyderabad
How do define dynamic array in cobol.
what are the paramater we cannot use in procedure?how many instream we can write in single jcl?can we call instream to catalog and ctalog to instream?
1.Is it possible to move the data from 99.99 to 99v99? 2.What is the CICS-vsam Compilation process? 3.In My GDG 5 generation will be there GDG3 got an abend what will happen? 4.In my GDG first generation is +1 And I want to add the new generation what will happen previous generation? 5.How can you give the PIC clause below conditions A). s9 (reddy), B). s9 (5) occurs 5 times? 6.How override the proc from a particular step? and what is symbolic and override Procs?
perform I from 0 by 1 until I=5?How maney times it will executes
i want to use only first 100 records from a file.plz tell me how to write JCL for this(for read,copy,write operations).plz give me details of all posible JCL utilities?
Write some characteristics of cobol as means of business language.
is this below syntax correct? CALL 'subprg' using A,B Please help
What is Static,Dynamic linking ?
I have files that contains both duplicates files(occur more than twice) and non-duplicate files.The file is already sorted by a key.I want to determine those records that are duplicate and will be move to a duplicate file and non- duplicate files to be move to a valid file.thank you.help please
Where the Plan is located in CICS-DB2