× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



I still have "new" ones. I called IBM back in like 1980 and asked for some.
They asked "How many" since we had 8 or so programmers, I said, "how about
10".
A week late, 10 packs of 10 showed up! I gave out the 8 and a few since
then. The rest I think may still be in storage along with the master copies
of Q38, a printer spacing chart, the old Helix steel RPG ruler, and some
coding sheets. 

-Bob Cozzi
www.RPGxTools.com
RPG xTools - Enjoy programming again.


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Jerry Adams
Sent: Wednesday, January 11, 2006 3:09 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: Built-in function %char

Heck, Booth, I've still got the IBM Debugging Template (GX21-9129-9)  
from either my S/3 or S/34 days. 


Not actually much good for debugging any more since it's set for 10cpi 
and printers around here all do proportional.  But it does have the edit 
codes.


And I've even got printer layout charts and screen design charts.  
Apparently I never throw anything away.


        * Jerry C. Adams
*iSeries Programmer/Analyst
B&W Wholesale Distributors, Inc.* *
voice
        615.893.8633x152
fax
        615.995.1201
email
        jerry@xxxxxxxxxxxxxxx <mailto:jerry@xxxxxxxxxxxxxxx>



Booth Martin wrote:

>Don, the edit codes are on the top right corner of the RPG 'O' spec 
>coding sheets.  I cut the little graph off a sheet and taped it to my 
>monitor. (its still there, from 1993.)
>
>You do have coding sheets, right?
>
>
>
>Fisher, Don wrote:
>  
>
>>Had this problem myself some time ago.  Use %EDITC(NumericField:'X').
>>
>>Now go to the RPG or DDS reference manual and find where edit code X is
>>described. 
>>
>>When you find it, please tell me where it is. :)
>>
>>Donald R. Fisher, III
>>Project Manager
>>Roomstore Furniture Company
>>(804) 784-7600 extension 2124
>>DFisher@xxxxxxxxxxxxx
>>
>>
>><clip>
>>Is there a way to keep %char from removing leading zeros?
>><clip>
>>    
>>
>
>  
>


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.