IBM Mainframe Forum

I have a following file with Structure
SalesMan_Id CHAR(5)
SEQ_NUM ZD (3)
Sales_Amount Decimal(9,2)


I need to load this data to Sales Table which has structure
SalesMan_Id CHAR(5)
SEQ_NUM Integer(4)
Sales_Amount Decimal(9,2)

In order to get the seq_num I unload SalesMan_ID and Max Seq_num for that SalesMan


But this Max Seq Num is unloaded in Binary Format

Before Load I need to join this unloaded data with SalesFile shown above and add Max Seq Num to Seq Num to


How Can I convert Binary to ZD so that using ADD in Outrec I can add the SEQ_NUM .

I'm not sure I follow your entire process, but if all you are asking is how to convert a BI field to ZD, then you can code the following INREC statement:

Just be aware that your output field is now going to be 8 bytes long.

If this is not what you are looking for, then please provide us with sample input and output records with HEX turned on, so that we can better assist you.