Re: Centering Text Within A Field -- RPG400-L

FromNews 3X/400's Power Tools for the AS/400-Wolume II (F.Dick & D.Riehl):
C    ' '    CHEKR NAME   X    30
C    35   SUB     X          X
C    ''     CAT      NAME:X      CENTER     P
There is probably a fancier way, but I remember this being in the book.
Kathie

In a message dated 06/28/2001 11:43:58 AM Central Daylight Time,
ralford@richmond.k12.va.us writes:

Subj: Centering Text Within A Field
Date: 06/28/2001 11:43:58 AM Central Daylight Time
From:    ralford@richmond.k12.va.us (Ronald A. Alford)
Sender:    owner-rpg400-l@midrange.com
Reply-to: RPG400-L@midrange.com
To:    RPG400-L@midrange.com

Hello everyone,
I have a field that is 40 characters long and I would like to center any
text that comes into this field. Does anyone know how to do this. I am
trying to use OVERLAY but I get an error when I specify the second
parameter (Start Position) as another field in my program. HELP !!! :-(

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---

----------------------- Headers --------------------------------
Return-Path: <rpg400-l-owner@midrange.com>
Received: from rly-yb03.mx.aol.com (rly-yb03.mail.aol.com [172.18.146.3])
by air-yb03.mail.aol.com (v78_r3.8) with ESMTP; Thu, 28 Jun 2001 12:43:58
-0400
Received: from uucphost.mcs.net (uucp1.mcs.net [192.160.127.93]) by
rly-yb03.mx.aol.com (v79.20) with ESMTP id MAILRELAYINYB32-0628124341; Thu,
28 Jun 2001 12:43:41 -0400
Received: (from uucp@localhost)
   by uucphost.mcs.net (8.11.3/8.11.1) with UUCP id f5SGgrp44574;
   Thu, 28 Jun 2001 11:42:53 -0500 (CDT)
   (envelope-from rpg400-l-owner@midrange.com)
Received: from localhost (mail@localhost)
   by linux.midrange.com (8.11.2/linuxconf) with SMTP id f5SG0CX01870;
   Thu, 28 Jun 2001 11:00:12 -0500
Received: by linux.midrange.com (bulk_mailer v1.13); Thu, 28 Jun 2001
11:00:10 -0500
Received: (from majordom@localhost)
   by linux.midrange.com (8.11.2/linuxconf) id f5SG05C01816
   for rpg400-l-outgoing; Thu, 28 Jun 2001 11:00:05 -0500
Received: (from uucp@localhost)
   by linux.midrange.com (8.11.2/linuxconf) with UUCP id f5SG04U01810
   for RPG400-L@midrange.com; Thu, 28 Jun 2001 11:00:04 -0500
Received: from mother.richmond.k12.va.us (mother.richmond.k12.va.us
[63.74.208.10])
   by uucphost.mcs.net (8.11.3/8.11.1) with ESMTP id f5SFwrc39192
   for <RPG400-L@midrange.com>; Thu, 28 Jun 2001 10:58:53 -0500 (CDT)
   (envelope-from ralford@richmond.k12.va.us)
Received: from richmond.k12.va.us ([63.74.208.189])
         by mother.richmond.k12.va.us (Post.Office MTA v3.5.3 release 223
         ID# 0-69824U4000L400S0V35) with ESMTP id us
         for <RPG400-L@midrange.com>; Thu, 28 Jun 2001 11:55:08 -0400
Message-ID: <3B3B5408.406@richmond.k12.va.us>
Date: Thu, 28 Jun 2001 11:58:00 -0400
From: "Ronald A. Alford" <ralford@richmond.k12.va.us>
Organization: Richmond Public Schools
User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.0; en-US; m18)
Gecko/20010131 Netscape6/6.01
X-Accept-Language: en
MIME-Version: 1.0
To: RPG400-L@midrange.com
Subject: Centering Text Within A Field
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit
Sender: owner-rpg400-l@midrange.com
Reply-To: RPG400-L@midrange.com
X-List-Name: RPG/400 Discussion Mailing List (RPG400-L@midrange.com)