Thanks very much, that's what we needed.

See you on the Java list!

On Thu, Dec 4, 2014 at 5:25 PM, CRPence <CRPbottle@xxxxxxxxx> wrote:

On 04-Dec-2014 15:15 -0600, Hoteltravelfundotcom wrote:

I have one field in a file that is char 8
the data has been entered right justified

Is there a q&d way to left justify this field?

Barely quicker than both of the already suggested TRIM [SQL] and %TRIM
[RPG] builtin functions, is a "left trim" function available in both
languages; LTRIM [SQL] and %TRIML [RPG]. The TRIM functions will look for
and trim any trailing blanks.

update the_file
set the_char8_field = LTRIM(the_char8_field)

The SQL scalar function STRIP can limit the trimming to only blanks; the
LTRIM will trim either blank or hex-zero characters.

update the_file
set the_char8_field = STRIP(the_char8_field, LEADING, ' ')

Regards, Chuck

This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives

This thread ...


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

This mailing list archive is Copyright 1997-2019 by 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].