/*------------------------------------------------------------------------------------*/ /*by Jean Roth Mon Jun 7 18:36:02 EDT 2004 This program reads the 1992 SIPP Revised Job ID Data File NOTE: This program is distributed under the GNU GPL. See end of this file and http://www.gnu.org/licenses/ for details. Please report errors to jroth@nber.org Six steps: (1) Uncomment the 'options compress=yes' statement if desired to save space (2) Uncomment 'LENGTH' statement if desired to save space (3) Specify output directories in 'libname' statements (4) Specify the input file name/location in the 'filename' statement (5) On a PC, use backslashes as in C:\ (6) Read in the compressed or uncompressed raw data file. See the 'filename' and 'INFILE' statements. Other changes may be user and platform specific. NOTE: A value of -1 (or -1/# of implied decimals) indicates 'Not in Universe' */ /*------------------------------------------------------------------------------------*/ *options obs=100; *options compress=yes; *Choose compress=yes to save space ; *Choose compress=no if converting to another package using transfer software ; *options pagesize=59 linesize=72; /*------------------------------------------------------------------------------------*/ libname library './'; *See the codebook for more detail; PROC FORMAT cntlout=library.fsp92jid; /* The PROC FORMAT statement will store the formats in a sas data set called fsip92jid To use the stored formats in a subsequent program, include something like this: proc format cntlin=library.fsp92jid; PROC freq; tables pesex ; format pesex P135L.; For more information, consult the SAS Procedures Guide section of PROC FORMAT */ ; VALUE FLAG_JOBID_CHAN (default=32) 0 = "No revisions made to this jobid in thi" /* s wave and jobid=jobid_revised */ 1 = "Revisions made to this jobid in this w" /* ave and jobid ~= jobid_revised */ ; filename raw pipe "unzip -p /homes/data/sipp/1992/sipp92jid.zip "; data library.sip92jid; missing A; infile raw lrecl = 20000 missover ; * To read in uncompressed file, uncomment INFILE & comment filename & infile lines; * On a PC, you may need to change the direction of the slashes as in C:\; *INFILE '/homes/data/sipp/1992/sipp92jid.dat' LRECL=20000 PAD END=EOF; *LENGTH SUID $9 ENTRY $2 PANEL 4 DEFAULT=3; /*-------------------------------------------------------------------------------------*/ /* The following changes in variable names have been made, if necessary: '$' to 'd'; '-' to '_'; '%' to 'p'; Note: Variable names in SAS are not case-sensitive */ /*-------------------------------------------------------------------------------------*/ INPUT @1 SUID $9. @10 ENTRY $2. @12 PNUM $3. @15 PANEL 4. @19 WAVE 2. @21 JOBID 2. @23 JOBID_REVISED 2. @25 FLAG_JOBID_CHAN 1. ; LABEL SUID = "Sample unit identifier" ENTRY = "Edited entry address ID" PNUM = "Edited person number" PANEL = "Sample code - indicates panel year" WAVE = "Control card item 36A - wave number" JOBID = "Originally Released Employer I.D. numb" JOBID_REVISED= "Edited Employer I.D. number" FLAG_JOBID_CHAN= "Indicator for whether a revision was m" ; proc print data=library.sip92jid (obs=6); FORMAT FLAG_JOBID_CHAN FLAG_JOBID_CHAN. ; proc contents data=library.sip92jid; /* Copyright 2004 shared by the National Bureau of Economic Research and Jean Roth National Bureau of Economic Research. 1050 Massachusetts Avenue Cambridge, MA 02138 jroth@nber.org This program and all programs referenced in it are free software. You can redistribute the program or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. */