<?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 %macro? in SAS Programming</title>
    <link>https://communities.sas.com/t5/SAS-Programming/macro/m-p/360000#M84681</link>
    <description>&lt;P&gt;My SAS code:&lt;/P&gt;&lt;P&gt;&lt;FONT color="#0000ff" face="Courier New" size="3"&gt;libname&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt; ReworkI &lt;/FONT&gt;&lt;FONT color="#800080" face="Courier New" size="3"&gt;"/export/home/qh19919/INPUT/Rework"&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT color="#0000ff" face="Courier New" size="3"&gt;libname&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt; ReworkO &lt;/FONT&gt;&lt;FONT color="#800080" face="Courier New" size="3"&gt;"/export/home/qh19919/OUTPUT/Rework"&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;/*************************************************************************************/&lt;/P&gt;&lt;P&gt;&lt;FONT color="#000080" face="Courier New" size="3"&gt;&lt;STRONG&gt;%macro&lt;/STRONG&gt;&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt; LOBNoCode(lobname1,lobname2);&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;PROC SQL feedback;&lt;/P&gt;&lt;P&gt;CREATE TABLE Paid_Claims_Final&amp;amp;lobname1 AS&lt;/P&gt;&lt;P&gt;SELECT DISTINCT&lt;/P&gt;&lt;P&gt;CODE.LOB,&lt;/P&gt;&lt;P&gt;CODE.Category,&lt;/P&gt;&lt;P&gt;TEMP.CLCL_EOB_EXCD_ID AS Code,&lt;/P&gt;&lt;P&gt;TEMP.EXCD_LONG_TEXT1 AS CODE_DESCRIPTION,&lt;/P&gt;&lt;P&gt;COUNT(TEMP.CLCL_ID) AS TOTAL,&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;STRIP(PUT(DATEPART(TEMP.MONTH),&lt;/FONT&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;YYMMn6.&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;)) as MONTH&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;FROM work.SQL_TEMP TEMP&lt;/P&gt;&lt;P&gt;INNER JOIN REWORKI.CODE CODE on Code.Code=TEMP.CLCL_EOB_EXCD_ID&lt;/P&gt;&lt;P&gt;GROUP BY CODE.LOB,CODE.Category,TEMP.CLCL_EOB_EXCD_ID,TEMP.EXCD_LONG_TEXT1,&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;STRIP(PUT(DATEPART(TEMP.MONTH),&lt;/FONT&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;YYMMD.&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;))&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;HAVING TEMP.Rework_Claim=&lt;/FONT&gt;&lt;STRONG&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;1&lt;/FONT&gt;&lt;/STRONG&gt;&lt;FONT face="Courier New" size="3"&gt; AND CODE.LOB=&amp;amp;lobname2;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;QUIT;&lt;/P&gt;&lt;P&gt;/****************************************************************************/&lt;/P&gt;&lt;P&gt;PROC TRANSPOSE DATA=Paid_Claims_Final&amp;amp;lobname1 OUT=Paid_Claims_Final&amp;amp;lobname1.TRANS (DROP=_NAME_);&lt;/P&gt;&lt;P&gt;ID MONTH;&lt;/P&gt;&lt;P&gt;BY LOB Category Code CODE_DESCRIPTION;&lt;/P&gt;&lt;P&gt;RUN;&lt;/P&gt;&lt;P&gt;&lt;FONT color="#000080" face="Courier New" size="3"&gt;&lt;STRONG&gt;%mend&lt;/STRONG&gt;&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt; LOBNoCode;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;%&lt;STRONG&gt;&lt;I&gt;LOBNoCode&lt;/I&gt;&lt;/STRONG&gt;(&lt;/FONT&gt;&lt;STRONG&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;0100&lt;/FONT&gt;&lt;/STRONG&gt;&lt;FONT face="Courier New" size="3"&gt;,&lt;/FONT&gt;&lt;FONT color="#800080" face="Courier New" size="3"&gt;'0100'&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;);&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;%&lt;STRONG&gt;&lt;I&gt;LOBNoCode&lt;/I&gt;&lt;/STRONG&gt;(&lt;/FONT&gt;&lt;STRONG&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;0500&lt;/FONT&gt;&lt;/STRONG&gt;&lt;FONT face="Courier New" size="3"&gt;,&lt;/FONT&gt;&lt;FONT color="#800080" face="Courier New" size="3"&gt;'0500'&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT color="#0000ff" face="Courier New" size="3"&gt;libname&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt; ReworkI &lt;/FONT&gt;&lt;FONT color="#800080" face="Courier New" size="3"&gt;"/export/home/qh19919/INPUT/Rework"&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT color="#0000ff" face="Courier New" size="3"&gt;libname&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt; ReworkO &lt;/FONT&gt;&lt;FONT color="#800080" face="Courier New" size="3"&gt;"/export/home/qh19919/OUTPUT/Rework"&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;/*************************************************************************************/&lt;/P&gt;&lt;P&gt;&lt;FONT color="#000080" face="Courier New" size="3"&gt;&lt;STRONG&gt;%macro&lt;/STRONG&gt;&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt; LOBNoCode(lobname1,lobname2);&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;PROC SQL feedback;&lt;/P&gt;&lt;P&gt;CREATE TABLE Paid_Claims_Final&amp;amp;lobname1 AS&lt;/P&gt;&lt;P&gt;SELECT DISTINCT&lt;/P&gt;&lt;P&gt;CODE.LOB,&lt;/P&gt;&lt;P&gt;CODE.Category,&lt;/P&gt;&lt;P&gt;TEMP.CLCL_EOB_EXCD_ID AS Code,&lt;/P&gt;&lt;P&gt;TEMP.EXCD_LONG_TEXT1 AS CODE_DESCRIPTION,&lt;/P&gt;&lt;P&gt;COUNT(TEMP.CLCL_ID) AS TOTAL,&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;STRIP(PUT(DATEPART(TEMP.MONTH),&lt;/FONT&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;YYMMn6.&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;)) as MONTH&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;FROM work.SQL_TEMP TEMP&lt;/P&gt;&lt;P&gt;INNER JOIN REWORKI.CODE CODE on Code.Code=TEMP.CLCL_EOB_EXCD_ID&lt;/P&gt;&lt;P&gt;GROUP BY CODE.LOB,CODE.Category,TEMP.CLCL_EOB_EXCD_ID,TEMP.EXCD_LONG_TEXT1,&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;STRIP(PUT(DATEPART(TEMP.MONTH),&lt;/FONT&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;YYMMD.&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;))&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;HAVING TEMP.Rework_Claim=&lt;/FONT&gt;&lt;STRONG&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;1&lt;/FONT&gt;&lt;/STRONG&gt;&lt;FONT face="Courier New" size="3"&gt; AND CODE.LOB=&amp;amp;lobname2;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;QUIT;&lt;/P&gt;&lt;P&gt;/****************************************************************************/&lt;/P&gt;&lt;P&gt;PROC TRANSPOSE DATA=Paid_Claims_Final&amp;amp;lobname1 OUT=Paid_Claims_Final&amp;amp;lobname1.TRANS (DROP=_NAME_);&lt;/P&gt;&lt;P&gt;ID MONTH;&lt;/P&gt;&lt;P&gt;BY LOB Category Code CODE_DESCRIPTION;&lt;/P&gt;&lt;P&gt;RUN;&lt;/P&gt;&lt;P&gt;&lt;FONT color="#000080" face="Courier New" size="3"&gt;&lt;STRONG&gt;%mend&lt;/STRONG&gt;&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt; LOBNoCode;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;%&lt;STRONG&gt;&lt;I&gt;LOBNoCode&lt;/I&gt;&lt;/STRONG&gt;(&lt;/FONT&gt;&lt;STRONG&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;0100&lt;/FONT&gt;&lt;/STRONG&gt;&lt;FONT face="Courier New" size="3"&gt;,&lt;/FONT&gt;&lt;FONT color="#800080" face="Courier New" size="3"&gt;'0100'&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;);&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;%&lt;STRONG&gt;&lt;I&gt;LOBNoCode&lt;/I&gt;&lt;/STRONG&gt;(&lt;/FONT&gt;&lt;STRONG&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;0500&lt;/FONT&gt;&lt;/STRONG&gt;&lt;FONT face="Courier New" size="3"&gt;,&lt;/FONT&gt;&lt;FONT color="#800080" face="Courier New" size="3"&gt;'0500'&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;It only created 0100 relate table and proc transpose. stopped at 0500, not sure why .&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;log:&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;28 %macro LOBNoCode(lobname1,lobname2);&lt;/P&gt;&lt;P&gt;29&lt;/P&gt;&lt;P&gt;30 PROC SQL feedback;&lt;/P&gt;&lt;P&gt;31 CREATE TABLE Paid_Claims_Final&amp;amp;lobname1 AS&lt;/P&gt;&lt;P&gt;32 SELECT DISTINCT&lt;/P&gt;&lt;P&gt;33 CODE.LOB,&lt;/P&gt;&lt;P&gt;34 CODE.Category,&lt;/P&gt;&lt;P&gt;35 TEMP.CLCL_EOB_EXCD_ID AS Code,&lt;/P&gt;&lt;P&gt;36 TEMP.EXCD_LONG_TEXT1 AS CODE_DESCRIPTION,&lt;/P&gt;&lt;P&gt;37 COUNT(TEMP.CLCL_ID) AS TOTAL,&lt;/P&gt;&lt;P&gt;38 STRIP(PUT(DATEPART(TEMP.MONTH),YYMMn6.)) as MONTH&lt;/P&gt;&lt;P&gt;39 FROM work.SQL_TEMP TEMP&lt;/P&gt;&lt;P&gt;40 INNER JOIN REWORKI.CODE CODE on Code.Code=TEMP.CLCL_EOB_EXCD_ID&lt;/P&gt;&lt;P&gt;41 GROUP BY CODE.LOB,CODE.Category,TEMP.CLCL_EOB_EXCD_ID,TEMP.EXCD_LONG_TEXT1,&lt;/P&gt;&lt;P&gt;42 STRIP(PUT(DATEPART(TEMP.MONTH),YYMMD.))&lt;/P&gt;&lt;P&gt;43 HAVING TEMP.Rework_Claim=1 AND CODE.LOB=&amp;amp;lobname2;&lt;/P&gt;&lt;P&gt;44 QUIT;&lt;/P&gt;&lt;P&gt;45 /****************************************************************************/&lt;/P&gt;&lt;P&gt;46 PROC TRANSPOSE DATA=Paid_Claims_Final&amp;amp;lobname1 OUT=Paid_Claims_Final&amp;amp;lobname1.TRANS (DROP=_NAME_);&lt;/P&gt;&lt;P&gt;47 ID MONTH;&lt;/P&gt;&lt;P&gt;48 BY LOB Category Code CODE_DESCRIPTION;&lt;/P&gt;&lt;P&gt;49 RUN;&lt;/P&gt;&lt;P&gt;50&lt;/P&gt;&lt;P&gt;51 %mend LOBNoCode;&lt;/P&gt;&lt;P&gt;2 The SAS System 08:43 Friday, May 19, 2017&lt;/P&gt;&lt;P&gt;52 %LOBNoCode(0100,'0100');&lt;/P&gt;&lt;P&gt;NOTE: Statement transforms to:&lt;/P&gt;&lt;P&gt;select distinct CODE.LOB, CODE.Category, TEMP.Code, TEMP.CODE_DESCRIPTION, COUNT(TEMP.CLCL_ID) as TOTAL,&lt;/P&gt;&lt;P&gt;STRIP(PUT(DATEPART(TEMP.MONTH), YYMMN6.0)) as MONTH&lt;/P&gt;&lt;P&gt;from WORK.SQL_TEMP TEMP, REWORKI.CODE CODE&lt;/P&gt;&lt;P&gt;where CODE.Code = TEMP.CLCL_EOB_EXCD_ID&lt;/P&gt;&lt;P&gt;group by CODE.LOB, CODE.Category, TEMP.CLCL_EOB_EXCD_ID, TEMP.EXCD_LONG_TEXT1, STRIP(PUT(DATEPART(TEMP.MONTH), YYMMD7.0))&lt;/P&gt;&lt;P&gt;having (TEMP.Rework_Claim = 1) and (CODE.LOB = '0100');&lt;/P&gt;&lt;P&gt;NOTE: The query requires remerging summary statistics back with the original data.&lt;/P&gt;&lt;P&gt;NOTE: Compressing data set WORK.PAID_CLAIMS_FINAL0100 increased size by 100.00 percent.&lt;/P&gt;&lt;P&gt;Compressed is 2 pages; un-compressed would require 1 pages.&lt;/P&gt;&lt;P&gt;NOTE: Table WORK.PAID_CLAIMS_FINAL0100 created, with 209 rows and 6 columns.&lt;/P&gt;&lt;P&gt;NOTE: PROCEDURE SQL used (Total process time):&lt;/P&gt;&lt;P&gt;real time 15:05.13&lt;/P&gt;&lt;P&gt;cpu time 57.07 seconds&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;　&lt;/P&gt;&lt;P&gt;NOTE: There were 209 observations read from the data set WORK.PAID_CLAIMS_FINAL0100.&lt;/P&gt;&lt;P&gt;NOTE: The data set WORK.PAID_CLAIMS_FINAL0100TRANS has 209 observations and 5 variables.&lt;/P&gt;&lt;P&gt;NOTE: Compressing data set WORK.PAID_CLAIMS_FINAL0100TRANS increased size by 100.00 percent.&lt;/P&gt;&lt;P&gt;Compressed is 2 pages; un-compressed would require 1 pages.&lt;/P&gt;&lt;P&gt;NOTE: PROCEDURE TRANSPOSE used (Total process time):&lt;/P&gt;&lt;P&gt;real time 0.13 seconds&lt;/P&gt;&lt;P&gt;cpu time 0.00 seconds&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;53 %LOBNoCode(0500,'0500';&lt;/P&gt;&lt;P&gt;54&lt;/P&gt;&lt;P&gt;55 GOPTIONS NOACCESSIBLE;&lt;/P&gt;&lt;P&gt;56 %LET _CLIENTTASKLABEL=;&lt;/P&gt;&lt;P&gt;57 %LET _CLIENTPROJECTPATH=;&lt;/P&gt;&lt;P&gt;58 %LET _CLIENTPROJECTNAME=;&lt;/P&gt;&lt;P&gt;59 %LET _SASPROGRAMFILE=;&lt;/P&gt;&lt;P&gt;60&lt;/P&gt;&lt;P&gt;61 ;*';*";*/;quit;run;&lt;/P&gt;&lt;P&gt;62 ODS _ALL_ CLOSE;&lt;/P&gt;&lt;P&gt;63&lt;/P&gt;&lt;P&gt;64&lt;/P&gt;&lt;P&gt;65 QUIT; RUN;&lt;/P&gt;&lt;P&gt;66&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
    <pubDate>Fri, 19 May 2017 14:49:44 GMT</pubDate>
    <dc:creator>JHE</dc:creator>
    <dc:date>2017-05-19T14:49:44Z</dc:date>
    <item>
      <title>%macro?</title>
      <link>https://communities.sas.com/t5/SAS-Programming/macro/m-p/360000#M84681</link>
      <description>&lt;P&gt;My SAS code:&lt;/P&gt;&lt;P&gt;&lt;FONT color="#0000ff" face="Courier New" size="3"&gt;libname&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt; ReworkI &lt;/FONT&gt;&lt;FONT color="#800080" face="Courier New" size="3"&gt;"/export/home/qh19919/INPUT/Rework"&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT color="#0000ff" face="Courier New" size="3"&gt;libname&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt; ReworkO &lt;/FONT&gt;&lt;FONT color="#800080" face="Courier New" size="3"&gt;"/export/home/qh19919/OUTPUT/Rework"&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;/*************************************************************************************/&lt;/P&gt;&lt;P&gt;&lt;FONT color="#000080" face="Courier New" size="3"&gt;&lt;STRONG&gt;%macro&lt;/STRONG&gt;&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt; LOBNoCode(lobname1,lobname2);&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;PROC SQL feedback;&lt;/P&gt;&lt;P&gt;CREATE TABLE Paid_Claims_Final&amp;amp;lobname1 AS&lt;/P&gt;&lt;P&gt;SELECT DISTINCT&lt;/P&gt;&lt;P&gt;CODE.LOB,&lt;/P&gt;&lt;P&gt;CODE.Category,&lt;/P&gt;&lt;P&gt;TEMP.CLCL_EOB_EXCD_ID AS Code,&lt;/P&gt;&lt;P&gt;TEMP.EXCD_LONG_TEXT1 AS CODE_DESCRIPTION,&lt;/P&gt;&lt;P&gt;COUNT(TEMP.CLCL_ID) AS TOTAL,&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;STRIP(PUT(DATEPART(TEMP.MONTH),&lt;/FONT&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;YYMMn6.&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;)) as MONTH&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;FROM work.SQL_TEMP TEMP&lt;/P&gt;&lt;P&gt;INNER JOIN REWORKI.CODE CODE on Code.Code=TEMP.CLCL_EOB_EXCD_ID&lt;/P&gt;&lt;P&gt;GROUP BY CODE.LOB,CODE.Category,TEMP.CLCL_EOB_EXCD_ID,TEMP.EXCD_LONG_TEXT1,&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;STRIP(PUT(DATEPART(TEMP.MONTH),&lt;/FONT&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;YYMMD.&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;))&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;HAVING TEMP.Rework_Claim=&lt;/FONT&gt;&lt;STRONG&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;1&lt;/FONT&gt;&lt;/STRONG&gt;&lt;FONT face="Courier New" size="3"&gt; AND CODE.LOB=&amp;amp;lobname2;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;QUIT;&lt;/P&gt;&lt;P&gt;/****************************************************************************/&lt;/P&gt;&lt;P&gt;PROC TRANSPOSE DATA=Paid_Claims_Final&amp;amp;lobname1 OUT=Paid_Claims_Final&amp;amp;lobname1.TRANS (DROP=_NAME_);&lt;/P&gt;&lt;P&gt;ID MONTH;&lt;/P&gt;&lt;P&gt;BY LOB Category Code CODE_DESCRIPTION;&lt;/P&gt;&lt;P&gt;RUN;&lt;/P&gt;&lt;P&gt;&lt;FONT color="#000080" face="Courier New" size="3"&gt;&lt;STRONG&gt;%mend&lt;/STRONG&gt;&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt; LOBNoCode;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;%&lt;STRONG&gt;&lt;I&gt;LOBNoCode&lt;/I&gt;&lt;/STRONG&gt;(&lt;/FONT&gt;&lt;STRONG&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;0100&lt;/FONT&gt;&lt;/STRONG&gt;&lt;FONT face="Courier New" size="3"&gt;,&lt;/FONT&gt;&lt;FONT color="#800080" face="Courier New" size="3"&gt;'0100'&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;);&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;%&lt;STRONG&gt;&lt;I&gt;LOBNoCode&lt;/I&gt;&lt;/STRONG&gt;(&lt;/FONT&gt;&lt;STRONG&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;0500&lt;/FONT&gt;&lt;/STRONG&gt;&lt;FONT face="Courier New" size="3"&gt;,&lt;/FONT&gt;&lt;FONT color="#800080" face="Courier New" size="3"&gt;'0500'&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT color="#0000ff" face="Courier New" size="3"&gt;libname&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt; ReworkI &lt;/FONT&gt;&lt;FONT color="#800080" face="Courier New" size="3"&gt;"/export/home/qh19919/INPUT/Rework"&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT color="#0000ff" face="Courier New" size="3"&gt;libname&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt; ReworkO &lt;/FONT&gt;&lt;FONT color="#800080" face="Courier New" size="3"&gt;"/export/home/qh19919/OUTPUT/Rework"&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;/*************************************************************************************/&lt;/P&gt;&lt;P&gt;&lt;FONT color="#000080" face="Courier New" size="3"&gt;&lt;STRONG&gt;%macro&lt;/STRONG&gt;&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt; LOBNoCode(lobname1,lobname2);&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;PROC SQL feedback;&lt;/P&gt;&lt;P&gt;CREATE TABLE Paid_Claims_Final&amp;amp;lobname1 AS&lt;/P&gt;&lt;P&gt;SELECT DISTINCT&lt;/P&gt;&lt;P&gt;CODE.LOB,&lt;/P&gt;&lt;P&gt;CODE.Category,&lt;/P&gt;&lt;P&gt;TEMP.CLCL_EOB_EXCD_ID AS Code,&lt;/P&gt;&lt;P&gt;TEMP.EXCD_LONG_TEXT1 AS CODE_DESCRIPTION,&lt;/P&gt;&lt;P&gt;COUNT(TEMP.CLCL_ID) AS TOTAL,&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;STRIP(PUT(DATEPART(TEMP.MONTH),&lt;/FONT&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;YYMMn6.&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;)) as MONTH&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;FROM work.SQL_TEMP TEMP&lt;/P&gt;&lt;P&gt;INNER JOIN REWORKI.CODE CODE on Code.Code=TEMP.CLCL_EOB_EXCD_ID&lt;/P&gt;&lt;P&gt;GROUP BY CODE.LOB,CODE.Category,TEMP.CLCL_EOB_EXCD_ID,TEMP.EXCD_LONG_TEXT1,&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;STRIP(PUT(DATEPART(TEMP.MONTH),&lt;/FONT&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;YYMMD.&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;))&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;HAVING TEMP.Rework_Claim=&lt;/FONT&gt;&lt;STRONG&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;1&lt;/FONT&gt;&lt;/STRONG&gt;&lt;FONT face="Courier New" size="3"&gt; AND CODE.LOB=&amp;amp;lobname2;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;QUIT;&lt;/P&gt;&lt;P&gt;/****************************************************************************/&lt;/P&gt;&lt;P&gt;PROC TRANSPOSE DATA=Paid_Claims_Final&amp;amp;lobname1 OUT=Paid_Claims_Final&amp;amp;lobname1.TRANS (DROP=_NAME_);&lt;/P&gt;&lt;P&gt;ID MONTH;&lt;/P&gt;&lt;P&gt;BY LOB Category Code CODE_DESCRIPTION;&lt;/P&gt;&lt;P&gt;RUN;&lt;/P&gt;&lt;P&gt;&lt;FONT color="#000080" face="Courier New" size="3"&gt;&lt;STRONG&gt;%mend&lt;/STRONG&gt;&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt; LOBNoCode;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;%&lt;STRONG&gt;&lt;I&gt;LOBNoCode&lt;/I&gt;&lt;/STRONG&gt;(&lt;/FONT&gt;&lt;STRONG&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;0100&lt;/FONT&gt;&lt;/STRONG&gt;&lt;FONT face="Courier New" size="3"&gt;,&lt;/FONT&gt;&lt;FONT color="#800080" face="Courier New" size="3"&gt;'0100'&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;);&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;%&lt;STRONG&gt;&lt;I&gt;LOBNoCode&lt;/I&gt;&lt;/STRONG&gt;(&lt;/FONT&gt;&lt;STRONG&gt;&lt;FONT color="#008080" face="Courier New" size="3"&gt;0500&lt;/FONT&gt;&lt;/STRONG&gt;&lt;FONT face="Courier New" size="3"&gt;,&lt;/FONT&gt;&lt;FONT color="#800080" face="Courier New" size="3"&gt;'0500'&lt;/FONT&gt;&lt;FONT face="Courier New" size="3"&gt;;&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;It only created 0100 relate table and proc transpose. stopped at 0500, not sure why .&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;&lt;FONT face="Courier New" size="3"&gt;log:&lt;/FONT&gt;&lt;/P&gt;&lt;P&gt;28 %macro LOBNoCode(lobname1,lobname2);&lt;/P&gt;&lt;P&gt;29&lt;/P&gt;&lt;P&gt;30 PROC SQL feedback;&lt;/P&gt;&lt;P&gt;31 CREATE TABLE Paid_Claims_Final&amp;amp;lobname1 AS&lt;/P&gt;&lt;P&gt;32 SELECT DISTINCT&lt;/P&gt;&lt;P&gt;33 CODE.LOB,&lt;/P&gt;&lt;P&gt;34 CODE.Category,&lt;/P&gt;&lt;P&gt;35 TEMP.CLCL_EOB_EXCD_ID AS Code,&lt;/P&gt;&lt;P&gt;36 TEMP.EXCD_LONG_TEXT1 AS CODE_DESCRIPTION,&lt;/P&gt;&lt;P&gt;37 COUNT(TEMP.CLCL_ID) AS TOTAL,&lt;/P&gt;&lt;P&gt;38 STRIP(PUT(DATEPART(TEMP.MONTH),YYMMn6.)) as MONTH&lt;/P&gt;&lt;P&gt;39 FROM work.SQL_TEMP TEMP&lt;/P&gt;&lt;P&gt;40 INNER JOIN REWORKI.CODE CODE on Code.Code=TEMP.CLCL_EOB_EXCD_ID&lt;/P&gt;&lt;P&gt;41 GROUP BY CODE.LOB,CODE.Category,TEMP.CLCL_EOB_EXCD_ID,TEMP.EXCD_LONG_TEXT1,&lt;/P&gt;&lt;P&gt;42 STRIP(PUT(DATEPART(TEMP.MONTH),YYMMD.))&lt;/P&gt;&lt;P&gt;43 HAVING TEMP.Rework_Claim=1 AND CODE.LOB=&amp;amp;lobname2;&lt;/P&gt;&lt;P&gt;44 QUIT;&lt;/P&gt;&lt;P&gt;45 /****************************************************************************/&lt;/P&gt;&lt;P&gt;46 PROC TRANSPOSE DATA=Paid_Claims_Final&amp;amp;lobname1 OUT=Paid_Claims_Final&amp;amp;lobname1.TRANS (DROP=_NAME_);&lt;/P&gt;&lt;P&gt;47 ID MONTH;&lt;/P&gt;&lt;P&gt;48 BY LOB Category Code CODE_DESCRIPTION;&lt;/P&gt;&lt;P&gt;49 RUN;&lt;/P&gt;&lt;P&gt;50&lt;/P&gt;&lt;P&gt;51 %mend LOBNoCode;&lt;/P&gt;&lt;P&gt;2 The SAS System 08:43 Friday, May 19, 2017&lt;/P&gt;&lt;P&gt;52 %LOBNoCode(0100,'0100');&lt;/P&gt;&lt;P&gt;NOTE: Statement transforms to:&lt;/P&gt;&lt;P&gt;select distinct CODE.LOB, CODE.Category, TEMP.Code, TEMP.CODE_DESCRIPTION, COUNT(TEMP.CLCL_ID) as TOTAL,&lt;/P&gt;&lt;P&gt;STRIP(PUT(DATEPART(TEMP.MONTH), YYMMN6.0)) as MONTH&lt;/P&gt;&lt;P&gt;from WORK.SQL_TEMP TEMP, REWORKI.CODE CODE&lt;/P&gt;&lt;P&gt;where CODE.Code = TEMP.CLCL_EOB_EXCD_ID&lt;/P&gt;&lt;P&gt;group by CODE.LOB, CODE.Category, TEMP.CLCL_EOB_EXCD_ID, TEMP.EXCD_LONG_TEXT1, STRIP(PUT(DATEPART(TEMP.MONTH), YYMMD7.0))&lt;/P&gt;&lt;P&gt;having (TEMP.Rework_Claim = 1) and (CODE.LOB = '0100');&lt;/P&gt;&lt;P&gt;NOTE: The query requires remerging summary statistics back with the original data.&lt;/P&gt;&lt;P&gt;NOTE: Compressing data set WORK.PAID_CLAIMS_FINAL0100 increased size by 100.00 percent.&lt;/P&gt;&lt;P&gt;Compressed is 2 pages; un-compressed would require 1 pages.&lt;/P&gt;&lt;P&gt;NOTE: Table WORK.PAID_CLAIMS_FINAL0100 created, with 209 rows and 6 columns.&lt;/P&gt;&lt;P&gt;NOTE: PROCEDURE SQL used (Total process time):&lt;/P&gt;&lt;P&gt;real time 15:05.13&lt;/P&gt;&lt;P&gt;cpu time 57.07 seconds&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;　&lt;/P&gt;&lt;P&gt;NOTE: There were 209 observations read from the data set WORK.PAID_CLAIMS_FINAL0100.&lt;/P&gt;&lt;P&gt;NOTE: The data set WORK.PAID_CLAIMS_FINAL0100TRANS has 209 observations and 5 variables.&lt;/P&gt;&lt;P&gt;NOTE: Compressing data set WORK.PAID_CLAIMS_FINAL0100TRANS increased size by 100.00 percent.&lt;/P&gt;&lt;P&gt;Compressed is 2 pages; un-compressed would require 1 pages.&lt;/P&gt;&lt;P&gt;NOTE: PROCEDURE TRANSPOSE used (Total process time):&lt;/P&gt;&lt;P&gt;real time 0.13 seconds&lt;/P&gt;&lt;P&gt;cpu time 0.00 seconds&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;53 %LOBNoCode(0500,'0500';&lt;/P&gt;&lt;P&gt;54&lt;/P&gt;&lt;P&gt;55 GOPTIONS NOACCESSIBLE;&lt;/P&gt;&lt;P&gt;56 %LET _CLIENTTASKLABEL=;&lt;/P&gt;&lt;P&gt;57 %LET _CLIENTPROJECTPATH=;&lt;/P&gt;&lt;P&gt;58 %LET _CLIENTPROJECTNAME=;&lt;/P&gt;&lt;P&gt;59 %LET _SASPROGRAMFILE=;&lt;/P&gt;&lt;P&gt;60&lt;/P&gt;&lt;P&gt;61 ;*';*";*/;quit;run;&lt;/P&gt;&lt;P&gt;62 ODS _ALL_ CLOSE;&lt;/P&gt;&lt;P&gt;63&lt;/P&gt;&lt;P&gt;64&lt;/P&gt;&lt;P&gt;65 QUIT; RUN;&lt;/P&gt;&lt;P&gt;66&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Fri, 19 May 2017 14:49:44 GMT</pubDate>
      <guid>https://communities.sas.com/t5/SAS-Programming/macro/m-p/360000#M84681</guid>
      <dc:creator>JHE</dc:creator>
      <dc:date>2017-05-19T14:49:44Z</dc:date>
    </item>
    <item>
      <title>Re: %macro?</title>
      <link>https://communities.sas.com/t5/SAS-Programming/macro/m-p/360008#M84685</link>
      <description>&lt;P&gt;You're missing a closing parenthesis in the line:&lt;/P&gt;
&lt;PRE&gt; %LOBNoCode(0500,'0500';&lt;/PRE&gt;
&lt;P&gt;Shouldn't that be:&lt;/P&gt;
&lt;PRE&gt; %LOBNoCode(0500,'0500');&lt;/PRE&gt;
&lt;P&gt;Art, CEO, AnalystFinder.com&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Fri, 19 May 2017 15:01:02 GMT</pubDate>
      <guid>https://communities.sas.com/t5/SAS-Programming/macro/m-p/360008#M84685</guid>
      <dc:creator>art297</dc:creator>
      <dc:date>2017-05-19T15:01:02Z</dc:date>
    </item>
    <item>
      <title>Re: %macro?</title>
      <link>https://communities.sas.com/t5/SAS-Programming/macro/m-p/360009#M84686</link>
      <description>&lt;P&gt;You are missing a parenthesis.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;This is the line missing the parenthesis:&lt;/P&gt;
&lt;PRE&gt;&lt;CODE class=" language-sas"&gt;%LOBNoCode(0500,'0500';&lt;/CODE&gt;&lt;/PRE&gt;</description>
      <pubDate>Fri, 19 May 2017 15:01:50 GMT</pubDate>
      <guid>https://communities.sas.com/t5/SAS-Programming/macro/m-p/360009#M84686</guid>
      <dc:creator>PaigeMiller</dc:creator>
      <dc:date>2017-05-19T15:01:50Z</dc:date>
    </item>
    <item>
      <title>Re: %macro?</title>
      <link>https://communities.sas.com/t5/SAS-Programming/macro/m-p/360014#M84687</link>
      <description>&lt;P&gt;ohm yes, thank you .&lt;img id="smileyhappy" class="emoticon emoticon-smileyhappy" src="https://communities.sas.com/i/smilies/16x16_smiley-happy.png" alt="Smiley Happy" title="Smiley Happy" /&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Fri, 19 May 2017 15:08:44 GMT</pubDate>
      <guid>https://communities.sas.com/t5/SAS-Programming/macro/m-p/360014#M84687</guid>
      <dc:creator>JHE</dc:creator>
      <dc:date>2017-05-19T15:08:44Z</dc:date>
    </item>
  </channel>
</rss>

