Re: RPGII help

[michaelr_41@xxxxxxxxxxxxxx]

How about BITON/BITOF?

On Thu, 17 Jun 2004 09:16:37 -0400, "Gary Godbey"
<ggodbey@xxxxxxxxxxxxxxxx> said:
> 
> I have a friend of mine who is consulting with a company that still uses
> RPGII programs running in S/36 mode on their AS/400.
> 
> He needs to modify some print programs to send hex printer control codes
> for controlling a receipt printer.
> 
> Its been way too long for me - memory's not what it used to be <grin>.
> 
> He's trying to do the equivalent to:
> D UndLinOn        c                   x'03031B2D01' 
> D UndLinOff       c                   x'03031B2D00' 
> D CutPaper        c                   x'03031D5601' 
> 
> Can anyone remember how to create hex literals in RPGII?
> 
> Thanks,
> 
> Gary Godbey
> MIS Manager
> MGM Transport Corp.
> (336) 812-8213  (336) 889-9038 (fax)
>  Please visit our website: www.mgmtransport.com
> 
> 
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
> 
-- 
  
  michaelr_41@xxxxxxxxxxxxxx