|
but that' the problem the editor is not allowing this *place in there.
--- On Tue, 5/27/08, Booth Martin <booth@xxxxxxxxxxxx> wrote:
From: Booth Martin <booth@xxxxxxxxxxxx>
Subject: Re: *PLACE
To: "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
Date: Tuesday, May 27, 2008, 5:26 PM
Man, the formatting sux!
Those two *Place statements will print what ever ends at position 21 in ending positions 42 and 64.
To duplicate it I believe you'd want this:
A 62N63 21'-REPAIR-REPAIR-REPAIR'
A 65N63 21'-NO PROOF OF PURCHASE'
A 62N63 42'-REPAIR-REPAIR-REPAIR'
A 65N63 42'-NO PROOF OF PURCHASE'
A 62N63 64'-REPAIR-REPAIR-REPAIR'
A 65N63 64'-NO PROOF OF PURCHASE'
A*N63 *PLACE 42
A*N63 *PLACE 64
Adam West wrote:
> Mike, sorry about that., I commented them out to get a compile. these 2
lines are followed by 2 consecutive places*
>
&nbsp;62N63&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
21'-REPAIR-REPAIR-REPAIR'&nbsp;&nbsp; >
&nbsp;65N63&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
21'-NO PROOF OF PURCHASE'&nbsp;&nbsp; >
------------------------------------------------------------------------
No virus found in this incoming message.
Checked by AVG. Version: 8.0.100 / Virus Database: 269.24.1/1469 - Release Date: 5/27/2008 1:25 PM
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.