Maybe something like?

PACK wk1,parmfld+1
PACK wk2,wk1
UNPK outfld+1,wk2

On 7/23/07, Phil Kingston <[EMAIL PROTECTED]> wrote:
Hi all,

Does anyone have a quick assembler routine to convert a hexadecimal
number represented in EBCDIC into the real hex number?


Phil.





No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.5.476 / Virus Database: 269.10.14/912 - Release Date:
22/07/2007 19:02

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to