<?xml version="1.0" encoding="UTF-8"?>
<rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/" version="2.0">
  <channel>
    <title>topic Quoting issie while writing sas code files to a txt file in SAS Programming</title>
    <link>https://communities.sas.com/t5/SAS-Programming/Quoting-issie-while-writing-sas-code-files-to-a-txt-file/m-p/942224#M369493</link>
    <description>&lt;P&gt;The table results has the correct code-line, but the txt file double or triple quotes when it encounters a double quote.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;&lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="pic.png" style="width: 999px;"&gt;&lt;img src="https://communities.sas.com/t5/image/serverpage/image-id/99883iAEF116003F3BF52A/image-size/large?v=v2&amp;amp;px=999" role="button" title="pic.png" alt="pic.png" /&gt;&lt;/span&gt;&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;&lt;CODE class=" language-sas"&gt;filename myfldr filesrvc folderPath='/Projects/Portugal/';

data filenames;
length  fname $200;
did = dopen('myfldr');
do i = 1 to dnum(did);
  fname = dread(did,i);
  output;
end;
did = dclose(did);
keep fname;
run;

%let myStr = ; /* string you are looking */

data _null_;
set filenames;
if index(lowcase(fname), '.sas') then 
call execute ('
filename search FILESRVC FOLDERPATH="/Projects/Portugal/" FILENAME=' || quote(strip(fname)) || ' ;

data temp;
length file $ 256 code_line $ 2048;
infile search filename = file end=end;
input;
lineNumber+1;
filename = file;
code_line= _infile_;
if find(_infile_, "&amp;amp;myStr.", "i") or length(_infile_) &amp;gt;=1 then output;
if end then lineNumber=0;
run;

proc append base=result data=temp;
run;
');
run;

filename outtxt FILESRVC FOLDERPATH='/Projects/Portugal'  FILENAME='_a_sas_code1.txt';

proc sort data=result;
by filename lineNumber;
run;

data _null_;
  file outtxt dsd   dlm='|'  ;
  set result ;
	by filename;
if first.filename then put filename;
  put %NRQUOTE(code_line);
if last.filename then put '0A'x;
run;&lt;/CODE&gt;&lt;/PRE&gt;
&lt;P&gt;&lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="pic1.png" style="width: 999px;"&gt;&lt;img src="https://communities.sas.com/t5/image/serverpage/image-id/99884iA34774387FC1A490/image-size/large?v=v2&amp;amp;px=999" role="button" title="pic1.png" alt="pic1.png" /&gt;&lt;/span&gt;&lt;/P&gt;</description>
    <pubDate>Mon, 02 Sep 2024 17:27:05 GMT</pubDate>
    <dc:creator>acordes</dc:creator>
    <dc:date>2024-09-02T17:27:05Z</dc:date>
    <item>
      <title>Quoting issie while writing sas code files to a txt file</title>
      <link>https://communities.sas.com/t5/SAS-Programming/Quoting-issie-while-writing-sas-code-files-to-a-txt-file/m-p/942224#M369493</link>
      <description>&lt;P&gt;The table results has the correct code-line, but the txt file double or triple quotes when it encounters a double quote.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;&lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="pic.png" style="width: 999px;"&gt;&lt;img src="https://communities.sas.com/t5/image/serverpage/image-id/99883iAEF116003F3BF52A/image-size/large?v=v2&amp;amp;px=999" role="button" title="pic.png" alt="pic.png" /&gt;&lt;/span&gt;&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;&lt;CODE class=" language-sas"&gt;filename myfldr filesrvc folderPath='/Projects/Portugal/';

data filenames;
length  fname $200;
did = dopen('myfldr');
do i = 1 to dnum(did);
  fname = dread(did,i);
  output;
end;
did = dclose(did);
keep fname;
run;

%let myStr = ; /* string you are looking */

data _null_;
set filenames;
if index(lowcase(fname), '.sas') then 
call execute ('
filename search FILESRVC FOLDERPATH="/Projects/Portugal/" FILENAME=' || quote(strip(fname)) || ' ;

data temp;
length file $ 256 code_line $ 2048;
infile search filename = file end=end;
input;
lineNumber+1;
filename = file;
code_line= _infile_;
if find(_infile_, "&amp;amp;myStr.", "i") or length(_infile_) &amp;gt;=1 then output;
if end then lineNumber=0;
run;

proc append base=result data=temp;
run;
');
run;

filename outtxt FILESRVC FOLDERPATH='/Projects/Portugal'  FILENAME='_a_sas_code1.txt';

proc sort data=result;
by filename lineNumber;
run;

data _null_;
  file outtxt dsd   dlm='|'  ;
  set result ;
	by filename;
if first.filename then put filename;
  put %NRQUOTE(code_line);
if last.filename then put '0A'x;
run;&lt;/CODE&gt;&lt;/PRE&gt;
&lt;P&gt;&lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="pic1.png" style="width: 999px;"&gt;&lt;img src="https://communities.sas.com/t5/image/serverpage/image-id/99884iA34774387FC1A490/image-size/large?v=v2&amp;amp;px=999" role="button" title="pic1.png" alt="pic1.png" /&gt;&lt;/span&gt;&lt;/P&gt;</description>
      <pubDate>Mon, 02 Sep 2024 17:27:05 GMT</pubDate>
      <guid>https://communities.sas.com/t5/SAS-Programming/Quoting-issie-while-writing-sas-code-files-to-a-txt-file/m-p/942224#M369493</guid>
      <dc:creator>acordes</dc:creator>
      <dc:date>2024-09-02T17:27:05Z</dc:date>
    </item>
    <item>
      <title>Re: Quoting issie while writing sas code files to a txt file</title>
      <link>https://communities.sas.com/t5/SAS-Programming/Quoting-issie-while-writing-sas-code-files-to-a-txt-file/m-p/942226#M369494</link>
      <description>&lt;P&gt;The DSD option causes this; since quotes might be used around the string, strings with quotes are also enclosed in quotes, and the quotes in the string are doubled.&lt;/P&gt;
&lt;P&gt;You do not need the DSD option and the delimiter, as you only PUT&amp;nbsp;&lt;U&gt;one&lt;/U&gt; variable in every line.&lt;/P&gt;</description>
      <pubDate>Mon, 02 Sep 2024 17:48:31 GMT</pubDate>
      <guid>https://communities.sas.com/t5/SAS-Programming/Quoting-issie-while-writing-sas-code-files-to-a-txt-file/m-p/942226#M369494</guid>
      <dc:creator>Kurt_Bremser</dc:creator>
      <dc:date>2024-09-02T17:48:31Z</dc:date>
    </item>
  </channel>
</rss>

