The SAS Output Delivery System and reporting techniques

Need to get rid of Black Bars using ODS PDF and Layout (Gridded)/region/odstext

Reply
Learner
Posts: 1

Need to get rid of Black Bars using ODS PDF and Layout (Gridded)/region/odstext

I am getting these black bars above or below some regions in my ODS PDF when I use ODS layout (Gridded).  How can I get rid of them.  I am using AIX UNIX version 9.4.  Here is the code:

options orientation=LANDSCAPE NODATE NONUMBER;
proc template;
   define style TITLE_BACK;
     parent=styles.pearl;
	class body from document /
          background=_undef_
          backgroundimage="/data/dev/aduffen/TITLE_PAGE.jpg";
 class fonts /
       'TitleFont' = ("<MTsans-serif>, Albany AMT",36pt,bold);
 class FRONTPAGE /
       font = fonts('TitleFont')
       backgroundcolor = _undef_
       borderTOPcolor = cx3BA2FF
       borderBOTTOMcolor = cx3BA2FF
       borderLEFTcolor = cx3BA2FF
       borderRIGHTcolor = cx3BA2FF
       bordercollapse = collapse;
   end;
run;
proc template;
   define style BODY_BACK;
     parent=styles.pearl;
	class body from document /
          background=_undef_
          backgroundimage="/data/dev/aduffen/body_page.jpg";
 class fonts /
       'TitleFont' = ("<MTsans-serif>, Albany AMT",14pt,bold)
       'TitleFont2' = ("<MTsans-serif>, Albany AMT",14pt,bold)
       'TitleFont3' = ("<MTsans-serif>, Albany AMT",12pt,bold)
       'LineFont' = ("<MTsans-serif>, Albany AMT",10pt,bold)
       'LineFont2' = ("<MTsans-serif>, Albany AMT",1pt,bold);
 class TITLELINE /
       font = fonts('TitleFont')
       backgroundcolor = _undef_
       borderTOPcolor = cx3BA2FF
       borderBOTTOMcolor = cx3BA2FF
       borderLEFTcolor = cx3BA2FF
       borderRIGHTcolor = cx3BA2FF
       bordercollapse = collapse;
 class TITLELINE2 /
       font = fonts('TitleFont3')
       backgroundcolor = _undef_
       borderTOPcolor = cx3BA2FF
       borderBOTTOMcolor = cx3BA2FF
       borderLEFTcolor = cx3BA2FF
       borderRIGHTcolor = cx3BA2FF
       bordercollapse = collapse;
 class SUBTLINE /
       font = fonts('TitleFont2')
       backgroundcolor = white
       borderTOPcolor = WHITE
       borderBOTTOMcolor = WHITE
       borderLEFTcolor = WHITE
       borderRIGHTcolor = WHITE
       bordercollapse = collapse;
 class ROWLINE /
       font = fonts('LineFont')
       backgroundcolor = _undef_
       borderTOPcolor = WHITE
       borderBOTTOMcolor = WHITE
       borderLEFTcolor = WHITE
       borderRIGHTcolor = WHITE
       bordercollapse = collapse;
 class ROWLINEB /
       font = fonts('LineFont2')
       backgroundcolor = _undef_
       borderTOPcolor = cx3BA2FF
       borderBOTTOMcolor = cx3BA2FF
       borderLEFTcolor = cx3BA2FF
       borderRIGHTcolor = cx3BA2FF
       bordercollapse = collapse;
   end;
run;
FOOTNOTE1;
%macro rptit(product);
ODS PDF style=BODY_BACK notoc STARTPAGE=NOW;
FOOTNOTE1 HEIGHT=.5 "* Claims Received between &sdate. - &edate.";
ODS LAYOUT GRIDDED ROWS=3 COLUMNS=6 ROW_HEIGHTS=(3IN 2IN 1IN);
ODS REGION ROW=1 COLUMN=1;
DATA _NULL_;
  SET spds_net.kff_REPORT_DATA (where=(product="&product." AND RPT_STATE="&ST.")) ;
  IF P4Q_BONUS_POOL NOT = . THEN CALL SYMPUT('P4Q','Y');
  else CALL SYMPUT('P4Q','N');
RUN;
Proc odstext data=spds_net.kff_REPORT_DATA (where=(product="&product." AND RPT_STATE="&ST.")) ;
  p " " /style=TITLELINE;
  P "&st." /style=TiTLELINE ;
  p " " /style=TitleLINE;
  p " " /style=TitleLINE2;
  p " " /style=ROWLINEB;
  p " " /style=SUBTLINE;
  p "Claims: " /style=SUBTLINE;
  P "Total Claims: " /style=ROWLINE;
  P "Total Paid:   " /style=ROWLINE;
  P "Acceptance Rate: " /style=ROWLINE;
  P "Adjustment Rate: " /style=ROWLINE;
  P "Paid in <30 Days: " /style=ROWLINE;
