pingponger
Programmer
I am trying to remove double quotes from an input file's fields. I have also tried unsuccessfully to delete the header line.
Here is my code:
data all_tbls_temp ;
infile rsltin01 DLM=',' DSD TRUNCOVER;
input
@002 selauth $01.
@006 updauth $01.
@010 aix_in $08.
@021 tbl :$35.
;
aix = compress(aix_in,'"');
end;
run;
Here is the log error msg:
14 data all_tbls_temp ;
15 infile rsltin01 DLM=',' DSD TRUNCOVER;
16
17 input
18
19 @002 selauth $01.
20 @006 updauth $01.
21 @010 aix_in $08.
22 @021 tbl :$35.
23 ;
24 aix = compress(aix_in,'"');
25 end;^M ___^M ___^M ___
161^M 161^M 161
ERROR 161-185: No matching DO/SELECT statement.^MERROR 161-185: No matching DO/S
ELECT statement.^MERROR 161-185: No matching DO/SELECT statement.
Also, could someone help to delete the header record - for instance the aix_in field VALUE in the header record is "AIX".
Here is my code:
data all_tbls_temp ;
infile rsltin01 DLM=',' DSD TRUNCOVER;
input
@002 selauth $01.
@006 updauth $01.
@010 aix_in $08.
@021 tbl :$35.
;
aix = compress(aix_in,'"');
end;
run;
Here is the log error msg:
14 data all_tbls_temp ;
15 infile rsltin01 DLM=',' DSD TRUNCOVER;
16
17 input
18
19 @002 selauth $01.
20 @006 updauth $01.
21 @010 aix_in $08.
22 @021 tbl :$35.
23 ;
24 aix = compress(aix_in,'"');
25 end;^M ___^M ___^M ___
161^M 161^M 161
ERROR 161-185: No matching DO/SELECT statement.^MERROR 161-185: No matching DO/S
ELECT statement.^MERROR 161-185: No matching DO/SELECT statement.
Also, could someone help to delete the header record - for instance the aix_in field VALUE in the header record is "AIX".