|
|||||||
QTIPS - UnassignedThere is a system function called UNASSIGNED which if passed the variable to be tested returns a 0 or a 1 depending on whether the variable is assigned or not. Usage is simple - EG 0001 SUBROUTINE TCL.SUB(BRANCH) 0002 DECLARE FUNCTION UNASSIGNED 0003 * 0004 IF UNASSIGNED (BRANCH) THEN 0005 BRANCH = "TCL" 0006 END (Volume 1, Issue 1, Page 2) |
|||||||
| |||||||