ࡱ> etd  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcl2ghijkmqnop-/svwxyz{|}~Root Entry F 6?141<Calibri1?Calibri1h8Cambria1Calibri1 Calibri1Arial1Arial1Arial1Arial1Arial1Arial1Arial1Arial1Arial1Arial"$"#,##0_);\("$"#,##0\)!"$"#,##0_);[Red]\("$"#,##0\)""$"#,##0.00_);\("$"#,##0.00\)'""$"#,##0.00_);[Red]\("$"#,##0.00\)7*2_("$"* #,##0_);_("$"* \(#,##0\);_("$"* "-"_);_(@_).))_(* #,##0_);_(* \(#,##0\);_(* "-"_);_(@_)?,:_("$"* #,##0.00_);_("$"* \(#,##0.00\);_("$"* "-"??_);_(@_)6+1_(* #,##0.00_);_(* \(#,##0.00\);_(* "-"??_);_(@_) 000000000 "$"#,##0                                                                       ff  +  )  ,  *     P  P        `            &   a>  (X  X  X     H  "X  !X   X   X   H  !X  H  (    )X !X  "X  "X "X *X    "" !" #" "! !! "  %" $" &" '  '+8 ')8 !     ||f*A}-} 00\);_(*}-} 00\);_(*}-} 00\);_(*}-} 00\);_(*}-} 00\);_(*}-} 00\);_(*}-} 00\);_(*}-} 00\);_(*}-} 00\);_(*}-}  00\);_(*}-}  00\);_(*}-}  00\);_(*}-}  00\);_(*}-}  00\);_(*}-} 00\);_(*}-} 00\);_(*}A} 00\);_(*ef;_(@_) }A} 00\);_(*ef;_(@_) }A} 00\);_(*ef;_(@_) }A} 00\);_(*ef;_(@_) }A} 00\);_(*ef;_(@_) }A} 00\);_(*ef ;_(@_) }A} 00\);_(*L;_(@_) }A} 00\);_(*L;_(@_) }A} 00\);_(*L;_(@_) }A} 00\);_(*L;_(@_) }A} 00\);_(*L;_(@_) }A} 00\);_(*L ;_(@_) }A} 00\);_(*23;_(@_) }A} 00\);_(*23;_(@_) }A} 00\);_(*23;_(@_) }A} 00\);_(*23;_(@_) }A}  00\);_(*23;_(@_) }A}! 00\);_(*23 ;_(@_) }A}" 00\);_(*;_(@_) }A}# 00\);_(*;_(@_) }A}$ 00\);_(*;_(@_) }A}% 00\);_(*;_(@_) }A}& 00\);_(*;_(@_) }A}' 00\);_(* ;_(@_) }A}( 00\);_(*;_(@_) }}) }00\);_(*;_(@_)    }}* 00\);_(*;_(@_) ??? ??? ??? ???}-}+ 00\);_(*}-}, 00\);_(*}-}- 00\);_(*}-}. 00\);_(*}-}/ 00\);_(*}A}0 a00\);_(*;_(@_) }A}1 00\);_(*;_(@_) }A}2 00\);_(*?;_(@_) }A}3 00\);_(*23;_(@_) }-}4 00\);_(*}}5 ??v00\);_(*̙;_(@_)    }A}6 }00\);_(*;_(@_) }A}7 e00\);_(*;_(@_) }}9 00\);_(*;_(@_)    }}: ???00\);_(*;_(@_) ??? ??? ??? ???}-}; 00\);_(*}-}= 00\);_(*}U}> 00\);_(*;_(@_)  }-}? 00\);_(*}(}V 00\);_(*}(}W 00\);_(*}(}X 00\);_(*}(}Y 00\);_(*}(}Z 00\);_(*}(}[ 00\);_(*}(}\ 00\);_(* 20% - Accent1M 20% - Accent1 ef % 20% - Accent2M" 20% - Accent2 ef % 20% - Accent3M& 20% - Accent3 ef % 20% - Accent4M* 20% - Accent4 ef % 20% - Accent5M. 20% - Accent5 ef % 20% - Accent6M2 20% - Accent6  ef % 40% - Accent1M 40% - Accent1 L % 40% - Accent2M# 40% - Accent2 L渷 % 40% - Accent3M' 40% - Accent3 L % 40% - Accent4M+ 40% - Accent4 L % 40% - Accent5M/ 40% - Accent5 L % 40% - Accent6M3 40% - Accent6  Lմ % 60% - Accent1M 60% - Accent1 23 % 60% - Accent2M$ 60% - Accent2 23ږ % 60% - Accent3M( 60% - Accent3 23כ % 60% - Accent4M, 60% - Accent4 23 % 60% - Accent5M0 60% - Accent5 23 %! 60% - Accent6M4 60% - Accent6  23 % "Accent1AAccent1 O % #Accent2A!Accent2 PM % $Accent3A%Accent3 Y % %Accent4A)Accent4 d % &Accent5A-Accent5 K % 'Accent6A1Accent6  F %(Bad9Bad  %) Calculation Calculation  }% * Check Cell Check Cell  %????????? ???+ Comma,( Comma [0]-&Currency.. Currency [0]/Explanatory TextG5Explanatory Text % 0Good;Good  a%1 Heading 1G Heading 1 I}%O2 Heading 2G Heading 2 I}%?3 Heading 3G Heading 3 I}%234 Heading 49 Heading 4 I}% 5InputuInput ̙ ??v% 6 Linked CellK Linked Cell }% 7NeutralANeutral  e%3Normal % 8Normal 2&Normal 2 9Noteb Note   :OutputwOutput  ???%????????? ???;$Percent <Style_18 =Title1Title I}% >TotalMTotal %OO? Warning Text? Warning Text %XTableStyleMedium2PivotStyleLight16` Cover Page Criteria PageReport$ACCOUNT_STRUCT:%CLAIMANT_RELATN: 'CLAIMS_RPT_PERIOD:COVERED: FACILITY: %FINANCIAL_FIELD:GENDER:  Job_Number:# Job_Submitter: MacroFlag:" MEDI_PRIMARY:$NTWK_SERV_AREA: NTWK_USAGE: ! PLANSPONSOR:  ;   ;  ;  ;  ; PRODUCT:! ProductName:&PROVIDER_TYPE_NO:! PROVIDERCNT:" RPT_END_DATE:*RPT_PROCESS_END_DATE:,RPT_PROCESS_START_DATE:$RPT_START_DATE:Run_Date:SETTING:! SORT_ORDER1: SQLCODEOUT: TextLine1: TextLine2:'Unused_SORT_ORDER:5f fQ(/FQRr(.kv" X/N(FF(.kv" X/ Phttp://ns.adobe.com/xap/1.0/ ,Photoshop 3.08BIM%ُ B~Adobed3   !"1 A#29Bav4R !1A"Qa2BRq#6s3Cb$4Sr ?Ɣпkbz6252/ܢ͋,;o^pt۵hպfQE1HBLa-ņN(I<z j@%dI 7aX`g䙚AYتndI$Rqr%L*;91@sY]5[+Lz v? r%̃4 `+?ʹwko5{LYgV 4Q5bCzM"H=G,n/!M1P$%Lw&k;ŵ:`u?=O3.ty^yw Ȥ/W1M}B%SL@EpF(ˌ]Ո0z؃؉^c6ͭP8 VuY1o;lV:kZ)k7J5 OAU 青@ə)Ϲr3T[%V;7t!C%,M9VȖ%`+RDFxu sM)M)M)M)M)M)M)_%<~9T}W+KKdBZ0(ҏ_@ȋ~ytWJ5> K &uNH%̋ e=R%*P`s& صo;zHSci=Z3A̚\72>W⽊d`2j~qlRQm)pC@~%*5`7$v G *BZvA=w7s䥙Wv(cZKRxTS"OUČۢ9pcA4Üxh,]ˆVzS)Lxi7Ӭ)IS>g;:;;a;;I*8kbْ$~1oH3/!ȢAf;XlӠr~PM7gЋ m'r9g|DƖH܍lt 3'N ӹySLqѻ PunP}F }c 0vZߺswДC^8U{#; ˓N'EVsm1=_lMHUtq@I@7~S?.>t#nC]+7JSmvƸ^+:Cˤ6LH97s霕&J-לTOs 'rR;Df]'"BG.8D_O!#K~E<`g49VJ"f9~ ԃYjꟴp:j.]3aLzj*B74ަ-Pm8P D,n[o(2Ĩ~9A(~Rs?7#mM1}dES#KZzjI]|쫠A5Qb&j t8]e{l{"B9J\ @N ӴO5/+G;WR@)OAUڬy 7i͆-}fHĢ Z˻EM*R(:}nNhRpjO̹jK{?|v3>^ ZRgz8g^dg;Rnrkd/q eZQ+$d8]Tqب(bS }nzu]yۓ̶y$;41𬔐rcLHd@GSbD,bAH[J< 6gO*ф$.]g܁TcnQIXi`ؒriFr:fv3 \hMsdm-m-%i 8 )*2*-+-[vVRTRNcU|L>ٽ)>\1ֱFF66X#%)R".ڪd32Iɰ}㸿J9)$@"< H$ú-m'@Z3 d`2y06_[rS)L~2eOLGfj+K4kCR+o>e14CŠEbZ¬6ݯanl,H3#yo eɕ{$h,)+Pgn)"~=Jm3e5(6G1NnQA:tiFȺ;wˠgDQ#T@w[:[՝֛ )BР I)=MŽ/K0弔l%I1Ӡ {j[x0.rՆ)|L0y|&1fڗ ͼc֥Y hT7d!@G3mh OajN)LB)$P Ğj$[#IQg-j@Qd}Un[7rWk"apb6$gC1ezhI3w1c͉B̀G.0.Z۷G,*i eeA]BKZ$iyĽS-#}vNj{)D{'WҘ1^(-otCK ^5td!MHUy@E!VZ4&sΐXUM^Ė֗(% aONNWo kCk42`iz!ET2SJTnչJrJcHN&QjM)c Y)"`B IZ;23ʞsSGҵvcOмOP~=17 PtJ-p*vH["_u"OMTFkD\-d!T˩.@%PAZA@ ;7$ڑu'N%J3@mئm\TkEO1AةZvT遌8> t+r R8r|2{2Gu{&՛2:I-lhVQf @EqlR,[7;aђecϭI)E(3h@A6zG^jH7<)//KQ61SkĒ:hϢK7XMBY )su_ T$€Ptݞf..HXUO}+7Çr㽔&ZZv&U(WU4w`R%R8]n CswqZC(ժumѶi YoĄL="~5_UN}y7Nq^lW#;cuiIfή9!vZ֣PFT^ * #UeQEL*(um|7Xp>m$!dpcF BI;QjRRT|` *NԼ9e|Z~w6Y雴dlZ{4'ܮ9Sny'vٛ )l Oyb6Iκg$ڧ_=A H{4bX/*KjpCWwFf] zk4y~_客 gC x%(hr%9<אî!۵U.x[*ĎYʈ~ '2ijGm~+:TIN' OPYdS(,h Ht-oN^rw)^hҬ~:;P WY|~D?lP:ɿp:K3=-KCQӿƔyuYYZNdƩ촴Z%{17oz/ an۲z}qK'[mن̯ZtYDhn;)Zj2JfHi%|hb(Q(8Խ /tw<|?=T Wj4oyU*zO? kPh5غ6]lFQ/""#PeUPQC1/.N^޸nQR$!ϗݾ*QB~9a\LAKeKU8X]f:Ǿ wk%D1'cjC7ccݭ-teF@?hGx1%xe}A.>QtѶз>kNˍMՋvѷ3谨=R<13jIitݛ:Kn(>caD2"4v‘7* aj! A4Irz*Ѣ>XYJHrztPU6z+@ԿƔ _fgi *1Y6`P3TYA)Ɍ"5y ϭKtĩD`@d+ێ8ˎJp$xryv^+":j&LC0u1SrSC@H2:ӧ#hIMmrmҳ[lR2Jav{U;E o1"#zQ2Wlt@Ed6ܥu`|ۦ!8n(,n0(q`T˥ުMϧrnIAES"H I$@d"iBkIQ5bI&OZ׷=2h9'㜂(@oͰQO cL?`5{g._bݸ so}{iOZFT%'U۾ pQ $C>E@@;]3 `]?s(-^8짜PUNǮN,Uo2()@ R Rp: ox #Jw!`A|8J]TLHM¾v B}s5`߱eۮ |*JKHdx+N镼k@S߮WOtMi WG7rEB:F0 eCd7$@Z,@I߽RrEîEJ*q&{uɆƘ `[RFH U:  "!0}ymKQ&+wNcD5Xitp]Ng1 \в>࿠N:^y8մ7t"b5pVO]JBRMUJvӤБQ#Z+U @u ˋpUtG_}/-K#L|`'C$YMTH"Ds=bB |zvX]\FZ*^#NGi>Z?"+!۞1Ѹ0qZגWj-@(|^pUU2iur՟ꭵ_jLMUVcN>(DQɚG7l˨$)%% <q~~ŸDEF=$byս)kO{5NտƔb(R$aqY3(n(R$aqY3PNG  IHDR++PLTE3f++3+f+++UU3UfUUU3f3f3fՙ3f3333f3333+3+33+f3+3+3+3U3U33Uf3U3U3U3333f3333333f3333333f3ՙ333333f333ff3ffffff+f+3f+ff+f+f+fUfU3fUffUfUfUff3fffffff3fffffff3fffՙffff3fffff3f̙++3+f++̙+UU3UfUU̙U3f̙3f̙3fՙ̙3f̙3f++3+f+++UU3UfUUÙ̀3̀f̪̪̀̀̀3̪f̪̪̪3fՙ3f3f++3+f+++UU3UfUUU3f3f3fՙ3f(tRNSO4bKGDH cmPPJCmp0712Hs$IDATx^]=sɑw3N4$Ywڍ8-Zx+c%8B"\h:+D"gIGPg,b!;n ̗U3f tGz]6!D96"pL q M&$.hd"@  q M&$.hd"@  q M&$.hd"@  q M&$.hd"@  q M&$.hd"@  q M&$.hd"@  q M&$.hd"@  q M&$.hd"@  q M&$.hd"@  q M&$.hd"@  q M&$.hd"@  q M&$.hd"@  q M&$.hd"@  q M&$.hd"@  q M&$.hd"@  q M&$.hd"@  q M&$i+ 9ʴۛ$ W&7^`{&D%xbwRoWۭ+AĽP=y?=)[ –2;gӹjJMo_O~j:1;^n~; k]wA֛lbwl6鹱xgs'86wյMvz>F/pCe;;r˻%Nvoh+ Х㇛u ;k5 swBQIMKS:׉D~_5*:;[[F=Φu]J_FsXNwΙGGI}u1v>*:ܕa#G/d}UUx~bǕX{rj3x}b ׌a@ĽcV~ozkČ>9\IX]a89h4D%#^t ( @U'Bjo'bj1s}]FE/X^T˚ɶ:v8^b>R;DstxDk&sK#k{N]8CoPR*%qχߪeDCy8ޣͨ&xsUGECc[WUaGĽx̭FޯakY(҄>L> 7U̳ܺ< S``Vu'.ZfpߊܲiUkH}fW&vX;'H=61:Ij* Ve$q/ }nuwֱbN͝}k)rIU:AG ֥W@]5ehٟԝ=ž^^UTyt/3u9ԁe[_7k\$|RUf!4:V @JnfA=y2uW;"ǵ>ĵBu*rp|m`ժIU[GFMD V~2\:%/񚩉-@6*E+":?S⥔A^ Q yO,V,nykޙx8Ya.{KmVN⮊z$-,DDe7~W@'N8a# z}xYaW.XO,/BឭLZ;prب]cu`i0OT#h2_On]`;:*Փ<:US*p}k9/Y@MU(ww_|YNX֐C˲@bC˲@bC˲@bCDet =o"@6teHܖGG; q[m-$hCO[Fm9z} =o"@6teHܖGG; q[m-$hCO[Fm9z} =o!{tcC?߼/ uƺ<-#vg:o^?Q7] '齍>ɕG%K/w7Bkl~Z!8w'2ꀋEg||4wv-9) +=%|Ď-?{(ĝK?DNEޫo0JK2Xw6Ha,Uγ Y M[V?bC77<O_W闯Kwѧ7l\JKZԠ/ZYvNRk? |v[M- 9xO?aux}NY,͇Yk/R\?6 Di1x^D[;\pn7(InIG(Od95Gz:x->+! KRk1H4(ipq}["jEؙU kbgZ(%~cI[;):oOGD'.f!.AkjGzeG7j:\KTS`Rp!OFOfF]T h PM\mA|hVuR6yx{%}-C%dDa)MdzFU1r2!TGKLJ>|-&Ke(Oh@%.ԋm޵&n hǨL_,Mm qـ a)i6qLJ 0)͂CCe@xUwHFTQlc)7% V^i@ܫOWw][ 3]#ԭq6*]Ndgm<= ur brJ:!1#I\L\5O䔤'N=NN!OolUP~wkKolT`/L+;hB/.a nN,kŕzACXPhuPjS12O,b#u`G M,3zF3RaĔN H#KT="UPѧuFaLukq鰎 5dfg4}9;|k,Y-sӊ%m3!] [gE ,Ԡi(qs z3(ffWDj|q.Bh1Z{%Z. W} D`@HeD`(HܡeD`@%-IqIUDI쑀|py@)guitP  ZͲԪ̺S5f)G9>d@e̵n?HXinrtnуWx3,nPT ~ǺXʃ+Ŏ>C6E^$2hSRN)?->ID|K۵gdmg?HpZ tYL[gyf%T埭uS ݗX`ծyK, "\,yO0Ƣ떊 j(\Ge#M1/ٕu5ZTIt Nfb [X4.uXXa+S^J.mܺ,=C{x_=n!e*}u$2-sDax}m-C7NB,):K"ap)IYImYH%˒IP^P"o ULa6*;m}L:'T} FzY C )U.i'Y)%q)2:ޫK> ̈́Y7#@Q"/~c(q2qPY@P&bOk% DOeWHTF҆ECXk ^%DuK%n[ĸwMR$T"H[\05s7e0RBc)/cׄZ/zaKAN$G\dXcƨ]VHCw$F qT10u૳/0P]H_^cI!(i 0wqi!ngrJ>TB?>39!(=.$"P ɋhYӵxcq}HGNYLCS2<9>ַ|BɈr$=u6>T7P͢ED_^sy,wzW|uJV2+ -Bw|-0`1UPHQBZd}lNNI7j8}J+m#Bi]^Κx"OkVI|fvgLOLNi 8[VM̽<(z4>Ҥr!\!OtDϒ,ZiA!nڜT)דѓPI~dZ Iߘ%'i2-\JCb'*R*䫉R05aH*Sܔ)X "<CJ[YYcRgKQD*UHv /qP^S+{9׼ٖfW*YY{Td]JK:[tZ%cM'鬖fX{WrJwe蘑\$aϚ+CnjD q/{LVF"{cNB_@72X1f/71d33S$ȣ:Uunr*)NuC"]ig`1[1Pʅ2 MjAmT'| lq/,W80L'}fO{\&i>G<3/DRWpSApFLb+.X=Y/+;[Za =EKVN; 1*Sa'=NQ{L(Վ鹔t>Mljdu!bXPjRyxN"2O>3S16)`qￖ(T ,W*S%/J:q+ Ś['MZLGBPMl=$nȅZaȒ<*0)›a(S1^j jz:ƈOjE mP02u.L/  S-7rVטFuզ-EbZWj*4@yN+p /vQoH[0 1ʥcNO s-#R!|8­֔D^Ys(ɽprV 0`(@y֞HjKtlRN;-F2ٚ4J Xi5.kPbTXe\nT5.v2/@U,eʕ_Q΢AC–R)u67/ #@'"+bScWvȧX(ݸxldij+ N(4j/?rqoS!w Y= |j'RMCTJ-VTi t]k<3b&d4V˭ZzA%5$NwEQo+se-w H}lm+>簭VT"'M3ĵЊB!A<Kkbʡ,qslMGb["6X1KyY7E\6hHfVR9h%͞2/k<j&Q c n:9(q+1ã- t2&2svy Ms({*!u7V:'u1.ZIzU"*1RN7qwM)vR*|aU~GZWʘr.脼6u5}.]2sS2TR޶KO.%ZWn8h>qZƭrRQP{LW*!-2,=ON?(q;:>ԏ&62Y#3; e1me.A5B@(dBlP|($8ELEP1b15;NB(|WySorENj_7mo9QԸ w>9&矴#$:J4TϬҷ@lLQȇѤɡl!ڐz*ĻŒM͟Lɴܱ<2Z LQ:et{ፂ0]_` `g;!k"v1{ S .$PȲ\"@֊;GF$ )wvwG~5) m 0(qgezYm; _|' \i%A;,w"@;Z>bHnh qG|.$n#FqzƎw"@;Z>bHnh qG|.$n#FqzƎw"@;Z>bHnh qG|.$n#FqzƎw"@;Z>bHnh qG|.$n#FqzƎw"@;Z>bHnh qG|.$n#FqzƎw"@;Z>bHnh qG|.$n#FqzƎw"@;Z>bHnh qG|.$n#FqzƎw"@;Z>bHnh qG|.$n#FqzƎw"@;Z>bHnh qG|.$n#FqzƎw"@;Z>bHnh qG|.$n#FqzƎw"ã?|dIENDB`@z@3 A@@  zOƹƵRegional Clinic, P.A. Round Rock,TX PhysicianClinical Pathology Labs, Inc.San Antonio,TXIndependent LabƹƵRadiological Association Cedar Park,TXMulti Provider GroupSeton Medical Center Austin,TXAcute Short Term Hospital Punit ChadhaSuzanne C. LedetMohamad Zeineddin Lockhart,TXQuest DiagnosticsIndianapolis,INHEB Grocery Company, LPOther Medical ProviderEduardo Javier CepedaJennifer Street Summers ARA ImagingRadiology Center Redimd LLC Rosenberg,TX John Kim'U.S. Anesthesia Partners of Texas, P.A. Irving,TX(Texas Physical Therapy Specialists Austi San Marcos,TXPhysical Therapist(Travis County Emergency Physicians, P.A.John Edward McDonald'St. David's South ƹƵMedical CenterAngel Eduardo Alcocer-MonteroValerie Diane EspinosaManuel J MartinEryn Mechel McIntyrePhysician Assistant Bio Reference Laboratories, Inc. Clifton,NJMathew J. Putzi"AUSTIN INDEPENDENT SCHOOL DISTRICT Plan Sponsor ID 0000000000024742Top 25 Provider ReportFCurrent Data For Claims Processed September 01, 2018 - August 31, 2019 IntegratedIAUSTIN INDEPENDENT SCHOOL DISTRICT - Plan Sponsor Number 0000000000024742 Funding Arrangement and Product:! Self Insured Aetna Choice POS II& Self Insured Open Access Aetna SelectParameter Options Selected: Account Structure:  All-All-All-AllPrimary Payor: All Relationship:Gender:Not Covered Claims: ExcludeProvider Class: Network Usage:Financial Field: Paid AmountNetwork Service Area: Setting: Submitted by: A245762Job ID: A245762Run Date: 9/18/2019Provider Provider NameProvider City & State Provider TypeNumber of Claimants AdmissionsVisitsNumber of Claims Paid AmountRҌ Xʎx\UjtccB1V HV| ZO   dMbP?_*+%&C&G&R&8Page &P of &N Job ID: A245762 Run Date: 9/18/2019&L&"Calibri"&11&K000000&8 Aetna Integrated Informatics 2019 &1#&"Calibri"&8&K414141Proprietary&333333?'333333?(?)?M2Webex Document LoaderTC odXXLetterDINU"TJjSMTJ"JXX?333333?&43U}  B} $ B@XDDDDDDDD D D D D DDMMNNNN"@AAAPQQQQQAAAA "CCCCCCCCCCCCCC T+ TTTTTTTTTTTTT T, TTTTTTTTTTTTT "EFFFFFFFFFFFFE U- UUUUUUUUUUUUU "EFGFFFFFFFFFFE "EFGFFFFFFFFFFE "EHGIIIIIIIIIIE S. SSSSSSSSSSSSS " SSSSSSSSSSSSSS " JHEKEEEEEEEEEE " RRRRRRRRRRRRRE S/ SSSSSSSSSSSSS "EEEEEELEEEEEEE .&&22&2&&&2&&&2&PH0(  ff(  Z  C 2AAetnaLogoCF3>@ :     Sheet5ggD ZO %ЦB  dMbP?_*+%&C&G&R&8Page &P of &N Job ID: A245762 Run Date: 9/18/2019&L&"Calibri"&11&K000000&8 Aetna Integrated Informatics 2019 &1#&"Calibri"&8&K414141Proprietary&333333?'333333?(?)?M2Webex Document LoaderTC odXXLetterDINU"TJjSMTJ"LcXX?333333?&43U} [80n* ;!,#;$, Z? ![@ #ZA $[8 <PH 0(  ff (  v  C NA0AetnaLogo-Criteria PageCF>@ * Sheet1ggD ZO #  dMbP?_*+%&C&G&R&8Page &P of &N Job ID: A245762 Run Date: 9/18/2019&L&"Calibri"&11&K000000&8 Aetna Integrated Informatics 2019 &1#&"Calibri"&8&K414141Proprietary&333333?'333333?(?)?M2Webex Document LoaderTC odXXLetterDINU"TJjSMTJ"LcXX?333333?&43U} B} (B} B} B}  B} B} $ B#  ; ,  w , , ` @                       ]0]]]]]]]]OOOO ^.^^^^^^^^OOOO OOOOOOOOOOOOO _-________^^^^^^^^^^^^^^^^^^ bF bG bH bI aJ aK aL aM aN c@A B B B$ d:@dd@d\@e%q c=!A B B B$ d@ddw@dl@e_*  cA B B B$ d@@ddv@dӸ@eK c7A B B B  d@d@dܲ@d@ eQ6aiAcNjA B B B$dv@dd@d2@eU;cA B B B$d@@ddʮ@d@ea~ cj? B B B$d@dd(@d@e1~ c>[ B B B$d@dd@dʦ@e-c$A B B B$d @dd@d֥@e҇c&A B B Bd@ddԚ@dL@e(A~ cR@ B B B$d؊@dd@d@ecD~ c0 B B B$d@ddT@d@e*\ ~ c> B B B$d@ddT@d@e@c_#A B B B$du@ddD@d`@eǶckA B B B$d@dd @d$@e#R)~ cv/ B B B$d d@dd@d@ekcS A B B B$d@dd@d|@e cp5 A B! B B$d0z@dd,@d4@e0c"A B" B B d@dc@d`@d@e= CzPAcy$A B# B B$dȀ@ddp@d8@eTc$A B$ B B$dp{@dd@dP@e5cA B% B B$d@v@dd@dX@ei~@^ D00$(~dddpdd``dp```dd`ddpdd ! " ~ ccm B& B B'$ d@~@ddP@dh@e]~ !c5 !B( !B) !B!du@dd@@d@!e(\/x@~ "cJ1 "B* "B "B$"dr@dd@d@eÀ h(`lPH00(  ff0 (   Z  C 2AAetnaLogoCF3>@ * Sheet2ggD Sheet5~__SRP_8__SRP_9BSheet1~  !"#$%&'()*,-./13456789:;<=>?<jxk1#<cP$AB" Fϝ5G xϝ5G cP$AB"ME(SLSS6"N0{00020820-0000-0000-C000-000000000046}(%H` % %`h8@tt0^ $*\Rffff*0[5f6747814xAttribute VB_Name = "She@et5" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2rU 94 q1`rU @n<jxk1Xr#<>|uB>F8 F6]z]NNKx6]z]NNK>|uB>F8ME(SLSS6"N0{00020820-0000-0000-C000-000000000046}(%H` %" %`h8@tt0^ $*\Rffff*0^5f6747834xAttribute VB_Name = "She@et1" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2rU YY94 q1`__SRP_c +__SRP_d0BSheet22~__SRP_e DrU @n<jxk1DP#<"ɑ H&GV F՞ߟLN ό*x՞ߟLN ό*"ɑ H&GVME(SLSS6"N0{00020820-0000-0000-C000-000000000046}(%H` %$ %`h8@tt0^ $*\Rffff*0_5f6747844xAttribute VB_Name = "She@et2" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2rU )^Q^94 q1`rU @nrU  $`,`&0$`$`D!`==0#,I__SRP_fIBePSM_Shared ux__SRP_4 [__SRP_5Kp#401*\R1*#13f*\R1*#133*\R1*#29e*\R1*#12e$*\Rffff*0Z5f674781*\R1*#148*\R1*#13b*\R1*#13b*\R1*#12*\R0*#f*\R1*#29a*\R0*#13*\R1*#299*\R0*#14*\R0*#16*\R1*#2fe*\R1*#2ff*\R0*#b*\R1*#56 T X "`  $  T  B  h p  T   $ @` Th  R 8  X T`" >4Q (81`( B@& :  "` p Fr+-%k1A"xME`@0F(80^> LLL LP*LL`@``+0` 5)I%i>`@``+` pM)I%i>`@``+ `tk@ e)I `h%i>`@t`p`l+ `  })I08%i>`@``+8 `  )I %``+  ` ox i" `$t &p % ` `0k zz) 0 8 %)IX % 4P `k SS:)I %i6 i8`:x`<v`>p B `&k )I %i< i8+Fx `H#k8 iL X iN+@`p"l+ iX  iZ )\  a%``#t`bp`d l˜ B˜Bꀠ(@ h P 08 `hx `  P (xXp@68B@x @h @d @T @D @4 @0$ @ @ @ P`8h6xV8@0l @H\ @X @H @x8 @( @ 42@ @ @  @ @ @ @ <@ hX 8`xH @p\ @L @H @8 @( @ @0 @H @` @ @x @ @ @ @ @ @t xPx8h@h @X @T @D @ 4 @$ @ P@`x@ @0 @ @ @ @H @` @ @x @p @l @\ @L @< @, @$ xXP h6P8@p @8` @\ @L @< @8 @6 @$ @ `hH(p0H@` @\ @X @T @P 8V2@@ @x0 @, @` @ @ @ @ @ <4@ @ 8  x`L4@x @h @0X @HH @8 @( @$ @  @ @ @ 8  @(X @LBRl`0%@\ @pL @H @0 8 @H 4 @0 @ @ DFr@ @ @ @ @ @` @ @x @ x 0! !!!X"0!h!H!` z X!0!,@!l @!\ @"L @!H @8 @4 @("$ @@" @ @ P 8 #(#`@x8##8 X #$`$ $$#H$$`Fx$#8$@$t $ $PRVT@x$d @T @$D @4 @$ %$@%  (%$@8% P%%@`% x%8%I@% %`%y@% %%@%  %%@& &%@(& @&&@P& h&(&@x& &P&@ x& X'(p'@'LJRr@x @'h @'X @'H @'8 @'( @ @( @ h x Px % ^ *\R1*#400*\R0*#9$*\Rffff*0Y5f674781*\R1*#29e*\R1*.E.D .H1x( B " & &B,B@p x T  T *8 h Pp 2   T( "   6         8 @ H P X p x              "  80 h x .  T  H h p  T "     1 18  (P  x  . 1  % 1 , 1 %(18,P1h % .B$/  ( !+ -0 (@6]P  ( !+- (f  `(x !- ( '  H  (( !@ -P (` .2p6 6   ( ! - (( .286h 6   ( ! - ( .268 X6`   ( ! - ( 6  ( ! -  (0 6@ ` (h ! - ( 6  ( ! - ( 6  @ (H !` -p ( 6  ( ! - ( 6  (  !8 -H (X 3h   ( !- (2I&B@!H`  &h  (  T ( N0   .  T"08@ 1H1h :6      %(8HPX h (p  T  R 6H    T"  (08@  &H p  $8) !-+ ($/ *BH2Fx2GJ] 8 HH  $8 ) ! - ( .268 X<dh 6     $8 )  !0  -@  (P  .2` 6  <d ! !6! 0!  8! H! $8P! )x! !! -! (! .2!6! "<d"X"`" h"6p" "  " " $8" )" !" -" (# 6#  8#  $8H# )p# !# -# (# 6#  # # $8# )$ ! $ -0$ (@$ 6P$  p$ $ $8$ )$ !$ -$ ($ 6$  %  % $8(% )P% !`% -p% (% 6%  %  $8% )% !% -& (& 6(&  H& X& $8`& )& !& -& (& 3&  & &  & '$8')@' !P'-`' (p'(6' ''  ' '$8')( !(-((+8(+H( (X( 'h( x(  ($8()( !(-( (((2) $B0)X) !`)p) x)  )$8))) !)-) ()(2* $B0*X* !`*p* x* T* * L* 20+ h+ p+ + T+" ++ *B, %0,62@,x,;-;(-;@-;X-;p-;- - - - T- . . 8. @. `. Th.B  .... .../@/X/`/*x/ //l/00 T80 0 "0 0 0 0 T0B  H1P1X1`1 h11.1111*2 02@2lH22 T2 3 3 @3 H3 h3 Tp3B  3333 34,4H4`4h4(4 44t485 T@5 5 "5 5 5 5 T5B P6X6`6h6  p6606666*7 87H7|P77 T7 08 88 X8 `8 8 T8B  8888 99.09`9x99(9 999`: Th: : : : : ; T;B  h;p;x; $;,; ; ; T; P< TX< < "< < T<B @= H=P=  $X=h=4p= = =T==6==+= > T> h> Jp> > "> > T>" P? & X? ? ? 0?0? >#? @  @0@ H@ P@X@ 23`@D@F@@ <#@ T#(A 4#A 8#A (#A ,#B 6#HB 6#B 2#B >#B 2#0C  PhC <#C >#C  P8D 8#D  PD <#E 4#PE 0#E 6#E 8#E 8#(F 2#`F <#F R#F ,#0G  P`G :#G 2#G 8#(H 4#`H 6#H  PH  P I  PpI 2#I @#I 2#8J 6#pJ .#J $#J $#K  (K 8K T@K K :K K "K 6L HL TPL" L LLL  L LL MM  LM hM  xM <M IM  M. N *0N< `N N  4N PN 20OhO O  O B}OO O  >"P2@P xP  ,P  LP.aPGQB0QIHQ hQ6@pQGQBQIQ Q RB RHhRBRIR$@RR RS S(S(V0SHXSBpSIS SSS S TS  T V(T T "T T TT" U U$ (UPU hU pUBxUU" UU  U U&HUG VI8VBXVpVV V TV V LV @W "HW pW TxWB W W,W 5X (X"0X 5XX pXxX "X "X XX   X X Y YD YhY Y  Y Y YY$YZ Z8ZPZpZZZZZZZ .Z @([h[[[ [[[[\D(\"p\\\\\(\]0]H]`] x]]]&]]]^(^.0^ `^  h^ x^ ^2^$^__0_H_h_x___ ___` `@`X`p``````aa0aHa(`a aaDaa b b8bXb pbbbbbb.b (c  0c @c HcBhc$c ccdd0dPdhd(ddddee0eHehe.pe e  e e e*ef (f8f Pf `f  hf xf f f f  f f f f f g  g (g 0g @gPg hgggg.g g  g h h h0hHh`h.hh h h hh hh i  i 0i  @i Pi Xipiiii.i i  j j j0jPj.Xj j j j  j j !j j  k k  k @k `k hk pkkkk k k k $kBk Bl PHl  l l l  >l Fm Pm &Xmm 4mm .mn *n @n "Pn xn &n  nn 2n o .o@oHo XoN*** ePSM - Level C Report Codex Copyright(c) 2005 Aetna, Inc.N***< ePSM_Shared - Common code to be used in each Level C Report Version: 10N***] h ] ]] $row start on each page]($global row counter]PN***K auto_open - The macro that controls the formatting of the report the first1 time that the spreadsheet is opened.N***8 Only run this macro the first time the report is opened MacroFlag Cover Page$6%8!:" Make sure Cover page is displayed Cover Page$6B@A1:A1$8B@H< Update the status bar, so the user knows what's going on...3Please wait while your e.PSM booklet is being built (3 Disable Screen Updating while we format the report ( Format the reportA@A@A@B? Clear the MacroFlag so that this code won't be executed again. MacroFlag Cover Page$6%8( MacroFlag Cover Page$6%8B@' Make sure we're back on the Cover Page Cover Page$6B@A1:A1$8B@H; Enable Screen Updating - We're done formatting the report. ( ( Aetna Inc.Author %(: Aetna Inc. Last Author %(:koN***M FormatNoObservationsFound - Display "No Observations Found" when no data for$ report.I nRow The row that the "No Observations Found" box should appear in.+ strCol The ending column for the report John Cripps - 03/22/2005N***]PB : $ $ ' $8B@H VB@  V%b h9f 9j p9nq  V%b h9f 9j p9nq d V%b h9f 9j p9nqp  V%b h9f 9j p9nq8 V 9\ 9q< V(z V!X(No Observations Found (:2 Set the column width so that it will print at 76%A: ' $8B@H $A$   V(vo@N***B FormatCoverPage - Macro to format the cover page for all reports. John Cripps - 03/15/2005N***h]]]] Cover Page$6.Parms$6.H! Activate the CoverPage worksheet B@' Set desired Row Height for rows 2 - 212:2$xB@H V(z3:4$xB@HA@ V(z5:9$xB@H! V(z10:11$xB@H9@ V(z12:21$xB@H! V(z PLANSPONSOR H%8!:|' PLANSPONSOR H%8!:' PSU NameA3:N3$8B@H VB@ V!X(Z V!X(  V(\ PLANSPONSOR H%8!:  $ (: Plan Sponsor IDA4:N4$8B@H VB@ V!X(Z V!X(  V(\Plan Sponsor ID PLANSPONSOR H%8!:   $0000000000000000$ (: Report TitleA6:N6$8B@H VB@ V!X(  V(\ 4 (:B Date Lines (See top of ePSM module for description of each type.) 2KTA10:N10$8B@H VB@ V!X(  V(\CLAIMS_RPT_PERIOD H%8!: HLong$ (:d8 HLong$ (:kA11:N11$8B@H VB@ V!X(  V(\CLAIMS_RPT_PERIOD H%8!: HLong$ (:dp HLong$ (:kH KTA10:N10$8B@H VB@ V!X(  V(\CLAIMS_RPT_PERIOD H%8!: HLong$ (:d HLong$ (:kx KTA10:N10$8B@H VB@ V!X(  V(\ HLong$ (:A11:N11$8B@H VB@ V!X(  V(\ HLong$ (:KTA10:N10$8B@H VB@ V!X(  V(\ HLong$ (:KTA10:N10$8B@H VB@ V!X(  V(\ HLong$ (:KTA10:N10$8B@H VB@ V!X(  V(\ HLong$ (:A11:N11$8B@H VB@ V!X(  V(\ HLong$ (:KTA10:N10$8B@H VB@ V!X(  V(\Long$< (:nx  ProductA14:N14$8B@H VB@ V!X(  V(\ ProductName H%8!:| ProductName H%8!: (:d Integrated (:k Set standard margins and footer HA@ ($A:$N !(o0N***H FormatCriteriaPage - Macro to format the criteria page for all reports. MPR - 03/09/2005' MPR - 04/06/2005 - increased zoom sizeN***]X]x Criteria Page$6.Parms$6.H B@*Make sure criteria page is the active page !tB@Arial !t!X(  HCA@P  HA@ HA@ !$1:$799L9$A:$C9qA1:A1$8B@HopN***L FormatHeaderRows - Macro to format the header rows on the Criteria Page and/ Report tab for each report. John Cripps - 03/15/2005N***]h]]]]]] Activate the current worksheet B@'' Plan SponsorA :  ' $8B@H VB@ V!X( V!X(Z  V(\ PLANSPONSOR H%8!:' PLANSPONSOR H%8!:|' PLANSPONSOR H%8!:  $' PLANSPONSOR H%8!:   $'  - Plan Sponsor Number  0000000000000000$ (:  'B Date Range (See top of ePSM module for description of each type.) 2KTA :  ' $8B@H VB@ V!X(  V(\CLAIMS_RPT_PERIOD H%8!: HLong$ (:  !: ( H$ Month Claim Lag) (:kP'd@ HLong$ (:k  'A :  ' $8B@H VB@ V!X(  V(\CLAIMS_RPT_PERIOD H%8!: HLong$ (:  !: ( H$ Month Claim Lag) (:kd HLong$ (:k  'KTA :  ' $8B@H VB@ V!X(  V(\CLAIMS_RPT_PERIOD H%8!: HLong$ (:  !: ( H$ Month Claim Lag) (:k'd HLong$ (:kh  'KTA :  ' $8B@H VB@ V!X(  V(\ HLong$ (:  'A :  ' $8B@H VB@ V!X(  V(\ HLong$ (:  'KTA :  ' $8B@H VB@ V!X(  V(\ HLong$ (:  'KTA :  ' $8B@H VB@ V!X(  V(\ HLong$ (:  'KTA :  ' $8B@H VB@ V!X(  V(\ HLong$ (:  'A :  ' $8B@H VB@ V!X(  V(\ HLong$ (:  'KTA :  ' $8B@H VB@ V!X(  V(\Long$< (:  'n Claim Lag  A :  ' $8B@H VB@ V!X(  V(\ H$ Month Claim Lag (:  'k@ Title  'A :  ' $8B@H VB@ V!X( V!X(Z V!X(  V(\ 4 (:  ' User Text Line 1A :  ' $8B@H VB@ V!X(  V(\ TextLine1 H%8!:_ TextLine1 H%8!: (:d (:k  ' User Text Line 2A :  ' $8B@H VB@ V!X(  V(\ TextLine2 H%8!:_ TextLine2 H%8!: (:d (:koN***F FormatMarginsAndFooter - Sets the standard margins and footer for the+ active worksheet. John Cripps - 03/24/2005N***]xRun_Date H%8!: ' !"&8 Aetna Integrated Informatics $9&8Page &P of &N $Job ID:  Job_Number H%8!: $ Run Date: Run_Date H%8!:  $9333333? %9333333? %9? %9? %9 ? %9 333333? %99qPoHN*** GetMembershipDateLine John Cripps - 03/21/2005N***]]0]H >Short mm/dd/yyyy'@&Membership Reporting Time Period from ' through 'd mmmm dd, yyyy'@!Membership Reporting Time Period ' - 'k@ RPT_START_DATE H%8!: @$  RPT_END_DATE H%8!: @$'iN*** GetCurrentIncurredDateLine John Cripps - 03/21/2005N***`]]] >Short mm/dd/yyyy'@&Current Data For Claims Incurred from ' through 'd mmmm dd, yyyy'@!Current Data For Claims Incurred ' - 'k ! RPT_START_DATE H%8!: @$  RPT_END_DATE H%8!: @$'i@ N*** GetPriorIncurredDateLine John Cripps - 03/21/2005N***0]]] >Short mm/dd/yyyy'@$Prior Data For Claims Incurred from ' through 'd mmmm dd, yyyy'@Prior Data For Claims Incurred ' - 'k@  RPTPRIORSTARTDATE H%8!: @$ RPTPRIORENDDATE H%8!: @$'i N*** GetCurrentProcessedDateLine John Cripps - 03/21/2005N***]]] >Short mm/dd/yyyy'@'Current Data For Claims Processed from ' through 'd mmmm dd, yyyy'@"Current Data For Claims Processed ' - 'k" RPT_PROCESS_START_DATE H%8!: @$ RPT_PROCESS_END_DATE H%8!: @$'i(N*** GetPriorProcessedDateLine John Cripps - 03/21/2005N***]X]p] >Short mm/dd/yyyy'@%Prior Data For Claims Processed from ' through 'd mmmm dd, yyyy'@ Prior Data For Claims Processed ' - 'k( RPT_PRIOR_PROCESS_START_DATE H%8!: @$ RPT_PRIOR_PROCESS_END_DATE H%8!: @$'iN*** GetClaimLag John Cripps - 03/31/2005N***] ] RPT_END_DATE H%8!:X'RPT_PROCESS_END_DATE H%8!:X'm  $'iN***M IsNameInWorkbook - function to check if the parameter exists to be processed Maureen Roynan - 03/09/2005N***8 ] ] B@( !*.& ,B@ & " %.!'$d@ " &!0!0%.!'$k ,!2G' jiN***D FormatParameters - subroutine to fill all parameters if they exist Maureen Roynan - 03/14/2005N*** 'start row on first page 'L'<A:A %t(v7B:C %t(v H ProductName Funding Arrangement and Product:A4  '      'L L''k?Parameter Options Selected:   ,R   %R!X(Z   %R!X(  'L HACCOUNT_STRUCTAccount Structure: A4L2 HACCOUNT_STRUCT_DISP%Account Structure Display Variation: A4c3 H MEDI_PRIMARYPrimary Payor:A4L4 HCLAIMANT_RELATN Relationship:A4L5 HGENDERGender:A4L6 HAGEGROUP Age Bands:A4L7 HCOVEREDNot Covered Claims:A4L8 HCOVERED1Not Covered Claims:A4L9 HFACILITYProvider Class: A4L10 HDIAG_VARIATIONDiagnosis Variation: A4L11 H NTWK_USAGENetwork Usage:A4L12JCLAIMS_RPT_PERIOD - displayed in header of report '13 HFINANCIAL_FIELDFinancial Field: A4L18 HNTWK_SERV_AREANetwork Service Area:A4L19JDRUG_VARIATION - not displayed on Criteria Page (5A) '20 H MIN_ADMITSMinimum Admissions: A4L21JMAX_CLAIMANTS_AMT - displayed in the title of the report '22 H MIN_DOLLARSMinimum Paid Amount: A4L23 H MIN_UNITSMinimum Units: A4L24 H SORT_ORDER Sort Order: A4L25 H PROVIDER_TYPEProvider Type:A4L26 H FORMULARYFormulary Indicator:A4L27 H GENERIC_CODEGeneric Indicator:A4L28 H OPTION_CODE Copay Tier:A4L29 H REPORT_VIEWDrug Level Variation:A4L30 H MAXDRUGCNT-# of Top Drugs to be Included in the Report: A4`31 HSETTING Setting: A4H33JPROVIDERCNT - # of Providers to be Included in the Report (in header) '34 H MAXCPTCNTCPT4 Codes Threshold: A4L35 H SORT_ORDER2 Sort Order: A4L36 H MAXICDCODESICD-9 Threshold: A4L37 H TYPE_OF_CAREType of Care: A4L38 H TYPE_OF_CARE1Type of Care: A4L39JSORT_ORDER1 - not displayed on Criteria page '40JPROVIDER_TYPE_NO - not displayed on Criteria page '41JHPD_REPORT_PERIOD - removed as of 12/4 release '42 H SORT_ORDER3 Sort Order: A4L43 HDRUG_VARIATION1Diagnosis Variation: A4N44 H SORT_ORDER4 Sort Order: A4L45 H FACILITY_TYPE Facility TypeA4L47 H JOB_SUBMITTERSubmitted by: A4 H JOB_NUMBERJob ID: A4 HRun_Date Run Date:A4 (o4N***4 fill_parameter - subroutine to fill all parameters Maureen Roynan - 03/14/20050 04/06/2005 - MPR - increased font from 11 to 12N***` ] ] ]8 6ACCOUNT_STRUCT*'>d3|'>k2Eif parameter is being passed in - if not, get out and do the next one 6$  H 6find out how many values we have for the one parameter 678!: >$@'< 6 JOB_SUBMITTER < '<4group all 3 lines together 6Run_Date 6 Job_Numbere < '<0(one more than separator & one for headerkX1 .check if all parameters fit on the column/page Jif not move to next column EXCEPT if there are more than one columns worth  L <     <   H < 8ABkx0 find an empty cell L $R$D L $R$Db L 'L0  L  6 JOB_NUMBER 6Run_Date L 'L0skip a row between parametersk/ 678!:':  6 JOB_SUBMITTER 6 JOB_NUMBER 6Run_Date 8  : 6$F L $R(: L $R!X(Z r L $R(\ L $R!X(d. 8 L $R(:Ncopy the parameter header L $R!X(Z r L $R(\ L $R!X( L 'L : > b : : > $ 6$F L $R(: L $R!X(Z r L $R(\ L $R!X( : : > :$': L 'L L    H < 8ABk,, : 6$F L $R(: L $R!X(Z r L $R(\ L $R!X(kP,qH,k@,o8,N***P move_column_page - subroutine to move to the next column or page for parameters Maureen Roynan - 03/17/2005N***P  '   ,more than one page    'L' L' J L $R(Hdh* 'L,same page new columnk8* <  copy the parameter header 8 (cont'd) L $R(: L $R!X(Z L $R!X( r L $R(\ L 'Lkx)op)N***E format_parameter_string - subroutine to format the parameter strings Maureen Roynan - 03/14/2005N*** NMIN_CLAIMANTS_AMTK MIN_DOLLARSKT L$0,00$'Fz' MIN_ADMITSK MIN_UNITSKT L#,##0$'Fz'ACCOUNT_STRUCTKT L|-$P'F FALLAll$P'Fz('n 'default is ALL L$R0KT N REPORT_VIEWKT()DRUG LEVEL VARIATION - should be changed!Detail NDC Level'Fnx&1KT NACCOUNT_STRUCT_DISPKTControl/Group Level'FProductK FUNDINGARRANGKT Fully Insured'F MEDI_PRIMARYKTCarrier Primary'FCOVEREDKCOVERED1KTInclude'FFACILITYKTFacility'FDIAG_VARIATIONKTICD-9'F NTWK_USAGEKT Participating'F( Case "CLAIMS_RPT_PERIOD"9 format_parameter_string = GetClaimLagFINANCIAL_FIELDKT Billed Amount'FDRUG_VARIATIONKTMDC'F SORT_ORDERKT Provider Name'F OPTION_CODEKTSingle Tier Copay Plan'F REPORT_VIEWKT()DRUG LEVEL VARIATION - should be changed!Summarized Drug Label Name'FSETTINGKT Inpatient'F SORT_ORDER2KT Units/1,000'F TYPE_OF_CAREK TYPE_OF_CARE1KT Surgeries'F SORT_ORDER1KTNumber of Claims'FPROVIDER_TYPE_NOKTTIN'FDRUG_VARIATION1KTDRG within MDC'F SORT_ORDER3K SORT_ORDER4KT Paid Amount'F FACILITY_TYPEKTAcute Facility'FS! L'F@ not recognized, just print valuen!2KT NACCOUNT_STRUCT_DISPKT)Control-Suffix Level/Group-Subgroup Level'FProductK FUNDINGARRANGKT Self Insured'F MEDI_PRIMARYKTMedicare Primary'FCOVEREDKCOVERED1KTExclude'FFACILITYKT Professional'FDIAG_VARIATIONKTMDC'F NTWK_USAGEKTNon-Pariticipating'FCLAIMS_RPT_PERIODKTdo nothing - no claim lagFINANCIAL_FIELDKTAllowed Amount'FDRUG_VARIATIONKTDRG within MDC'F SORT_ORDERKTProvider Number'F OPTION_CODEKT2 Tier Copay Plan'FSETTINGKT Ambulatory'F SORT_ORDER2KT Paid/Unit'F TYPE_OF_CAREK TYPE_OF_CARE1KTLab'F SORT_ORDER1KT<Financial Field (Billed Amount, Allowed Amount, Paid Amount)'FPROVIDER_TYPE_NOKTPIN'F SORT_ORDER3KTNumber of Services'FDRUG_VARIATION1KTDRG'F SORT_ORDER4KTNumber of Admissions'F FACILITY_TYPEKTNon-Acute Facility'FS L'F@ not recognized, just print valuen3KT NACCOUNT_STRUCT_DISPKT9Control-Suffix-Account Level/Group-Subgroup-Account Level'F NTWK_USAGEK MEDI_PRIMARYKTAll'FFINANCIAL_FIELDKT Paid Amount'F OPTION_CODEKT3 Tier Copay Plan'F SORT_ORDER2KTPaid Amount Per Member'F TYPE_OF_CAREK TYPE_OF_CARE1KT Radiology'F SORT_ORDER3KTNumber of Claimants'F SORT_ORDER4KTNumber of Days'F FACILITY_TYPEKTAcute and Non-Acute'FS L'F@ not recognized, just print valuenX4KT NACCOUNT_STRUCT_DISPKT!Control-Suffix-Account-Plan Level'F TYPE_OF_CAREKTAll'F TYPE_OF_CARE1KTER'Fn5KT N TYPE_OF_CARE1KTAll'FnPSKTSpouse'FEKTEmployee'FCKT Child(ren)'FMKT NGENDERKTMale'F GENERIC_CODEKTMulti-Source Cross Brand'F PROVIDER_TYPEKT Mail Order'FS@ L'F@ not recognized, just print valuenFKT NGENDERKTFemale'F FORMULARYKT Formulary'FS L'F@ not recognized, just print valuen`<= 19KT0-19'FBETWEEN 20 AND 44KT20-44'FBETWEEN 45 AND 64KT45-64'F>=65KT65+'FNKT N GENERIC_CODEKTSingle Source Brand'F FORMULARYKT Non-Formulary'FS8 L'F@ not recognized, just print valuenOKT N GENERIC_CODEKTMulti-Source Brand'FS L'F@ not recognized, just print valuenpYKTGeneric'FRKTRetail'FOTHERSKUKT Other/Unknown'FALLKTAll'FNA *Not ApplicableKTNA - Not Applicable'FS NRun_DateKT L V$T'FS` L'FnPnHi@found on Microsoft's web site x ; Count occurrences of a particular character or characters.I If lngCompare argument is omitted, procedure performs binary comparison.]D ]D8 ]DP 8 Specify a starting position. We don't need it the first? time through the loop, but we'll need it on subsequent passes.'` Execute the loop at least once._x. Store position at which strFind first occurs. ` X Z \'`( Store position in a temporary variable. `'b# Check that strFind has been found. `  Increment counter variable. d 'd Define a new starting position. ` Z '`k8+ Loop until last occurrence has been found. `( Return the number of occurrences found. d'@iAttribute VB_Name = "ePSM_Shared" '*J  - Level C Report Code Copyright(c) 2005 Aetna, Inc.#V~OCommon cK to be used in each _\Version: 10SConst STARTROW4 MAXCOLS 3 ! PARM 28 Global nStartR ow AsTteger 'rs ?B:pag@fkS'gCcounterGColIrIC] auto_openqThe macro thatsntrols@e formatting o*fBrCt fi8rstFtispreadsheet ids AedD Public Sub7()  %' Only run1"E<81 -e 8F+If Work"s("Cov`BP?").Ran ge("Ma(Flag@Value <> "" +n#Make surezH#displayedcActixvatOaA1:A1@Sel ec3g ' Upd@8@Xtus bar, sA?wr knows w A's go"?n..`6 Appi,atx. eBarj"Please waitile your e.` boo$kl@be built`DisabScre`Sawh wQ4= Fals@%i FB[R CbC G_! p$N.:"a1")<> "_"qg0) (xEls<a "h^[rY3u3?]33323~ 3E= 3ő3  4Sub '*?& @ FormatM@arginsF$oo - ts the standard m  ffor/a Nab worksheet.John pps 03/24/2005??' (t` As WD!nPosaInptege= InStr(1, :Run_!%, " Wi4thT%SR{Setupw#.LeftPz&8 Aetnarpd0ics& Year(Nowx.Righ&P ofH &N~Ch 0rJob ID: _Numbder&3&   Q/2-< 1 #)iApp jatAInchesToPoints(0.3nByTop__0.5YBotНHeader 80.1 3wRly*QF)'_G4= Meq$ship#ArA>1A? FunBd/ ! ALz, QrE SA0@ing)!Dr}mSepa>V@JS , CShP"mm/dd/y PCme Pod from ' @brough5 mm dd, O O er$z O i@ #-0e_)`ۀ2&tdMPT_START_DATE7_ U_rw#("RENDoC0J<-1GIfDateLine= "Short" Th_{4>2R>o{o{oo{6e o>{˵{o>N#OQ7o>{__o>y~yK1 @1O>Z O>O>_u-F(4"O>./ / & />/> {o >!.Xu_o>?t?zO>T@>V>3>TLa*'@ ^|3?o\|qtf;Integer4dtƫ09@(#= CT_=dt.E&_  PGetClaimLag = DateDiff("m", dtIncurred,Processed) End Fu@nction'"*J ' IsNameInWorkbook - ft to check if the par+ter exists bRMaureen @Roynan(03/09/2005Mdf(stn As String)BooleaDim x Rng Range ApplicaP.VollOn Error Resume Next Set = ICallerC.C%If Is Noth. The,+A,xAveEn.:s<)BDls'@".PaprentIf$)Numb1= 0$O= Tru@*ěFormat3s@subrou tine fiXll ZGsĴygDQ14 Sub (wsN:sheet, wsmB9nStartRdowB10!c's ron `first%YnpRepo<Cola cws.umns("A:A")Wid$th60B:C5 _ 8ll_&b, b"ducx "E|d`ArrrmW aS:" "G J+ 1c@Z> MAXCOLSlmDc,(.+PARMS) + 4C ai2/ -!m.ells , $ )@."$Opa`elected: "ol).Fo Bold cv|Size12# )$- #>ACCOUNT_STRUCT>Accoun^tA ˠ) '$ " _DISPR Display Vari6a* 3 "MEDI_PRIMARYQPrimary Payor`*3'$#_#tv0CLANT_RELATNRegonshizpx'?6O?606G ENDERGe8nde '6/S Ar AG EGROUsget B:s1'7__COVERED `q Co4ve '8_P`_PT1o`j'9__rmsPFACILIT14 ovi ssD% '1SDIAG_VA@RIATIOr Diagnosisr k+'1NoiNTWK_US`Retw Usage\'5? ')S_RPT_PEPRIODwds4ed in heaof rBgv,'1?6+aINANCIAL_FHIEL Ficial Fiel1PQB %SERV_AREAIService Area'1aZ 'DRUnot wCriPia0@0(5As |'2_ MIN_ADMITS Minimum AdmissS(&'2Z ' n_DS_AMTtitle s_ '2W D OLLAR Pa`id Am]%1':2T ??QUNLUnit/62V SORT_ORQSp Or ,}; '2Vod PROVI@_T8YPEaSATyrpZ6'2VOOFpORMUFublfIndA)g'>2V a "G< A`,`L_Number#zQ+ 2"'1more>se@@tor & f?CK;&'check$E:Q$rcolumn/k*m`{C' EXCEPT@ ` `#pxh(n R@&+H) >= (nStartPARMS)-_q(< yTh;~ _ (VI,)uu 4 Lxcell Do While (Not IsEmpt(y(Cps(, Col))) 8Or /) + 1l =e$Loop+P> G}3pĀ?X67 $1'ski? r'betwua6 wBDUi= oMuTZd eMs%%X =Bz$y& ""&Q_mat_s{(2In2Q?9F.BppLTr-owj,. Horiz0alAlignme= xlLeft Size5~ D Cells(nReportRow, XCol).Value = ParmHe0ader'copy the paramet@hN R Font.BolBdmTrue-?HorizCalAlignmentIxlLeft2Siz|12%LJ8+ 1Do While InStr(tempm, d elimi) 8> 0" " & format__string(Mid:1,"- 1),1BIn)$vFalsv5w%xAeu Lm@}, LenW)LE!^If (@aB + MAXPARMS)` Then Call move_columnF ge(ws~s, vcount@#End Ifo LoopYpYgT TS8-ZSm+With* !Sub '~*?& @nE - subroutine toAnext K or geGs Maureen Roynan` 03/17/2x005#?'  `$N^ As Workshee^g`IntegeraSc#2d|@GÁFçw>avCOLSuIF'mor*h"o,pag*& DjrStC=HE _4).P@ BreakxlManualCE_qK6'sP##newT$FhOOOr Mov" (c'd)"A yGK~k_Je%)._J/ 7+!$oFoFo8A6Fs|EE4E_  Fun`ction? ( FC,1QmtypeDc%SSelect CasBb'a"MIN_CLAIMANTS_AMT", BDOLLARSx*A= Fb `$0,00"=6_O F 65+]N?,?,8,F7 Sple FFCSo-'ofA-----oF-O" % Select Case parmtype  x"GENERIC_CODE"HPformat_ameter_string = "Multi-Source BrandChEls^q&'not recognized, just p@t valu 1End l{YSqGeneric  (R'(Reta il%OTHERS", "U*Other/Un`known ALL'Al*a$NA@*NfApplicable@- )Run_Dat (75FTime(, vbShort)*?E C !Function 'fou`aon Microsoft's web sitfe CtOccurrences(`}Text As S~, _Fi@  Opaal lngCom*ea VbMethod)aLong%' o' of aticular char$ac os.!' IfIargument is omittprocedur erCs bi@nary c"ison b DimA PosCgTemp$/Specify`star2tpo7 <. We don't need it first t@Vroughloop, but@'ll@Dsubsequ!passeD&4A= 1d Execute at leao@G#Do'GoA)which ?EFC:DInO(,aRMN,9fpNin't @0or8varioaC 4=8gCpheck @haAeen bkfJ!%> 0 Thep@ CNncre"McAmer֬@A"C+/% @Definenew!=!  + Len=1CIfb' L! unti9U6  Ung0nurnR"numb:;?G0OM8#C$l58-(\%l $ lW8#C%l58(\%l $ l&l]l'H%:\%t la8kr8( ' (X$ (X,)lX68((l'H%:\(%$ ll!l $ l"l+c\%l $ lW8#C$l58-(\%l $ lW8#C%l58(\%l $ l&ll'H%:\%t la8kpkr8( ) :*:+N( ,%X$ (X,)lX6 8((l'H%:\-%$ ll!l $ l"l-(\%l $ lW8#C%l58(\%l $ l&l' .F8%l$ (l,l58p k|(l'H%:\/%$ ll!l $ l"l-(\%l $ lW8#C%l58(\%l $ l&l2l'H%:\0%t la8(]3l5861Ct 2F8%l$ (l,/l58461C      !"#$%&'()*+,.Q]1345678E:;<=>?@ABCD0FGHIJKLMNOPR\TUVWXYZ[^dc`abfghijkl_nopqr{tuvwxyzm|}~t 3F8%l$ (l,/l58(l'H%:\4%$ ll!l $ l"l-(\%l $ lW8#C%l58(\%l $ l&l2l'H%:\0%t la8(]3l58?61Ct 5F8%l$ (l,/l58w61Ct 6F8%l$ (l,/l58 k (l'H%:\/%$ ll!l $ l"l-(\%l $ lW8#C%l58(\%l $ l&l2l'H%:\0%t la8(]3l58 61Ct 2F8%l$ (l,/l58 61Ct 3F8%l$ (l,/l58 k (l'H%:\/%$ ll!l $ l"l-(\%l $ lW8#C%l58(\%l $ l&l61Ct 2F8%l$ (l,/l58(l'H%:\4%$ ll!l $ l"l-(\%l $ lW8#C%l58(\%l $ l&l61Ct 3F8%l$ (l,/l58 ke (l'H%:\/%$ ll!l $ l"l-(\%l $ lW8#C%l58(\%l $ l&l61Ct 7F8%l$ (l,/l58 kG (l'H%:\/%$ ll!l $ l"l-(\%l $ lW8#C%l58(\%l $ l&l61Ct 2F8%l$ (l,/l58 k(l'H%:\/%$ ll!l $ l"l-(\%l $ lW8#C%l58(\%l $ l&l61Ct 2F8%l$ (l,/l58(l'H%:\4%$ ll!l $ l"l-(\%l $ lW8#C%l58(\%l $ l&l61Ct 5F8%l$ (l,/l58 krU~| .1 i y 1 Y y 1i q99Qy1Y!Aa a iq1Iq! y1!!! "YI I q""" #!!#I### $y$9$$I%q%%%%&Q&q& ' ('(i()q)Y* ***9+++y+ ,y,A,!-,--i../. 0y/0q0Q1111q2)2223a3 4/4I4154)656a6 77I7Q8 888)9y9:9:I::!;Y;a)q; <y<Y=<<<=1==!>I>q> X>>yX>>9?Q?? @Q@@@AQAyAA BYByBB1CC DIDDDEqEEE!FqFFAGG H9HHH1IIIJQJqJyKKG LqLLLM9NNNAOOO PPPPP!Q9QqQQQQiRRRR)SQSySS TaTTTTTIUUU V!VQViVVVV)WWXYYYQ:T%d:h%x$ x dd4A:$]@)xd641d:h%x$ x dd )xd(x'T%:h %$ xx&:h % x$ x  x" x$ x  x   Ef$%:T%d:h%x$ x dd4C)xd54D:T%d:h%x$ x dd)xd51d:h%x$ x dd )xd(x'T%:h %$ xx" x$ x  x&:h% x$ x  xB:D%:h%dx$ Hx \d4C)xd54B:D%:h%dx$ Hx \d4C)xd54$ xd40   1X:\%l$ l dlX=x)lX1X:\%l$ l dlX=t)lX x (1:\%l$ l(l5(%(\%l $ ll1:\%l$ l(l5(,\A@%l $ ll1:\%l$ l(l5(%(\!%l $ ll1:\%l$ l(l5(,\9@%l $ ll1:\%l$ l(l5(%(\!%l $ llBl'H%:\%t la8: (Uprl68(/l'H%:\%t la8(Uppl58(l'H%:\!%$ ll!l $ l"l+c\%l $ lW(l'H%:\/%$ ll!l $ l"l-(\%l $ lW8#C%l58(\%l $ l&l31C 8F8%l$ (l,/l58(l'H%:\9%$ ll!l $ l"l-(\%l $ lW8#C%l58(\%l $ l&lIl'H%:\:%t la8: ((]3l68(Bl'H%:\:%t la8%X$ (X,)lX58*!:\;%l$ (l,l t < f\%l$ Dl,l(:\=%l$ @lW8>C?l58,Xtx,lX8( 1\:`\%p$ p dl\=x)p\1\:`%p$ p dl\=t)p\ x (px pop6:`]%px paL^\\,n)p\5L+6_C88tx `/8 tx a t <%p$ @pWL>$$q p:`b%l Ccf`%l Cd(`L%l Ce:`f%l C? q (p'<%:` %$ ppB\0$tx8p\Lt H (pvpf8gkv#`*#\h*#X*#Tkv#P*1x2 `\XTP),'0%lxF@%$ ,,!, $ ,",-(@ %, $ ,W#C%,5+c@%, $ ,W#C$,5(@%, $ ,&,/,'0%:@%H ,a Upr,5B,'0%:@%H ,a: Upt,6 F,'0%:@%H ,akt '  `1l,6 G,'0%:@%H ,akrkt )  `1h,6 ]lli*F:0+NhM@@ , %,$ (,,,6 kvpvp k8gkv#`*#\h*#X*#Tkv#P*1x2 `\XTP),'0%lxF@%$ ,,!, $ ,",-(@ %, $ ,W#C%,5(@%, $ ,&,2,'0%:@0%H ,a(]3,5Q61C``l 2F%,$ (,,/`,5 Ed,$ (,a:@j l kD0:l%$ (,),6 pf61C``l 3F%,$ (,,/`,5 kvpv8gkv#`*#\h*#X*#Tkv#P*1x2 `\XTP),'0%lxF@%$ ,,!, $ ,",-(@ %, $ ,W#C%,5(@%, $ ,&,2,'0%:@0%H ,a(]3,5G61C``l 5F%,$ (,,/`,5 Bd,$ (,a:@j l kD0:l%$ (,),6 61C``l 6F%,$ (,,/`,5 kvpv k8gkv#`*#\h*#X*#Tkv#P*1x2 `\XTP),'0%lxF@%$ ,,!, $ ,",-(@ %, $ ,W#C%,5(@%, $ ,&,2,'0%:@0%H ,a(]3,5R61C``l 2F%,$ (,,/`,5 Fd,$ (,a:@j l kD0:l%$ (,),6 pf61C``l 3F%,$ (,,/`,5 kvpv k 8gkv#`*#\h*#X*#Tkv#P*1x2 `\XTP),'0%lxF@%$ ,,!, $ ,",-(@ %, $ ,W#C%,5(@%, $ ,&,61C``l 2F%,$ (,,/`,5 kvpv8gkv#`*#\h*#X*#Tkv#P*1x2 `\XTP),'0%lxF@%$ ,,!, $ ,",-(@ %, $ ,W#C%,5(@%, $ ,&,61C``l 3F%,$ (,,/`,5 kvpv k 8gkv#`*#\h*#X*#Tkv#P*1x2 `\XTP),'0%lxF@%$ ,,!, $ ,",-(@ %, $ ,W#C%,5(@%, $ ,&,61C``l 7F%,$ (,,/`,5 kvpv k$ 8gkv#`*#\h*#X*#Tkv#P*1x2 `\XTP),'0%lxF@%$ ,,!, $ ,",-(@ %, $ ,W#C%,5(@%, $ ,&,61C``l 2F%,$ (,,/`,5 kvpv kb8gkv#`*#\h*#X*#Tkv#P*1x2 `\XTP),'0%lxF@%$ ,,!, $ ,",-(@ %, $ ,W#C%,5(@%, $ ,&,61C``l 2F%,$ (,,/`,5 kvpv8gkv#`*#\h*#X*#Tkv#P*1x2 `\XTP),'0%lxF@%$ ,,!, $ ,",-(@ %, $ ,W#C%,5(@%, $ ,&,61C``l 5F%,$ (,,/`,5 kvpv k8gkv#`*#\h*#X*#Tkv#P*1x2 `\XTP),'0%lxF@%$ ,,!, $ ,",-(@ %, $ ,W#C%,5(@%, $ ,&,31C`` 8F%,$ (,,/`,5 kvpv kf8gkv#`*#\h*#X*#Tkv#P*1x2 `\XTP),'0%lxF@%$ ,,!, $ ,",-(@ %, $ ,W#C%,5(@%, $ ,&,6l k#`m*F%,$ (,,/`,5 kvpv kvpv8gkv#`*#\h*#X*#Tkv#P*1x2 `\XTP),'0%lxF@%$ ,,!, $ ,",-(@%, $ ,W#C%,5+c@%, $ ,W#C$,5+c@%, $ ,W#Cn,5(@%, $ ,&,' .F%,$ (,,,5 kvpv8gkv#`*#\h*#X*#Tkv#P*1x2 `\XTP),'0%lxF@%$ ,,!, $ ,",-(@ %, $ ,W#C%,5(@%, $ ,&,2,'0%:@o%H ,a:p]@,5bB,'0%:@o%H ,a%$ (,),5!:@%,$ (,,, kvpv8gkv#`*#\h*#X*#Tkv#P*1x2 `\XTP),'0%lxF@%$ ,,!, $ ,",-(@ %, $ ,W#C%,5(@%, $ ,&,2,'0%:@q%H ,a:p]@,5B,'0%:@q%H ,a%$ (,),5!:@%,$ (,,,0hxhl8 `\XTP,  HBT'X%:hI%H Ta4:DJ$UpzT64$%T$ @TW4>qT2:hK4 L4$ M$%lCN64$l'p%:I%H la\:hO 4 P4$:XQT'%:DR%H Ta  P:Skz\L ' L<%lCT)Tl64$\L<;$ 333333?T$ T  o$kh%lCUT;$ 333333?T$ T  o$kh%lCVT;$ ?T$ T  o$kh%lCWT;$ ?T$ T  o$kh%lCXT;$ ?T$ T  o$kh%lCYT;$ 333333?T$ T  o$kh%lCZT ch%lC[ qlX(@ Tl4$\L<0   0 `  0 0  h @0*ACtBCpCClDDCtECpFClH'L%:\G%H Ha8'%:H%H alpFtM(@8 ,llFtM@ ,t`1x)H68t 4xptl0 H8t0   0   @$ '\%l$ l p lK4L '\%l$ l ( Lpl5L llHl lpcT F\%Hl$ Hl HL44a$n`1t)lH46L$ 6l @paL=$>A`1t6L$$ ll ll:pz|@,pt(lH4L$   0(H<%:hr%xH x(Csx5(0(H7%:ht%xH x(Csx5(#uC  :C$$l v 2$    3Dh%DH%:w%xH xxDc%Dh%DH%xH x(=#C$x6(F( %Dh%DH%xH x(=#C%x6(#xC  yC$$l v 2$ #zC  {C$$l v 2$ #|C  }C$$l v 2$ #~C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #C  C$$l v 2$ #QC  C$$l v 2$ #C  IC$$l v 2$ fh%x$ Dx,x $ $ x( y0Cp$ Cp l  lIH'L%F\%l Ha8Y0p8`4^ pv/4H58 0 kvpvI=R= kvpvkvkvlvl }D\%D %H$ XH8 ÓD%D% $ X  )H 68"ڀ=ĀI=,H'L%F\%l Ha8`1xH5800ŀI08aJ*#4lx #*F8%D\%D %H$ XHC24H68Gc%D\%D %H$ XH8=#C$H68B%D\%D %H$ XH8C&H58I( %D\%D %H$ XH8=#C%H68@F%D\%D %H$ XH8CH58Gc%D\%D %H$ XH8=#C$H68B%D\%D %H$ XH8C&H58I( %D\%D %H$ XH8=#C%H68lxlpXlxlpi8xM\@ Jl`4 #*F%D %D%H$ XHC24H68Hf%D\%D %H$ XH8=#C$H68B%D\%D %H$ XH8C&H58I( %D\%D %H$ XH8=#C%H68@lxJi8lxlpxM\@ `1x68Qlvl [VJlx #4*F8%D\%D %H$ XHC/4H68Hf%D\%D %H$ XH8=#C$H68B%D\%D %H$ XH8C&H58I( %D\%D %H$ XH8=#C%H68cl0lpx,4H 8   B(%Dh%DH%x$ XxC,x5  H-*F%Dh%DH%x$ XxCx6Gc(%Dh%DH%x$ Xx=#C$x6I(( %Dh%DH%x$ Xx=#C%x6B(%Dh%DH%x$ XxC&x5$ x X Ctlt0"lt0]5:TNDDl Md@4 ,4`1x6D4lt0ult05:TNDDl Md@4 ,4`1x6D4 lty0" 1x"lx 1xl Md@D D$$:d]3QC l 0LCxP $:d]3C l{0Cxl0l0Cx l}0Cxl0l0Cx l0Cx l0Cx l0'Cx l0?Cx l0WCx l0oCx l0Cx l0Cx l0Cx l0Cxl0l0Cx l0 Cx l0"Cx l0:Cxl0Rl0]Cx l0uCx CxP $:d]3C l{0Cxl0l0Cx l}0Cxl0l0Cx l0*Cx l0BCx l0ZCx l00j l0Cx l0Cx l0Cx l0Cx l0Cx l0Cxl0l0Cx l05Cx l0MCx l0eCx l0}Cx l0Cx l0Cx CxP $:d]3C l{0Cxl0l}0Cx l0'Cx l0?Cx l0WCxl0ol0zCx l0Cx l0Cx l0Cx CxP $:d]33MC l{0Cx. l0Cx. l0.CxP $:d]3eC l 0`CxP $:d ]3 CxP $:d ]3 CxP $:d_]3 CxP $:d]3%ZC l0Cx  l0Cx  l0Cx  CxP $:d]3|BC l0UCxw l0mCxw CxP $:d]3CxP $:d]3CxP $:d]3CxP $:d]3CxP $:d]3? BC l0 Cx: l00 Cx:  CxP $:d ]3~ *C l0o !Cxy  CxP $:d"]3 #CxP $:d$]3 %CxP $:d&]3 $:T']3 (CxP $:d]3 CxP $:d)]3 *CxP 9C lI0D l Md@ +1xN  Cx X \pDxt  $D4#J p qtlt qtltqpltRllql ltJqtltllqxp$      `=4q`A=04`A=04`A=04 `A=04 `A=0,9 `=(a `q08 `==8` =008` =&0,`000)` !9Q00nrU $`(`A0$`nePSM 9?__SRP_6S0__SRP_7]ThisWorkbook`***on ePSM - Level C Report Codex Copyright(c) 2005 Aetna, Inc.N***L ePSM - This module contains report specific code, so the contents will varyI for each report. However, the structure should be common and each) report will define the following:; strReportTitle - Static portion of the report title.> strReportID - ID for the report (i.e. "1A", "6B", etc.)R nDateLineType - Numeric value from 1 to 7 indicating the type of Date LinesP that should be displayed on the Cover Page and in the Header.L GetReportTitle - Function to return the report specific title string.P GetCustomDateLine - Function to return the report specific date line when5 the nDateLineType is set to 7.T FormatReport - Routine that contains the report specific logic for formattingL the Report tab. This function should have the same process8 flow for every report.N***H Enter the static portion of your report title and the report ID here...]Top Provider Report]$4D Possible DateLineType values:< 1 = Two date lines for Current and Prior start/end dates.S Incurred\Processed text dependent on setting of CLAIMS_RPT_PERIOD parameter.+ If Incurred, show Claim Lag as well.1 2 = One date line for Current start/end dates.S Incurred\Processed text dependent on setting of CLAIMS_RPT_PERIOD parameter.+ If Incurred, show Claim Lag as well.Q 3 = Two date lines for Current Incurred and Current Processed start/end dates.> 4 = One date line for Membership Reporting start/end dates.: 5 = One date line for Current Incurred start/end dates.E 6 = Two date lines for Current and Prior Incurred start/end dates.V 7 = Custom date line dependent on SP result set. (Call GetCustomDateLine function.)P See "DateLineTypes & Dynamic Title Strings.xls" for report/type cross-reference]$N***J GetReportTitle - Function to return the standard report title. Typically,M this will just be the value of the strReportTitle variable,C but some reports need a parameter value appended.# Authored by J Cripps on 03/15/2005N***HTop PROVIDERCNTParms$6%8!: Provider Report'4iN***N GetCustomDateLine - Function to return custom date line text based on contentS in the result set of the stored procedure. If the DateLineTypeN of this report is not 7, then just return an empty string# Authored by J Cripps on 03/21/2005N***^ >Short mm/dd/yyyy'@d` mmmm dd, yyyy'@k@'<i0N***L FormatReport - Routine to format the report using the data on the Data tab,6 and parameter values on the Parms tab.) Authored by Maureen Roynan on 04/14/2005N**T ( 2k1yxME< F6 LLP *LL<ʘ2BTop Provider Report4D+4`xk :+<` Gi>`@ B`pk[ ExX% Itx% Kp%`Ln`N`l.(Hʐ0@HH,p%hP0`4x@6@t @d @` @P @@ @0 @@ @( @X @ @ (@p(@Hp`6PT8V^dh@Xh @X @T @P @N @< @, @ @ @ @0 @ @ H@p`plpr`%$@ @@ XE@| @h @\@t h\@d h^@T d@HD d`f@04 @$ @ Ht@`pt`HH ^ $*\Rffff*0Z5f674781*\R1*#400*\R1*#401*\R1*#13f*\R1*#133*\R1*#13b$*\Rffff*0Y5f674781*\R1*#13b*\R1*#29e*\R1*#12*\R1*#a5*\R1*#33*\R1*#2e*\R1*#29a*\R1*#12e: T X "`  $  T  R  Px 0  B H DP  X V P RX  V < P ZX R > P TX N   $0 BX Z 2 88 Zp 2 X D` @ L \8 V  T X P` T J X *`  T B N` H TP  T Z Th  *  TB  X` h  T ( R0 <  0  T"`hpx 111  D  $8A`  N  " (+( (8 #H6X p x   $&   7 : 0   $78 :` 0x  ,7 : 0  $7 : 00  *7H :x 0  7 : 0  7 : 00  &7H :p 0  ( $7 $70"78 `  :h 0  9  B1     FB@  ,i   $7 :   @ 8X x  ,g 7        & 0 @ %P`px (  H "   "(  8 HN*]@]`]]]Report$6.DData$6.JParms$6.H> Need to pass in the last column used in the report (i.e. "M") D HIA@P First, check if we have data J%R!:G Need to pass in the desired row and the last column used in the report IA@Td Format the Column HeadingsA9:I9$8B@H V!X(Z ^ V(\ V(` d V%b h9f l9j p9nqp 'N data starts in row 1 'L report starts in row 10 DProvider L7R(: r L7R(\7t(v Provider Name L7R(: r L7R(\(7t(vProvider City & State L7R(: r L7R(\7t(v Provider Type L7R(: r L7R(\7t(vNumber of Claimants L7R(: ^ L7R(\ 7t(v Admissions L7R(: ^ L7R(\ 7t(vVisits L7R(: ^ L7R(\ 7t(vNumber of Claims L7R(: ^ L7R(\ 7t(vFINANCIAL_FIELD H%81KT Billed Amount L 7R(:2KTAllowed Amount L 7R(:S Paid Amount L 7R(:n ^ L 7R(\ 7t(v L7x!X(ZqH L 'L L D%x(z8&space between column headings and data L 'L Read all Detail records N J%R!:b7" <-- Check for valid data row here | N | J%R!: L | D%R(: | Provider ID 000000000 L D%R(~ r L D%R(\ |#,##0 L | D%R(~ | N J%R!: L D%R(:$#,##0 L D%R(~ L 'L N 'Nk Set standard margins and footer HA@ ( !$1:$1099L9$A:$I9qhA1:A1$8B@HB Delete the Data & Parms worksheets since they're no longer needed ( JB@ HB@ (oAttribute VB_Name = "ePSM" '*J  - Level C Report Code Copyright(c) 2005 Aetna, Inc.#YThis module contains rRspecific de, so thents will var yR for each!. H$ow}r,structure should b'mmon and%B3define"following:#-Tite- Stat]i0oft W.IDl2< (i.e. "1A", "6B@ etc.) !nDateL@*Type@Numer!value from 1 to 7 indic(tng%t ( sG6'thatOdispla0yed @8*Cover Page BTinBHeadDer;GetKF0unctAJ're@iD?ƂBN K@`NCustomAK@$dM lAxwhen>?8X@setTK#For ma8"Rout(] log 6?`@g2C( tab. BiFf($\havVsprocest;k<f\ gywj @*?& @ Ent@GBs.gyour$ @ua'ehere..0ConsTtrKTop Provi`QPubl-  4DaPosxsibzEKkjs &1@Two FIs'Curr1aPrirt/eAsF. 9d\4jtext deplM!B uCLAIMS_RPT_PERIOD par<( fA `how Claim Lag aQell2@OF*!3[/*b01G,4r!MembershipH`za:56 '6$ /$(U%7p3Qw)$DSPp5sul3et. (Ca@uYSTeEf See "0s & Dynam4oSngs.xls"Kb$:/fcr4-ref ;ncJ8 V= 2AD@=q=OhOhIn0dard:HWyp@tlly,t+gtjpix`0ZJЌiapFQ@@s n:e BaW?Аq~ap Bd1 Authorby J @Cripps{03/15/1P  T6x() AsPrr04 $["%Worksheets("Parms").RangeROVID ERCNT@Va& "^ E W/%o 3 @ 3- cX9^bas`P^_0>tre;/`$r~d. Is:_2)% not 7 n 2,an emptyt1&v&21&&.(strs'^(=)S*S 6t"@mm/dd/yPElsOmm dd, +If&.S- o^s$usr*a0aN zMBK1"@B'Map/eninrN4/14' C'Sub 9(KDwsc| As Worksheet Dim wsParmsDatapnReportRow@Integernt 81Setx> =s("") ( & $ %&(' Need to pass in the last colu`mn us rp (i.e. "M%FormatHeaderpsf,:, "I", False =First, check if we h`ave dI sn.Cells(1, 1). Value"" ThenAkdesirgryan=:G9NoObservationsFou@107 EB8 #VCUAKingsGRange("A9:I9").SelecĨ.Font .BoldCTruVHoriz alAlig nment@ xlRighWra0pTexA With Bor{s(xlEdgeBottomĩE!.LineSty"lAkxlC!inuouH= .We#%ThitB@LorIndexBAu_cLE@aA'G= 1A'B starvtb^A1nu=` 9 ' ^ 0''$ws#dX焋YProvi% *").:Lef:N`g).cOWid9`!5+ 2Ho Name_@_JK4h.!^3QCity & Stat}_ @_aD,sf(K22^4QTyp_ @_ONLDs(Y5HNumber of ClaimantsDg-+13- 6 Admiss] Ahp V!` Db!o7 Visis< t  Db 8 |!O!~i o o  f `o Dbk m CaseU.xFINANCIAL_FIELDeb"1 #_ 9(BillPAmt/3 <"2Allow g Paid _ yKD n6D`.Q?)ϟ w*+ opH92'space betwheenh '= # ' RP all DetailcpDo Whiw%(<> ' <-- C"for Xval@" Qh|erX p i1 To 8Mi5 p, kNi;'IDbN= "0<_Y00 50N3O8 #,##0| 1 wO10? C} $ C  nReportRow = ` + 1  nData( HpLoop d|"E`nd If ' Set standard ma@rgins  @footer&F@ormatMAndF wsParms#ActiveWindow.DisplayGridlinesFalseA*With /Sheet.Pag eDu\.PrintTitlew "$1:$10>"!j2Zo$om=76 Area "$A:$I)MRange("A1:A1").Select ' D te the  & worksls sincy're no lo+r n eededApplicationNAlertLMws.C`YTru`AGCA>Sub M<jxk1,#<=O HS`F=tdJ6rrIx=tdJ6rrI=O HS`ME(SLSS6"N0{00020819-0000-0000-C000-000000000046}(%H` %* %`h8@hh0^ $*\Rffff*0X5f6747814xAttribute VB_Name = "ThisWorkbook" rU~| 8yQy 1 Y y Z9AZiZ! Z!AZZ[1[Y[[&yB \q\N\\D.9?AqFHE)]a]I>]I]I###^ h`: :P%`:d%t$ t d`0A: `1x)t`60 h(x$t`00    1T:X %h$ h dlT= x)hT1T:X %h$ h dlT= p)hT1T:X%h$ h dlT= t)hT+N CPPtx /PA(X%(,%hp h A:]3h6  CPP +N /Pz (h'<%:X%$ hh+cX%h $ hW Ch5 (X%h $ hh#cX%h $ hh6X %h $ h qhX%lCX%lCX%lC qpl pn lx7:%knDX%(,%h h Ch5 :%knDX%(,%h h Ch5 0(,%(X%h h Ch5 7:%knDX%(,%h h Ch5 :%knDX%(,%h h Ch5 0(,(%(X%h h Ch5 7:%knDX%(,%h h Ch5 :%knDX%(,%h h Ch5 0(,%(X%h h Ch5 7:%knDX%(,%h h Ch5 :%knDX%(,%h h Ch5 0(,%(X%h h Ch5 7:%knDX%(,%h h Ch5 :%knDX%(,%h h Ch5 0(, %(X%h h Ch5 7: %knDX%(,%h h Ch5 :%knDX%(,%h h Ch5 0(, %(X%h h Ch5 7:!%knDX%(,%h h Ch5 :%knDX%(,%h h Ch5 0(, %(X%h h Ch5 7:"%knDX%(,%h h Ch5 :%knDX%(,%h h Ch5 0(, %(X%h h Ch5 h'<%:X#%t  ha h:X$]37:%%knDX%(, %h h Ch5 9:X&]37:'%knDX%(, %h h Ch5 97:(%knDX%(, %h h Ch5 :%knDX%(, %h h Ch5 0(,%(X %h h Ch5 9c,%knDX%h  h =Ch6 c knpn1(, %knDX%hx  h C)h5 knpnBklDX%(,%hp h A:]@h6 z (,(<ht iklDX% @hp h A%knD% @Tx TC)hT6 ~t 7:*%knDX%(,%hx h C+h5 :%knDX%(,%hx h Ch5 (,(<hD 8:,%knDX% @hx h C+h5 ~D~ gklDX%(, %hp h A%knD%(d %Tx TC)hT6 7:-%knDX%(, %hx h C+h5 knpn klpl-  t . fX%h$ Dh,h%h$ @hW /qh:X0%lC1fX%lC2(XL%lC3:X4%lC5 q(h'<%:X6%$ hh" h$ h 7h p 0  t 0 " h$ h 7hl T< tTDtxp$PhT aBas0{00020P819-0C$0046} |GlobalSpacFalse dCreatablPredeclaIdTru BExposeTemplateDerivBustomizD2rU 0q74a9__SRP_2s__SRP_3yB_VBA_PROJECTeedir{`rU @n0* pHd VBAProject4@j = r ^ J< rstdole>stdole h%^*\G{00020430-C 0046}#2.0#0#C:\Windows\SysW OW64\e2.tlb#OLE Automation`EOffDicEOficEE2DF8D04C-5BFA-101B-BDE5EAAC42Egram Files (x86)\Common \MicrentʡSize ActiveCellwsCP~nPos@CnLene,Right GetCurrentIncurredDateLinesGetCurrentProcessedDateLine lGetPriorIncurredDateLinetGetPriorProcessedDateLinejGetMembershipDateLine;ClearFormatParameterszws_ strMaxCol  bCriteriaPage#strNameZ strNumber— bClaimLagl GetClaimLag,Italic! LeftFooterYear6nNow% RightFooter|S LeftMargin]InchesToPointsI RightMargin[ TopMargini BottomMarginu HeaderMargin8 FooterMarginCenterHorizontally strMembership׻ strSeparator) strIncurreda strProcessedb dtIncurredn dtProcessedDateDiffIsNameInWorkbookstNamexoRngUVolatileCaller=ErroNamesοParentNumber-fill_parameterParmInx  ParmHeaderitempparm] valuecountI delimiter~CountOccurrencesmove_column_pagezIsEmpty format_parameter_stringݯ PageBreak%xlPageBreakManual parameterhparmtype:ReplacefTrim@FormatDateTimeG vbShortDate0MstrTextstrFindiX lngCompare_VbCompareMethodclngPos6lngTemplngCountIWorkbookk_Defaultj _B_var_LeftQ _B_var_Right9 _B_var_Format _B_var_Chr\; _B_var_Midp _B_var_TrimmT_B_var_i #% + -  l@B$B x0xkn%A Nosoft Shared\OFFICE16\MSO.DLL#P 16 .0 Ob LibraryN"k1Sheet5*GSeit52N HB1pB,"B+B1111Xr2222DP 9ePSDM_kGPSM_@harXdM 2 O?+O[Ad"!E[A#G!h&2 2yk avThisWorkbookG ` THisWurkboH2o)L,05 _EvaluateSheet1Sheet2SrU~~~y     __SRP_0sD.__SRP_1PROJECTwmPROJECTa  ,*\G{000204EF-0000-0000-C000-000000000046}#4.2#9#C:\Program Files (x86)\Common Files\Microsoft Shared\VBA\VBA7.1\VBE7.DLL#Visual Basic For Applications&*\G{00020813-0000-0000-C000-000000000046}#1.9#0#C:\Program Files (x86)\Microsoft Office\Root\Office16\EXCEL.EXE#Microsoft Excel 16.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Windows\SysWOW64\stdole2.tlb#OLE Automation4*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.8#0#C:\Program Files (x86)\Common Files\Microsoft Shared\OFFICE16\MSO.DLL#Microsoft Office 16.0 Object Library ^ k1 Sheet50[5f674781 Sheet5 Sheet10^5f674783# Sheet1Xr Sheet20_5f674784% Sheet2DP0ePSM_Shared0Y5f674781ePSM_SharedA"+ePSM0Z5f674781,ePSMy 2ThisWorkbook0X5f674781+ThisWorkbook,xHx0xkn%A N}j!M]vL'4q@w7F)SGF)(a=ErL-0}Y 43J= [3z, LuMb +؞aJ*,*' 8LAExcel+VBAWin16~Win32Win64xMacVBA6#VBA7# VBAProjectstdole`OfficeuSheet5 _EvaluateSheet1Sheet2Sheet3Sheet4 ThisWorkbook|ePSMPstrReportTitle! strReportID nDateLineTypegGetReportTitle| WorksheetsRange ValueKGetCustomDateLine:strDateLineFormat strFormatV FormatReportwsReport{ WorksheetwsParms)wsData- nReportRowc:nDataRowfFormatHeaderRowsOCellsFormatNoObservationsFound!  SelectionZFontUBoldHorizontalAlignmentS@xlRighteWrapText}BordersC" xlEdgeBottom LineStylew xlContinuous[Weight1xlThinw ColorIndex xlAutomatic@xlLeft9Columnsp9 ColumnWidthRowsU RowHeighti` NumberFormatRFormatMarginsAndFooter ActiveWindow+DisplayGridlines ActiveSheet%N PageSetupPrintTitleRows1sPrintGridlines@Zoom PrintAreaP Application* DisplayAlertsDeletex ePSM_Shared_STARTROWMAXCOLStMAXPARMS` nStartRow nReportCola auto_openV Activate| StatusBarʜScreenUpdating! FormatCoverPage!FormatCriteriaPage MergeCellsک ClearContents{ActiveWorkbookBuiltinDocumentProperties_nRowMstrCol}strRangeAChrK~Asc!uMergeq_ xlEdgeLeftLxlMedium xlEdgeToph xlEdgeRight%vxlCenterVerticalAlignmom   through  mmmm dd, yyyy DCurrent Data For Claims Processed   -  $A:$C ,RPT_PROCESS_START_DATE (RPT_PROCESS_END_DATE Run_Date   D&8 Aetna Integrated Informatics LeftFooter &8Page &P of &N Job ID:  Job_Number Run Date: RightFooterLeftMarginRightMarginTopMargin ABottomMarginHeaderMarginFooterMargin $CenterHorizontally "  )  `  Criteria Page ArialMF C $1:$7PrintTitleRowsPrintGridlinesZoom . - Plan Sponsor Number   ( " Month Claim Lag) Month Claim Lag Italic TextLine1 _ TextLine2 A:AColumnWidth B:C @Funding Arrangement and Product: 8Parameter Options Selected: ACCOUNT_STRUCT &Account Structure: &ACCOUNT_STRUCT_DISP JAccount Structure Display Variation:  MEDI_PRIMARY Primary Payor: CLAIMANT_RELATN Relationship: GENDER Gender: AGEGROUP Age Bands: COVERED &Not Covered Claims: COVERED1 FACILITY Provider Class: DIAG_VARIATION *Diagnosis Variation:  NTWK_USAGE Network Usage: FINANCIAL_FIELD "Financial Field: NTWK_SERV_AREA *Network Service Area: MIN_ADMITS OPTION_CODE (Minimum Admissions:  MIN_DOLLARS *Minimum Paid Amount:  MIN_UNITS Minimum Units:  SORT_ORDER Sort Order:  PROVIDER_TYPE Provider Type: FORMULARY (Formulary Indicator: GENERIC_CODE $Generic Indicator: Copay Tier: REPORT_VIEW *Drug Level Variation: MAXK*rU ~~~~~~~~~~~~~~~~~~~~~~~~~ ZP&C>8  a Ya Ya Ya  y a Q ! Q y a a Ya  VBAProjectSheet5Sheet1Sheet2Sheet3Sheet4 ThisWorkbookePSM ePSM_SharedFHC:\Program Files (x86)\Common Files\Microsoft Shared\VBA\VBA7.1\VBE7.DLLVBA  `F?C:\Program Files (x86)\Microsoft Office\Root\Office16\EXCEL.EXEExcelFormatCriteriaPage  p0FC:\Windows\SysWOW64\stdole2.tlbstdole aL-[DREC:\Program Files (x86)\Common Files\Microsoft Shared\OFFICE16\MSO.DLLOffice AiF=O HS`F=tdJ6rrIDFWorkbook @ auto_openFormatNoObservationsFoundFormatCoverPageFormatHeaderRowsFFormatMarginsAndFooterGetMembershipDateLineGetCurrentIncurredDateLineGetPriorIncurredDateLineGetCurrentProcessedDateLineGetPriorProcessedDateLine GetClaimLagIsNameInWorkbookFormatParametersfill_parametermove_column_pageformat_parameter_stringCountOccurrences  MacroFlag Cover PageFF F Range Value Activate A1:A1 fPlease wait while your e.PSM booklet is being builtF &Top Provider Report 4DGetReportTitleGetCustomDateLine FormatReport MergeCellsClearContents Aetna Inc. : Author Last Author cP$AB" Fϝ5G DF Worksheet Parms 2:2 SelectRowHeight 3:4 5:9 10:11 12:21 PLANSPONSOR | A3:N3 MergeFontBoldSize &HorizontalAlignment A4:N4 Plan Sponsor ID 0000000000000000 A6:N6 A10:N10 "CLAIMS_RPT_PERIOD Long A11:N11 A14:N14 ProductName Integrated $A:$NPageSetupPrintAreaVBE7.DLL i  k 8  X Top  PROVIDERCNT Provider Report JsLiN ɣˍȢFYN Short mm/dd/yyyy NCurrent Data For Claims Processed frDRUGCNT Z# of Top Drugs to be Included in the Report:  SETTING Setting:  MAXCPTCNT ,CPT4 Codes Threshold:  SORT_ORDER2 MAXICDCODES "ICD-9 Threshold:  TYPE_OF_CARE Type of Care:  TYPE_OF_CARE1 SORT_ORDER3 DRUG_VARIATION1 SORT_ORDER4 FACILITY_TYPE Facility Type JOB_SUBMITTER Submitted by:  JOB_NUMBER Run Date: * .  x (FFF Parent NamesNamefĤIx8<  H "MIN_CLAIMANTS_AMT $0,00 #,##0 - ALL All 0 Detail NDC Level 1 &Control/Group Level Product FUNDINGARRANG Fully Insured Carrier Primary Include Facility ICD-9 Participating Billed Amount DRUG_VARIATION MDC Provider Name ,Single Tier Copay Plan 4Summarized Drug Label Name Inpatient Units/1,000 Surgeries SORT_ORDER1 Number of Claims PROVIDER_TYPE_NO TIN DRG within MDC Paid Amount Acute Facility 2 RControl-Suffix Level/Group-Subgroup Level Self Insured Medicare Primary DRG Exclude Professional $Non-Pariticipating Allowed Amount Provider Number "2 Tier Copay Plan Ambulatory Paid/Unit Lab xFinancial Field (Billed Amount, Allowed Amount, Paid Amount) PIN $Number of Services (Number of Admissions $Non-Acute Facility 3 rControl-Suffix-Account Level/Group-Subgroup-Account Level "3 Tier Copay Plan ,Paid Amount Per Member Radiology &Number of Claimants Number of Days &Acute and Non-Acute 4 BControl-Suffix-Account-Plan Level ER 5 S Spouse E Employee Child(ren) M Male 0Multi-Source Cross Brand Mail Order F Female Formulary <= 19 0-19 "BETWEEN 20 AND 44 20-44 "BETWEEN 45 AND 64 45-64 >=65 65+ N &Single Source Brand Non-Formulary O $Multi-Source Brand Y Generic R Retail OTHERS U Other/Unknown (NA *Not Applicable &NA - Not Applicable  h    PageBreak  (cont'd)>|uB>F86]z]NNK Report Data I A9:I9WrapTextBordersLineStyle WeightColorIndex Provider *Provider City & State Provider Type Admissions Visits 000000000NumberFormat $#,##0 $1:$10 $A:$I"ɑ H&GV՞ߟLN ό*1nRowstrCol 9wswsParms strMaxCol bCriteriaPagestrDateLineFormatstNameParmIn ParmHeader valuecount parameterparmtypestrTextstrFind lngCompare  (.Sheet5Sheet5Sheet1Sheet1Sheet2Sheet2ThisWorkbookThisWorkbookePSMePSMePSM_SharedePSM_SharedID="{6C60E1AF-5F01-4FB3-BF56-63F2C2609D9A}" Document=Sheet5/&H00000000 Document=Sheet1/&H00000000 Document=Sheet2/&H00000000 Document=ThisWorkbook/&H00000000 Module=ePSM Module=ePSM_Shared Name="VBAProject" HelpContextID="0" VersionCompatible32="393222000" CMG="0406FDFB05FB09FB09FB09FB09" DPB="080AF102F202F202" GC="0C0EF503FD06FE06FEF9" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] Sheet5=0, 0, 0, 0, C Sheet1=0, 0, 0, 0, C Sheet2=0, 0, 0, 0, C Sheet3=0, 0, 0, 0, C Sheet4=0, 0, 0, 0, C ThisWorkbook=0, 0, 0, 0, C ePSM=0, 0, 0, 0, C ePSM_Shared=100, 100, 670, 482, Z Oh+'0@H\x  Aetna Inc.Melissa HartensteinMicrosoft Excel@@Q>