Executing Any Command in an EXECUTE Call |
The EXECUTE command executes the statements contained in the arguments by using the same facilities as a sequence of CALL PUSH, PAUSE, and RESUME statements. The statements use the same symbol environment as that of the subroutine that calls them. For example, consider the following subroutine:
proc iml; start exectest; /* IML STATEMENTS */ call execute ("xnum = {1 2 3, 4 5 6, 7 8 0};"); call execute ("create dsnum1 from xnum;"); call execute ("append from xnum;"); call execute ("print 'DSNUM should have 3 obs and 3 var:';"); call execute ("list all;"); /* global (options) statement */ call execute ("options linesize=68;"); call execute ("print 'Linesize should be 68';"); finish; run exectest;
The following output generated from EXECTEST is exactly the same as if you had entered the statements one at a time:
DSNUM should have 3 obs and 3 var: OBS COL1 COL2 COL3 ------ --------- --------- --------- 1 1.0000 2.0000 3.0000 2 4.0000 5.0000 6.0000 3 7.0000 8.0000 0 Linesize should be 68
CALL EXECUTE could almost be programmed in IML as shown here; the difference between this and the built-in command is that the following subroutine would not necessarily have access to the same symbols as the calling environment:
start execute(command1,...); call push(command1,...," resume;"); pause; finish;