NOTE: PROCEDURE PRINTTO used (Total process time): real time 0.00 seconds cpu time 0.00 seconds SYMBOLGEN: Macro variable DASH resolves to 2540-96 SYMBOLGEN: Macro variable YEAR resolves to 2012 MPRINT(LOOP): proc printto print="/homes/data/hcris/snf/2540-96/read_snf_rpt2012.lst" new; SYMBOLGEN: Macro variable FILEPATH resolves to /homes/data/hcris/2540-96/snf_&year._RPT.CSV SYMBOLGEN: Macro variable YEAR resolves to 2012 MPRINT(LOOP): FILENAME datafile "/homes/data/hcris/2540-96/snf_2012_RPT.CSV"; MPRINT(LOOP): * The following line should contain the name of the SAS dataset ; MLOGIC(LOOP): %LET (variable name is DATASET) SYMBOLGEN: Macro variable UNDERSCORE resolves to 2540_96 SYMBOLGEN: Macro variable YEAR resolves to 2012 SYMBOLGEN: Macro variable DATASET resolves to library.snf_rpt2540_96_2012 NOTE: PROCEDURE PRINTTO used (Total process time): real time 0.00 seconds cpu time 0.00 seconds MPRINT(LOOP): data library.snf_rpt2540_96_2012; MPRINT(LOOP): *hosp_dm.* files report lengths; MPRINT(LOOP): *Using a length of 4 bytes retains 6 significant digits; MPRINT(LOOP): *Largest integer represented exactly is 2,097,152; MPRINT(LOOP): *Maximum values apply to 2002-09-30 data file; MPRINT(LOOP): *max date is around 16000, do length of 4 should be fine for dates; MPRINT(LOOP): *Variable Maximum --------- ------- RPT_REC_NUM 64331 Primary Key / Unique ID PRVDR_CTRL_TYPE_CD "13" PRVDR_NUM "660001" RPT_STUS_CD "4" INITL_RPT_SW "Y" LAST_RPT_SW "Y" TRNSMTL_NUM "8" FI_NUM "77002" ADR_VNDR_CD "4" UTIL_CD "F" SPEC_IND "Y" ; MPRINT(LOOP): LENGTH rpt_rec_num 5 prvdr_ctrl_type_cd 3 prvdr_num $7 rpt_stus_cd 3 initl_rpt_sw $1 last_rpt_sw $1 trnsmtl_num $1 fi_num $5 adr_vndr_cd 3 util_cd $1 spec_ind $1 default = 4; MPRINT(LOOP): * '2C' is hexadecimal for decimal 44 which represents ',' ; MPRINT(LOOP): * '0D' is hexadecimal for decimal 13 which represents '\r', which is the carriage return character; MPRINT(LOOP): infile datafile dsd delimiter='2C0D'x ; MPRINT(LOOP): ** the ":" is a format modifier that reads data values that need additional instructions from an informat; MPRINT(LOOP): INPUT rpt_rec_num prvdr_ctrl_type_cd prvdr_num $ npi $ rpt_stus_cd fy_bgn_dt : mmddyy10. fy_end_dt : mmddyy10. proc_dt : mmddyy10. initl_rpt_sw $ last_rpt_sw $ trnsmtl_num $ fi_num $ adr_vndr_cd fi_creat_dt : mmddyy10. util_cd $ npr_dt : mmddyy10. spec_ind $ fi_rcpt_dt : mmddyy10. ; MPRINT(LOOP): LABEL rpt_rec_num= "Report Record Number" prvdr_ctrl_type_cd = "Provider Control Type Code" prvdr_num = "Provider Number" npi= "National Provider Identifier" rpt_stus_cd= "Report Status Code" fy_bgn_dt= "Fiscal Year Begin Date" fy_end_dt= "Fiscal Year End Date" proc_dt = "HCRIS Process Date" initl_rpt_sw= "Initial Report Switch" last_rpt_sw= "Last Report Switch" trnsmtl_num= "Transmittal Number" fi_num = "Fiscal Intermediary Number" adr_vndr_cd= "Automated Desk Review Vendor Code" fi_creat_dt= "Fiscal Intermediary Create Date" util_cd = "Utilization Code" npr_dt = "Notice of Program Reimbursement Date" spec_ind= "Special Indicator" fi_rcpt_dt= "Fiscal Intermediary Receipt Date" ; MPRINT(LOOP): FORMAT fy_bgn_dt MMDDYYS10. fy_end_dt MMDDYYS10. proc_dt MMDDYYS10. fi_creat_dt MMDDYYS10. npr_dt MMDDYYS10. fi_rcpt_dt MMDDYYS10. ; NOTE: Data file LIBRARY.SNF_RPT2540_96_2012.DATA is in a format that is native to another host, or the file encoding does not match the session encoding. Cross Environment Data Access will be used, which might require additional CPU resources and might 48 The SAS System 12:40 Wednesday, October 24, 2018 reduce performance. NOTE: The infile DATAFILE is: Filename=/homes/data/hcris/2540-96/snf_2012_RPT.CSV, Owner Name=jroth,Group Name=aging, Access Permission=-rw-r--r--, Last Modified=18Oct2016:03:06:22, File Size (bytes)=103 NOTE: 1 record was read from the infile DATAFILE. The minimum record length was 101. The maximum record length was 101. NOTE: The data set LIBRARY.SNF_RPT2540_96_2012 has 1 observations and 18 variables. NOTE: DATA statement used (Total process time): real time 0.02 seconds cpu time 0.01 seconds SYMBOLGEN: Macro variable DATASET resolves to library.snf_rpt2540_96_2012 MPRINT(LOOP): proc sort data=library.snf_rpt2540_96_2012; NOTE: Data file LIBRARY.SNF_RPT2540_96_2012.DATA is in a format that is native to another host, or the file encoding does not match the session encoding. Cross Environment Data Access will be used, which might require additional CPU resources and might reduce performance. MPRINT(LOOP): by rpt_rec_num; NOTE: Data file LIBRARY.SNF_RPT2540_96_2012.DATA is in a format that is native to another host, or the file encoding does not match the session encoding. Cross Environment Data Access will be used, which might require additional CPU resources and might reduce performance. NOTE: There were 1 observations read from the data set LIBRARY.SNF_RPT2540_96_2012. NOTE: The data set LIBRARY.SNF_RPT2540_96_2012 has 1 observations and 18 variables. NOTE: PROCEDURE SORT used (Total process time): real time 0.01 seconds cpu time 0.00 seconds SYMBOLGEN: Macro variable DATASET resolves to library.snf_rpt2540_96_2012 NOTE: Data file LIBRARY.SNF_RPT2540_96_2012.DATA is in a format that is native to another host, or the file encoding does not match the session encoding. Cross Environment Data Access will be used, which might require additional CPU resources and might reduce performance. MPRINT(LOOP): proc means DATA=library.snf_rpt2540_96_2012 max n; MPRINT(LOOP): title "Inspect maximums: Using a length of 4 bytes (default) retains 6 significant digits" ; NOTE: There were 1 observations read from the data set LIBRARY.SNF_RPT2540_96_2012. NOTE: The PROCEDURE MEANS printed page 135. NOTE: PROCEDURE MEANS used (Total process time): real time 0.00 seconds cpu time 0.01 seconds SYMBOLGEN: Macro variable DATASET resolves to library.snf_rpt2540_96_2012 MPRINT(LOOP): proc freq DATA=library.snf_rpt2540_96_2012 ; NOTE: Data file LIBRARY.SNF_RPT2540_96_2012.DATA is in a format that is native to another host, or the file encoding does not match the session encoding. Cross Environment Data Access will be used, which might require additional CPU resources and might reduce performance. MPRINT(LOOP): title "" ; MPRINT(LOOP): tables prvdr_ctrl_type_cd rpt_stus_cd initl_rpt_sw last_rpt_sw trnsmtl_num fi_num adr_vndr_cd util_cd spec_ind ; MPRINT(LOOP): FORMAT prvdr_ctrl_type_cd prvdr_ctrl_type_cd. rpt_stus_cd rpt_stus_cd. initl_rpt_sw $initl_rpt_sw. last_rpt_sw $last_rpt_sw. adr_vndr_cd adr_vndr_cd. util_cd $util_cd. ; NOTE: There were 1 observations read from the data set LIBRARY.SNF_RPT2540_96_2012. NOTE: The PROCEDURE FREQ printed pages 136-137. 49 The SAS System 12:40 Wednesday, October 24, 2018 NOTE: PROCEDURE FREQ used (Total process time): real time 0.00 seconds cpu time 0.01 seconds SYMBOLGEN: Macro variable DATASET resolves to library.snf_rpt2540_96_2012 MPRINT(LOOP): proc print DATA=library.snf_rpt2540_96_2012 (obs=6); NOTE: Data file LIBRARY.SNF_RPT2540_96_2012.DATA is in a format that is native to another host, or the file encoding does not match the session encoding. Cross Environment Data Access will be used, which might require additional CPU resources and might reduce performance. NOTE: There were 1 observations read from the data set LIBRARY.SNF_RPT2540_96_2012. NOTE: The PROCEDURE PRINT printed page 138. NOTE: PROCEDURE PRINT used (Total process time): real time 0.00 seconds cpu time 0.00 seconds SYMBOLGEN: Macro variable DATASET resolves to library.snf_rpt2540_96_2012 MPRINT(LOOP): proc contents DATA=library.snf_rpt2540_96_2012; NOTE: Data file LIBRARY.SNF_RPT2540_96_2012.DATA is in a format that is native to another host, or the file encoding does not match the session encoding. Cross Environment Data Access will be used, which might require additional CPU resources and might reduce performance. MLOGIC(LOOP): %DO loop index variable YEAR is now 2013; loop will not iterate again. MLOGIC(LOOP): Ending execution. 186 /* 187 Copyright 2007 shared by Jean Roth and the National Bureau of Economic Research 188 189 National Bureau of Economic Research. 190 1050 Massachusetts Avenue 191 Cambridge, MA 02138 192 jroth@nber.org 193 194 This program and all programs referenced in it are free software. You 195 can redistribute the program or modify it under the terms of the GNU 196 General Public License as published by the Free Software Foundation; 197 either version 2 of the License, or (at your option) any later version. 198 199 This program is distributed in the hope that it will be useful, 200 but WITHOUT ANY WARRANTY; without even the implied warranty of 201 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 202 GNU General Public License for more details. 203 204 You should have received a copy of the GNU General Public License 205 along with this program; if not, write to the Free Software 206 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 207 USA. 208 */ NOTE: The PROCEDURE CONTENTS printed pages 139-140. NOTE: PROCEDURE CONTENTS used (Total process time): real time 0.00 seconds cpu time 0.00 seconds