DM 'CLE LOG; CLE OUT'; ************************************************************************** October 27, 2005 THIS IS AN EXAMPLE OF A SAS PROGRAM THAT CREATES A SAS FILE FROM THE NHIS 1995 OUTCOMEX.DAT ASCII FILE. NOTE: THE FORMAT DEFINITIONS GIVEN BELOW WILL RESULT IN PROCEDURE OUTPUT SHOWING VALUES THAT HAVE BEEN GROUPED AS THEY ARE SHOWN IN THE FILE LAYOUT DOCUMENTATION. THIS IS STORED IN OUTCOMEX.SAS *************************************************************************; * USER NOTE: PLACE NEXT TWO STATEMENTS IN SUBSEQUENT PROGRAMS; LIBNAME NHIS 'C:\NHIS1995\'; LIBNAME LIBRARY 'C:\NHIS1995\'; FILENAME ASCIIDAT 'C:\NHIS1995\OUTCOMEX.DAT'; * DEFINE VARIABLE VALUES FOR REPORT; PROC FORMAT LIBRARY=LIBRARY; VALUE OCM01X 61 = "Disability Outcome" ; VALUE OCM02X 95 = "1995" ; VALUE $OCM03X ; VALUE OCM04X 01 = "Interview" 02 = "SP deceased" 03 = "SP not eligible" 04 = "SP temporarily absent" 05 = "Unable to contact/locate SP" 06 = "SP moved/not located" 07 = "Institutionalized/incapable- no proxy" 08 = "Refusal" 09 = "Unknown" 10 = "Interview" 11 = "SC deceased" 12 = "Respondent temporarily absent- no proxy" 13 = "Unable to contact/locate SC" 14 = "Respondent and SC moved/not located" 15 = "Respondent Institutionalized/ incapable- no proxy" 16 = "SC institutionalized- no proxy" 17 = "Refusal" 18 = "Other or unknown" . = "Not eligible for phase 2; eligible for SOA or Polio" ; DATA NHIS.OUTCOMEX; * CREATE A SAS DATA SET STORED IN DIR 'C:\NHIS1995\'; INFILE ASCIIDAT MISSOVER TRUNCOVER LRECL=18; * DEFINE LENGTH OF NUMERIC VARIABLES; LENGTH RECTYPE 3 YEAR 3 OC_17 3 ; * INPUT ALL VARIABLES; INPUT RECTYPE 1 - 2 YEAR 3 - 4 OC_5 $ 5 - 16 OC_17 17 - 18 ; * DEFINE VARIABLE LABELS; LABEL RECTYPE = "RECORD TYPE" YEAR = "PROCESSING YEAR" OC_5 = "PERSON IDENTIFICATION NUMBER" OC_17 = "OUTCOME CODE" ; * ASSOCIATE VARIABLES WITH FORMAT VALUES; FORMAT RECTYPE OCM01X. YEAR OCM02X. OC_5 $OCM03X. OC_17 OCM04X. ; PROC CONTENTS DATA=NHIS.OUTCOMEX; PROC FREQ DATA=NHIS.OUTCOMEX; TITLE1 'FREQUENCY REPORT FOR 1995 NHIS OUTCOME 1995 FILE'; TITLE2 '(UNWEIGHTED)'; TABLES RECTYPE/LIST MISSING; * USER NOTE: TO SEE UNFORMATTED VALUES IN PROCEDURES, ADD THE STATEMENT: FORMAT _ALL_; RUN;