RE: Please help with arrays -- RPG400-L

× 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.

Subject: RE: Please help with arrays
From: "Nj�l Fisketj�n" <n.f@xxxxxxx>
Date: Tue, 2 Oct 2001 20:47:45 +0200
Importance: Normal
List-Archive: <http://archive.midrange.com/rpg400-l/>
List-Help: <mailto:rpg400-l-request@midrange.com?subject=help>
List-Id: RPG programming on the AS400 / iSeries <rpg400-l.midrange.com>
List-Post: <mailto:rpg400-l@midrange.com>
List-Subscribe: <http://lists.midrange.com/cgi-bin/listinfo/rpg400-l>,<mailto:rpg400-l-request@midrange.com?subject=subscribe>
List-Unsubscribe: <http://lists.midrange.com/cgi-bin/listinfo/rpg400-l>,<mailto:rpg400-l-request@midrange.com?subject=unsubscribe>

DB_Caloway Caloway wrote:

> I am trying to use a program that was writen by someone. I would like to
> insert "-". E.g 111111111 would like to see 111-111-111. I run the prgram
> but I get 111-111111. Can you please take a look at the code and
> let me know
> what I am missing. Thanks in advance.
>

I think I'd use

S1 + '-' + S3 + '-' + S5

or

use %editw on a 9-digit numeric SSNO

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.