run;
ODS REGION ROW=1 COLUMN=2;
Proc odstext data=spds_net.kff_REPORT_DATA (where=(product="&product." AND RPT_STATE="&ST.")) ;
  p " " /style=TITLELINE;
  P "&PRODUCT." /style=TiTLELINE ;
  p " " /style=TitleLINE;
  p " " /style=TitleLINE2;
  p " " /style=ROWLINEB;
  p " " /style=SUBTLINE;
  p " " /style=SUBTLINE;
  P PUT(claim_count,COMMA10.) /style=ROWLINE;
  P PUT(DTL_NET_AMT,DOLLAR14.) /style=ROWLINE;
  P PUT(dr,PERCENT6.1) /style=ROWLINE;
  P PUT(adj_percent,PERCENT6.1) /style=ROWLINE;
  P PUT(pct30,PERCENT6.1) /style=ROWLINE;
run;
ODS REGION ROW=1 COLUMN=3;
Proc odstext data=spds_net.kff_REPORT_DATA (where=(product="&product." AND RPT_STATE="&ST.")) PAGEBREAK=NO;
  p " " /style=TITLELINE;
  P " " /style=TITLELINE;
  p " " /style=TITLELINE;
  p " " /style=TITLELINE2;
  p " " /style=ROWLINEB;
  p " " /style=SUBTLINE;
  p "Authorizations:" /style=SUBTLINE;
  P "Requested:    " /style=ROWLINE;
  P "Approved:     " /style=ROWLINE;
  P "Approval Rate: " /style=ROWLINE;
run;
ODS REGION ROW=1 COLUMN=4;
Proc odstext data=spds_net.kff_REPORT_DATA (where=(product="&product." AND RPT_STATE="&ST.")) PAGEBREAK=NO;
  p " " /style=TITLELINE;
  P " " /style=TITLELINE;
  p " " /style=TITLELINE;
  p " " /style=TITLELINE2;
  p " " /style=ROWLINEB;
  p " " /style=SUBTLINE;
  p " " /style=SUBTLINE;
  P PUT(total_auth,COMMA10.) /style=ROWLINE;
  P PUT(total_auth-denied_auth,COMMA10.) /style=ROWLINE;
  P put(1-AUTH_denial_rate,percent6.) /style=ROWLINE;
run;
ODS REGION ROW=1 COLUMN=5;
Proc odstext data=spds_net.kff_REPORT_DATA (where=(product="&product." AND RPT_STATE="&ST.")) PAGEBREAK=NO;
  p " " /style=TITLELINE;
  P " " /style=TITLELINE;
  P " " /style=TITLELINE;
  P " " /style=TITLELINE2;
  p " " /style=ROWLINEB;
  p " " /style=SUBTLINE;
  p "Members / Providers:" /style=SUBTLINE;
  P "Current Members: " /style=ROWLINE;
  P "Primary Care Providers: " /style=ROWLINE;;
  P "Specialists:  " /style=ROWLINE;
  %IF "&P4Q"="Y" %THEN %DO;
  P "Quality Bonus Pool:  " /style=ROWLINE;
  %END;
run;
ODS REGION ROW=1 COLUMN=6;
Proc odstext data=spds_net.kff_REPORT_DATA (where=(product="&product." AND RPT_STATE="&ST.")) PAGEBREAK=NO;
  p " " /style=TITLELINE;
  P " " /style=TITLELINE;
  P " " /style=TITLELINE;
  P " " /style=TITLELINE2;
  p " " /style=ROWLINEB;
  p " " /style=SUBTLINE;
  p " " /style=SUBTLINE;
  P put(_freq_,comma10.) /style=ROWLINE;
  P PUT(pcp_count,COMMA10.) /style=ROWLINE;;
  P PUT(spec_count,COMMA10.) /style=ROWLINE;
  %IF "&P4Q"="Y" %THEN %DO;
  P PUT(p4q_bonus_pool,dollar10.) /style=ROWLINE;
  %END;
run;
ODS REGION ROW=2 COLUMN=1 ;
Proc odstext data=spds_net.kff_REPORT_DATA (where=(product="&product." AND RPT_STATE="&ST.")) PAGEBREAK=NO;
  p "Appeals:" /style=SUBTLINE;
  P "Total Appeals: " /style=ROWLINE;
  P "% Overturned:  " /style=ROWLINE;
  P "Overturned:    " /style=ROWLINE;
  P "% Upheld:  " /style=ROWLINE;
  P "Upheld:    " /style=ROWLINE;
run;
ODS REGION ROW=2 COLUMN=2 ;
Proc odstext data=spds_net.kff_REPORT_DATA (where=(product="&product." AND RPT_STATE="&ST.")) PAGEBREAK=NO;
  p " " /style=SUBTLINE;
  P PUT(total_appeals,COMMA10.) /style=ROWLINE;
  P PUT(overturned/total_appeals,percent5.) /style=ROWLINE;
  P PUT(overturned,COMMA10.) /style=ROWLINE;
  P puT(overturned/total_appeals,percent5.) /style=ROWLINE;
  P PUT(overturned,COMMA10.) /style=ROWLINE;
