I have a PS file and I would like to manually insert the
binary values (like a COMP format) into the file. How can i
do that? the way do in COMP-3 format.. suppose i want to
insert -12345 in to file in comp-3 format. simply we can
open a file in edit mode and do HEX-ON and insert the
value .
SEE BELOW--
135
24D
in 3 bytes - this will be COMP-3 presenatation of -12345.
Answer Posted / harsha
Create a layout(copybook) of your PS file. This layout
will have fields defined in COMP-3/COMP format etc...
Open the file in EDIT mode in File Manager/File Aid and
start inserting records.
Suppose first field on your PS file is defined as S9(5)COMP-
3. Now open the file in File Manager/File Aid, and insert
appropriate value. e.g. -12345. Save and close file.
Now open the file again in CHAR MOD(i.e. simply browse the
file) and put HEX ON, you will see the value below.
135
24D
It will occupy only three byte.
| Is This Answer Correct ? | 2 Yes | 0 No |
Post New Answer View All Answers
What is the problem of ordered sequential files access?
how to access the file from prodution from changeman tool and to submit a file to production
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 SORTWRK2 SORTWRK3 SORTWRK4. 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 is the difference between AID and HANDLE AID?
Which division and paragraphs are mandatory for a COBOL program?
What is amode(24), amode(31), rmode(24) and rmode(any) (applicable to only mvsesa enterprise server) ?
Is it possible that the redefines clause has different picture clauses compared to the one it redefined?
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
In COBOL programming, what is PERFORM? What is VARYING?
How did the release of cobol/370 version 1.3 improve the performance of release 1.1?
How to remove 2 duplicate records and copy only one using job control language?
how we sort two input files based on a common column and giving one o/p file please send me the coding logic?
How do u write test cases?
HOw can I get the negative sign while deduct high value from low value
Write a cobol program making use of the redefine clause.