[Date Prev][Date Next][Thread Prev][Thread Next]
[Author Index]
[Date Index]
[Thread Index]
[SQR-USERS Info]
[SQRUG Home Page]
SQR Version 2.5.7 on DEC AXP Platform
My organization just moved from a DEC VAX to a DEC AXP platform. I've just
discovered that while the LTRIM function works as before, the RTRIM function
does NOT!
The following is a test of some code that is used to see if a character string
is a potential social security number (contains all numbers). On the VAX the
LTRIM and RTRIM lines would both be blank. On the AXP the results are
different.
Has anyone else esperienced this?
Ed Forman
SUNY College at Oneonta
FORMANEL@ONEONTA.EDU
Test Results:
[FORMANEL]>ty test.sqr
! Program to test editing in MOVEs
begin-report
do test_it
end-report
begin-procedure test_it
let $str1 = '123456789'
let $str2 = ltrim($str1,'0123456789')
let $str3 = rtrim($str1,'0123456789')
let $msg1 = 'Original String: ' || $str1
let $msg2 = 'LTRIMed String: ' || $str2
let $msg3 = 'RTRIMed String: ' || $str3 <==== Should result in a null string
display $msg1
display $msg2
display $msg3
end-procedure
[FORMANEL]>sqr test -xl a/b
SQR: Structured Query Report Writer V2.5.7
Copyright (C) MITI, 1994. All Worldwide Rights Reserved.
Original String: 123456789
LTRIMed String:
RTRIMed String: 123456789 <==== But doesn't
SQR: End of Run.