개인자료에서 사회보장급여는 개인이 받고 있는 급여의 개수에 따라 급여종류 1에서 급여종류 5까지 나열되어 있다. 따라서 특정 사회보장급여를 수급하고 있는 케이스를 추출할 경우에는 나열되어 있는 변수 모두를 고려하여 추출할 필요가 있다. 

예를 들어 7차년도 개인자료를 활용하여 기초연금(부부)을 수급 받고 있는 개인을 추출할 경우, 프로그램은 다음과 같이 구성된다.

/* sas array문의 활용*/

data a; set k.kreisp07;

keep pid w07psvy p07g036 p07g039 p07g042 p07g045 p07g048 base;

where w07psvy=1; /*7차에 응답한 개인들만 추출*/

array a[5] p07g036 p07g039 p07g042 p07g045 p07g048; /*사회보장급여종류 1-5 정렬*/

do i=1 to 5;

if a[i]=162 then base=162; /*기초연금(부부) 수급자를 추출*/

end;

run;

/* spss repeat문의 활용*/

get file='D:\KReIS\SPSS\kreisp07.sav'.

select if (w07psvy = 1). /*7차에 응답한 개인들만 추출*/

exe.

do repeat

g=p07g036 p07g039 p07g042 p07g045 p07g048. /*사회보장급여종류 1-5 정렬*/

if (g=162) p07g=g. /*기초연금(부부) 수급자를 추출*/

end repeat.

exe.

/* stata foreach문의 활용*/

clear

set mem 300m

use "D:\KReIS\STATA\kreisp07.dta", clear

keep if w07psvy==1 /*7차에 응답한 개인들만 추출*/

gen base=.

keep pid w07psvy p07g036 p07g039 p07g042 p07g045 p07g048 base

local k=1 /*사회보장급여종류 1-5 정렬*/

foreach g of varlist p07g036-p07g048 {

rename `g' g`k'

local ++k

}

foreach n of num 1/5 {

replace base=g`n' if g`n'==162

} /*기초연금(부부) 수급자를 추출*/

save "D:\KReIS\STATA\a.dta", replace