SAS中文论坛

标题: 请帮忙帮我解释下语句的意思 [打印本页]

作者: shiyiming    时间: 2010-4-19 09:13
标题: 请帮忙帮我解释下语句的意思
put ' <SCRIPT LANGUAGE="JavaScript">';
put 'function to_rep()';
put '{';
put 'form1.target="_self";';
put 'form1._program.value="SBIP://Foundation/dw/mart_yrl/sjzb/web_yrl_sjzb_18";';
put 'form1.submit();';
put '}';
put ' </script>';


%if &flag=2 %then %delet_1(yrl.MTRL0003,12,"1",1);
%if &flag=3 %then %updata_1(yrl.MTRL0003,12,"1",1);
%if &flag=4 %then %add_2(yrl.MTRL0003,12,"1",1);
%selects("1",yrl.MTRL0003,1);
%field_name;/*表字段*/
%if &flag=1 %then %add_1(yrl.MTRL0003,12,"1",1);

%if "&flag" ne "1" %then %do;
%table_t(yrl.MTRL0003,&page_num,12);
%table_end;
%end;
作者: shiyiming    时间: 2010-4-19 13:57
标题: Re: 请帮忙帮我解释下语句的意思
感觉象是从整段grogram中截取的部分语句,所以我基本上是靠蒙的
<!-- s:? --><img src="{SMILIES_PATH}/icon_confused.gif" alt=":?" title="Confused" /><!-- s:? --> [code:1cps7jgb]put ' &lt;SCRIPT LANGUAGE=&quot;JavaScript&quot;&gt;';
put 'function to_rep()';
put '{';
put 'form1&#46;target=&quot;_self&quot;;';
put 'form1&#46;_program&#46;value=&quot;SBIP&#58;//Foundation/dw/mart_yrl/sjzb/web_yrl_sjzb_18&quot;;';
put 'form1&#46;submit();';
put '}';
put ' &lt;/script&gt;';
/* 以上8条put语句,把配对单引号内的文本put出来,put到哪说不好 */

/* 当macro variable flag的值为2时,调用macro delet_1(),参数的意义和macro的作用不知道 */
/* 猜测yrl&#46;MTRL0003是个2级命名的SAS dataset */
%if &amp;flag=2 %then %delet_1(yrl&#46;MTRL0003,12,&quot;1&quot;,1);
/* 当macro variable flag的值为3时,调用macro updata_1(),参数的意义和macro的作用不知道 */
%if &amp;flag=3 %then %updata_1(yrl&#46;MTRL0003,12,&quot;1&quot;,1);
/* 当macro variable flag的值为4时,调用macro add_2(),参数的意义和macro的作用不知道 */
%if &amp;flag=4 %then %add_2(yrl&#46;MTRL0003,12,&quot;1&quot;,1);
/* 调用macro selects(),参数的意义和macro的作用不知道 */
%selects(&quot;1&quot;,yrl&#46;MTRL0003,1);
/* 调用macro field_name,作用不知道,按注释猜和创建表字段有关 */
%field_name;/*表字段*/
/* 当macro variable flag的值为1时,调用macro add_1(),参数的意义和macro的作用不知道 */
%if &amp;flag=1 %then %add_1(yrl&#46;MTRL0003,12,&quot;1&quot;,1);

/* 当macro variable flag的值不为1时,执行do group的语句 */
/* 不知此处为何加双引号 */
%if &quot;&amp;flag&quot; ne &quot;1&quot; %then
        %do;
                %table_t(yrl&#46;MTRL0003,&amp;page_num,12); /*调用macro table_t(),参数的意义和macro的作用不知道*/
                %table_end; /*调用macro table_end,作用不知道*/
        %end; [/code:1cps7jgb]
作者: shiyiming    时间: 2010-4-20 08:51
标题: Re: 请帮忙帮我解释下语句的意思
前8个是VBA语句,可能是操作ACCESS(严重有可疑)或其他支持VBA的office工具。
language='javascript'?难道还和java有关系,没研究过SAS和java的关系。
以下的宏语句是使用另外的几个宏(应该编译的是SQL语句)来操作数据表:select,update,delete...。
有才的人真不少。
作者: shiyiming    时间: 2010-4-20 09:18
标题: Re: 请帮忙帮我解释下语句的意思
的确是从一个程序截的,包括SAS,JAVASCRIPT,HTML,SQL郁闷
作者: shiyiming    时间: 2010-4-20 10:25
标题: Re: 请帮忙帮我解释下语句的意思
you just run this program and read the output.




欢迎光临 SAS中文论坛 (http://www.mysas.net/forum/) Powered by Discuz! X3.2