<?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 Re: MOVING  TO OTHER LINE BASED ON &amp;quot;-&amp;quot;(HI FUN) in SAS Programming</title>
    <link>https://communities.sas.com/t5/SAS-Programming/MOVING-TO-OTHER-LINE-BASED-ON-quot-quot-HI-FUN/m-p/71066#M15357</link>
    <description>Presuming hi fun represents hyphen, the following might serve the purpose.  There is probably a more direct way with regular expressions, but I am still just learning those:&lt;BR /&gt;
[pre]&lt;BR /&gt;
data a; &lt;BR /&gt;
  informat s $200.;&lt;BR /&gt;
  input id s &amp;amp;;&lt;BR /&gt;
  datalines; &lt;BR /&gt;
1 prg-code,main,IT-Hardware,Ins,Main,Non_IT- ,WOrk-Hardwrk,giveup,main,doit, -Nowork,ceo-cash,main,user,repair,nonit,&lt;BR /&gt;
;&lt;BR /&gt;
run;&lt;BR /&gt;
&lt;BR /&gt;
data a2 (keep=id want); &lt;BR /&gt;
  set a;&lt;BR /&gt;
  length want $35;&lt;BR /&gt;
  array x (99) $35.;&lt;BR /&gt;
  i=1;&lt;BR /&gt;
  do while (scan(s,i,',') ne "");&lt;BR /&gt;
    x(i)=scan(s,i,',');&lt;BR /&gt;
	i+1;&lt;BR /&gt;
  end;&lt;BR /&gt;
  want="";&lt;BR /&gt;
  do j=1 to i;&lt;BR /&gt;
    want=catx(',',want,x(j));&lt;BR /&gt;
	if j eq i or index(x(j+1),"-") gt 0 then do;&lt;BR /&gt;
	  output;&lt;BR /&gt;
	  want="";&lt;BR /&gt;
	end;&lt;BR /&gt;
  end;&lt;BR /&gt;
run;&lt;BR /&gt;
[/pre]&lt;BR /&gt;
HTH,&lt;BR /&gt;
Art&lt;BR /&gt;
---------&lt;BR /&gt;
&amp;gt; data a; &lt;BR /&gt;
&amp;gt; input id s $ 3-118;&lt;BR /&gt;
&amp;gt; datalines; &lt;BR /&gt;
&amp;gt; 1 prg-code,main,IT-Hardware,Ins,Main,Non_IT-&lt;BR /&gt;
&amp;gt; ,WOrk-Hardwrk,giveup,main,doit,&lt;BR /&gt;
&amp;gt; -Nowork,ceo-cash,main,user,repair,nonit,&lt;BR /&gt;
&amp;gt; run;&lt;BR /&gt;
&amp;gt; &lt;BR /&gt;
&amp;gt; LOGIC :I WANT TO MOVE IT IN TO ANOHTER ROW BASED ON&lt;BR /&gt;
&amp;gt; "- "(HI FUN) BEFORE HIFUN FIRST COMMA .&lt;BR /&gt;
&amp;gt; &lt;BR /&gt;
&amp;gt; i wnat it in data set a2 as&lt;BR /&gt;
&amp;gt; &lt;BR /&gt;
&amp;gt; output:&lt;BR /&gt;
&amp;gt; &lt;BR /&gt;
&amp;gt; 1 prg-code,main&lt;BR /&gt;
&amp;gt; 1 IT-Hardware,Ins,Main&lt;BR /&gt;
&amp;gt; 1 Non_IT-&lt;BR /&gt;
&amp;gt; 1 WOrk-Hardwrk,giveup,main,doit&lt;BR /&gt;
&amp;gt; 1 -Nowork&lt;BR /&gt;
&amp;gt; 1 ceo-cash,main,user,repair,nonit</description>
    <pubDate>Mon, 30 May 2011 14:02:30 GMT</pubDate>
    <dc:creator>art297</dc:creator>
    <dc:date>2011-05-30T14:02:30Z</dc:date>
    <item>
      <title>MOVING  TO OTHER LINE BASED ON "-"(HI FUN)</title>
      <link>https://communities.sas.com/t5/SAS-Programming/MOVING-TO-OTHER-LINE-BASED-ON-quot-quot-HI-FUN/m-p/71065#M15356</link>
      <description>data a; &lt;BR /&gt;
