TRMLDGBLK       TRIM LEADING BLANKS                    TAACLPU

 The Trim  Leading Blanks command  trims off the  leading blanks from  a
 CL  program variable and  returns the left  adjusted value in  the same
 variable.

 Similar commands are RMVCHAR and TRIM.

 The variable must be declared as 512 bytes.

 The command would be coded as:

                DCL         &VAR *CHAR LEN(512)
                 .
                TRMLDGBLK   VAR(&VAR)

 For  example, if the variable contained '  ABCDE ' it would be returned
 as 'ABCDE '

 It is  not considered  an error to  pass a  value that  has no  leading
 blanks.   If an all blank value  is passed, an escape  message is sent.

 Command parameters                                    *CMD
 ------------------

    VAR           The  variable to be  trimmed.  It must  be declared as
                  *CHAR LEN(512).

 Restrictions
 ------------

 The command can only be entered in a CL program.

 Prerequisites
 -------------

 The following TAA Tools must be on your system:

          SNDESCMSG     Send escape message

 Implementation
 --------------

 None, the tool is ready to use.

 Objects used by the tool
 ------------------------

    Object        Type        Attribute      Src member    Src file
    ------        ----        ---------      ----------    ----------

    TRMLDGBLK     *CMD                       TAACLPU       QATTCMD
    TAACLPU       *PGM           CLP         TAACLPUC      QATTCL

Added to TAA Productivity Tools April 1, 1995


Home Page

Powered by AS/400Powered by AS/400 Last modified on July 15, 2010 © 1995, 2010 - Jim Sloan, Inc.