SAS中文论坛

 找回密码
 立即注册

扫一扫,访问微社区

查看: 688|回复: 4
打印 上一主题 下一主题

请帮忙帮我解释下语句的意思

[复制链接]

49

主题

76

帖子

1462

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
1462
楼主
 楼主| 发表于 2010-4-19 09:13:34 | 只看该作者

请帮忙帮我解释下语句的意思

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;
回复 支持 反对

使用道具 举报

49

主题

76

帖子

1462

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
1462
沙发
 楼主| 发表于 2010-4-19 13:57:22 | 只看该作者

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]
回复 支持 反对

使用道具 举报

49

主题

76

帖子

1462

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
1462
板凳
 楼主| 发表于 2010-4-20 08:51:55 | 只看该作者

Re: 请帮忙帮我解释下语句的意思

前8个是VBA语句,可能是操作ACCESS(严重有可疑)或其他支持VBA的office工具。
language='javascript'?难道还和java有关系,没研究过SAS和java的关系。
以下的宏语句是使用另外的几个宏(应该编译的是SQL语句)来操作数据表:select,update,delete...。
有才的人真不少。
回复 支持 反对

使用道具 举报

49

主题

76

帖子

1462

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
1462
地板
 楼主| 发表于 2010-4-20 09:18:17 | 只看该作者

Re: 请帮忙帮我解释下语句的意思

的确是从一个程序截的,包括SAS,JAVASCRIPT,HTML,SQL郁闷
回复 支持 反对

使用道具 举报

49

主题

76

帖子

1462

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
1462
5#
 楼主| 发表于 2010-4-20 10:25:14 | 只看该作者

Re: 请帮忙帮我解释下语句的意思

you just run this program and read the output.
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|小黑屋|手机版|Archiver|SAS中文论坛  

GMT+8, 2026-3-3 15:39 , Processed in 0.163520 second(s), 20 queries .

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表