/* Add individual files to zip */
I am trying to resolve dynamically the no of output files to a single zip files.
I am bringing all the file names into XYZ datasets and values are passing in pgm_name variable.
after that I am not able resolved to pass these values to create zip file. Kindly suggest.
data _null_;
set loclib.XYZ;
length pgm_name $100.;
pgm_name=trim(filename) || "." || trim(extension);
ods package(ZipFile) add file = "pgm_name";
run;
Example:
pgm_name: Variable values are resolving below .xls and .pdf files.
report.xls
report.xls
summary.pdf
I want to pass these files name in ods package(ZipFile) add file = "pgm_name";
it is not resolving .
Yes, missing quotes as @Tom has said:
data _null_; set loclib.xyz end=last; if _n_=1 then call execute('ods package(newzip) open'); call execute(cats('ods package(newzip) add file="<path>/',pgm_name,'";')); if last then do;
call execute('ods package(newzip) close;');
call execute('ods package(newzip) publish properties(archive_name="want.zip" archive_path="c:/want");');
end;
run;
You will also need to provide a path to that file as well, replace <path> in the above to where that file is stored.
Also, to come back to the XLS issue, you are not even creating an XLS file, you are creating an XML file (via ods tagsets), don't give files an extension that does not describe the content, that is bad. Call it XML which is what it is, even if Excel can parse it, it is still XML and definately not an XLS file.
If you have them names in a dataset then:
data _null_; set loclib.xyz end=last; if _n_=1 then call execute('ods package(newzip) open'); call execute('ods package(newzip) add file=',pgm_name,';'); if last then do;
call execute('ods package(newzip) close;');
call execute('ods package(newzip) publish properties(archive_name="want.zip" archive_path="c:/want");');
end;
run;
Getting below error messages
call execute('ods package(newzip) add file=',pgm_name,';');
_______
253
ERROR 253-185: The EXECUTE subroutine call has too many arguments.
data _null_; set loclib.xyz end=last; if _n_=1 then call execute('ods package(newzip) open'); call execute(cats('ods package(newzip) add file=',pgm_name,';')); if last then do;
call execute('ods package(newzip) close;');
call execute('ods package(newzip) publish properties(archive_name="want.zip" archive_path="c:/want");');
end;
run;
Earlier before sending error messages, I tried with CATS function. but I am getting some other syntax error messages.
Even now after updating I am getting same error messages.
Is there any cause of file naming convention.
+ ods package(ZipFile) add file=PFPD0248_ND-critical-recred-2018-11-NC-report.xls;
___
22
202
ERROR 22-322: Syntax error, expecting one of the following: ;, ABSTRACT, ARCHIVE_NAME, DESCRIPTION, EXPIRATION, NAMEVALUE,
TEMPLATE.
ERROR 202-322: The option or parameter is not recognized and will be ignored.
NOTE: Line generated by the CALL EXECUTE routine.
3 + ods package(ZipFile) add file=PFPD0248_ND-critical-recred-2018-11-report.xls;
_
22
200
Please do ALWAYS use the {i} button for posting logs. The subwindow preserves the formatting of the log, which is crucial in relating messages to the code.
Please show the code you are running, I cannot tell from little bits.
Also, why are you using .xls file format? That is ancient, binary, really shouldn't be used any longer.
This is the complete code .which is I am trying resolve.
.xls files are already existing code.
data loclib.PFPD0248_filenames_&lob. ;
set loclib.pfpd0248_filenames_&lob.;
length pgm_name $100.;
pgm_name=trim(filename) || "." || trim(extension);
run;
/* ************************************************************************ */
* Put all of the programs into a zip file ;
/* Make sure THIS zip file does not exist - i.e. clear the NEW zip file */
filename dmyfile "loclib.&rptname.-critical-recred-summary_&FILEDATE..zip";
data _null_;
if (fexist('dmyfile')) then
rc=fdelete('dmyfile');
run;
filename dmyfile clear;
/* Open Package */
ods package(ZipFile) open nopf;
data _null_;
set loclib.pfpd0248_filenames_&lob. end=last;
if _n_=1 then call execute('ods package(ZipFile) open;');
call execute(cats('ods package(ZipFile) add file=',pgm_name,';'));
if last then do;
call execute('ods package(ZipFile) close;');
call execute('ods package(ZipFile) publish properties(archive_name="&rptname.-critical-recred-summary_&FILEDATE..zip" archive_path="&rptpath.");');
end;
run;
/* Close the package */
ods package(ZipFile) close;
below mentioned files are I am importing from pgm_name variable.
PFPD0248_ND-critical-recred-2018-11-NC-report.xls
PFPD0248_ND-critical-recred-2018-11-report.xls
PFPD0248_ND-critical-recred-2018-12-NA-report.xls
PFPD0248_ND-critical-recred-2018-12-report.xls
PFPD0248_ND-critical-recred-Missing-NC-report.xls
PFPD0248_ND-critical-recred-Missing-NA-report.xls
PFPD0248_ND-critical-recred-Missing-report.xls
PFPD0248_ND-critical-recred-summary.pdf
You haven't looked a the code then. In the data null there is already a bit to open the package and close it, so to update your code would be:
data loclib.PFPD0248_filenames_&lob. ; set loclib.pfpd0248_filenames_&lob.; length pgm_name $100.; pgm_name=trim(filename) || "." || trim(extension); run; /* ************************************************************************ */ * Put all of the programs into a zip file ; /* Make sure THIS zip file does not exist - i.e. clear the NEW zip file */ filename dmyfile "loclib.&rptname.-critical-recred-summary_&FILEDATE..zip"; data _null_; if (fexist('dmyfile')) then rc=fdelete('dmyfile'); run; filename dmyfile clear; data _null_; set loclib.pfpd0248_filenames_&lob. end=last; if _n_=1 then call execute('ods package(ZipFile) open;'); call execute(cats('ods package(ZipFile) add file=',pgm_name,';')); if last then do; call execute('ods package(ZipFile) close;'); call execute('ods package(ZipFile) publish properties(archive_name="&rptname.-critical-recred-summary_&FILEDATE..zip" archive_path="&rptpath.");'); end; run;
I don't know why it is not working. I am shut.
Getting again syntax error messages. I never work done before. this is my first experience.
Error Messages:
NOTE: Line generated by the CALL EXECUTE routine.
9 + ods package(ZipFile) add file=PFPD0248_ND-critical-recred-summary.pdf;
_
22
200
ERROR 22-322: Syntax error, expecting one of the following: ;, DESCRIPTION, MIMETYPE, PATH, TEXT.
ERROR 200-322: The symbol is not recognized and will be ignored.
10 + ods package(ZipFile) close;
11 + ods package(ZipFile) publish properties(archive_name="PFPD0248_ND-critical-recred-summary_20181129.zip"
archive_path="/n04/data/provinfo/penvtest/fileout/hc3/");
WARNING: ODS Package ID: ZIPFILE does not exist, no action taken.
39
40 GOPTIONS NOACCESSIBLE;
41 %LET _CLIENTTASKLABEL=;
Really can't tell from that. Need to post the log part before and after the error - use the code window - its the {i} above post - to show this log.
1 The SAS System Thursday, November 29, 2018 11:11:00 AM 1 ;*';*";*/;quit;run; 2 OPTIONS PAGENO=MIN; 3 %LET _CLIENTTASKLABEL='Program'; 4 %LET _CLIENTPROJECTPATH=''; 5 %LET _CLIENTPROJECTNAME=''; 6 %LET _SASPROGRAMFILE=; 7 8 ODS _ALL_ CLOSE; 9 OPTIONS DEV=ACTIVEX; 10 GOPTIONS XPIXELS=0 YPIXELS=0; 11 FILENAME EGSR TEMP; 12 ODS tagsets.sasreport13(ID=EGSR) FILE=EGSR 13 STYLE=HtmlBlue 14 STYLESHEET=(URL="file:///C:/Program%20Files%20(x86)/SASHome/x86/SASEnterpriseGuide/7.1/Styles/HtmlBlue.css") 15 NOGTITLE 16 NOGFOOTNOTE 17 GPATH=&sasworklocation SYMBOLGEN: Macro variable SASWORKLOCATION resolves to "/c01/saswork/SAS_work4DE200000490_lnbrsasp24/SAS_work0C4300000490_lnbrsasp24/" 18 ENCODING=UTF8 19 options(rolap="on") 20 ; NOTE: Writing TAGSETS.SASREPORT13(EGSR) Body file: EGSR 21 22 GOPTIONS ACCESSIBLE; 23 libname loclib "&rptpath"; SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest NOTE: Libref LOCLIB was successfully assigned as follows: Engine: V9 Physical Name: /n04/data/provinfo/penvtest/fileout/hc3 SYMBOLGEN: Macro variable LOB resolves to ND 24 25 /*create blank dataset*/ 26 DATA loclib.PFPD0248_filenames_&lob.; 27 LENGTH filename $200 extension $4; 28 STOP; 29 RUN; NOTE: Variable filename is uninitialized. NOTE: Variable extension is uninitialized. NOTE: The data set LOCLIB.PFPD0248_FILENAMES_ND has 0 observations and 2 variables. NOTE: DATA statement used (Total process time): real time 0.21 seconds cpu time 0.00 seconds 30 31 /********* Output to Excel *************************************************/ 32 33 %macro repNoData; 34 data nodata; 35 message="--------------------- No data to report -----------------------"; 36 output; 37 run; 38 39 proc report data= nodata nowd headline headskip split='*'; 40 columns message; 2 The SAS System Thursday, November 29, 2018 11:11:00 AM 41 define message / " " style={just=center}; 42 run; 43 %mend repNoData; 44 45 /* to Remove file stored on unix dir */ 46 47 /* x "&rptpath/&rptname-critical-recred*.xls"; */ 48 49 50 %macro ftp_detail(comdate); 51 %put &sqlobs; 52 %if &sqlobs>0 %then %do; 53 ODS TAGSETS.EXCELXP 54 FILE= "&rptpath/&rptname-critical-recred-&comdate-report.xls" 55 STYLE= SASWEB 56 OPTIONS (ORIENTATION='LANDSCAPE' 57 AUTOFILTER='ALL' 58 Frozen_Headers='6' 59 /*FROZEN_ROWHEADERS='3'*/ 60 EMBEDDED_TITLES= 'YES' 61 EMBEDDED_FOOTNOTES='YES' 62 ABSOLUTE_COLUMN_WIDTH= "10,9,18,12,14,11,10,10,11,11,11,11,8,8,7,7,9,7,5,7,9,11,7,6,20,5" 63 SHEET_NAME="&comdate") ; 64 65 ods listing close ; 66 67 proc report data=hc3status3_&lob split = '|'; 68 title1 " &lob DETAIL REPORT " ; 69 title2 "Provider List for Summary_&lob by Recred Date and Committee"; 70 title3 "Sorted by Provider Last Name"; 71 title4 "as of %sysfunc(date(),worddate.)" ; 72 footnote1 "Prepared By: Provider Reporting"; 73 footnote2 "Program File: ~/PFPD0248-CriticalRecredReport.sas"; 74 footnote3 "Frequency: Daily"; 75 76 where comdate="&comdate"; 77 column cru_inis_nm bs_mpei_id mp_full_nm crapt_cd crpln_ds CRPLH_EFFT_DT APP_RCVD_DATE CRCS_CRNT_ATTN_DT 78 cmt_cd_ind prof_cb org_cb agetime_attest rep_name pcp; 79 define cru_inis_nm / 'Specialist|Initials' ; 80 define bs_mpei_id / 'Provider|Number' ; 81 define mp_full_nm / 'Provider Name' flow left ; 82 define crapt_cd / 'Transmission|Type' format=$crapt.; 83 define crpln_ds / 'Process Location' flow left ; 84 define CRPLH_EFFT_DT / 'Process Loc|Date' format=mmddyy10. ; 85 define APP_RCVD_DATe / 'App|Received' format=mmddyy10. ; 86 define crcs_crnt_attn_dt / 'Attest|Date' format=mmddyy10. ; 87 88 define cmt_cd_ind / 'Committee'; 89 90 91 define prof_cb / 'Professional cred body'; 92 define org_cb / 'Organizatioanl cred body'; 93 define agetime_attest / 'Attest|Age' ; 94 define rep_name / 'Provider Rep Name' flow left; 95 define pcp / 'PCP' left ; 96 97 run; 98 ods TAGSETS.EXCELXP close ; 3 The SAS System Thursday, November 29, 2018 11:11:00 AM 99 ods listing; 100 /*===================================================================================*/ 101 /*creates table of dynamic named datasets to be utilized in FTP program*/ 102 /*===================================================================================*/ 103 proc sql noprint; 104 create table filenames1_&lob as 105 select distinct "&rptname-critical-recred-&comdate-report" as filename length=200 106 , 'xls' as extension length = 4 107 from hc3status3_&lob (OBS=1); 108 quit; 109 data filenames1a_&lob; 110 set filenames1_&lob(obs=1); 111 run; 112 /* Append ADD dataset to MASTER dataset */ 113 proc append base=loclib.PFPD0248_filenames_&lob. data=filenames1a_&lob; 114 run; 115 proc delete data=filenames1a_&lob; 116 run; 117 /*===================================================================================*/ 118 /*end of table creation*/ 119 /*===================================================================================*/ 120 %end; 121 %else %do; 122 %repNoData; 123 %end; 124 %mend ftp_detail; 125 126 %macro detail(comdate, cred, committee); 127 %put &sqlobs; 128 %if &sqlobs > 0 %then %do; 129 130 ODS TAGSETS.EXCELXP 131 FILE= "&rptpath/&rptname-critical-recred-&comdate-&cred-report.xls" 132 STYLE= SASWEB 133 OPTIONS (ORIENTATION='PORTRAIT' 134 AUTOFILTER='ALL' 135 Frozen_Headers='6' 136 /*FROZEN_ROWHEADERS='3'*/ 137 EMBEDDED_TITLES= 'YES' 138 EMBEDDED_FOOTNOTES='YES' 139 ABSOLUTE_COLUMN_WIDTH= "5,9,20,12,13,9,10,5" /*CR#506476*/ 140 SHEET_NAME="&comdate-&cred") ; 141 142 ods listing close ; 143 144 proc report data=hc3status2_&lob split = '|'; 145 title1 " &lob DETAIL REPORT " ; 146 title2 "Provider List for Summary_&lob by Recred Date and Committee"; 147 title3 "&comdate-&committee"; 148 title4 "as of %sysfunc(date(),worddate.)" ; 149 footnote1 "Prepared By: Provider Reporting"; /*CR#484409*/ 150 footnote2 "Program: PFPD0248-CriticalRecredReport.sas"; /*CR#484409*/ 151 footnote3 "Frequency: Daily"; /*CR#484409*/ 152 153 where comdate="&comdate" 154 and REGION_CD = "&cred"; 155 column cru_inis_nm bs_mpei_id mp_full_nm crapt_cd crpln_ds 156 APP_RCVD_DATE CRCS_CRNT_ATTN_DT PCP; 4 The SAS System Thursday, November 29, 2018 11:11:00 AM 157 define cru_inis_nm / 'Spec|Init' ; 158 define bs_mpei_id / 'Provider|Number' ; 159 define mp_full_nm / 'Provider Name' flow left ; 160 define crapt_cd / 'Transmission|Type' left format=$crapt.; 161 define crpln_ds / 'Process Location' flow left ; 162 define APP_RCVD_DATe / 'App|Rec' format=mmddyy10. ; 163 define crcs_crnt_attn_dt / 'Attest|Date' format=mmddyy10. ; 164 define pcp / 'PCP' left ; 165 run; 166 ods TAGSETS.EXCELXP close ; 167 ods listing; 168 /*===================================================================================*/ 169 /*creates table of dynamic named datasets to be utilized in FTP program*/ 170 /*===================================================================================*/ 171 proc sql noprint; 172 create table filenames2_&lob as 173 select distinct "&rptname-critical-recred-&comdate-&cred-report" as filename length=200 174 , 'xls' as extension length = 4 175 from hc3status2_&lob (OBS=1); 176 quit; 177 data filenames2a_&lob; 178 set filenames2_&lob(obs=1); 179 run; 180 /* Append ADD dataset to MASTER dataset */ 181 proc append base=loclib.PFPD0248_filenames_&lob. data=filenames2a_&lob; 182 run; 183 proc delete data=filenames2a_&lob; 184 run; 185 186 %end; 187 %else %do; 188 %repNoData; 189 %end; 190 %mend detail; 191 192 data _null_ ; SYMBOLGEN: Macro variable LOB resolves to ND 192 ! set summary2_&lob; 193 n=0; 194 do while(n<_n_); 195 n=_n_; 196 197 if cmt_cd_cnt > 0 then 198 call execute('%detail('||trim(comdate)||', &cmt_cd, Committe)'); 199 if NA_cnt > 0 then 200 call execute('%detail('||trim(comdate)|| ', NA, Not-Assigned)'); 201 if prv_cnt > 0 then 202 call execute('%ftp_detail('||trim(comdate)|| ')'); 203 204 end; 205 run; 205 ! MLOGIC(DETAIL): Beginning execution. SYMBOLGEN: Macro variable CMT_CD resolves to NC MLOGIC(DETAIL): Parameter COMDATE has value 2018-11 MLOGIC(DETAIL): Parameter CRED has value NC MLOGIC(DETAIL): Parameter COMMITTEE has value Committe 5 The SAS System Thursday, November 29, 2018 11:11:00 AM MLOGIC(DETAIL): %PUT &sqlobs SYMBOLGEN: Macro variable SQLOBS resolves to 1 1 SYMBOLGEN: Macro variable SQLOBS resolves to 1 MLOGIC(DETAIL): %IF condition &sqlobs > 0 is TRUE SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable COMDATE resolves to 2018-11 SYMBOLGEN: Macro variable CRED resolves to NC SYMBOLGEN: Macro variable COMDATE resolves to 2018-11 SYMBOLGEN: Macro variable CRED resolves to NC MPRINT(DETAIL): ODS TAGSETS.EXCELXP FILE= "/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-2018-11-NC-report.xls" STYLE= SASWEB OPTIONS (ORIENTATION='PORTRAIT' AUTOFILTER='ALL' Frozen_Headers='6' EMBEDDED_TITLES= 'YES' EMBEDDED_FOOTNOTES='YES' ABSOLUTE_COLUMN_WIDTH= "5,9,20,12,13,9,10,5" SHEET_NAME="2018-11-NC") ; MPRINT(DETAIL): ods listing close ; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): proc report data=hc3status2_ND split = '|'; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): title1 " ND DETAIL REPORT " ; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): title2 "Provider List for Summary_ND by Recred Date and Committee"; SYMBOLGEN: Macro variable COMDATE resolves to 2018-11 SYMBOLGEN: Macro variable COMMITTEE resolves to Committe MPRINT(DETAIL): title3 "2018-11-Committe"; MPRINT(DETAIL): title4 "as of November 29, 2018" ; MPRINT(DETAIL): footnote1 "Prepared By: Provider Reporting"; MPRINT(DETAIL): footnote2 "Program: PFPD0248-CriticalRecredReport.sas"; MPRINT(DETAIL): footnote3 "Frequency: Daily"; SYMBOLGEN: Macro variable COMDATE resolves to 2018-11 SYMBOLGEN: Macro variable CRED resolves to NC MPRINT(DETAIL): where comdate="2018-11" and REGION_CD = "NC"; MPRINT(DETAIL): column cru_inis_nm bs_mpei_id mp_full_nm crapt_cd crpln_ds APP_RCVD_DATE CRCS_CRNT_ATTN_DT PCP; MPRINT(DETAIL): define cru_inis_nm / 'Spec|Init' ; MPRINT(DETAIL): define bs_mpei_id / 'Provider|Number' ; MPRINT(DETAIL): define mp_full_nm / 'Provider Name' flow left ; MPRINT(DETAIL): define crapt_cd / 'Transmission|Type' left format=$crapt.; MPRINT(DETAIL): define crpln_ds / 'Process Location' flow left ; MPRINT(DETAIL): define APP_RCVD_DATe / 'App|Rec' format=mmddyy10. ; MPRINT(DETAIL): define crcs_crnt_attn_dt / 'Attest|Date' format=mmddyy10. ; MPRINT(DETAIL): define pcp / 'PCP' left ; MPRINT(DETAIL): run; MPRINT(DETAIL): ods TAGSETS.EXCELXP close ; MPRINT(DETAIL): ods listing; MPRINT(DETAIL): proc sql noprint; SYMBOLGEN: Macro variable LOB resolves to ND SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable COMDATE resolves to 2018-11 SYMBOLGEN: Macro variable CRED resolves to NC SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): create table filenames2_ND as select distinct "PFPD0248_ND-critical-recred-2018-11-NC-report" as filename length=200 , 'xls' as extension length = 4 from hc3status2_ND (OBS=1); MPRINT(DETAIL): quit; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): data filenames2a_ND; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): set filenames2_ND(obs=1); 6 The SAS System Thursday, November 29, 2018 11:11:00 AM MPRINT(DETAIL): run; SYMBOLGEN: Macro variable LOB resolves to ND SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): proc append base=loclib.PFPD0248_filenames_ND data=filenames2a_ND; MPRINT(DETAIL): run; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): proc delete data=filenames2a_ND; MPRINT(DETAIL): run; MLOGIC(DETAIL): Ending execution. MLOGIC(FTP_DETAIL): Beginning execution. MLOGIC(FTP_DETAIL): Parameter COMDATE has value 2018-11 MLOGIC(FTP_DETAIL): %PUT &sqlobs SYMBOLGEN: Macro variable SQLOBS resolves to 1 1 SYMBOLGEN: Macro variable SQLOBS resolves to 1 MLOGIC(FTP_DETAIL): %IF condition &sqlobs>0 is TRUE SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable COMDATE resolves to 2018-11 SYMBOLGEN: Macro variable COMDATE resolves to 2018-11 MPRINT(FTP_DETAIL): ODS TAGSETS.EXCELXP FILE= "/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-2018-11-report.xls" STYLE= SASWEB OPTIONS (ORIENTATION='LANDSCAPE' AUTOFILTER='ALL' Frozen_Headers='6' EMBEDDED_TITLES= 'YES' EMBEDDED_FOOTNOTES='YES' ABSOLUTE_COLUMN_WIDTH= "10,9,18,12,14,11,10,10,11,11,11,11,8,8,7,7,9,7,5,7,9,11,7,6,20,5" SHEET_NAME="2018-11") ; MPRINT(FTP_DETAIL): ods listing close ; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): proc report data=hc3status3_ND split = '|'; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): title1 " ND DETAIL REPORT " ; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): title2 "Provider List for Summary_ND by Recred Date and Committee"; MPRINT(FTP_DETAIL): title3 "Sorted by Provider Last Name"; MPRINT(FTP_DETAIL): title4 "as of November 29, 2018" ; MPRINT(FTP_DETAIL): footnote1 "Prepared By: Provider Reporting"; MPRINT(FTP_DETAIL): footnote2 "Program File: ~/PFPD0248-CriticalRecredReport.sas"; MPRINT(FTP_DETAIL): footnote3 "Frequency: Daily"; SYMBOLGEN: Macro variable COMDATE resolves to 2018-11 MPRINT(FTP_DETAIL): where comdate="2018-11"; MPRINT(FTP_DETAIL): column cru_inis_nm bs_mpei_id mp_full_nm crapt_cd crpln_ds CRPLH_EFFT_DT APP_RCVD_DATE CRCS_CRNT_ATTN_DT cmt_cd_ind prof_cb org_cb agetime_attest rep_name pcp; MPRINT(FTP_DETAIL): define cru_inis_nm / 'Specialist|Initials' ; MPRINT(FTP_DETAIL): define bs_mpei_id / 'Provider|Number' ; MPRINT(FTP_DETAIL): define mp_full_nm / 'Provider Name' flow left ; MPRINT(FTP_DETAIL): define crapt_cd / 'Transmission|Type' format=$crapt.; MPRINT(FTP_DETAIL): define crpln_ds / 'Process Location' flow left ; MPRINT(FTP_DETAIL): define CRPLH_EFFT_DT / 'Process Loc|Date' format=mmddyy10. ; MPRINT(FTP_DETAIL): define APP_RCVD_DATe / 'App|Received' format=mmddyy10. ; MPRINT(FTP_DETAIL): define crcs_crnt_attn_dt / 'Attest|Date' format=mmddyy10. ; MPRINT(FTP_DETAIL): define cmt_cd_ind / 'Committee'; MPRINT(FTP_DETAIL): define prof_cb / 'Professional cred body'; MPRINT(FTP_DETAIL): define org_cb / 'Organizatioanl cred body'; MPRINT(FTP_DETAIL): define agetime_attest / 'Attest|Age' ; MPRINT(FTP_DETAIL): define rep_name / 'Provider Rep Name' flow left; MPRINT(FTP_DETAIL): define pcp / 'PCP' left ; MPRINT(FTP_DETAIL): run; MPRINT(FTP_DETAIL): ods TAGSETS.EXCELXP close ; MPRINT(FTP_DETAIL): ods listing; 7 The SAS System Thursday, November 29, 2018 11:11:00 AM MPRINT(FTP_DETAIL): proc sql noprint; SYMBOLGEN: Macro variable LOB resolves to ND SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable COMDATE resolves to 2018-11 SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): create table filenames1_ND as select distinct "PFPD0248_ND-critical-recred-2018-11-report" as filename length=200 , 'xls' as extension length = 4 from hc3status3_ND (OBS=1); MPRINT(FTP_DETAIL): quit; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): data filenames1a_ND; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): set filenames1_ND(obs=1); MPRINT(FTP_DETAIL): run; SYMBOLGEN: Macro variable LOB resolves to ND SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): proc append base=loclib.PFPD0248_filenames_ND data=filenames1a_ND; MPRINT(FTP_DETAIL): run; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): proc delete data=filenames1a_ND; MPRINT(FTP_DETAIL): run; MLOGIC(FTP_DETAIL): Ending execution. MLOGIC(DETAIL): Beginning execution. MLOGIC(DETAIL): Parameter COMDATE has value 2018-12 MLOGIC(DETAIL): Parameter CRED has value NA MLOGIC(DETAIL): Parameter COMMITTEE has value Not-Assigned MLOGIC(DETAIL): %PUT &sqlobs SYMBOLGEN: Macro variable SQLOBS resolves to 1 1 SYMBOLGEN: Macro variable SQLOBS resolves to 1 MLOGIC(DETAIL): %IF condition &sqlobs > 0 is TRUE SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable COMDATE resolves to 2018-12 SYMBOLGEN: Macro variable CRED resolves to NA SYMBOLGEN: Macro variable COMDATE resolves to 2018-12 SYMBOLGEN: Macro variable CRED resolves to NA MPRINT(DETAIL): ODS TAGSETS.EXCELXP FILE= "/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-2018-12-NA-report.xls" STYLE= SASWEB OPTIONS (ORIENTATION='PORTRAIT' AUTOFILTER='ALL' Frozen_Headers='6' EMBEDDED_TITLES= 'YES' EMBEDDED_FOOTNOTES='YES' ABSOLUTE_COLUMN_WIDTH= "5,9,20,12,13,9,10,5" SHEET_NAME="2018-12-NA") ; MPRINT(DETAIL): ods listing close ; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): proc report data=hc3status2_ND split = '|'; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): title1 " ND DETAIL REPORT " ; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): title2 "Provider List for Summary_ND by Recred Date and Committee"; SYMBOLGEN: Macro variable COMDATE resolves to 2018-12 SYMBOLGEN: Macro variable COMMITTEE resolves to Not-Assigned MPRINT(DETAIL): title3 "2018-12-Not-Assigned"; MPRINT(DETAIL): title4 "as of November 29, 2018" ; MPRINT(DETAIL): footnote1 "Prepared By: Provider Reporting"; MPRINT(DETAIL): footnote2 "Program: PFPD0248-CriticalRecredReport.sas"; MPRINT(DETAIL): footnote3 "Frequency: Daily"; SYMBOLGEN: Macro variable COMDATE resolves to 2018-12 SYMBOLGEN: Macro variable CRED resolves to NA MPRINT(DETAIL): where comdate="2018-12" and REGION_CD = "NA"; 8 The SAS System Thursday, November 29, 2018 11:11:00 AM MPRINT(DETAIL): column cru_inis_nm bs_mpei_id mp_full_nm crapt_cd crpln_ds APP_RCVD_DATE CRCS_CRNT_ATTN_DT PCP; MPRINT(DETAIL): define cru_inis_nm / 'Spec|Init' ; MPRINT(DETAIL): define bs_mpei_id / 'Provider|Number' ; MPRINT(DETAIL): define mp_full_nm / 'Provider Name' flow left ; MPRINT(DETAIL): define crapt_cd / 'Transmission|Type' left format=$crapt.; MPRINT(DETAIL): define crpln_ds / 'Process Location' flow left ; MPRINT(DETAIL): define APP_RCVD_DATe / 'App|Rec' format=mmddyy10. ; MPRINT(DETAIL): define crcs_crnt_attn_dt / 'Attest|Date' format=mmddyy10. ; MPRINT(DETAIL): define pcp / 'PCP' left ; MPRINT(DETAIL): run; MPRINT(DETAIL): ods TAGSETS.EXCELXP close ; MPRINT(DETAIL): ods listing; MPRINT(DETAIL): proc sql noprint; SYMBOLGEN: Macro variable LOB resolves to ND SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable COMDATE resolves to 2018-12 SYMBOLGEN: Macro variable CRED resolves to NA SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): create table filenames2_ND as select distinct "PFPD0248_ND-critical-recred-2018-12-NA-report" as filename length=200 , 'xls' as extension length = 4 from hc3status2_ND (OBS=1); MPRINT(DETAIL): quit; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): data filenames2a_ND; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): set filenames2_ND(obs=1); MPRINT(DETAIL): run; SYMBOLGEN: Macro variable LOB resolves to ND SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): proc append base=loclib.PFPD0248_filenames_ND data=filenames2a_ND; MPRINT(DETAIL): run; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): proc delete data=filenames2a_ND; MPRINT(DETAIL): run; MLOGIC(DETAIL): Ending execution. MLOGIC(FTP_DETAIL): Beginning execution. MLOGIC(FTP_DETAIL): Parameter COMDATE has value 2018-12 MLOGIC(FTP_DETAIL): %PUT &sqlobs SYMBOLGEN: Macro variable SQLOBS resolves to 1 1 SYMBOLGEN: Macro variable SQLOBS resolves to 1 MLOGIC(FTP_DETAIL): %IF condition &sqlobs>0 is TRUE SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable COMDATE resolves to 2018-12 SYMBOLGEN: Macro variable COMDATE resolves to 2018-12 MPRINT(FTP_DETAIL): ODS TAGSETS.EXCELXP FILE= "/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-2018-12-report.xls" STYLE= SASWEB OPTIONS (ORIENTATION='LANDSCAPE' AUTOFILTER='ALL' Frozen_Headers='6' EMBEDDED_TITLES= 'YES' EMBEDDED_FOOTNOTES='YES' ABSOLUTE_COLUMN_WIDTH= "10,9,18,12,14,11,10,10,11,11,11,11,8,8,7,7,9,7,5,7,9,11,7,6,20,5" SHEET_NAME="2018-12") ; MPRINT(FTP_DETAIL): ods listing close ; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): proc report data=hc3status3_ND split = '|'; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): title1 " ND DETAIL REPORT " ; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): title2 "Provider List for Summary_ND by Recred Date and Committee"; MPRINT(FTP_DETAIL): title3 "Sorted by Provider Last Name"; 9 The SAS System Thursday, November 29, 2018 11:11:00 AM MPRINT(FTP_DETAIL): title4 "as of November 29, 2018" ; MPRINT(FTP_DETAIL): footnote1 "Prepared By: Provider Reporting"; MPRINT(FTP_DETAIL): footnote2 "Program File: ~/PFPD0248-CriticalRecredReport.sas"; MPRINT(FTP_DETAIL): footnote3 "Frequency: Daily"; SYMBOLGEN: Macro variable COMDATE resolves to 2018-12 MPRINT(FTP_DETAIL): where comdate="2018-12"; MPRINT(FTP_DETAIL): column cru_inis_nm bs_mpei_id mp_full_nm crapt_cd crpln_ds CRPLH_EFFT_DT APP_RCVD_DATE CRCS_CRNT_ATTN_DT cmt_cd_ind prof_cb org_cb agetime_attest rep_name pcp; MPRINT(FTP_DETAIL): define cru_inis_nm / 'Specialist|Initials' ; MPRINT(FTP_DETAIL): define bs_mpei_id / 'Provider|Number' ; MPRINT(FTP_DETAIL): define mp_full_nm / 'Provider Name' flow left ; MPRINT(FTP_DETAIL): define crapt_cd / 'Transmission|Type' format=$crapt.; MPRINT(FTP_DETAIL): define crpln_ds / 'Process Location' flow left ; MPRINT(FTP_DETAIL): define CRPLH_EFFT_DT / 'Process Loc|Date' format=mmddyy10. ; MPRINT(FTP_DETAIL): define APP_RCVD_DATe / 'App|Received' format=mmddyy10. ; MPRINT(FTP_DETAIL): define crcs_crnt_attn_dt / 'Attest|Date' format=mmddyy10. ; MPRINT(FTP_DETAIL): define cmt_cd_ind / 'Committee'; MPRINT(FTP_DETAIL): define prof_cb / 'Professional cred body'; MPRINT(FTP_DETAIL): define org_cb / 'Organizatioanl cred body'; MPRINT(FTP_DETAIL): define agetime_attest / 'Attest|Age' ; MPRINT(FTP_DETAIL): define rep_name / 'Provider Rep Name' flow left; MPRINT(FTP_DETAIL): define pcp / 'PCP' left ; MPRINT(FTP_DETAIL): run; MPRINT(FTP_DETAIL): ods TAGSETS.EXCELXP close ; MPRINT(FTP_DETAIL): ods listing; MPRINT(FTP_DETAIL): proc sql noprint; SYMBOLGEN: Macro variable LOB resolves to ND SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable COMDATE resolves to 2018-12 SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): create table filenames1_ND as select distinct "PFPD0248_ND-critical-recred-2018-12-report" as filename length=200 , 'xls' as extension length = 4 from hc3status3_ND (OBS=1); MPRINT(FTP_DETAIL): quit; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): data filenames1a_ND; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): set filenames1_ND(obs=1); MPRINT(FTP_DETAIL): run; SYMBOLGEN: Macro variable LOB resolves to ND SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): proc append base=loclib.PFPD0248_filenames_ND data=filenames1a_ND; MPRINT(FTP_DETAIL): run; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): proc delete data=filenames1a_ND; MPRINT(FTP_DETAIL): run; MLOGIC(FTP_DETAIL): Ending execution. MLOGIC(DETAIL): Beginning execution. SYMBOLGEN: Macro variable CMT_CD resolves to NC MLOGIC(DETAIL): Parameter COMDATE has value Missing MLOGIC(DETAIL): Parameter CRED has value NC MLOGIC(DETAIL): Parameter COMMITTEE has value Committe MLOGIC(DETAIL): %PUT &sqlobs SYMBOLGEN: Macro variable SQLOBS resolves to 1 1 SYMBOLGEN: Macro variable SQLOBS resolves to 1 MLOGIC(DETAIL): %IF condition &sqlobs > 0 is TRUE SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest 10 The SAS System Thursday, November 29, 2018 11:11:00 AM SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable COMDATE resolves to Missing SYMBOLGEN: Macro variable CRED resolves to NC SYMBOLGEN: Macro variable COMDATE resolves to Missing SYMBOLGEN: Macro variable CRED resolves to NC MPRINT(DETAIL): ODS TAGSETS.EXCELXP FILE= "/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-Missing-NC-report.xls" STYLE= SASWEB OPTIONS (ORIENTATION='PORTRAIT' AUTOFILTER='ALL' Frozen_Headers='6' EMBEDDED_TITLES= 'YES' EMBEDDED_FOOTNOTES='YES' ABSOLUTE_COLUMN_WIDTH= "5,9,20,12,13,9,10,5" SHEET_NAME="Missing-NC") ; MPRINT(DETAIL): ods listing close ; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): proc report data=hc3status2_ND split = '|'; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): title1 " ND DETAIL REPORT " ; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): title2 "Provider List for Summary_ND by Recred Date and Committee"; SYMBOLGEN: Macro variable COMDATE resolves to Missing SYMBOLGEN: Macro variable COMMITTEE resolves to Committe MPRINT(DETAIL): title3 "Missing-Committe"; MPRINT(DETAIL): title4 "as of November 29, 2018" ; MPRINT(DETAIL): footnote1 "Prepared By: Provider Reporting"; MPRINT(DETAIL): footnote2 "Program: PFPD0248-CriticalRecredReport.sas"; MPRINT(DETAIL): footnote3 "Frequency: Daily"; SYMBOLGEN: Macro variable COMDATE resolves to Missing SYMBOLGEN: Macro variable CRED resolves to NC MPRINT(DETAIL): where comdate="Missing" and REGION_CD = "NC"; MPRINT(DETAIL): column cru_inis_nm bs_mpei_id mp_full_nm crapt_cd crpln_ds APP_RCVD_DATE CRCS_CRNT_ATTN_DT PCP; MPRINT(DETAIL): define cru_inis_nm / 'Spec|Init' ; MPRINT(DETAIL): define bs_mpei_id / 'Provider|Number' ; MPRINT(DETAIL): define mp_full_nm / 'Provider Name' flow left ; MPRINT(DETAIL): define crapt_cd / 'Transmission|Type' left format=$crapt.; MPRINT(DETAIL): define crpln_ds / 'Process Location' flow left ; MPRINT(DETAIL): define APP_RCVD_DATe / 'App|Rec' format=mmddyy10. ; MPRINT(DETAIL): define crcs_crnt_attn_dt / 'Attest|Date' format=mmddyy10. ; MPRINT(DETAIL): define pcp / 'PCP' left ; MPRINT(DETAIL): run; MPRINT(DETAIL): ods TAGSETS.EXCELXP close ; MPRINT(DETAIL): ods listing; MPRINT(DETAIL): proc sql noprint; SYMBOLGEN: Macro variable LOB resolves to ND SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable COMDATE resolves to Missing SYMBOLGEN: Macro variable CRED resolves to NC SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): create table filenames2_ND as select distinct "PFPD0248_ND-critical-recred-Missing-NC-report" as filename length=200 , 'xls' as extension length = 4 from hc3status2_ND (OBS=1); MPRINT(DETAIL): quit; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): data filenames2a_ND; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): set filenames2_ND(obs=1); MPRINT(DETAIL): run; SYMBOLGEN: Macro variable LOB resolves to ND SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): proc append base=loclib.PFPD0248_filenames_ND data=filenames2a_ND; MPRINT(DETAIL): run; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): proc delete data=filenames2a_ND; 11 The SAS System Thursday, November 29, 2018 11:11:00 AM MPRINT(DETAIL): run; MLOGIC(DETAIL): Ending execution. MLOGIC(DETAIL): Beginning execution. MLOGIC(DETAIL): Parameter COMDATE has value Missing MLOGIC(DETAIL): Parameter CRED has value NA MLOGIC(DETAIL): Parameter COMMITTEE has value Not-Assigned MLOGIC(DETAIL): %PUT &sqlobs SYMBOLGEN: Macro variable SQLOBS resolves to 1 1 SYMBOLGEN: Macro variable SQLOBS resolves to 1 MLOGIC(DETAIL): %IF condition &sqlobs > 0 is TRUE SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable COMDATE resolves to Missing SYMBOLGEN: Macro variable CRED resolves to NA SYMBOLGEN: Macro variable COMDATE resolves to Missing SYMBOLGEN: Macro variable CRED resolves to NA MPRINT(DETAIL): ODS TAGSETS.EXCELXP FILE= "/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-Missing-NA-report.xls" STYLE= SASWEB OPTIONS (ORIENTATION='PORTRAIT' AUTOFILTER='ALL' Frozen_Headers='6' EMBEDDED_TITLES= 'YES' EMBEDDED_FOOTNOTES='YES' ABSOLUTE_COLUMN_WIDTH= "5,9,20,12,13,9,10,5" SHEET_NAME="Missing-NA") ; MPRINT(DETAIL): ods listing close ; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): proc report data=hc3status2_ND split = '|'; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): title1 " ND DETAIL REPORT " ; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): title2 "Provider List for Summary_ND by Recred Date and Committee"; SYMBOLGEN: Macro variable COMDATE resolves to Missing SYMBOLGEN: Macro variable COMMITTEE resolves to Not-Assigned MPRINT(DETAIL): title3 "Missing-Not-Assigned"; MPRINT(DETAIL): title4 "as of November 29, 2018" ; MPRINT(DETAIL): footnote1 "Prepared By: Provider Reporting"; MPRINT(DETAIL): footnote2 "Program: PFPD0248-CriticalRecredReport.sas"; MPRINT(DETAIL): footnote3 "Frequency: Daily"; SYMBOLGEN: Macro variable COMDATE resolves to Missing SYMBOLGEN: Macro variable CRED resolves to NA MPRINT(DETAIL): where comdate="Missing" and REGION_CD = "NA"; MPRINT(DETAIL): column cru_inis_nm bs_mpei_id mp_full_nm crapt_cd crpln_ds APP_RCVD_DATE CRCS_CRNT_ATTN_DT PCP; MPRINT(DETAIL): define cru_inis_nm / 'Spec|Init' ; MPRINT(DETAIL): define bs_mpei_id / 'Provider|Number' ; MPRINT(DETAIL): define mp_full_nm / 'Provider Name' flow left ; MPRINT(DETAIL): define crapt_cd / 'Transmission|Type' left format=$crapt.; MPRINT(DETAIL): define crpln_ds / 'Process Location' flow left ; MPRINT(DETAIL): define APP_RCVD_DATe / 'App|Rec' format=mmddyy10. ; MPRINT(DETAIL): define crcs_crnt_attn_dt / 'Attest|Date' format=mmddyy10. ; MPRINT(DETAIL): define pcp / 'PCP' left ; MPRINT(DETAIL): run; MPRINT(DETAIL): ods TAGSETS.EXCELXP close ; MPRINT(DETAIL): ods listing; MPRINT(DETAIL): proc sql noprint; SYMBOLGEN: Macro variable LOB resolves to ND SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable COMDATE resolves to Missing SYMBOLGEN: Macro variable CRED resolves to NA SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): create table filenames2_ND as select distinct "PFPD0248_ND-critical-recred-Missing-NA-report" as filename 12 The SAS System Thursday, November 29, 2018 11:11:00 AM length=200 , 'xls' as extension length = 4 from hc3status2_ND (OBS=1); MPRINT(DETAIL): quit; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): data filenames2a_ND; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): set filenames2_ND(obs=1); MPRINT(DETAIL): run; SYMBOLGEN: Macro variable LOB resolves to ND SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): proc append base=loclib.PFPD0248_filenames_ND data=filenames2a_ND; MPRINT(DETAIL): run; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(DETAIL): proc delete data=filenames2a_ND; MPRINT(DETAIL): run; MLOGIC(DETAIL): Ending execution. MLOGIC(FTP_DETAIL): Beginning execution. MLOGIC(FTP_DETAIL): Parameter COMDATE has value Missing MLOGIC(FTP_DETAIL): %PUT &sqlobs SYMBOLGEN: Macro variable SQLOBS resolves to 1 1 NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds SYMBOLGEN: Macro variable SQLOBS resolves to 1 MLOGIC(FTP_DETAIL): %IF condition &sqlobs>0 is TRUE SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable COMDATE resolves to Missing SYMBOLGEN: Macro variable COMDATE resolves to Missing MPRINT(FTP_DETAIL): ODS TAGSETS.EXCELXP FILE= "/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-Missing-report.xls" STYLE= SASWEB OPTIONS (ORIENTATION='LANDSCAPE' AUTOFILTER='ALL' Frozen_Headers='6' EMBEDDED_TITLES= 'YES' EMBEDDED_FOOTNOTES='YES' ABSOLUTE_COLUMN_WIDTH= "10,9,18,12,14,11,10,10,11,11,11,11,8,8,7,7,9,7,5,7,9,11,7,6,20,5" SHEET_NAME="Missing") ; MPRINT(FTP_DETAIL): ods listing close ; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): proc report data=hc3status3_ND split = '|'; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): title1 " ND DETAIL REPORT " ; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): title2 "Provider List for Summary_ND by Recred Date and Committee"; MPRINT(FTP_DETAIL): title3 "Sorted by Provider Last Name"; MPRINT(FTP_DETAIL): title4 "as of November 29, 2018" ; MPRINT(FTP_DETAIL): footnote1 "Prepared By: Provider Reporting"; MPRINT(FTP_DETAIL): footnote2 "Program File: ~/PFPD0248-CriticalRecredReport.sas"; MPRINT(FTP_DETAIL): footnote3 "Frequency: Daily"; SYMBOLGEN: Macro variable COMDATE resolves to Missing MPRINT(FTP_DETAIL): where comdate="Missing"; MPRINT(FTP_DETAIL): column cru_inis_nm bs_mpei_id mp_full_nm crapt_cd crpln_ds CRPLH_EFFT_DT APP_RCVD_DATE CRCS_CRNT_ATTN_DT cmt_cd_ind prof_cb org_cb agetime_attest rep_name pcp; MPRINT(FTP_DETAIL): define cru_inis_nm / 'Specialist|Initials' ; MPRINT(FTP_DETAIL): define bs_mpei_id / 'Provider|Number' ; MPRINT(FTP_DETAIL): define mp_full_nm / 'Provider Name' flow left ; MPRINT(FTP_DETAIL): define crapt_cd / 'Transmission|Type' format=$crapt.; MPRINT(FTP_DETAIL): define crpln_ds / 'Process Location' flow left ; MPRINT(FTP_DETAIL): define CRPLH_EFFT_DT / 'Process Loc|Date' format=mmddyy10. ; MPRINT(FTP_DETAIL): define APP_RCVD_DATe / 'App|Received' format=mmddyy10. ; 13 The SAS System Thursday, November 29, 2018 11:11:00 AM MPRINT(FTP_DETAIL): define crcs_crnt_attn_dt / 'Attest|Date' format=mmddyy10. ; MPRINT(FTP_DETAIL): define cmt_cd_ind / 'Committee'; MPRINT(FTP_DETAIL): define prof_cb / 'Professional cred body'; MPRINT(FTP_DETAIL): define org_cb / 'Organizatioanl cred body'; MPRINT(FTP_DETAIL): define agetime_attest / 'Attest|Age' ; MPRINT(FTP_DETAIL): define rep_name / 'Provider Rep Name' flow left; MPRINT(FTP_DETAIL): define pcp / 'PCP' left ; MPRINT(FTP_DETAIL): run; MPRINT(FTP_DETAIL): ods TAGSETS.EXCELXP close ; MPRINT(FTP_DETAIL): ods listing; MPRINT(FTP_DETAIL): proc sql noprint; SYMBOLGEN: Macro variable LOB resolves to ND SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable COMDATE resolves to Missing SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): create table filenames1_ND as select distinct "PFPD0248_ND-critical-recred-Missing-report" as filename length=200 , 'xls' as extension length = 4 from hc3status3_ND (OBS=1); MPRINT(FTP_DETAIL): quit; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): data filenames1a_ND; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): set filenames1_ND(obs=1); MPRINT(FTP_DETAIL): run; SYMBOLGEN: Macro variable LOB resolves to ND SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): proc append base=loclib.PFPD0248_filenames_ND data=filenames1a_ND; MPRINT(FTP_DETAIL): run; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_DETAIL): proc delete data=filenames1a_ND; MPRINT(FTP_DETAIL): run; MLOGIC(FTP_DETAIL): Ending execution. NOTE: There were 3 observations read from the data set WORK.SUMMARY2_ND. NOTE: CALL EXECUTE generated line. 1 + ODS TAGSETS.EXCELXP FILE= "/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-2018-11-NC-report.xls" STYLE= SASWEB OPTIONS (ORIENTATION='PORTRAIT' AUTOFILTER='ALL' Frozen_Headers='6' EMBEDDED_TITLES= 'YES' 2 + EMBEDDED_FOOTNOTES='YES' ABSOLUTE_COLUMN_WIDTH= "5,9,20,12,13,9,10,5" SHEET_NAME="2018-11-NC") ; ods listing close ; proc report data=hc3status2_ND split = '|'; title1 " ND DETAIL REPORT " ; title2 "Provider List for Summary_ND by NOTE: Writing TAGSETS.EXCELXP Body file: /n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-2018-11-NC-report.xls NOTE: This is the Excel XP tagset (Compatible with SAS 9.1.3 and above, v1.131, 04/23/2015). Add options(doc='help') to the ods statement for more information. 3 + Recred Date and Committee"; title3 "2018-11-Committe"; title4 "as of November 29, 2018" ; footnote1 "Prepared By: Provider Reporting"; footnote2 "Program: PFPD0248-CriticalRecredReport.sas"; footnote3 "Frequency: 4 + Daily"; where comdate="2018-11" and REGION_CD = "NC"; column cru_inis_nm bs_mpei_id mp_full_nm crapt_cd crpln_ds APP_RCVD_DATE CRCS_CRNT_ATTN_DT PCP; define cru_inis_nm 5 + / 'Spec|Init' ; define bs_mpei_id / 'Provider|Number' ; define mp_full_nm / 'Provider Name' flow left ; define crapt_cd / 'Transmission|Type' left format=$crapt.; define crpln_ds / 'Process 6 + Location' flow left ; define APP_RCVD_DATe / 'App|Rec' format=mmddyy10. ; define crcs_crnt_attn_dt / 'Attest|Date' format=mmddyy10. ; define pcp / 'PCP' left ; run; NOTE: There were 1 observations read from the data set WORK.HC3STATUS2_ND. WHERE (comdate='2018-11') and (REGION_CD='NC'); NOTE: PROCEDURE REPORT used (Total process time): 14 The SAS System Thursday, November 29, 2018 11:11:00 AM real time 0.06 seconds cpu time 0.03 seconds 6 + ods TAGSETS.EXCELXP close ; ods listing 7 +; proc sql noprint; create table filenames2_ND as select distinct "PFPD0248_ND-critical-recred-2018-11-NC-report" as filename length=200 , 'xls' as extension length = 4 from hc3status2_ND (OBS=1); quit; data filenames2a_ND; set NOTE: Table WORK.FILENAMES2_ND created, with 1 rows and 2 columns. NOTE: PROCEDURE SQL used (Total process time): real time 0.00 seconds cpu time 0.01 seconds 8 + filenames2_ND(obs=1); run; NOTE: There were 1 observations read from the data set WORK.FILENAMES2_ND. NOTE: The data set WORK.FILENAMES2A_ND has 1 observations and 2 variables. NOTE: DATA statement used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 8 + proc append base=loclib.PFPD0248_filenames_ND data=filenames2a_ND; run; proc delete data=filenames2a_ND; run; NOTE: Appending WORK.FILENAMES2A_ND to LOCLIB.PFPD0248_FILENAMES_ND. NOTE: There were 1 observations read from the data set WORK.FILENAMES2A_ND. NOTE: 1 observations added. NOTE: The data set LOCLIB.PFPD0248_FILENAMES_ND has 1 observations and 2 variables. NOTE: PROCEDURE APPEND used (Total process time): real time 0.08 seconds cpu time 0.00 seconds NOTE: Deleting WORK.FILENAMES2A_ND (memtype=DATA). NOTE: PROCEDURE DELETE used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 9 + ODS TAGSETS.EXCELXP FILE= "/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-2018-11-report.xls" STYLE= SASWEB OPTIONS (ORIENTATION='LANDSCAPE' AUTOFILTER='ALL' Frozen_Headers='6' EMBEDDED_TITLES= 'YES' 10 + EMBEDDED_FOOTNOTES='YES' ABSOLUTE_COLUMN_WIDTH= "10,9,18,12,14,11,10,10,11,11,11,11,8,8,7,7,9,7,5,7,9,11,7,6,20,5" SHEET_NAME="2018-11") ; ods listing close ; proc report data=hc3status3_ND split = '|'; title1 " ND DETAIL REPORT " ; NOTE: Writing TAGSETS.EXCELXP Body file: /n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-2018-11-report.xls NOTE: This is the Excel XP tagset (Compatible with SAS 9.1.3 and above, v1.131, 04/23/2015). Add options(doc='help') to the ods statement for more information. 11 + title2 "Provider List for Summary_ND by Recred Date and Committee"; title3 "Sorted by Provider Last Name"; title4 "as of November 29, 2018" ; footnote1 "Prepared By: Provider Reporting"; footnote2 "Program File: 12 + ~/PFPD0248-CriticalRecredReport.sas"; footnote3 "Frequency: Daily"; where comdate="2018-11"; column cru_inis_nm bs_mpei_id mp_full_nm crapt_cd crpln_ds CRPLH_EFFT_DT APP_RCVD_DATE CRCS_CRNT_ATTN_DT cmt_cd_ind prof_cb 13 + org_cb agetime_attest rep_name pcp; define cru_inis_nm / 'Specialist|Initials' ; define bs_mpei_id / 'Provider|Number' ; define mp_full_nm / 'Provider Name' flow left ; define crapt_cd / 15 The SAS System Thursday, November 29, 2018 11:11:00 AM 14 + 'Transmission|Type' format=$crapt.; define crpln_ds / 'Process Location' flow left ; define CRPLH_EFFT_DT / 'Process Loc|Date' format=mmddyy10. ; define APP_RCVD_DATe / 'App|Received' format=mmddyy10. ; 15 + define crcs_crnt_attn_dt / 'Attest|Date' format=mmddyy10. ; define cmt_cd_ind / 'Committee'; define prof_cb / 'Professional cred body'; define org_cb / 'Organizatioanl cred body'; define 16 + agetime_attest / 'Attest|Age' ; define rep_name / 'Provider Rep Name' flow left; define pcp / 'PCP' left ; run; NOTE: There were 1 observations read from the data set WORK.HC3STATUS3_ND. WHERE comdate='2018-11'; NOTE: PROCEDURE REPORT used (Total process time): real time 0.03 seconds cpu time 0.03 seconds 16 + ods TAGSETS.EXCELXP close ; ods listing; proc sql noprint; create table filenames1_ND as 17 + select distinct "PFPD0248_ND-critical-recred-2018-11-report" as filename length=200 , 'xls' as extension length = 4 from hc3status3_ND (OBS=1); NOTE: Table WORK.FILENAMES1_ND created, with 1 rows and 2 columns. 17 + quit; NOTE: PROCEDURE SQL used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 17 + data filenames1a_ND; set filenames1_ND(obs=1); run; proc append NOTE: There were 1 observations read from the data set WORK.FILENAMES1_ND. NOTE: The data set WORK.FILENAMES1A_ND has 1 observations and 2 variables. NOTE: DATA statement used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 18 + base=loclib.PFPD0248_filenames_ND data=filenames1a_ND; run; proc delete data=filenames1a_ND; run; NOTE: Appending WORK.FILENAMES1A_ND to LOCLIB.PFPD0248_FILENAMES_ND. NOTE: There were 1 observations read from the data set WORK.FILENAMES1A_ND. NOTE: 1 observations added. NOTE: The data set LOCLIB.PFPD0248_FILENAMES_ND has 2 observations and 2 variables. NOTE: PROCEDURE APPEND used (Total process time): real time 0.03 seconds cpu time 0.00 seconds NOTE: Deleting WORK.FILENAMES1A_ND (memtype=DATA). NOTE: PROCEDURE DELETE used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 19 + ODS TAGSETS.EXCELXP FILE= "/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-2018-12-NA-report.xls" STYLE= SASWEB OPTIONS (ORIENTATION='PORTRAIT' AUTOFILTER='ALL' Frozen_Headers='6' EMBEDDED_TITLES= 'YES' 20 + EMBEDDED_FOOTNOTES='YES' ABSOLUTE_COLUMN_WIDTH= "5,9,20,12,13,9,10,5" SHEET_NAME="2018-12-NA") ; ods listing close ; proc report data=hc3status2_ND split = '|'; title1 " ND DETAIL REPORT " ; title2 "Provider List for 16 The SAS System Thursday, November 29, 2018 11:11:00 AM Summary_ND by NOTE: Writing TAGSETS.EXCELXP Body file: /n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-2018-12-NA-report.xls NOTE: This is the Excel XP tagset (Compatible with SAS 9.1.3 and above, v1.131, 04/23/2015). Add options(doc='help') to the ods statement for more information. 21 + Recred Date and Committee"; title3 "2018-12-Not-Assigned"; title4 "as of November 29, 2018" ; footnote1 "Prepared By: Provider Reporting"; footnote2 "Program: PFPD0248-CriticalRecredReport.sas"; footnote3 "Frequency: 22 + Daily"; where comdate="2018-12" and REGION_CD = "NA"; column cru_inis_nm bs_mpei_id mp_full_nm crapt_cd crpln_ds APP_RCVD_DATE CRCS_CRNT_ATTN_DT PCP; define cru_inis_nm 23 + / 'Spec|Init' ; define bs_mpei_id / 'Provider|Number' ; define mp_full_nm / 'Provider Name' flow left ; define crapt_cd / 'Transmission|Type' left format=$crapt.; define crpln_ds / 'Process 24 + Location' flow left ; define APP_RCVD_DATe / 'App|Rec' format=mmddyy10. ; define crcs_crnt_attn_dt / 'Attest|Date' format=mmddyy10. ; define pcp / 'PCP' left ; run; NOTE: There were 1 observations read from the data set WORK.HC3STATUS2_ND. WHERE (comdate='2018-12') and (REGION_CD='NA'); NOTE: PROCEDURE REPORT used (Total process time): real time 0.02 seconds cpu time 0.03 seconds 24 + ods TAGSETS.EXCELXP close ; ods listing 25 +; proc sql noprint; create table filenames2_ND as select distinct "PFPD0248_ND-critical-recred-2018-12-NA-report" as filename length=200 , 'xls' as extension length = 4 from hc3status2_ND (OBS=1); quit; data filenames2a_ND; set NOTE: Table WORK.FILENAMES2_ND created, with 1 rows and 2 columns. NOTE: PROCEDURE SQL used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 26 + filenames2_ND(obs=1); run; NOTE: There were 1 observations read from the data set WORK.FILENAMES2_ND. NOTE: The data set WORK.FILENAMES2A_ND has 1 observations and 2 variables. NOTE: DATA statement used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 26 + proc append base=loclib.PFPD0248_filenames_ND data=filenames2a_ND; run; proc delete data=filenames2a_ND; run; NOTE: Appending WORK.FILENAMES2A_ND to LOCLIB.PFPD0248_FILENAMES_ND. NOTE: There were 1 observations read from the data set WORK.FILENAMES2A_ND. NOTE: 1 observations added. NOTE: The data set LOCLIB.PFPD0248_FILENAMES_ND has 3 observations and 2 variables. NOTE: PROCEDURE APPEND used (Total process time): real time 0.02 seconds cpu time 0.00 seconds NOTE: Deleting WORK.FILENAMES2A_ND (memtype=DATA). NOTE: PROCEDURE DELETE used (Total process time): 17 The SAS System Thursday, November 29, 2018 11:11:00 AM real time 0.00 seconds cpu time 0.00 seconds 27 + ODS TAGSETS.EXCELXP FILE= "/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-2018-12-report.xls" STYLE= SASWEB OPTIONS (ORIENTATION='LANDSCAPE' AUTOFILTER='ALL' Frozen_Headers='6' EMBEDDED_TITLES= 'YES' 28 + EMBEDDED_FOOTNOTES='YES' ABSOLUTE_COLUMN_WIDTH= "10,9,18,12,14,11,10,10,11,11,11,11,8,8,7,7,9,7,5,7,9,11,7,6,20,5" SHEET_NAME="2018-12") ; ods listing close ; proc report data=hc3status3_ND split = '|'; title1 " ND DETAIL REPORT " ; NOTE: Writing TAGSETS.EXCELXP Body file: /n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-2018-12-report.xls NOTE: This is the Excel XP tagset (Compatible with SAS 9.1.3 and above, v1.131, 04/23/2015). Add options(doc='help') to the ods statement for more information. 29 + title2 "Provider List for Summary_ND by Recred Date and Committee"; title3 "Sorted by Provider Last Name"; title4 "as of November 29, 2018" ; footnote1 "Prepared By: Provider Reporting"; footnote2 "Program File: 30 + ~/PFPD0248-CriticalRecredReport.sas"; footnote3 "Frequency: Daily"; where comdate="2018-12"; column cru_inis_nm bs_mpei_id mp_full_nm crapt_cd crpln_ds CRPLH_EFFT_DT APP_RCVD_DATE CRCS_CRNT_ATTN_DT cmt_cd_ind prof_cb 31 + org_cb agetime_attest rep_name pcp; define cru_inis_nm / 'Specialist|Initials' ; define bs_mpei_id / 'Provider|Number' ; define mp_full_nm / 'Provider Name' flow left ; define crapt_cd / 32 + 'Transmission|Type' format=$crapt.; define crpln_ds / 'Process Location' flow left ; define CRPLH_EFFT_DT / 'Process Loc|Date' format=mmddyy10. ; define APP_RCVD_DATe / 'App|Received' format=mmddyy10. ; 33 + define crcs_crnt_attn_dt / 'Attest|Date' format=mmddyy10. ; define cmt_cd_ind / 'Committee'; define prof_cb / 'Professional cred body'; define org_cb / 'Organizatioanl cred body'; define 34 + agetime_attest / 'Attest|Age' ; define rep_name / 'Provider Rep Name' flow left; define pcp / 'PCP' left ; run; NOTE: There were 1 observations read from the data set WORK.HC3STATUS3_ND. WHERE comdate='2018-12'; NOTE: PROCEDURE REPORT used (Total process time): real time 0.02 seconds cpu time 0.02 seconds 34 + ods TAGSETS.EXCELXP close ; ods listing; proc sql noprint; create table filenames1_ND as 35 + select distinct "PFPD0248_ND-critical-recred-2018-12-report" as filename length=200 , 'xls' as extension length = 4 from hc3status3_ND (OBS=1); NOTE: Table WORK.FILENAMES1_ND created, with 1 rows and 2 columns. 35 + quit; NOTE: PROCEDURE SQL used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 35 + data filenames1a_ND; set filenames1_ND(obs=1); run; proc append NOTE: There were 1 observations read from the data set WORK.FILENAMES1_ND. NOTE: The data set WORK.FILENAMES1A_ND has 1 observations and 2 variables. NOTE: DATA statement used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 36 + base=loclib.PFPD0248_filenames_ND data=filenames1a_ND; run; proc delete data=filenames1a_ND; run; NOTE: Appending WORK.FILENAMES1A_ND to LOCLIB.PFPD0248_FILENAMES_ND. 18 The SAS System Thursday, November 29, 2018 11:11:00 AM NOTE: There were 1 observations read from the data set WORK.FILENAMES1A_ND. NOTE: 1 observations added. NOTE: The data set LOCLIB.PFPD0248_FILENAMES_ND has 4 observations and 2 variables. NOTE: PROCEDURE APPEND used (Total process time): real time 0.09 seconds cpu time 0.00 seconds NOTE: Deleting WORK.FILENAMES1A_ND (memtype=DATA). NOTE: PROCEDURE DELETE used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 37 + ODS TAGSETS.EXCELXP FILE= "/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-Missing-NC-report.xls" STYLE= SASWEB OPTIONS (ORIENTATION='PORTRAIT' AUTOFILTER='ALL' Frozen_Headers='6' EMBEDDED_TITLES= 'YES' 38 + EMBEDDED_FOOTNOTES='YES' ABSOLUTE_COLUMN_WIDTH= "5,9,20,12,13,9,10,5" SHEET_NAME="Missing-NC") ; ods listing close ; proc report data=hc3status2_ND split = '|'; title1 " ND DETAIL REPORT " ; title2 "Provider List for Summary_ND by NOTE: Writing TAGSETS.EXCELXP Body file: /n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-Missing-NC-report.xls NOTE: This is the Excel XP tagset (Compatible with SAS 9.1.3 and above, v1.131, 04/23/2015). Add options(doc='help') to the ods statement for more information. 39 + Recred Date and Committee"; title3 "Missing-Committe"; title4 "as of November 29, 2018" ; footnote1 "Prepared By: Provider Reporting"; footnote2 "Program: PFPD0248-CriticalRecredReport.sas"; footnote3 "Frequency: 40 + Daily"; where comdate="Missing" and REGION_CD = "NC"; column cru_inis_nm bs_mpei_id mp_full_nm crapt_cd crpln_ds APP_RCVD_DATE CRCS_CRNT_ATTN_DT PCP; define cru_inis_nm 41 + / 'Spec|Init' ; define bs_mpei_id / 'Provider|Number' ; define mp_full_nm / 'Provider Name' flow left ; define crapt_cd / 'Transmission|Type' left format=$crapt.; define crpln_ds / 'Process 42 + Location' flow left ; define APP_RCVD_DATe / 'App|Rec' format=mmddyy10. ; define crcs_crnt_attn_dt / 'Attest|Date' format=mmddyy10. ; define pcp / 'PCP' left ; run; NOTE: There were 67 observations read from the data set WORK.HC3STATUS2_ND. WHERE (comdate='Missing') and (REGION_CD='NC'); NOTE: PROCEDURE REPORT used (Total process time): real time 0.09 seconds cpu time 0.09 seconds 42 + ods TAGSETS.EXCELXP close ; ods listing 43 +; proc sql noprint; create table filenames2_ND as select distinct "PFPD0248_ND-critical-recred-Missing-NC-report" as filename length=200 , 'xls' as extension length = 4 from hc3status2_ND (OBS=1); quit; data filenames2a_ND; set NOTE: Table WORK.FILENAMES2_ND created, with 1 rows and 2 columns. NOTE: PROCEDURE SQL used (Total process time): real time 0.00 seconds cpu time 0.01 seconds 44 + filenames2_ND(obs=1); run; NOTE: There were 1 observations read from the data set WORK.FILENAMES2_ND. NOTE: The data set WORK.FILENAMES2A_ND has 1 observations and 2 variables. 19 The SAS System Thursday, November 29, 2018 11:11:00 AM NOTE: DATA statement used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 44 + proc append base=loclib.PFPD0248_filenames_ND data=filenames2a_ND; run; proc delete data=filenames2a_ND; run; NOTE: Appending WORK.FILENAMES2A_ND to LOCLIB.PFPD0248_FILENAMES_ND. NOTE: There were 1 observations read from the data set WORK.FILENAMES2A_ND. NOTE: 1 observations added. NOTE: The data set LOCLIB.PFPD0248_FILENAMES_ND has 5 observations and 2 variables. NOTE: PROCEDURE APPEND used (Total process time): real time 0.03 seconds cpu time 0.00 seconds NOTE: Deleting WORK.FILENAMES2A_ND (memtype=DATA). NOTE: PROCEDURE DELETE used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 45 + ODS TAGSETS.EXCELXP FILE= "/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-Missing-NA-report.xls" STYLE= SASWEB OPTIONS (ORIENTATION='PORTRAIT' AUTOFILTER='ALL' Frozen_Headers='6' EMBEDDED_TITLES= 'YES' 46 + EMBEDDED_FOOTNOTES='YES' ABSOLUTE_COLUMN_WIDTH= "5,9,20,12,13,9,10,5" SHEET_NAME="Missing-NA") ; ods listing close ; proc report data=hc3status2_ND split = '|'; title1 " ND DETAIL REPORT " ; title2 "Provider List for Summary_ND by NOTE: Writing TAGSETS.EXCELXP Body file: /n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-Missing-NA-report.xls NOTE: This is the Excel XP tagset (Compatible with SAS 9.1.3 and above, v1.131, 04/23/2015). Add options(doc='help') to the ods statement for more information. 47 + Recred Date and Committee"; title3 "Missing-Not-Assigned"; title4 "as of November 29, 2018" ; footnote1 "Prepared By: Provider Reporting"; footnote2 "Program: PFPD0248-CriticalRecredReport.sas"; footnote3 "Frequency: 48 + Daily"; where comdate="Missing" and REGION_CD = "NA"; column cru_inis_nm bs_mpei_id mp_full_nm crapt_cd crpln_ds APP_RCVD_DATE CRCS_CRNT_ATTN_DT PCP; define cru_inis_nm 49 + / 'Spec|Init' ; define bs_mpei_id / 'Provider|Number' ; define mp_full_nm / 'Provider Name' flow left ; define crapt_cd / 'Transmission|Type' left format=$crapt.; define crpln_ds / 'Process 50 + Location' flow left ; define APP_RCVD_DATe / 'App|Rec' format=mmddyy10. ; define crcs_crnt_attn_dt / 'Attest|Date' format=mmddyy10. ; define pcp / 'PCP' left ; run; NOTE: There were 1 observations read from the data set WORK.HC3STATUS2_ND. WHERE (comdate='Missing') and (REGION_CD='NA'); NOTE: PROCEDURE REPORT used (Total process time): real time 0.02 seconds cpu time 0.02 seconds 50 + ods TAGSETS.EXCELXP close ; ods listing 51 +; proc sql noprint; create table filenames2_ND as select distinct "PFPD0248_ND-critical-recred-Missing-NA-report" as filename length=200 , 'xls' as extension length = 4 from hc3status2_ND (OBS=1); quit; data filenames2a_ND; set NOTE: Table WORK.FILENAMES2_ND created, with 1 rows and 2 columns. 20 The SAS System Thursday, November 29, 2018 11:11:00 AM NOTE: PROCEDURE SQL used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 52 + filenames2_ND(obs=1); run; NOTE: There were 1 observations read from the data set WORK.FILENAMES2_ND. NOTE: The data set WORK.FILENAMES2A_ND has 1 observations and 2 variables. NOTE: DATA statement used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 52 + proc append base=loclib.PFPD0248_filenames_ND data=filenames2a_ND; run; proc delete data=filenames2a_ND; run; NOTE: Appending WORK.FILENAMES2A_ND to LOCLIB.PFPD0248_FILENAMES_ND. NOTE: There were 1 observations read from the data set WORK.FILENAMES2A_ND. NOTE: 1 observations added. NOTE: The data set LOCLIB.PFPD0248_FILENAMES_ND has 6 observations and 2 variables. NOTE: PROCEDURE APPEND used (Total process time): real time 0.02 seconds cpu time 0.00 seconds NOTE: Deleting WORK.FILENAMES2A_ND (memtype=DATA). NOTE: PROCEDURE DELETE used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 53 + ODS TAGSETS.EXCELXP FILE= "/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-Missing-report.xls" STYLE= SASWEB OPTIONS (ORIENTATION='LANDSCAPE' AUTOFILTER='ALL' Frozen_Headers='6' EMBEDDED_TITLES= 'YES' 54 + EMBEDDED_FOOTNOTES='YES' ABSOLUTE_COLUMN_WIDTH= "10,9,18,12,14,11,10,10,11,11,11,11,8,8,7,7,9,7,5,7,9,11,7,6,20,5" SHEET_NAME="Missing") ; ods listing close ; proc report data=hc3status3_ND split = '|'; title1 " ND DETAIL REPORT " ; NOTE: Writing TAGSETS.EXCELXP Body file: /n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-Missing-report.xls NOTE: This is the Excel XP tagset (Compatible with SAS 9.1.3 and above, v1.131, 04/23/2015). Add options(doc='help') to the ods statement for more information. 55 + title2 "Provider List for Summary_ND by Recred Date and Committee"; title3 "Sorted by Provider Last Name"; title4 "as of November 29, 2018" ; footnote1 "Prepared By: Provider Reporting"; footnote2 "Program File: 56 + ~/PFPD0248-CriticalRecredReport.sas"; footnote3 "Frequency: Daily"; where comdate="Missing"; column cru_inis_nm bs_mpei_id mp_full_nm crapt_cd crpln_ds CRPLH_EFFT_DT APP_RCVD_DATE CRCS_CRNT_ATTN_DT cmt_cd_ind prof_cb 57 + org_cb agetime_attest rep_name pcp; define cru_inis_nm / 'Specialist|Initials' ; define bs_mpei_id / 'Provider|Number' ; define mp_full_nm / 'Provider Name' flow left ; define crapt_cd / 58 + 'Transmission|Type' format=$crapt.; define crpln_ds / 'Process Location' flow left ; define CRPLH_EFFT_DT / 'Process Loc|Date' format=mmddyy10. ; define APP_RCVD_DATe / 'App|Received' format=mmddyy10. ; 59 + define crcs_crnt_attn_dt / 'Attest|Date' format=mmddyy10. ; define cmt_cd_ind / 'Committee'; define prof_cb / 'Professional cred body'; define org_cb / 'Organizatioanl cred body'; define 60 + agetime_attest / 'Attest|Age' ; define rep_name / 'Provider Rep Name' flow left; define pcp / 'PCP' left ; run; NOTE: There were 53 observations read from the data set WORK.HC3STATUS3_ND. WHERE comdate='Missing'; NOTE: PROCEDURE REPORT used (Total process time): real time 0.11 seconds 21 The SAS System Thursday, November 29, 2018 11:11:00 AM cpu time 0.12 seconds 60 + ods TAGSETS.EXCELXP close ; ods listing; proc sql noprint; create table filenames1_ND as 61 + select distinct "PFPD0248_ND-critical-recred-Missing-report" as filename length=200 , 'xls' as extension length = 4 from hc3status3_ND (OBS=1); NOTE: Table WORK.FILENAMES1_ND created, with 1 rows and 2 columns. 61 + quit; NOTE: PROCEDURE SQL used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 61 + data filenames1a_ND; set filenames1_ND(obs=1); run; proc append NOTE: There were 1 observations read from the data set WORK.FILENAMES1_ND. NOTE: The data set WORK.FILENAMES1A_ND has 1 observations and 2 variables. NOTE: DATA statement used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 62 + base=loclib.PFPD0248_filenames_ND data=filenames1a_ND; run; proc delete data=filenames1a_ND; run; NOTE: Appending WORK.FILENAMES1A_ND to LOCLIB.PFPD0248_FILENAMES_ND. NOTE: There were 1 observations read from the data set WORK.FILENAMES1A_ND. NOTE: 1 observations added. NOTE: The data set LOCLIB.PFPD0248_FILENAMES_ND has 7 observations and 2 variables. NOTE: PROCEDURE APPEND used (Total process time): real time 0.02 seconds cpu time 0.00 seconds NOTE: Deleting WORK.FILENAMES1A_ND (memtype=DATA). NOTE: PROCEDURE DELETE used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 206 207 /* CREATE AND FTP SUMMARY PAGE OUT ON THE HIGHWIRE */ 208 %macro ftp_summary(file); 209 FILENAME fileout "&rptpath/&rptname-critical-recred-summary.&file"; 210 211 ods listing close ; 212 ods &file body = fileout ; 213 options pageno=1 center nodate orientation=landscape; 214 215 proc report data=summary2_&lob nowd split='|' headline missing style=[font_size=7]; 216 title1 height=2 "SUMMARY_&lob REPORT "; 217 title2 height=1 "Provider Summary_&lob by Recred Date "; 218 title3 height=1 "as of %sysfunc(date(),worddate.)" ; 219 footnote1 height=1 "Prepared By: Dmitry Isaykin" ; 220 footnote2 height=1 "Program File: ~/PFPD0248-CriticalRecredReport.sas"; 221 footnote3 height=1 "Frequency: Daily"; 22 The SAS System Thursday, November 29, 2018 11:11:00 AM 222 column comdate cmt_cd_cnt na_cnt prv_cnt ; 223 define comdate / 'Recred|Date' width=10 center ; 224 define cmt_cd_cnt / sum 'committe|Count' width=12 right; 225 define na_cnt / sum 'Not|Assigned|Count' width=8 right ; 226 define prv_cnt / sum 'Unique|Case Total|Count' width=10 right; 227 rbreak after / summarize; 228 229 compute cmt_cd_cnt ; 230 if _break_ = '' and _c2_ > 0 then 231 call define 232 (_col_,"URL","&rptname-critical-recred-"||trim(comdate)||"-&cmt_cd-report.xls"); 233 endcomp; 234 235 compute NA_cnt ; 236 if _break_ = '' and _c3_ > 0 then 237 call define 238 (_col_,"URL","&rptname-critical-recred-"||trim(comdate)||"-NA-report.xls"); 239 endcomp; 240 241 compute prv_cnt ; 242 if _break_ = '' and _c4_ > 0 then 243 call define 244 (_col_,"URL","&rptname-critical-recred-"||trim(comdate)||"-report.xls"); 245 endcomp; 246 247 run; 248 ods &file close; 249 /*===================================================================================*/ 250 /*creates table of dynamic named datasets to be utilized in FTP program*/ 251 /*===================================================================================*/ 252 proc sql noprint; 253 create table filenames3_&lob as 254 select distinct "&rptname-critical-recred-summary" as filename length=200 255 , "&file." as extension length = 4 256 from hc3status2_&lob (OBS=1); 257 quit; 258 data filenames3a_&lob; 259 set filenames3_&lob(obs=1); 260 run; 261 /* Append ADD dataset to MASTER dataset */ 262 proc append base=loclib.PFPD0248_filenames_&lob. data=filenames3a_&lob; 263 run; 264 proc delete data=filenames3a_&lob; 265 run; 266 267 /*===================================================================================*/ 268 /*end of table creation*/ 269 270 %mend ftp_summary; 271 272 %ftp_summary(pdf); MLOGIC(FTP_SUMMARY): Beginning execution. MLOGIC(FTP_SUMMARY): Parameter FILE has value pdf SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable FILE resolves to pdf MPRINT(FTP_SUMMARY): FILENAME fileout "/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-summary.pdf"; 23 The SAS System Thursday, November 29, 2018 11:11:00 AM MPRINT(FTP_SUMMARY): ods listing close ; SYMBOLGEN: Macro variable FILE resolves to pdf MPRINT(FTP_SUMMARY): ods pdf body = fileout ; WARNING: Unsupported device 'ACTIVEX' for PDF destination. Using device 'ACTXIMG'. NOTE: Writing ODS PDF output to DISK destination "FILEOUT", printer "PDF". MPRINT(FTP_SUMMARY): options pageno=1 center nodate orientation=landscape; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_SUMMARY): proc report data=summary2_ND nowd split='|' headline missing style=[font_size=7]; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_SUMMARY): title1 height=2 "SUMMARY_ND REPORT "; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_SUMMARY): title2 height=1 "Provider Summary_ND by Recred Date "; MPRINT(FTP_SUMMARY): title3 height=1 "as of November 29, 2018" ; MPRINT(FTP_SUMMARY): footnote1 height=1 "Prepared By: Dmitry Isaykin" ; MPRINT(FTP_SUMMARY): footnote2 height=1 "Program File: ~/PFPD0248-CriticalRecredReport.sas"; MPRINT(FTP_SUMMARY): footnote3 height=1 "Frequency: Daily"; MPRINT(FTP_SUMMARY): column comdate cmt_cd_cnt na_cnt prv_cnt ; MPRINT(FTP_SUMMARY): define comdate / 'Recred|Date' width=10 center ; MPRINT(FTP_SUMMARY): define cmt_cd_cnt / sum 'committe|Count' width=12 right; MPRINT(FTP_SUMMARY): define na_cnt / sum 'Not|Assigned|Count' width=8 right ; MPRINT(FTP_SUMMARY): define prv_cnt / sum 'Unique|Case Total|Count' width=10 right; MPRINT(FTP_SUMMARY): rbreak after / summarize; MPRINT(FTP_SUMMARY): compute cmt_cd_cnt ; SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable CMT_CD resolves to NC MPRINT(FTP_SUMMARY): if _break_ = '' and _c2_ > 0 then call define (_col_,"URL","PFPD0248_ND-critical-recred-"||trim(comdate)||"-NC-report.xls"); MPRINT(FTP_SUMMARY): endcomp; MPRINT(FTP_SUMMARY): compute NA_cnt ; SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND MPRINT(FTP_SUMMARY): if _break_ = '' and _c3_ > 0 then call define (_col_,"URL","PFPD0248_ND-critical-recred-"||trim(comdate)||"-NA-report.xls"); MPRINT(FTP_SUMMARY): endcomp; MPRINT(FTP_SUMMARY): compute prv_cnt ; SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND MPRINT(FTP_SUMMARY): if _break_ = '' and _c4_ > 0 then call define (_col_,"URL","PFPD0248_ND-critical-recred-"||trim(comdate)||"-report.xls"); MPRINT(FTP_SUMMARY): endcomp; MPRINT(FTP_SUMMARY): run; NOTE: There were 3 observations read from the data set WORK.SUMMARY2_ND. NOTE: PROCEDURE REPORT used (Total process time): real time 0.07 seconds cpu time 0.03 seconds SYMBOLGEN: Macro variable FILE resolves to pdf MPRINT(FTP_SUMMARY): ods pdf close; NOTE: ODS PDF printed 1 page to /n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-summary.pdf. MPRINT(FTP_SUMMARY): proc sql noprint; SYMBOLGEN: Macro variable LOB resolves to ND SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable FILE resolves to pdf SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_SUMMARY): create table filenames3_ND as select distinct "PFPD0248_ND-critical-recred-summary" as filename length=200 , "pdf" as extension length = 4 from hc3status2_ND (OBS=1); NOTE: Table WORK.FILENAMES3_ND created, with 1 rows and 2 columns. 24 The SAS System MPRINT(FTP_SUMMARY): quit; NOTE: PROCEDURE SQL used (Total process time): real time 0.00 seconds cpu time 0.01 seconds SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_SUMMARY): data filenames3a_ND; SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_SUMMARY): set filenames3_ND(obs=1); MPRINT(FTP_SUMMARY): run; NOTE: There were 1 observations read from the data set WORK.FILENAMES3_ND. NOTE: The data set WORK.FILENAMES3A_ND has 1 observations and 2 variables. NOTE: DATA statement used (Total process time): real time 0.00 seconds cpu time 0.00 seconds SYMBOLGEN: Macro variable LOB resolves to ND SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_SUMMARY): proc append base=loclib.PFPD0248_filenames_ND data=filenames3a_ND; MPRINT(FTP_SUMMARY): run; NOTE: Appending WORK.FILENAMES3A_ND to LOCLIB.PFPD0248_FILENAMES_ND. NOTE: There were 1 observations read from the data set WORK.FILENAMES3A_ND. NOTE: 1 observations added. NOTE: The data set LOCLIB.PFPD0248_FILENAMES_ND has 8 observations and 2 variables. NOTE: PROCEDURE APPEND used (Total process time): real time 0.02 seconds cpu time 0.00 seconds SYMBOLGEN: Macro variable LOB resolves to ND MPRINT(FTP_SUMMARY): proc delete data=filenames3a_ND; MPRINT(FTP_SUMMARY): run; NOTE: Deleting WORK.FILENAMES3A_ND (memtype=DATA). NOTE: PROCEDURE DELETE used (Total process time): real time 0.00 seconds cpu time 0.00 seconds MLOGIC(FTP_SUMMARY): Ending execution. 273 SYMBOLGEN: Macro variable LOB resolves to ND 274 data loclib.PFPD0248_filenames_&lob. ; SYMBOLGEN: Macro variable LOB resolves to ND 275 set loclib.pfpd0248_filenames_&lob.; 276 length pgm_name $100.; 277 pgm_name=trim(filename) || "." || trim(extension); 278 run; NOTE: There were 8 observations read from the data set LOCLIB.PFPD0248_FILENAMES_ND. NOTE: The data set LOCLIB.PFPD0248_FILENAMES_ND has 8 observations and 3 variables. NOTE: DATA statement used (Total process time): real time 0.08 seconds cpu time 0.00 seconds 25 The SAS System 279 280 281 /* ************************************************************************ */ 282 * Put all of the programs into a zip file ; 283 /* Make sure THIS zip file does not exist - i.e. clear the NEW zip file */ 284 filename dmyfile "loclib.&rptname.-critical-recred-summary_&FILEDATE..zip"; SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable FILEDATE resolves to 20181129 285 data _null_; 286 if (fexist('dmyfile')) then 287 rc=fdelete('dmyfile'); 288 run; NOTE: DATA statement used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 289 filename dmyfile clear; NOTE: Fileref DMYFILE has been deassigned. 290 291 data _null_; SYMBOLGEN: Macro variable LOB resolves to ND 292 set loclib.pfpd0248_filenames_&lob. end=last; 293 if _n_=1 then call execute('ods package(ZipFile) open;'); 294 call execute(cats('ods package(ZipFile) add file=',pgm_name,';')); 295 if last then do; 296 call execute('ods package(ZipFile) close;'); 297 call execute('ods package(ZipFile) publish properties(archive_name="&rptname.-critical-recred-summary_&FILEDATE..zip" 297 ! archive_path="&rptpath.");'); 298 end; 299 run; SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable FILEDATE resolves to 20181129 SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest NOTE: There were 8 observations read from the data set LOCLIB.PFPD0248_FILENAMES_ND. NOTE: DATA statement used (Total process time): real time 0.00 seconds cpu time 0.01 seconds NOTE: CALL EXECUTE generated line. 1 + ods package(ZipFile) open; NOTE: Line generated by the CALL EXECUTE routine. 2 + ods package(ZipFile) add file=PFPD0248_ND-critical-recred-2018-11-NC-report.xls; _ 22 200 NOTE: Line generated by the CALL EXECUTE routine. 3 + ods package(ZipFile) add file=PFPD0248_ND-critical-recred-2018-11-report.xls; _ 22 200 NOTE: Line generated by the CALL EXECUTE routine. 26 The SAS System 4 + ods package(ZipFile) add file=PFPD0248_ND-critical-recred-2018-12-NA-report.xls; _ 22 200 NOTE: Line generated by the CALL EXECUTE routine. 5 + ods package(ZipFile) add file=PFPD0248_ND-critical-recred-2018-12-report.xls; _ 22 200 NOTE: Line generated by the CALL EXECUTE routine. 6 + ods package(ZipFile) add file=PFPD0248_ND-critical-recred-Missing-NC-report.xls; _ 22 200 NOTE: Line generated by the CALL EXECUTE routine. 7 + ods package(ZipFile) add file=PFPD0248_ND-critical-recred-Missing-NA-report.xls; _ 22 200 NOTE: Line generated by the CALL EXECUTE routine. 8 + ods package(ZipFile) add file=PFPD0248_ND-critical-recred-Missing-report.xls; _ 22 200 NOTE: Line generated by the CALL EXECUTE routine. 9 + ods package(ZipFile) add file=PFPD0248_ND-critical-recred-summary.pdf; _ 22 200 ERROR 22-322: Syntax error, expecting one of the following: ;, DESCRIPTION, MIMETYPE, PATH, TEXT. ERROR 200-322: The symbol is not recognized and will be ignored. 10 + ods package(ZipFile) close; 11 + ods package(ZipFile) publish properties(archive_name="PFPD0248_ND-critical-recred-summary_20181129.zip" archive_path="/n04/data/provinfo/penvtest/fileout/hc3/"); WARNING: ODS Package ID: ZIPFILE does not exist, no action taken. 300 301 GOPTIONS NOACCESSIBLE; 302 %LET _CLIENTTASKLABEL=; 303 %LET _CLIENTPROJECTPATH=; 304 %LET _CLIENTPROJECTNAME=; 305 %LET _SASPROGRAMFILE=; 306 307 ;*';*";*/;quit;run; 308 ODS _ALL_ CLOSE; 309 310 311 QUIT; RUN; 312
Yes, missing quotes as @Tom has said:
data _null_; set loclib.xyz end=last; if _n_=1 then call execute('ods package(newzip) open'); call execute(cats('ods package(newzip) add file="<path>/',pgm_name,'";')); if last then do;
call execute('ods package(newzip) close;');
call execute('ods package(newzip) publish properties(archive_name="want.zip" archive_path="c:/want");');
end;
run;
You will also need to provide a path to that file as well, replace <path> in the above to where that file is stored.
Also, to come back to the XLS issue, you are not even creating an XLS file, you are creating an XML file (via ods tagsets), don't give files an extension that does not describe the content, that is bad. Call it XML which is what it is, even if Excel can parse it, it is still XML and definately not an XLS file.
Shouldn't the name of the file be in quotes?
1 + ods package(ZipFile) open; NOTE: Line generated by the CALL EXECUTE routine. 2 + ods package(ZipFile) add file=PFPD0248_ND-critical-recred-2018-11-NC-report.xls; _ 22 200
So something like:
call execute(cats('ods package(newzip) add file=',quote(trim(pgm_name)),';'));
Hi,
WARNING: ODS Package ID: NEWZIP does not exist, no action taken.
As you suggested I have added the same quote to read files. After adding that I could see files are reading successfully.
Even I changed the file extension .xml files.
But still I am getting warning messages and files are not zipped.
tried with both the steps: same warning messages.
call execute(cats('ods package(newzip) add file=',quote(trim(pgm_name)),';'));
/* call execute(cats('ods package(newzip) add file="&rptpath/',pgm_name,'";'));*/
279 280 281 /* ************************************************************************ */ 282 * Put all of the programs into a zip file ; 283 /* Make sure THIS zip file does not exist - i.e. clear the NEW zip file */ 284 filename dmyfile "loclib.&rptname.-critical-recred-summary_&FILEDATE..zip"; SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable FILEDATE resolves to 20181130 285 data _null_; 286 if (fexist('dmyfile')) then 287 rc=fdelete('dmyfile'); 288 run; NOTE: DATA statement used (Total process time): real time 0.00 seconds cpu time 0.00 seconds 289 filename dmyfile clear; NOTE: Fileref DMYFILE has been deassigned. 290 291 /* Open Package */ 292 /*ods package(newzip) open nopf;*/ 293 294 data _null_; SYMBOLGEN: Macro variable LOB resolves to ND 295 set loclib.pfpd0248_filenames_&lob. end=last; 296 if _n_=1 then call execute('ods package(newzip) open;'); 297 /* call execute(cats('ods package(newzip) add file=',quote(trim(pgm_name)),';'));*/ 298 call execute(cats('ods package(newzip) add file="&rptpath/',pgm_name,'";')); 299 if last then do; 300 call execute('ods package(newzip) close;'); 301 call execute('ods package(newzip) publish archive 301 ! properties(archive_name="&rptname.-critical-recred-summary_&FILEDATE..zip" archive_path="&rptpath.");'); 302 end; 303 run; SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest SYMBOLGEN: Macro variable RPTNAME resolves to PFPD0248_ND SYMBOLGEN: Macro variable FILEDATE resolves to 20181130 SYMBOLGEN: Macro variable RPTPATH resolves to &path./fileout/hc3/ 26 The SAS System SYMBOLGEN: Macro variable PATH resolves to /n04/data/provinfo/penvtest NOTE: There were 8 observations read from the data set LOCLIB.PFPD0248_FILENAMES_ND. NOTE: DATA statement used (Total process time): real time 0.01 seconds cpu time 0.01 seconds NOTE: CALL EXECUTE generated line. 1 + ods package(newzip) open; 2 + ods package(newzip) add file="/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-2018-11-NC-report.xml"; 3 + ods package(newzip) add file="/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-2018-11-report.xml"; 4 + ods package(newzip) add file="/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-2018-12-NA-report.xml"; 5 + ods package(newzip) add file="/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-2018-12-report.xml"; 6 + ods package(newzip) add file="/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-Missing-NC-report.xml"; 7 + ods package(newzip) add file="/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-Missing-NA-report.xml"; 8 + ods package(newzip) add file="/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-Missing-report.xml"; 9 + ods package(newzip) add file="/n04/data/provinfo/penvtest/fileout/hc3//PFPD0248_ND-critical-recred-summary.pdf"; 10 + ods package(newzip) close; 11 + ods package(newzip) publish archive properties(archive_name="PFPD0248_ND-critical-recred-summary_20181130.zip" archive_path="/n04/data/provinfo/penvtest/fileout/hc3/"); WARNING: ODS Package ID: NEWZIP does not exist, no action taken. 304 305 306 GOPTIONS NOACCESSIBLE; 307 %LET _CLIENTTASKLABEL=; 308 %LET _CLIENTPROJECTPATH=; 309 %LET _CLIENTPROJECTNAME=; 310 %LET _SASPROGRAMFILE=; 311 312 ;*';*";*/;quit;run; 313 ODS _ALL_ CLOSE; 314 315 316 QUIT; RUN; 317
SAS Innovate 2025 is scheduled for May 6-9 in Orlando, FL. Sign up to be first to learn about the agenda and registration!
SAS' Charu Shankar shares her PROC SQL expertise by showing you how to master the WHERE clause using real winter weather data.
Find more tutorials on the SAS Users YouTube channel.