SAS存储进程STP Web:如何引用html文件作为FILE_WebOUT而不是PUT语句? [英] SAS Stored Process STP web: How to reference html file for file _webout instead of put statements?

查看:12
本文介绍了SAS存储进程STP Web:如何引用html文件作为FILE_WebOUT而不是PUT语句?的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!

问题描述

我已经看到了各种页面,它们通知SAS存储进程用户如何创建存储进程网页,如下所示:

https://support.sas.com/documentation/cdl/en/stpug/62758/HTML/default/viewer.htm#p0q383asmm4bejn1i7z4q7iv5eke.htm

data _null_;
file _webout;
put '<HTML>';
put '<HEAD><TITLE>Hello World!</TITLE></HEAD>';
put '<BODY>';
put '<H1>Hello World!</H1>';
put '</BODY>';
put '</HTML>';
run;

PUT HTML语句很好,而且是将HTML转到页面的一种快速方法,但我注意到使用PUT的HTML变得非常杂乱且不可维护。

如何才能改为引用外部HTML文件?我确实有一些在HTMLPUT语句中引用的SAS宏,因此我不确定这些宏是否能在外部html中解析,但仍有兴趣查看在存储进程中引用外部HTML文件的工作示例。

更新-我的示例程序

在此PUT HTML中,我只是将一个表单写入网页,并在下拉列表中填充一些数据。我只想将其调用为外部HTML文件中的原始html,同时仍像宏变量引用一样解析嵌入在html中的SAS代码。

%macro test;

proc sql;        
create table eqmtid_name as        
      select distinct EQMT_ID        
      from library.joined_data;        

%let neqmtid = &sqlobs;        
quit;        

data _null_;        
set eqmtid_name;        
 suffix=put(_n_,8.);        
 call symput(cats('EQMTID',suffix), EQMT_ID);        
run;    

data _null_;

file _webout;
put '<script type="text/javascript">document.body.innerHTML = "";</script>';  
put '<HTML>';  
put '<head>';  
put '<script type="text/javascript">'; 
put 'document.addEventListener("DOMContentLoaded", function initialize() {'; 
put '   var svgs = document.getElementsByTagName("svg");'; 
put '   for (i = 0; i < svgs.length; ++i) {'; 
put '    e = svgs[i];'; 
put '    e.removeAttribute("height");'; 
put '    e.removeAttribute("width");'; 
put '    e.setAttribute("width","80%");'; 
put '   }'; 
put '   '; 
put '});'; 
put '</script>'; 
put '</head>';  
put '<BODY onload="initialize()">';   
put '<HEADER class="pageheader">'; 
put '<TABLE>'; 
put '<tr>';
put '<td>'; 
put '<div class="divcenter">Header Text</div>'; 
put '</td>'; 
put '</tr>'; 
put '</TABLE>'; 
put '</HEADER>'; 
put '<FORM NAME="sub" METHOD="GET" ACTION="/SASStoredProcess/do">';            
put '<INPUT TYPE="HIDDEN" NAME="_program" SIZE="100" VALUE="/Company/IT/Development/APP/stp_program">';         
put '<INPUT TYPE="CHECKBOX" NAME="_debug" VALUE="log">Show SAS Log <br>';       
put '<TABLE>';        
put '<tr>';        
put '<td>';        
put '<label class="formitem">Equipment ID:</label>';        
put '</td>';        
put '<td>';        
put '<select class="formitem styleinput" name="EQMTID">' /        
   '<option value=""></option>' /        
   %do i = 1 %to &neqmtid; /        
   "<option value = %bquote(")%left(%trim(&&EQMTID&i))%bquote(") >&&EQMTID&i</option>" /        
   %end; /        
   '</select>';        
put '</td>';        
put '</TABLE>';        
put '<br>'; 
put '<TABLE>';  
put '<tr>'; 
put '<td>'; 
put '<INPUT class="button" class="formitem" TYPE="SUBMIT" VALUE="Search"><br>';       
put '</td>'; 
put '</FORM>'; 
put '<FORM NAME="download" TARGET="_blank" METHOD="GET" ACTION="/SASStoredProcess/do">';            
put '<INPUT TYPE="HIDDEN" NAME="_program" SIZE="100" VALUE="/Company/IT/Development/APP/export_data_stp">';         
put '<td>'; 
put '<INPUT class="button" class="formitem" TYPE="SUBMIT" VALUE="Download"><br>';       
put '</td>'; 
put '</FORM>'; 
put '</tr>'; 
put '</TABLE>'; 
put '</BODY>';             
put '</HTML>';   

run;

%mend;

%test;

更新已解决

感谢下面概述的示例Joe,这是我必须编写的代码,才能使其工作……在SAS代码中:

filename htmlfile "/sasdata/IT/APP/file.html";

proc stream outfile=_webout;
begin
&streamdelim; %include htmlfile;
;;;;
run;
注意:在您的html文件中,如果有像%do循环这样的宏语句,您可能会收到类似"错误:%do语句在开放代码中无效"这样的错误。为了解决该错误,我在html文件中为该语句添加了一个宏包装,如下所示:

<select class="formitem styleinput" name="EQMTID">       
<option value=""></option>

%macro doeqmt;

%do i = 1 %to &neqmtid;    
"<option value = %bquote(")%left(%trim(&&EQMTID&i))%bquote(") >&&EQMTID&i</option>"
%end;

%mend;
%doeqmt;

</select>

推荐答案

根据您的具体细节,有几种方法可以做到这一点,但最简单的两种方法是将Html读入数据步骤(在一个字符变量中,每行一个),然后再次将其放回(如果您需要对其执行一些修改,这会更好),或者正如Tom建议的那样,如果您不需要对其进行太多修改,或者如果您可以在原始Html前文件中插入宏变量(或宏),则可以使用PROC STREAM

proc流非常简单。假设我有一个Hello world类型的文件,位于c:phaelloworld.html

<html>
  <header>
    <title>My Example Page</title>
  </header>
  <body>
    <h1> Hello, World </h1>
  </body>
</html>

然后我可以编写这个短程序:

filename htmlfile "c:	emphelloworld.html";
filename outfile  "c:	empstream.html";
proc stream outfile=outfile;
begin
&streamdelim readfile htmlfile;
;;;;
run;

我现在有一个新文件stream.html,具有相同的内容。并且已解析其中的任何宏变量或宏。

例如,让我们稍微更改一下:

输入:

<html>
  <header>
    <title>My Example Page</title>
  </header>
  <body>
    <h1> &mystring. </h1>
  </body>
</html>

输出,注意新的%let

filename htmlfile "c:	emphelloworld.html";
filename outfile  "c:	empstream.html";

%let mystring = Hello, World;
proc stream outfile=outfile;
begin
&streamdelim readfile htmlfile;
;;;;
run;

请注意,它为我们解析宏变量。

您只需将outfile更改为_WEBOUT,如果我理解正确的话,您应该会得到您希望的结果。

这篇关于SAS存储进程STP Web:如何引用html文件作为FILE_WebOUT而不是PUT语句?的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!

查看全文
登录 关闭
扫码关注1秒登录
发送“验证码”获取 | 15天全站免登陆