USPVEQUV.SPS
(computes the equivalence scale factor implied by the United States
poverty lines)

Note: User must specifiy the following variables on the keep line:

1) D1
2) D4

ROUTINE:

DO IF D4 EQ 1

COMPUTE USPVEQ = .66

IF (D1 GE 65) USPVEQ = .60

END IF

DO IF D4 EQ 2

COMPUTE USPVEQ = .84

IF (D1 GE 65) USPVEQ = .76

END IF

DO IF D4 GE 7

COMPUTE USPVEQ = 1.86 + (D4 - 7)* .15

IF (USPVEQ GT 2.61) USPVEQ = 2.61

END IF

DO IF D4 GE 3 AND D4 LE 6

DO REPEAT FS = 1.00 1.28 1.52 1.71/X = 3 TO 6

IF (D4 EQ X) USPVEQ = FS

END REPEAT

END IF