What is the COBOL USAGE? If COMPUTATIONAL then I believe you will see what in assembler would be equivalent to H'241' = x'00F1'.
If COMPUTATIONAL-3 -- think you will see the equivalent of assembler P'241' = X'241C'. (That last C might be an F which does not make much difference.) Don't think you need a translate of any sort. What do you need to DO with the data in assembler? Arithmetic? Assume you know how to deal with binary and packed arithmetic? How to convert a PL2 to binary? Charles -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Scott Ford Sent: Wednesday, September 17, 2014 10:59 AM To: [email protected] Subject: Data Conversion Guys/Gals: I have a fundamental question to ask. We have a Cobol routine passing a set of parms ..one of the parms is a number PIC 999. The called program is in HLASM and receives the parms and we have WORKAREA dsect setup and address it with a using. My issue is I must convert this PIC 999 field to a DC x’00’ field in Assembler. Is my assumption correct that at I have to translate the PIC 999 with a TROT or TR with a hex table to build the DC x’00’ field ? If I am passing 241 , the hex value I am expecting is x’F1’. I must be able to convert a range from 128-255 … I appreciate any help …I want to just make sure my thinking is correct. Regards, Scott www.identityforge.com ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
