|
|
沙发

楼主 |
发表于 2009-8-28 16:34:51
|
只看该作者
Re: 求助数据问题
[code:2sxo0omo]data temp(drop=text);
retain id var2-var14;
infile datalines truncover;
input text $256.;
if mod(_n_,2)=1 then do;
id=put(scan(text,1,' '),$5.); /* 机构代码 */
var2=put(scan(text,2,' '),$2.); /* 渠道 */
var3=put(scan(text,3,' '),$8.); /* 代码 */
var4=put(scan(text,4,' '),$8.); /* 授权书号 */
var5=put(scan(text,5,' '),$8.); /* 是否标准 */
var6=dhms(input(scan(text,6,' '),yymmdd10.),hour(input(scan(text,7,' '),time5.)),minute(input(scan(text,7,' '),time5.)),0); /* 预收时间 */
var7=dhms(input(scan(text,8,' '),yymmdd10.),hour(input(scan(text,9,' '),time5.)),minute(input(scan(text,9,' '),time5.)),0); /* 录入时间 */
var8=dhms(input(scan(text,10,' '),yymmdd10.),hour(input(scan(text,11,' '),time5.)),minute(input(scan(text,11,' '),time5.)),0); /* 复查时间 */
var9=dhms(input(scan(text,12,' '),yymmdd10.),hour(input(scan(text,13,' '),time5.)),minute(input(scan(text,13,' '),time5.)),0); /* 核定时间 */
var10=dhms(input(scan(text,14,' '),yymmdd10.),hour(input(scan(text,15,' '),time5.)),minute(input(scan(text,15,' '),time5.)),0); /* 接受时间 */
var11=dhms(input(scan(text,16,' '),yymmdd10.),hour(input(scan(text,17,' '),time5.)),
minute(input(scan(text,17,' '),time5.)),second(input(scan(text,17,' '),time5.))); /* 扫描时间 */
var12=put(scan(text,18,' '),$16.); /* 付款方式 */
var13=put(scan(text,19,' '),$20.); /* 银行 */
var14=dhms(input(scan(text,20,' '),yymmdd10.),hour(input(scan(text,21,' '),time5.)),minute(input(scan(text,21,' '),time5.)),0); /* 财务确认时间 */
output;
end;
else do;
var12=put(scan(text,15,' '),$20.); /* 银行 */
output;
end;
format text $256. var6-var11 var14 datetime13.;
datalines;
10560 个 74472620 00061576 标准 2009-7-3 12:07 2009-7-3 10:49 2009-7-3 10:52 2009-7-3 13:20 2009-7-6 10:19 2009-7-3 8:42:33 全国通异地转账 中国工商银行 2009-7-6 10:19
10560 个 74472620 标准 2009-7-3 12:07 2009-7-3 10:49 2009-7-3 10:52 2009-7-3 13:20 2009-7-6 10:19 一般内部转帐 2009-7-6 10:19
10560 个 74477190 00061576 标准 2009-7-3 8:45 2009-7-3 9:03 2009-7-3 9:03 2009-7-3 9:04 2009-7-6 10:19 2009-7-3 8:43:10 全国通异地转账 中国工商银行 2009-7-6 10:19
10560 个 74477190 标准 2009-7-3 8:45 2009-7-3 9:03 2009-7-3 9:03 2009-7-3 9:04 2009-7-6 10:19 一般内部转帐 2009-7-6 10:19
10505 个 66265482 00061539 标准 2009-7-3 10:58 2009-7-3 11:09 2009-7-3 11:09 2009-7-3 11:10 2009-7-6 10:19 2009-7-3 9:58:17 全国通异地转账 中国工商银行 2009-7-6 10:19
10505 个 66265482 标准 2009-7-3 10:58 2009-7-3 11:09 2009-7-3 11:09 2009-7-3 11:10 2009-7-6 10:19 一般内部转帐 2009-7-6 10:19
105 个 74290993 00065053 标准 2009-7-3 14:05 2009-7-6 9:14 2009-7-6 9:31 2009-7-6 9:31 2009-7-6 10:19 2009-7-3 10:38:56 客户银行转帐 中国工商银行 2009-7-6 10:19
105 个 74290993 标准 2009-7-3 14:05 2009-7-6 9:14 2009-7-6 9:31 2009-7-6 9:31 2009-7-6 10:19 一般内部转帐 2009-7-6 10:19
;[/code:2sxo0omo] |
|