IBM Mainframe Forum

HI Every one

As part one my requirmement i need convert the binary data to zoned decimal
i have used below code but i am geeting wrong data in the out put file
could you please help me to sort out issue would be great.

Input file


Out put file

Command ===>

You should have posted the hex representation of Your data

ispf HEX ON is Your friend

Why post in the Forum Rules?
Topic moved.

enrico-sorichetti wrote:You should have posted the hex representation of Your data

ispf HEX ON is Your friend

input




output

That input looks like 2 packed decimal fields not one binary field.

my requirement to convert input data to numeric data.
the values getting into input as defined comp vaues in cobol prog.
even i tried PD to ZD also please below out put

thotlma wrote:input

Select all

=COLS> ----+----1----+----2
 004457  qo"                
        09970144444444444444
        086F0400000000000000
 ----------------------------
 004458  qo"                
        09970144444444444444
        086F0F00000000000000
 ----------------------------
 004459  qo"                
        09970344444444444444
        086F0300000000000000
 ----------------------------
 004460  qo"                
        09970344444444444444
        086F0D00000000000000

1) Your input data do not look like binary (e.g. COMP in COBOL, or BI/FI in SORT).
Rather they do look like packed decimal (e.g. COMP-3 in COBOL, or PD in SORT).

2) From your "files display" it is absolutely not clear how your "files" are related, at all, to your SORT statements example???
Please, present FULL example of your test (simplified as much as possible) to find out the actual processing issues.

The acutual input genarating from Cobol Prog and the fields defined in cobol prog as below
XXXXX PIC S9(9) USAGE COMP
XXXXX PIC S9(4) USAGE COMP
i need to convert the above data to numeric format for other process.
i thought it was binary so i wrote a sort to convert ZD but didnot work
could you please help for this one?

Since it is two separate fields, you have to handle each individually in SORT:Also, if the data set is variable length instead of fixed length, you need to add 4 to each of your locations because of the RDW.

Its working ...Thanks a lot Robert
the data set is fixed length only.
i have some doubts about sort card .why did take length 9 and 5?
never mind if you explain clearly that would be great..