1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
* to assign value labels to a vector.
* Source SPSSNet no 100004041.

*VALUE LABELS v1 0 '~' 1 'Error in variable 1'. 
*VALUE LABELS v2 0 '~' 1 'Error in variable 2'. 
*VALUE LABELS v3 0 '~' 1 'Error in variable 3'. 
*VALUE LABELS v50 0 '~' 1 'Error in variable 50'. 

DEFINE vallab (arg1 = !TOKENS(1) 
		/arg2 = !TOKENS(1)). 
!DO !i = !arg1 !TO !arg2. 
VALUE LABELS !CONCAT(v,!i) 0 '~' 1 !CONCAT ('Error in variable ', !i). 
!DOEND. 
!ENDDEFINE. 

vallab arg1 = 1 arg2 = 50.