To set field DEPT to positions 1–20 of address line 2, enter the following:
/DEFINE DEPT CHAR(20) /SET DEPT = A2
Similarly, if DEPT was in columns 21–40 of address line 2, you would extract this information as follows:
/DEFINE DEPT CHAR(20) /SET DEPT = SUBSTR(A2,21,20)
|
Copyright © 2013 CA.
All rights reserved.
|
|