/* 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
April 27 – 30 | Gaylord Texan | Grapevine, Texas
Walk in ready to learn. Walk out ready to deliver. This is the data and AI conference you can't afford to miss.
Register now and lock in 2025 pricing—just $495!
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.