j**********e
发帖数: 442 | 1 各位大牛：
小弟有个问题。我有很多txt文件在一个folder中，每个文件都是固定格式。我想用SAS
读出每个文件第一行（比如下面的txt文件中的“000007”）和第四行（比如下面的txt文件中的“20011121”）的数据，然后合并为一份dataset,请大家出个主意。多谢
！
提供有用信息，我会发给包子，以表谢意。
比如说一个txt文件：
公司编号：000007
F_MEDIA：证券时报
标题：独立财务顾问报告
创建日期：20011121 |
|
|
w****2
发帖数: 12072 | 3 http://book.qq.com/a/20100630/000007.htm
在一阵寒暄之后，斯大林请中共代表团转达他对毛泽东的问候。刘少奇对斯大林的关心
表示感谢，并向斯大林递交了毛泽东的亲笔信。毛泽东在信中对苏联给予中国的帮助表
示感谢，并请斯大林接待代表团。
随即，双方开始讨论中共代表团提出的问题。根据科瓦廖夫当时的纪录，双方就以下问
题进行了会谈：（1）苏联向中国贷款数额及贷款利息；（2）向中国派遣各方面（主要
是经济建设方面）的专家；（3）向上海派遣专家及大城市的管理问题；（4）清除上海
等港口水雷，恢复港口航行的措施；（5）解放新疆的策略及将来对少数民族地区的管
理；（6）中国海军舰队的组建及军港的保卫；（7）建立莫斯科与北京之间的航线，在
中国建设飞机装配修理厂；（8）决定在三四天以后召开苏共主席团会议，听取中共代
表团关于中国政治、军事及经济形势的报告，并就一系列重要问题交换看法；（9）国
家机构设置、工商企业管理等。
斯大林表示，莫斯科决定向中国提供3 亿美元的贷款，以机器设备、各种原料和其他商
品形式提供，每年平均6000万美元，分5年贷完。斯大林声明，中苏两党 |
|
|
|
X***9
发帖数: 7385 | 6
2010年只有小部分的车刹车皮还是旧式的
2010 Honda Accords, if the last six digits of the Vehicle Identification
Number (VIN) are one of the following: 000001; 000002; 000003; 000004;
000005; 000006; 000007; 000008; or 000009.。
而且你还开了一年，那么dealer没有理由不知道问题所在啊，只听你的一面之词怎么能判
断谁是谁非呢，或是你的态度问题，有理不在声高，这种大声嚷嚷的投诉方式在美国
没有市场。
我想你一定是当时买honda的时候受虐了，然后在这里发泄一下。不然很不能理解车行要
收钱换刹车皮这么点小事有必要这么亢奋吗？
可以举个例子，应该是同样的状况，一家豪华餐厅，有vip卡服务，那么来吃饭的一个人
吃完饭必须要vip卡的打折优惠，但是忘了带卡，那么服务生解释没有卡无法打折，
这时候你很生气破口大骂再也不来吃饭了的感觉。当然你也可以客气的请经理出来解释
一下情况，然后搞不好经理再给一张vip卡也... 阅读全帖 |
|
m*********y
发帖数: 10616 | 7 a股还是要好做些，找强势股就行了，比如600332， 000975，000750，000007，600077
等等，当然，千万不要追高，等回调介入是比较好的。当然了，礼拜一我也上当了，
000750涨得那么好，突然公司搞一个风险提示，害得我一开盘就卖掉，事后证明还是明
智的，呵呵呵。 |
|
x***q
发帖数: 4953 | 8 http://tech.qq.com/a/20110201/000007.htm
三星高管承认Galaxy Tab实际销量还相当小
北京时间2月1日消息，据国外媒体报道，尽管三星之前曾宣布Galaxy Tab在去年第四季
度的销量达到了200万台，但其高管今日承认，到目前为止，Galaxy Tab的销量其实还
相当小。
三星行动部分行销主管Lee Young-hee今日在分析师财报会议上表示，Galaxy Tab的销
量相当小。
Lee没有给出确切的销量数据，他说：“正如你们所听说的，Galaxy Tab的出货量（
sell-in，产品从制造商卖进给经销商/批发商或者零售商的销量）并不少，尤其是在它
上市后的第一个季度即第四季度，你们已经知道大约为200万台；但是我们相信实际的
销量（sell-out，产品由经销商/批发商或者零售商出售给下一级客户或者消费者的销
量）其实相当小。我们认为，随着新产品的推出，消费者肯定会增加购买量。因此，虽
然实际的销量增长速度并不象我们预期得那样快，但我们仍坚信它的销量会逐渐上升到
一个可观的水平上。” |
|
|
|
|
|
|
D*A
发帖数: 811 | 14 如果你的txt文件名有规律，比如file_1 到 file_1000，可以用下面的macro。
其中 infile部分，file_1.txt 换成你的文件名。do loop里，num=1 %to 后换成你最
后一个文件的编号，前提是你的文件名字有规律。如果没有规律，就手动复制粘贴文件名替
换那个file_1.txt。从data 开始 run到quit;run; 不用loop开头和结尾。
大牛请帮指正如和整个fold不同名字的run。我看到有相应option，没来得及仔细研究。
我针对的格式是：
Company:000007
F_MEDIA:Stock times
Title:Independent Finance Report
Create Time:20011121
/* 20个包子，（200伪币呦），呵呵 */
/* Run following codes from here */
%macro input_file;
%do num=1 %to 1;
data file_sub;
infile 'C:\Documents and Settings\SHUOY\My Docu |
|
j**********e
发帖数: 442 | 15 您真是太谦虚了。这样确实就可以work了。给您发了20个伪币，聊表寸心。
有个问题是：根据上面的代码，在company和000007之间只能有:而不能有任何空格。有没有办法允许在：后有空格呢？
我才搞清楚，原来是中文的问题。中文一个字占两格，所以在读取冒号后面的值时有困难（到底为啥困难我也不明白）。我把冒号删除了然后在英文输入法环境下再添上冒号就可以了。但是文件太多，一个一个这样弄太费时间。大家有好办法吗？
附上整个宏（测试用，所以num只从0到1）：
%macro input_file;
%do num=0 %to 1;
data file_sub;
infile "C:\research\A (&num).txt"
firstobs=1
delimiter=":" truncover;
input col_1 $20. ;
n=_N_;
if n=1 then company=scan(col_1,2,':');
retain company;
if n=4 then date=in |
|
|