input id s $ 3-118;&lt;BR /&gt;
datalines; &lt;BR /&gt;
1 prg-code,main,IT-Hardware,Ins,Main,Non_IT- ,WOrk-Hardwrk,giveup,main,doit, -Nowork,ceo-cash,main,user,repair,nonit,&lt;BR /&gt;
run;&lt;BR /&gt;
&lt;BR /&gt;
LOGIC :I WANT TO MOVE IT IN TO ANOHTER ROW BASED ON "- "(HI FUN) BEFORE HIFUN FIRST COMMA .&lt;BR /&gt;
&lt;BR /&gt;
i wnat it in data set a2 as&lt;BR /&gt;
&lt;BR /&gt;
output:&lt;BR /&gt;
&lt;BR /&gt;
1 prg-code,main&lt;BR /&gt;
1 IT-Hardware,Ins,Main&lt;BR /&gt;
1 Non_IT-&lt;BR /&gt;
1 WOrk-Hardwrk,giveup,main,doit&lt;BR /&gt;
1 -Nowork&lt;BR /&gt;
1 ceo-cash,main,user,repair,nonit</description>
      <pubDate>Mon, 30 May 2011 12:49:45 GMT</pubDate>
      <guid>https://communities.sas.com/t5/SAS-Programming/MOVING-TO-OTHER-LINE-BASED-ON-quot-quot-HI-FUN/m-p/71065#M15356</guid>
      <dc:creator>sas_</dc:creator>
      <dc:date>2011-05-30T12:49:45Z</dc:date>
    </item>
    <item>
      <title>Re: MOVING  TO OTHER LINE BASED ON "-"(HI FUN)</title>
      <link>https://communities.sas.com/t5/SAS-Programming/MOVING-TO-OTHER-LINE-BASED-ON-quot-quot-HI-FUN/m-p/71066#M15357</link>
      <description>Presuming hi fun represents hyphen, the following might serve the purpose.  There is probably a more direct way with regular expressions, but I am still just learning those:&lt;BR /&gt;
[pre]&lt;BR /&gt;
data a; &lt;BR /&gt;
  informat s $200.;&lt;BR /&gt;
  input id s &amp;amp;;&lt;BR /&gt;
  datalines; &lt;BR /&gt;
1 prg-code,main,IT-Hardware,Ins,Main,Non_IT- ,WOrk-Hardwrk,giveup,main,doit, -Nowork,ceo-cash,main,user,repair,nonit,&lt;BR /&gt;
;&lt;BR /&gt;
run;&lt;BR /&gt;
&lt;BR /&gt;
data a2 (keep=id want); &lt;BR /&gt;
  set a;&lt;BR /&gt;
  length want $35;&lt;BR /&gt;
  array x (99) $35.;&lt;BR /&gt;
  i=1;&lt;BR /&gt;
  do while (scan(s,i,',') ne "");&lt;BR /&gt;
    x(i)=scan(s,i,',');&lt;BR /&gt;
	i+1;&lt;BR /&gt;
  end;&lt;BR /&gt;
  want="";&lt;BR /&gt;
  do j=1 to i;&lt;BR /&gt;
    want=catx(',',want,x(j));&lt;BR /&gt;
	if j eq i or index(x(j+1),"-") gt 0 then do;&lt;BR /&gt;
	  output;&lt;BR /&gt;
	  want="";&lt;BR /&gt;
	end;&lt;BR /&gt;
  end;&lt;BR /&gt;
run;&lt;BR /&gt;
[/pre]&lt;BR /&gt;
HTH,&lt;BR /&gt;
Art&lt;BR /&gt;
---------&lt;BR /&gt;
&amp;gt; data a; &lt;BR /&gt;
&amp;gt; input id s $ 3-118;&lt;BR /&gt;
&amp;gt; datalines; &lt;BR /&gt;
&amp;gt; 1 prg-code,main,IT-Hardware,Ins,Main,Non_IT-&lt;BR /&gt;
&amp;gt; ,WOrk-Hardwrk,giveup,main,doit,&lt;BR /&gt;
&amp;gt; -Nowork,ceo-cash,main,user,repair,nonit,&lt;BR /&gt;
&amp;gt; run;&lt;BR /&gt;
&amp;gt; &lt;BR /&gt;
&amp;gt; LOGIC :I WANT TO MOVE IT IN TO ANOHTER ROW BASED ON&lt;BR /&gt;
&amp;gt; "- "(HI FUN) BEFORE HIFUN FIRST COMMA .&lt;BR /&gt;
&amp;gt; &lt;BR /&gt;
&amp;gt; i wnat it in data set a2 as&lt;BR /&gt;
&amp;gt; &lt;BR /&gt;
&amp;gt; output:&lt;BR /&gt;
&amp;gt; &lt;BR /&gt;
&amp;gt; 1 prg-code,main&lt;BR /&gt;
&amp;gt; 1 IT-Hardware,Ins,Main&lt;BR /&gt;
&amp;gt; 1 Non_IT-&lt;BR /&gt;
&amp;gt; 1 WOrk-Hardwrk,giveup,main,doit&lt;BR /&gt;
&amp;gt; 1 -Nowork&lt;BR /&gt;
&amp;gt; 1 ceo-cash,main,user,repair,nonit</description>
      <pubDate>Mon, 30 May 2011 14:02:30 GMT</pubDate>
      <guid>https://communities.sas.com/t5/SAS-Programming/MOVING-TO-OTHER-LINE-BASED-ON-quot-quot-HI-FUN/m-p/71066#M15357</guid>
      <dc:creator>art297</dc:creator>
      <dc:date>2011-05-30T14:02:30Z</dc:date>
    </item>
  </channel>
</rss>

