%ATRIM
Return an alpha stripped of trailing blanks
|
WSupported on Windows
|
USupported on Unix
|
VSupported on OpenVMS
|
NSupported in Synergy .NET
|
alpha = %ATRIM(expression)
Return value
alpha
An alpha stripped of its trailing blanks. If expression is null or only contains blanks, the return value is an alpha whose length is 0 bytes. (a)
Arguments
expression
The alpha expression whose blanks will be stripped. (a)
Discussion
On Windows, you can use %ATRIMTOSTRING to perform the same function as %ATRIM but with less overhead when creating a string.
Examples
The example below displays the data in the fields name and comp without any trailing blanks.
subroutine show_rec
record custmast
id ,d5
name ,a50
comp ,a50
proc
writes(TTCHN, "Name: " + %atrim(name))
writes(TTCHN, "Company: " + %atrim(comp))
xreturn
endsubroutine
