Re: Printing from right to left.

["IDNONADA" <idnonada@xxxxxxxx>]

Set the print line up as an array (like Pic x occurs 132 times. etc.) then
load the print characters in from end to beginning by starting your
subscript or index at 132, then vary it by (Minus 1 (-1)) until index or
subscript is less than 1.  A perform varying works well.  You may
investigate the STRING verb.  This will depend upon the Cobol compiler
version you use.
Good luck,  Idno Nada
----- Original Message -----
From: "Joven Loba" <JLoba@almabani.com.sa>
To: <COBOL400-L@midrange.com>
Sent: Monday, August 20, 2001 12:36 PM
Subject: Printing from right to left.


> This is a MIME message. If you are reading this text, you may want to
> consider changing to a mail reader or gateway that understands how to
> properly handle MIME multipart messages.
> --
> [ Picked text/plain from multipart/alternative ]
> Hi,
> Im just new in cobol programming and im working in arabic  printing.
> Please if anybody could help me on how to print my file (arabic) to
instruct the printer to start printing from right to left.
> (please take note that im not using "nafitha " support).
> thanks
> joven
> _______________________________________________
> This is the COBOL Programming on the iSeries/AS400 (COBOL400-L) mailing
list
> To post a message email: COBOL400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/cobol400-l
> or email: COBOL400-L-request@midrange.com
>