SAS存储进程STP Web:如何引用html文件作为FILE_WebOUT而不是PUT语句? [英] SAS Stored Process STP web: How to reference html file for file _webout instead of put statements?
问题描述
我已经看到了各种页面,它们通知SAS存储进程用户如何创建存储进程网页,如下所示:
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屋!