TR A -> x'FA' etc, PACK hex characters into bytes (extra byte to discard sign).
UNPK bytes into hex characters (extra byte to discard sign), TR x'FA' -> A etc. On Tue, Jun 13, 2023 at 2:16 PM Ituriel do Neto <000003427ec2837d-dmarc-requ...@listserv.ua.edu> wrote: > > Hi, > > Sorry, i was not clear. > I mean in assembler, not Rexx or any other language. > > > Best Regards > > Ituriel do Nascimento Neto > z/OS System Programmer > > > > > > > Em terça-feira, 13 de junho de 2023 às 16:10:46 BRT, Radoslaw Skorupka > <00000471ebeac275-dmarc-requ...@listserv.ua.edu> escreveu: > > > > > > W dniu 13.06.2023 o 21:05, Ituriel do Neto pisze: > > Hi all, > > > > I don't want to reinvent the wheel, so I would be grateful for your advice. > > I need to convert C'123AB' to X'0123AB' > > > > Any ideas? > > Did you check REXX functions like X2C and C2X? > > -- > Radoslaw Skorupka > Lodz, Poland > > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