run;
ODS REGION ROW=2 COLUMN=3 COLUMN_SPAN=4 ;
Proc odstext data=spds_net.kff_REPORT_DATA (where=(product="&product." AND RPT_STATE="&ST.")) PAGEBREAK=NO;
  p "Top Claim Denial Reasons:" /style=SUBTLINE;
  P TRIM(propcase(DESC1)) /style=ROWLINE;
  P TRIM(propcase(DESC2)) /style=ROWLINE;
  P TRIM(propcase(DESC3)) /style=ROWLINE;
  P TRIM(propcase(DESC4)) /style=ROWLINE;
  P TRIM(propcase(DESC5)) /style=ROWLINE;
run;
/*

*/
%IF "&PRODUCT"="Medicare" OR "&PRODUCT"="Medicaid" %then %do;
ODS REGION ROW=3 COLUMN=1;
Proc odstext data=spds_net.kff_REPORT_DATA (where=(product="&product." AND RPT_STATE="&ST.")) PAGEBREAK=NO;
  p "Call Information: " /style=SUBTLINE;
  P "Member: " /style=ROWLINE;
  P "Calls: " /style=ROWLINE;
  P "First Call Resolution: " /style=ROWLINE;
run;
ODS REGION ROW=3 COLUMN=2;
Proc odstext data=spds_net.kff_REPORT_DATA (where=(product="&product." AND RPT_STATE="&ST.")) PAGEBREAK=NO;
  p " " /style=SUBTLINE;
  P " " /style=ROWLINE;
  P PUT(MCALLVOL,COMMA10.) /style=ROWLINE;
  P put(mfcr,percent8.) /style=ROWLINE;
run;
ODS REGION ROW=3 COLUMN=3;
Proc odstext data=spds_net.kff_REPORT_DATA (where=(product="&product." AND RPT_STATE="&ST.")) PAGEBREAK=NO;
  p " " /style=SUBTLINE;
  P "Provider: " /style=ROWLINE;
  P "Calls: " /style=ROWLINE;
  P "First Call Resolution: " /style=ROWLINE;
run;
ODS REGION ROW=3 COLUMN=4;
Proc odstext data=spds_net.kff_REPORT_DATA (where=(product="&product." AND RPT_STATE="&ST.")) PAGEBREAK=NO;
  p " " /style=SUBTLINE;
  P " " /style=ROWLINE;
  P PUT(PCALLVOL,COMMA10.) /style=ROWLINE;
  P put(Pfcr,percent8.) /style=ROWLINE;
run;
ODS REGION ROW=3 COLUMN=5;
Proc odstext data=spds_net.kff_REPORT_DATA (where=(product="&product." AND RPT_STATE="&ST.")) PAGEBREAK=NO;
  p " " /style=SUBTLINE;
  P "Total: " /style=ROWLINE;
  P "Calls: " /style=ROWLINE;
  P "First Call Resolution: " /style=ROWLINE;
run;
ODS REGION ROW=3 COLUMN=6;
Proc odstext data=spds_net.kff_REPORT_DATA (where=(product="&product." AND RPT_STATE="&ST.")) PAGEBREAK=NO;
  p " " /style=SUBTLINE;
  P " " /style=ROWLINE;
  P PUT(ACALLVOL,COMMA10.) /style=ROWLINE;
  P put(Afcr,percent8.) /style=ROWLINE;
run;
%end;
ODS LAYOUT END;
%mend rptit;
%macro getstate(st);
PROC SUMMAry data=spds_net.kff_REPORT_DATA (where=(RPT_STATE="&ST.")) nway;
  class product;
output out=ppp (drop=_type_ _freq_); run;
data _null_;
attrib y length=$40;
  file '/data/dev/aduffen/include.sas';
  set ppp;
  y='%rptit('||trim(product)||');';
  put y;
run;
options nobyline;
TITLE1;
ODS HTML CLOSE;
ods PDF file="/data/dev/aduffen/&ST._fact_sheet.PDF"
   style=TITLE_BACK notoc;
ODS LAYOUT GRIDDED X=5PCT Y=50PCT;
ODS REGION;
PROC ODSTEXT;
  P "Fast Facts" /STYLE=FRONTPAGE;
  p "&ST" /STYLE=FRONTPAGE;
run;
ods layout end;
%include '/data/dev/aduffen/include.sas';
%mend getstate;
PROC SUMMAry data=spds_net.kff_REPORT_DATA nway;
  class RPT_STATE;
output out=SSS (drop=_type_ _freq_); run;
data _null_;
attrib y length=$40;
  file '/data/dev/aduffen/include_ST.sas';
  set SSS;
  y='%GETSTATE('||trim(RPT_STATE)||');';
  put y;
  Y='ods pDF close;';
  PUT Y;
run;
%GETSTATE(Georgia);
ods pDF close;

 

 

Ask a Question
Discussion stats
  • 0 replies
  • 545 views
  • 0 likes
  • 1 in conversation