1          ;*';*";*/;quit;run;
2          OPTIONS PAGENO=MIN;
3          %LET _CLIENTTASKLABEL='Rework Payment v2';
4          %LET _CLIENTPROJECTPATH='O:\MedInfo\HE\DEV\Rework\SAS\Rework Dev.egp';
5          %LET _CLIENTPROJECTNAME='Rework Dev.egp';
6          %LET _SASPROGRAMFILE=;
7          
8          ODS _ALL_ CLOSE;
9          OPTIONS DEV=ACTIVEX;
10         GOPTIONS XPIXELS=0 YPIXELS=0;
11         FILENAME EGPDF TEMP;
12         ODS PDF(ID=EGPDF) FILE=EGPDF STYLE=Pearl SAS;
WARNING: Unsupported device 'ACTIVEX' for PDF(EGPDF) destination. Using device 'ACTXIMG'.
NOTE: Writing ODS PDF(EGPDF) output to DISK destination "EGPDF", printer "PDF".
13         FILENAME EGSR TEMP;
14         ODS tagsets.sasreport13(ID=EGSR) FILE=EGSR
15             STYLE=HtmlBlue
16             STYLESHEET=(URL="file:///C:/Program%20Files/SASHome_94/SASEnterpriseGuide/7.1/Styles/HtmlBlue.css")
17             NOGTITLE
18             NOGFOOTNOTE
19             GPATH=&sasworklocation
20             ENCODING=UTF8
21             options(rolap="on")
22         ;
NOTE: Writing TAGSETS.SASREPORT13(EGSR) Body file: EGSR
23         
24         GOPTIONS ACCESSIBLE;
25         %macro LOBCode(lobname1,lobname2);
26         PROC SQL feedback;
27          /*CREATE TABLE Paid_Claims_Final&lobname1 AS */
28         CREATE TABLE Paid_Final&lobname1 AS
29          SELECT DISTINCT
30           CODE.LOB,
31           CODE.Category,
32           TEMP.Code AS Code,
33           TEMP.CODE_DESCRIPTION,
34           SUM(TEMP.Current_Payable) FORMAT=dollarx10.2 AS TOTAL_CURRENT_PAYABLE,
35           SUM(TEMP.Original_Payable) FORMAT=dollarx10.2 AS ORIGINAL_PAYABLE,
36           COUNT(TEMP.CLCL_ID) AS TOTAL,
37           STRIP(temp.MONTH) AS MONTH
38           FROM PAYMNT&lobname1 TEMP
39             INNER JOIN REWORKI.CODE CODE on Code.Code=TEMP.CODE
40           GROUP BY CODE.LOB,CODE.Category,TEMP.CODE,
41                 TEMP.CODE_DESCRIPTION,
42                 STRIP(temp.MONTH)
43         HAVING TEMP.Rework_Claim=1 AND CODE.LOB=&lobname2;
44         QUIT;
45         /************************************************************/
46         Proc Sort data=work.Paid_Final&lobname1 out=work.Paid_FinalSort&lobname1;
47         by LOB;
48         run;
49         /****************************************************************************/
50         PROC TRANSPOSE DATA=Paid_FinalSort&lobname1 OUT=Paid_Final&lobname1.TRANS (DROP=_NAME_);
51         ID MONTH;
52         BY LOB Category Code CODE_DESCRIPTION ORIGINAL_PAYABLE TOTAL_CURRENT_PAYABLE;
53         RUN;
54         %mend LOBCode;
55         %LOBCode(1300,'1300');
2                                                          The SAS System                                 12:32 Friday, May 26, 2017



NOTE: Statement transforms to:

        select distinct CODE.LOB, CODE.Category, TEMP.Code, TEMP.CODE_DESCRIPTION, SUM(TEMP.Current_Payable) as 
TOTAL_CURRENT_PAYABLE format=DOLLARX10.2, SUM(TEMP.Original_Payable) as ORIGINAL_PAYABLE format=DOLLARX10.2, COUNT(TEMP.CLCL_ID) as 
TOTAL, STRIP(TEMP.MONTH) as MONTH
          from WORK.PAYMNT1300 TEMP, REWORKI.CODE CODE
         where CODE.Code = TEMP.Code
      group by CODE.LOB, CODE.Category, TEMP.Code, TEMP.CODE_DESCRIPTION, STRIP(TEMP.MONTH)
        having (TEMP.Rework_Claim = 1) and (CODE.LOB = '1300');

NOTE: The query requires remerging summary statistics back with the original data.
NOTE: Compressing data set WORK.PAID_FINAL1300 increased size by 100.00 percent. 
      Compressed is 2 pages; un-compressed would require 1 pages.
NOTE: Table WORK.PAID_FINAL1300 created, with 179 rows and 8 columns.

NOTE: PROCEDURE SQL used (Total process time):
      real time           0.40 seconds
      cpu time            0.45 seconds
      


NOTE: Input data set is already sorted; it has been copied to the output data set.
NOTE: There were 179 observations read from the data set WORK.PAID_FINAL1300.
NOTE: The data set WORK.PAID_FINALSORT1300 has 179 observations and 8 variables.
NOTE: Compressing data set WORK.PAID_FINALSORT1300 increased size by 100.00 percent. 
      Compressed is 2 pages; un-compressed would require 1 pages.
NOTE: PROCEDURE SORT used (Total process time):
      real time           0.01 seconds
      cpu time            0.00 seconds
      


ERROR: Data set WORK.PAID_FINALSORT1300 is not sorted in ascending sequence. The current BY group has ORIGINAL_PAYABLE = $1.841,67 
       and the next BY group has ORIGINAL_PAYABLE = $49,49.
NOTE: The SAS System stopped processing this step because of errors.
NOTE: There were 2 observations read from the data set WORK.PAID_FINALSORT1300.
WARNING: The data set WORK.PAID_FINAL1300TRANS may be incomplete.  When this step was stopped there were 0 observations and 0 
         variables.
NOTE: Compression was disabled for data set WORK.PAID_FINAL1300TRANS because compression overhead would increase the size of the 
data set.
NOTE: PROCEDURE TRANSPOSE used (Total process time):
      real time           0.00 seconds
      cpu time            0.00 seconds
      
56         
57         GOPTIONS NOACCESSIBLE;
58         %LET _CLIENTTASKLABEL=;
59         %LET _CLIENTPROJECTPATH=;
60         %LET _CLIENTPROJECTNAME=;
61         %LET _SASPROGRAMFILE=;
62         
63         ;*';*";*/;quit;run;
64         ODS _ALL_ CLOSE;
NOTE: ODS PDF(EGPDF) printed no output. 
      (This sometimes results from failing to place a RUN statement before the ODS PDF(EGPDF) CLOSE statement.)
65         
3                                                          The SAS System                                 12:32 Friday, May 26, 2017

66         
67         QUIT; RUN;
68