01 A PIC X(3) VALUE 'ABC'
01 B PIC 9(3).
MOVE A TO B.
OUTPUT IS: AB3
WHY AND HOW THIS IS HAPPENING.
How to find out the closest prime number of an input number?
I believe it has something to do with SEARCH and COBOL
if we display var1 then what will b displayed in below
77 var1 pic s9(2) value -10.
77 var1 pic s9(2) value -11.
" " " -12.
" " " -13.
have in 100 records in a file i want to read first 3 records
and skip next 3 records and agan i want to read 3 records and
again i want to skip 3 records...
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?
which certifications r 4 cobol,jcl,db2,cics
what is format of xam n what is importance of these
plz post answer only if u r sure...
What are the pertinent COBOL
Our issue is there seems to be a disconnect, or no link,
between our SELECT statement and our SD. We had
SELECT SORT-FILE and SELECT SORT-FILE
ASSIGN TO SORTWRK. ASSIGN TO SORTWRK1
with SD SORT_FILE
RECORD CONTAINS 7833 CHARACTERS.
In either case, at run time, the system ignored our
SORTWRK# DD statements and allocated 16 sort works with the
SORTWK## naming convention. Any ideas why the system does
not recognize the connection? We do not even need the
SORTWRK DD statements. Thanks
What are the pertinent COBOL commands?
write a program to eliminate duplicate records in a input file
and send them to output file.
input= ,,,, mainframe training ,,, hyderabad ....
output1=$ mainframe training in hyderabad location$
output2=**** mainframe training in hyderabad location ****.
In this pgn when we give input considering the spaces the
output is displayed in this format.Like in the place of ,,,,
$ should be displayed likewise.So please helpmeout.
what are the working storage fields in BMS macro?
how we sort two input files based on a common column and
giving one o/p file please send me the coding logic?
HOw can I get the negative sign while deduct high value from
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?