5. EPMO Open Source Coordination Office Redaction File Detail Report

Produced by Araxis Merge on 9/13/2018 3:11:23 PM Eastern Daylight Time. See www.araxis.com for information about Merge. This report uses XHTML and CSS2, and is best viewed with a modern standards-compliant browser. For optimum results when printing this report, use landscape orientation and enable printing of background images and colours in your browser.

5.1 Files compared

# Location File Last Modified
1 ConsultToolbox_SourceCode-7-12-2018CIF2.zip Lists.ahk Fri Jun 8 14:18:48 2018 UTC
2 ConsultToolbox_SourceCode-7-12-2018CIF2.zip Lists.ahk Wed Sep 12 19:21:49 2018 UTC

5.2 Comparison summary

Description Between
Files 1 and 2
Text Blocks Lines
Unchanged 5 1626
Changed 4 8
Inserted 0 0
Removed 0 0

5.3 Comparison options

Whitespace
Character case Differences in character case are significant
Line endings Differences in line endings (CR and LF characters) are ignored
CR/LF characters Not shown in the comparison detail

5.4 Active regular expressions

No regular expressions were active.

5.5 Comparison detail

  1   /*
  2                                                    Lists .ahk
  3  
  4   This Auto  Hotkey mod ule functi ons to: 
  5   To define  the Consul t Toolbox  static and  global co nstants
  6  
  7   This file  contains v ariables,  functions  and consta nt data us ed in the  Consult To olbox prog ram.
  8  
  9   */
  10  
  11   ; New item s 04/18/20 18 added t roublebox
  12   ; change d ate in lin e 16 to ch ange turn- off date
  13  
  14   global Ena bleTrouble box := 1
  15  
  16   if (A_Now  > "2018041 9")
  17      EnableT roubleBox  := 0
  18   else
  19      trouble box("Troub lebox is o n")
  20  
  21   troublebox (mywoes)
  22   {
  23     if (Enab leTroubleb ox = 1)
  24       ;msgbo x, 4096, T roubleshoo ting, %myw oes%
  25     Return         
  26   }
  27      
  28   ; Create V oice synth esis modul e
  29   CTBTalk :=  ComObjCre ate("SAPI. SpVoice")
  30  
  31   ; StripCR  = a FUNCTI ON to Stri p Carriage  Return fr om String 
  32   stripCR(ex pression)
  33  
  34     k := exp ression
  35     a := sub str(k,strl en(k),1)
  36     while (( (a=chr(10) ) or (a="  ") or (a=c hr(13))) a nd (strlen (k)>0))
  37     { k := s ubstr(k,1, strlen(k)- 1)
  38       a := s ubstr(k,st rlen(k),1)
  39     }  
  40     return k
  41   }
  42  
  43   left(expre ssion,L)
  44   { return,  substr(exp ression,1, L) 
  45   }
  46  
  47   Upper(myst ring)
  48   { StringUp per, s, my string
  49     Return s
  50   }
  51  
  52  
  53   FormatSeco nds(Number OfSeconds)   ; Conver t the spec ified numb er of seco nds to hh: mm:ss form at.
  54   {
  55       time =  19990101   ; *Midnig ht* of an  arbitrary  date.
  56       time + = %NumberO fSeconds%,  seconds
  57       Format Time, mmss , %time%,  mm:ss
  58       return  mmss
  59   }
  60  
  61   carecoordc ode(Ftseco nds, FCCLe vel, FTria geStatus,  FCoorOvrid e)
  62   {
  63     t := rou nd(Ftsecon ds,0)
  64     if (Ftse conds > 40 95)
  65       t := 4 095
  66     if (strl en(FCoorOv ride) > 1)
  67        y :=  "-M"
  68     else
  69        y :=  "-A"  
  70     StringUp per, s, FT riageStatu s  ;conver t to upper  case 
  71     FCCLevel  := strRep lace(FCCLe vel,"Admin  Screening  Care Coor dination:  ","")
  72     FCCLevel  := strRep lace(FCCLe vel,"Clini cal Triage  Care Coor dination:  ","")
  73     ;msgbox,  Ftseconds  %Ftsecond s%`nFCCLev el %FCCLev el%`nFTria geStatus % FTriageSta tus%
  74     s := str Replace(FT riageStatu s, "Clinic al Triage:  ","")
  75     r := for mat("{1:03 X}",t) . " -" . asc(F CCLevel) .  "-T" . su bstr(s,1,1 ) . y
  76     return r   
  77   }
  78  
  79  
  80  
  81  
  82   SmartButto n(byref Pr evVal, But tonName, B uttonNum)
  83   {
  84     xButton  := ButtonN ame . Butt onNum
  85     ;msgbox,  ButtonNam e %ButtonN ame%   %Bu ttonNum%
  86     ;msgbox,  Working B utton: %xB utton%
  87     if (Prev Val = Butt onNum)
  88     { PrevVa l := 0
  89       GuiCon trol, , %x Button%, %  0
  90     }
  91     else
  92     {
  93       PrevVa l := Butto nNum
  94       GuiCon trol, , %x Button%, %  1
  95     }
  96     Return
  97   }  
  98  
  99   ttrim(myva r) ; repla cement for  trim func tion, trim s leading  and traili ng 
  100   {             ; space s, but als o removes  tab keys i n text.
  101     myvar :=  trim(strr eplace(myv ar,chr(9), "  "))
  102     return,  %myvar%
  103  
  104  
  105  
  106  
  107   ShowVar(my var) ; use d for debu gging retu rns variab le name an d variable  contents
  108   {
  109      a := %m yvar%
  110      b := my var . ": "  . StrRepl ace(a,chr( 13)," ")
  111      ;msgbox , a = %a%  `n MyParm  = %MyParm%
  112      Return,  b
  113   }
  114  
  115   ; set vari ables
  116   LinkText =  <a href=" https:// DNS . URL /sites/DUS HOM/10NA/A CAO/Consul tManagemen t/SitePage s/Consult` %20Toolbox .aspx">Vis it VA Cons ult Help S ite for ad ditional c onsult man agement gu idance.</a >
  117   ; this lin e isn't us ed present ly  ACCESS  PULSE SIT E
  118   LinkText2  = Visit <a  href="htt ps://www.v apulse.net /community /acap/acce ss-stand-d owns/acces s-stand-do wn-2">Acce ss Pulse S ite</a> fo r addition al consult  managemen t guidance .
  119   NPISite =  NPI (<a hr ef="https: // DNS . URL /">look up </a>):
  120  
  121   ; These ne xt two var iables are  used in s everal dia log boxes  to describ e scheduli ng effort  rules
  122   DefFailed1  := "A fai led schedu ling effor t occurs w hen calls  and letter s per VA p olicy have  failed to  result in  a"
  123   DefFailed2  := "compl eted patie nt appoint ment or pa tient has  exceeded t he number  of missed  appointmen ts allowed ."
  124   DefRP := " Refer to c linical re viewer for  dispositi on after u nsuccessfu l scheduli ng effort"
  125  
  126   ;SEOCSite  := "Visit  <a href=`" https:// DNS . URL /DUSHCC/DC /PMO/AT/de fault.aspx ?RootFolde r=/DUSHCC/ DC/PMO/AT/ Documents/ Standardiz ed`%20Epis odes`%20of `%20Care`& FolderCTID =0x0120003 9ACCDECB1F D0049B5C07 8156042E02 8&View=`%7 bB9FE8404- C6E7-40E9- 8F18-A09B7 7618085`%7 d <https:/ / DNS . URL /DUSHCC/DC /PMO/AT/de fault.aspx ?RootFolde r=/DUSHCC/ DC/PMO/AT/ Documents/ Standardiz ed`%20Epis odes`%20of `%20Care&F olderCTID"
  127   ;SEOCSite  := SEOCSit e . "=0x01 200039ACCD ECB1FD0049 B5C0781560 42E028&Vie w=`%7bB9FE 8404-C6E7- 40E9-8F18- A09B776180 85`%7d>`"> SEOC Site  </a>for mo re informa tion. "
  128  
  129   SEOCSite50 8 = <a hre f=`"https: // DNS . URL /DUSHCC/DC /PMO/AT/de fault.aspx ?RootFolde r=`%2FDUSH CC`%2FDC`% 2FPMO`%2FA T`%2FDocum ents`%2FSt andardized `%20Episod es`%20of`% 20Care&Fol derCTID=0x 01200039AC CDECB1FD00 49B5C07815 6042E028&V iew={B9FE8 404-C6E7-4 0E9-8F18-A 09B7761808 5}">Visit  SEOC Site  for more i nformation .</a>
  130  
  131   Global Int ernetConn  := ping("8 .8.8.8")
  132   Global Las tPing := A _Now
  133   Global CTB Red := "c7 70000"
  134   Global CTB Green := " c007700"
  135   Global CTB Blue := "c 000077"
  136  
  137   ; Calling  our three  (3) initia lizing fun ctions 
  138   GoSub, Def ineSetting s
  139   GoSub, CTB Init
  140   Gosub, Put Settings
  141  
  142   Global Pri orAdmin :=  "No"
  143   Global Pri orType :=  ""
  144   Global Pri orAdminLev el := "No"
  145   Global Pri orClinLeve l := "Unkn own"
  146   Global Pri orTriageRe q := "Unkn own"
  147   Global Cli nRemember  := 0
  148   Global Adm inRemember  := 0
  149  
  150   if (ParmEn abled = "N o")
  151     exitapp
  152   tstr := su bstr(A_Now ,1,8)
  153   if (strlen (ParmLastU sed)>6) ;  then it ha s been use d before
  154     a := Par mLastUsed
  155   else  ; if  never use d and it h as been 14  days sinc e user loa ded it.
  156  
  157     a := Par mFirstLoad
  158     EnvSub,  tstr, %a%,  days
  159     if (tstr  > 14)
  160        exita pp
  161   }     
  162     
  163   #Persisten t
  164   Global Add CommentOpe n := 0
  165   Global Rec eiveOpen : = 0
  166   Global DCO pen := 0
  167   SetTimer,  CheckWindo ws, 600
  168   Global CCS chedBy :=  0
  169  
  170   CoordMode,  Mouse, Wi ndow
  171  
  172   Global max ResponsesT oAllow :=  30
  173  
  174   Global Pro viderInfoA rray := []
  175   Global Gui 2ProvActiv e := 0
  176   Global Sel ectedProvi derIndex : = 0
  177   Global Sel ectedProvi derText :=  ""
  178   Global Tim ePrompt :=  ""
  179   Global Dat ePrompt :=  ""
  180   Global Nex tStep :=""
  181   Global seo cout := ""
  182   Global SEO CHeader :=  "SEOC - V HA Office  of Communi ty Care--- ---------- -------"
  183   Global SEO CFooter :=  "SEO----- ---------- ---------- ---------- ---------- ----"
  184   Global NPI Type := "N PI-1" ; in itialize N PI Search  Method
  185   Global crl f := chr(1 3) . chr(1 0)  ; used  to insert  new line  in text.
  186   Global NPI  := []
  187   Global Tic k :=0  ;us ed to debu g timer
  188   Global Ini tSARNeeded Verbiage : = "Any add itional tr eatments"  . chr(44)  . " proced ures or re ferrals mu st`nhave a  Secondary  Authoriza tion Reque st submitt ed`nfor co nsideratio n of appro val prior  to proceed ing."
  189   NPI.Number Found := 0
  190   NPI.Provid erSelected Index := 0
  191   NPI.Provid erInfo :=  ""
  192  
  193   Global Set tings := [ ]
  194   Settings.C linicalSta ff := 0
  195   Settings.A ddCommentP ref := "Sc heduler"
  196   Settings.R eceivePref  := "CommC are"
  197  
  198  
  199   Global Spe cificChoic eEligibili ty := ""
  200   SpecificCh oiceEligib ility .= " |Service N ot Availab le"
  201   SpecificCh oiceEligib ility .= " |Wait Time "
  202   SpecificCh oiceEligib ility .= " |Distance"
  203   SpecificCh oiceEligib ility .= " |Air, Boat , Ferry"
  204   SpecificCh oiceEligib ility .= " |UEXB-Geog raphical c hallenges* "
  205   SpecificCh oiceEligib ility .= " |UEXB-Envi ronmental  factors*"
  206   SpecificCh oiceEligib ility .= " |UEXB-Medi cal condit ion*"
  207   SpecificCh oiceEligib ility .= " |UEXB-Natu re or simp licity of  services*"  
  208  
  209    
  210   Global NVC CProgramLi st := ""   ; allow a  blank choi ce
  211   NVCCProgra mList .= " |Academic  affiliate" ,
  212   NVCCProgra mList .= " |DoD (Shar e Agrm/con sult only- no auth)",
  213   NVCCProgra mList .= " |DoD Choic e (10-0386  required) ",
  214   NVCCProgra mList .= " |Indian He alth Servi ces",
  215   NVCCProgra mList .= " |VCP-Choic e First",
  216   NVCCProgra mList .= " |VCP-Choic e 30",
  217   NVCCProgra mList .= " |VCP-Choic e 40",
  218   NVCCProgra mList .= " |VCP-Provi der Agreem ent",
  219   NVCCProgra mList .= " |Patient C entered Co mmunity Ca re (PC3)",
  220   NVCCProgra mList .= " |Tradition al Communi ty Care/In dividual A uthorizati on",
  221   NVCCProgra mList .= " |Community  Care Netw ork",
  222   NVCCProgra mList .= " |Other: Ex plain*" 
  223    
  224  
  225  
  226   Global Con tractorByp assReason
  227   Contractor BypassReas on := ""
  228   Contractor BypassReas on .= "|Ne twork Prov ider not a ccepting C hoice pati ents"
  229   Contractor BypassReas on .= "|Co mmunity Pr ovider dec lines Choi ce Network  participa tion"
  230   Contractor BypassReas on .= "|Ch oice Provi der unable  to schedu le within  CID (Urgen cy)"
  231   Contractor BypassReas on .= "|Ve teran decl ined appoi ntment due  to date/t ime/distan ce"
  232   Contractor BypassReas on .= "|Re quested se rvices exc luded from  Choice pr ogram"
  233  
  234   Global CCR ecordsHow
  235   CCRecordsH ow := blan k
  236   CCRecordsH ow .= "|Pa per Fax"
  237   CCRecordsH ow .= "|eF ax"
  238   CCRecordsH ow .= "|Co mm. Care P ortal"
  239   CCRecordsH ow .= "|VH IE/VLER"
  240   ccRecordsH ow .= "|Vi rtruPro Se cure EMail "
  241   CCRecordsH ow .= "|Ot her Secure  EMail"
  242   CCRecordsH ow .= "|US  Mail"
  243   CCRecordsH ow .= "|ED I Claim At tachment"
  244   CCRecordsH ow .= "|Ot her"
  245  
  246   Global Sta teList :=  blank
  247   StateList  .= "|AL (A LABAMA)"
  248   StateList  .= "|AK (A LASKA)"
  249   StateList  .= "|AZ (A RIZONA)"
  250   StateList  .= "|AR (A RKANSAS)"
  251   StateList  .= "|CA (C ALIFORNIA) "
  252   StateList  .= "|CO (C OLORADO)"
  253   StateList  .= "|CT (C ONNECTICUT )"
  254   StateList  .= "|DE (D ELAWARE)"
  255   StateList  .= "|DC (D ISTRICT OF  COLUMBIA) "
  256   StateList  .= "|FL (F LORIDA)"
  257   StateList  .= "|GA (G EORGIA)"
  258   StateList  .= "|HI (H AWAII)"
  259   StateList  .= "|ID (I DAHO)"
  260   StateList  .= "|IL (I LLINOIS)"
  261   StateList  .= "|IN (I NDIANA)"
  262   StateList  .= "|IA (I OWA)"
  263   StateList  .= "|KS (K ANSAS)"
  264   StateList  .= "|KY (K ENTUCKY)"
  265   StateList  .= "|LA (L OUISIANA)"
  266   StateList  .= "|ME (M AINE)"
  267   StateList  .= "|MD (M ARYLAND)"
  268   StateList  .= "|MA (M ASSACHUSET TS)"
  269   StateList  .= "|MI (M ICHIGAN)"
  270   StateList  .= "|MN (M INNESOTA)"
  271   StateList  .= "|MS (M ISSISSIPPI )"
  272   StateList  .= "|MO (M ISSOURI)"
  273   StateList  .= "|MT (M ONTANA)"
  274   StateList  .= "|NE (N EBRASKA)"
  275   StateList  .= "|NV (N EVADA)"
  276   StateList  .= "|NH (N EW HAMPSHI RE)"
  277   StateList  .= "|NJ (N EW JERSEY) "
  278   StateList  .= "|NM (N EW MEXICO) "
  279   StateList  .= "|NY (N EW YORK)"
  280   StateList  .= "|NC (N ORTH CAROL INA)"
  281   StateList  .= "|ND (N ORTH DAKOT A)"
  282   StateList  .= "|OH (O HIO)"
  283   StateList  .= "|OK (O KLAHOMA)"
  284   StateList  .= "|OR (O REGON)"
  285   StateList  .= "|PA (P ENNSYLVANI A)"
  286   StateList  .= "|RI (R HODE ISLAN D)"
  287   StateList  .= "|SC (S OUTH CAROL INA)"
  288   StateList  .= "|SD (S OUTH DAKOT A)"
  289   StateList  .= "|TN (T ENNESSEE)"
  290   StateList  .= "|TX (T EXAS)"
  291   StateList  .= "|UT (U TAH)"
  292   StateList  .= "|VT (V ERMONT)"
  293   StateList  .= "|VA (V IRGINIA)"
  294   StateList  .= "|WA (W ASHINGTON) "
  295   StateList  .= "|WV (W EST VIRGIN IA)"
  296   StateList  .= "|WI (W ISCONSIN)"
  297   StateList  .= "|WY (W YOMING)"
  298   StateList  .= "|AS (A MERICAN SA MOA)"
  299   StateList  .= "|AA (A RMED FORCE S AMERICAS )"
  300   StateList  .= "|AE (A RMED FORCE S EUROPE /  CANADA /  MIDDLE EAS T / AFRICA )"
  301   StateList  .= "|AP (A RMED FORCE S PACIFIC) "
  302   StateList  .= "|FM (F EDERATED S TATES OF M ICRONESIA) "
  303   StateList  .= "|GU (G UAM)"
  304   StateList  .= "|MP (M ARIANA ISL ANDS, NORT HERN)"
  305   StateList  .= "|MH (M ARSHALL IS LANDS)"
  306   StateList  .= "|PR (P UERTO RICO )"
  307   StateList  .= "|VI (V IRGIN ISLA NDS)"
  308  
  309   fixreturn( expression )
  310   {
  311     k := ins tr(express ion,"|")
  312     a := sub str(expres sion,1,k-1 )
  313     Return a
  314   }
  315  
  316   OutputRetu rn(selecti on)
  317   {
  318     Loop, 25
  319     if (inst r(XP[A_Ind ex],select ion))
  320     { 
  321       Return  StrReplac e(XP[A_Ind ex],"|","" )
  322       Break
  323     }
  324     Return  
  325   }
  326  
  327   Global XP  := []
  328   XP1 := "Re ferral Iss ues (selec t specific  issue)"
  329   XP[1] := " Missing VA  Data |(Mi ssing or i ncomplete  documentat ion requir ed to appo int)."
  330   XP[2] := " Duplicate| ."
  331   XP[3] := " Non Covere d Service  |(Veteran  referred t o communit y provider  for servi ces that a re not par t of benef its packag e)."
  332   XP[4] := " Missing VA  Data/Form s |(Missin g or incom plete docu mentation  required t o appoint) ."
  333   XP[5] := " VA request ed return  of referra l |(VA con tacts cont ractor and  requests  return of  referral). "
  334   XP[6] := " Unable to  review wit hin contra ct standar ds |(Contr actor was  not able t o review w ithin the  contract s tandard)."
  335   XP[7] := " Non-Disclo sure of OH I by Veter an |(Veter an acknowl edges havi ng OHI and  fails to  provide)."
  336   XP[8] := " Unable to  contact Ve teran duri ng Out Bou nd Call Pr ocess |(Co uld not ap point due  to no cont act from V eteran via  call or l etter)."
  337  
  338   XP2 := "Ne twork Issu es (select  specific  issue)"
  339   XP[9] := " No Network  Provider  Available  |(No netwo rk provide r availabl e for requ ested serv ice(s). Th is does no t included  a Veteran  requestin g a specif ic provide r)."
  340   XP[10] :=  "VA Reques ted Provid ers Outsid e of Netwo rk |(Non‐c ontracted  provider). "
  341   XP[11] :=  "Veteran R equested S pecific Pr ovider |(V eteran req uested a s pecific pr ovider for  care that  is not av ailable on  the PC3 n etwork or  by Choice  provider a greement). "
  342   XP[12] :=  "Appointed  with Inco rrect Prov ider/Type  of Care |( Appointed  with incor rect provi der or inc orrect typ e of care) ."
  343   XP[13] :=  "Already A ppointed | (Care has  been previ ously sche duled by t he Veteran , VA or th e Contract or)."
  344  
  345   XP3 := "Ve teran Decl ined (sele ct specifi c reason)"
  346   XP[14] :=  "Veteran D eclined Di stance - I nside Comm ute Standa rd |(Netwo rk provide r is in co ntractors’  network a nd within  the commut e standard s)."
  347   XP[15] :=  "Veteran D eclined Di stance - O utside Com mute Stand ard |(Netw ork provid er is in c ontractors ’ network  but provid er is NOT  within the  commute s tandards). "
  348   XP[16] :=  "Veteran D eclined Ap pt Time |( Veteran de clined tim e for sche duled appo intment)."
  349   XP[17] :=  "Veteran D eclined Do es Not Wan t Care |(V eteran dec lined requ est for ca re)."
  350   XP[18] :=  "Veteran D eclined Us e of PC3/C hoice |(Ve teran no l onger want s to parti cipate in  the progra m)."
  351   XP[19] :=  "Declined  Use of PC3 /Choice |( Veteran no  longer wa nts to par ticipate i n the prog ram)."
  352   XP[20] :=  "Does Not  Want Care  |(Veteran  declined r equest for  care)."
  353  
  354   XP4 := "Ap pointment  Issues (se lect speci fic issue) "
  355   XP[21] :=  "Veteran N o-Show |(V eteran did  not show  up for sch eduled app ointment). "
  356   XP[22] :=  "Contracto r Return -  Unable to  schedule  within con tract term s |(Care n ot schedul ed within  the contra ctual time  period an d VA is re questing b ack due to  time laps e)."
  357   XP[23] :=  "VA Reques t Return -  Care Alre ady Schedu led by Con tractor |( VA request ed the aut horization  after Con tractor sc heduled ca re)."
  358   XP[24] :=  "Unable to  contact V eteran Out  Bound Cal l Process  |(Could no t appoint  due to no  contact fr om Veteran  via call  or letter) ."
  359  
  360   XP[25] :=  "Veteran D eceased or  Incapacit ated |(Aut horization  returned  due Vetera n deceased  or incapa citated)."
  361  
  362   Global NPI Taxonomy : = blank
  363   NPITaxonom y .= "|Acu puncturist "
  364   NPITaxonom y .= "|Adu lt Compani on"
  365   NPITaxonom y .= "|Adv anced Prac tice Denta l Therapis t"
  366   NPITaxonom y .= "|Adv anced Prac tice Midwi fe"
  367   NPITaxonom y .= "|Air  Carrier"
  368   NPITaxonom y .= "|All ergy & Imm unology"
  369   NPITaxonom y .= "|Alz heimer Cen ter /Demen tia Center /Dementia  Special Ca re Unit"
  370   NPITaxonom y .= "|Amb ulance"
  371   NPITaxonom y .= "|Ana plastologi st"
  372   NPITaxonom y .= "|Ane sthesiolog ist Assist ant"
  373   NPITaxonom y .= "|Ane sthesiolog y"
  374   NPITaxonom y .= "|Art  Therapist "
  375   NPITaxonom y .= "|Ass istant, Po diatric"
  376   NPITaxonom y .= "|Ass isted Livi ng Facilit y"
  377   NPITaxonom y .= "|Aud iologist"
  378   NPITaxonom y .= "|Aud iologist-H earing Aid  Fitter"
  379   NPITaxonom y .= "|Beh avior Anal yst"
  380   NPITaxonom y .= "|Blo od Bank"
  381   NPITaxonom y .= "|Bus "
  382   NPITaxonom y .= "|Cas e Manageme nt"
  383   NPITaxonom y .= "|Cas e Manager/ Care Coord inator"
  384   NPITaxonom y .= "|Chi ropractor"
  385   NPITaxonom y .= "|Cho re Provide r"
  386   NPITaxonom y .= "|Chr istian Sci ence Facil ity (skill ed nursing  services) "
  387   NPITaxonom y .= "|Chr istian Sci ence Sanit arium(hosp ital servi ces)"
  388   NPITaxonom y .= "|Chr onic Disea se Hospita l"
  389   NPITaxonom y .= "|Cli nic/Center "
  390   NPITaxonom y .= "|Cli nical Ethi cist"
  391   NPITaxonom y .= "|Cli nical Exer cise Physi ologist"
  392   NPITaxonom y .= "|Cli nical Medi cal Labora tory"
  393   NPITaxonom y .= "|Cli nical Neur opsycholog ist"
  394   NPITaxonom y .= "|Cli nical Nurs e Speciali st"
  395   NPITaxonom y .= "|Cli nical Phar macology"
  396   NPITaxonom y .= "|Col on & Recta l Surgery"
  397   NPITaxonom y .= "|Com munity Bas ed Residen tial Treat ment Facil ity, Menta l Illness"
  398   NPITaxonom y .= "|Com munity Bas ed Residen tial Treat ment Facil ity, Menta l Retardat ion and/or  Developme ntal Disab ilities"
  399   NPITaxonom y .= "|Com munity Hea lth Worker "
  400   NPITaxonom y .= "|Com munity/Beh avioral He alth"
  401   NPITaxonom y .= "|Con tractor"
  402   NPITaxonom y .= "|Cou nselor"
  403   NPITaxonom y .= "|Cus todial Car e Facility "
  404   NPITaxonom y .= "|Dan ce Therapi st"
  405   NPITaxonom y .= "|Day  Training,  Developme ntally Dis abled Serv ices"
  406   NPITaxonom y .= "|Day  Training/ Habilitati on Special ist"
  407   NPITaxonom y .= "|Den tal Assist ant"
  408   NPITaxonom y .= "|Den tal Hygien ist"
  409   NPITaxonom y .= "|Den tal Labora tory"
  410   NPITaxonom y .= "|Den tal Labora tory Techn ician"
  411   NPITaxonom y .= "|Den tal Therap ist"
  412   NPITaxonom y .= "|Den tist"
  413   NPITaxonom y .= "|Den turist"
  414   NPITaxonom y .= "|Dep artment of  Veterans  Affairs (V A) Pharmac y"
  415   NPITaxonom y .= "|Der matology"
  416   NPITaxonom y .= "|Dev elopmental  Therapist "
  417   NPITaxonom y .= "|Die tary Manag er"
  418   NPITaxonom y .= "|Die tetic Tech nician, Re gistered"
  419   NPITaxonom y .= "|Die titian, Re gistered"
  420   NPITaxonom y .= "|Dou la"
  421   NPITaxonom y .= "|Dri ver"
  422   NPITaxonom y .= "|Dur able Medic al Equipme nt & Medic al Supplie s"
  423   NPITaxonom y .= "|Ear ly Interve ntion Prov ider Agenc y"
  424   NPITaxonom y .= "|Ele ctrodiagno stic Medic ine"
  425   NPITaxonom y .= "|Eme rgency Med ical Techn ician, Bas ic"
  426   NPITaxonom y .= "|Eme rgency Med ical Techn ician, Int ermediate"
  427   NPITaxonom y .= "|Eme rgency Med ical Techn ician, Par amedic"
  428   NPITaxonom y .= "|Eme rgency Med icine"
  429   NPITaxonom y .= "|Eme rgency Res ponse Syst em Compani es"
  430   NPITaxonom y .= "|Epi lepsy Unit "
  431   NPITaxonom y .= "|Exc lusive Pro vider Orga nization"
  432   NPITaxonom y .= "|Eye  Bank"
  433   NPITaxonom y .= "|Eye wear Suppl ier"
  434   NPITaxonom y .= "|Fam ily Medici ne"
  435   NPITaxonom y .= "|Fos ter Care A gency"
  436   NPITaxonom y .= "|Fun eral Direc tor"
  437   NPITaxonom y .= "|Gen eral Acute  Care Hosp ital"
  438   NPITaxonom y .= "|Gen eral Pract ice"
  439   NPITaxonom y .= "|Gen etic Couns elor, MS"
  440   NPITaxonom y .= "|Hea lth Educat or"
  441   NPITaxonom y .= "|Hea lth Mainte nance Orga nization"
  442   NPITaxonom y .= "|Hea ring Aid E quipment"
  443   NPITaxonom y .= "|Hea ring Instr ument Spec ialist"
  444   NPITaxonom y .= "|Hom e Delivere d Meals"
  445   NPITaxonom y .= "|Hom e Health"
  446   NPITaxonom y .= "|Hom e Health A ide"
  447   NPITaxonom y .= "|Hom e Infusion "
  448   NPITaxonom y .= "|Hom emaker"
  449   NPITaxonom y .= "|Hom eopath"
  450   NPITaxonom y .= "|Hos pice Care,  Community  Based"
  451   NPITaxonom y .= "|Hos pice, Inpa tient"
  452   NPITaxonom y .= "|Hos pitalist"
  453   NPITaxonom y .= "|In  Home Suppo rtive Care "
  454   NPITaxonom y .= "|Ind ependent M edical Exa miner"
  455   NPITaxonom y .= "|Ind ian Health  Service/T ribal/Urba n Indian H ealth (I/T /U) Pharma cy"
  456   NPITaxonom y .= "|Int ermediate  Care Facil ity, Menta lly Retard ed"
  457   NPITaxonom y .= "|Int ermediate  Care, Ment al Illness "
  458   NPITaxonom y .= "|Int ernal Medi cine"
  459   NPITaxonom y .= "|Int erpreter"
  460   NPITaxonom y .= "|Kin esiotherap ist"
  461   NPITaxonom y .= "|Lac tation Con sultant, N on-RN"
  462   NPITaxonom y .= "|Leg al Medicin e"
  463   NPITaxonom y .= "|Leg al Medicin e"
  464   NPITaxonom y .= "|Lic ensed Prac tical Nurs e"
  465   NPITaxonom y .= "|Lic ensed Psyc hiatric Te chnician"
  466   NPITaxonom y .= "|Lic ensed Voca tional Nur se"
  467   NPITaxonom y .= "|Loc al Educati on Agency  (LEA)"
  468   NPITaxonom y .= "|Lod ging"
  469   NPITaxonom y .= "|Lon g Term Car e Hospital "
  470   NPITaxonom y .= "|Mar riage & Fa mily Thera pist"
  471   NPITaxonom y .= "|Mas sage Thera pist"
  472   NPITaxonom y .= "|Mas tectomy Fi tter"
  473   NPITaxonom y .= "|Mea ls"
  474   NPITaxonom y .= "|Mec hanotherap ist"
  475   NPITaxonom y .= "|Med ical Foods  Supplier"
  476   NPITaxonom y .= "|Med ical Genet ics"
  477   NPITaxonom y .= "|Med icare Defi ned Swing  Bed Unit"
  478   NPITaxonom y .= "|Mid wife"
  479   NPITaxonom y .= "|Mid wife, Lay"
  480   NPITaxonom y .= "|Mil itary Clin ical Medic al Laborat ory"
  481   NPITaxonom y .= "|Mil itary Heal th Care Pr ovider"
  482   NPITaxonom y .= "|Mil itary Hosp ital"
  483   NPITaxonom y .= "|Mil itary/U.S.  Coast Gua rd Pharmac y"
  484   NPITaxonom y .= "|Mil itary/U.S.  Coast Gua rd Transpo rt"
  485   NPITaxonom y .= "|Mul ti-Special ty"
  486   NPITaxonom y .= "|Mus ic Therapi st"
  487   NPITaxonom y .= "|Nap rapath"
  488   NPITaxonom y .= "|Nat uropath"
  489   NPITaxonom y .= "|Neu rological  Surgery"
  490   NPITaxonom y .= "|Neu romusculos keletal Me dicine & O MM"
  491   NPITaxonom y .= "|Neu romusculos keletal Me dicine, Sp orts Medic ine"
  492   NPITaxonom y .= "|Non -emergency  Medical T ransport ( VAN)"
  493   NPITaxonom y .= "|Non -Pharmacy  Dispensing  Site"
  494   NPITaxonom y .= "|Nuc lear Medic ine"
  495   NPITaxonom y .= "|Nur se Anesthe tist, Cert ified Regi stered"
  496   NPITaxonom y .= "|Nur se Practit ioner"
  497   NPITaxonom y .= "|Nur se's Aide"
  498   NPITaxonom y .= "|Nur sing Care"
  499   NPITaxonom y .= "|Nur sing Facil ity/Interm ediate Car e Facility "
  500   NPITaxonom y .= "|Nur sing Home  Administra tor"
  501   NPITaxonom y .= "|Nut ritionist"
  502   NPITaxonom y .= "|Obs tetrics &  Gynecology "
  503   NPITaxonom y .= "|Occ upational  Therapist"
  504   NPITaxonom y .= "|Occ upational  Therapy As sistant"
  505   NPITaxonom y .= "|Oph thalmology "
  506   NPITaxonom y .= "|Opt ometrist"
  507   NPITaxonom y .= "|Ora l & Maxill ofacial Su rgery"
  508   NPITaxonom y .= "|Ora l Medicini st"
  509   NPITaxonom y .= "|Org an Procure ment Organ ization"
  510   NPITaxonom y .= "|Ort hopedic Su rgery"
  511   NPITaxonom y .= "|Ort hotics/Pro sthetics F itter"
  512   NPITaxonom y .= "|Ort hotist"
  513   NPITaxonom y .= "|Oth er Service  Providers "
  514   NPITaxonom y .= "|Oto laryngolog y"
  515   NPITaxonom y .= "|Ped iatrics"
  516   NPITaxonom y .= "|Ped orthist"
  517   NPITaxonom y .= "|Per fusionist"
  518   NPITaxonom y .= "|Per sonal Emer gency Resp onse Atten dant"
  519   NPITaxonom y .= "|Ph. D. Medical  Genetics"
  520   NPITaxonom y .= "|Pha rmacist"
  521   NPITaxonom y .= "|Pha rmacy"
  522   NPITaxonom y .= "|Pha rmacy Tech nician"
  523   NPITaxonom y .= "|Phl ebology"
  524   NPITaxonom y .= "|Phy sical Medi cine & Reh abilitatio n"
  525   NPITaxonom y .= "|Phy sical Ther apist"
  526   NPITaxonom y .= "|Phy sical Ther apy Assist ant"
  527   NPITaxonom y .= "|Phy sician Ass istant"
  528   NPITaxonom y .= "|Phy siological  Laborator y, (Indepe ndent Phys iological  Lab)"
  529   NPITaxonom y .= "|Pla stic Surge ry"
  530   NPITaxonom y .= "|Pod iatrist"
  531   NPITaxonom y .= "|Poe try Therap ist"
  532   NPITaxonom y .= "|Poi nt of Serv ice"
  533   NPITaxonom y .= "|Por table Xray  Supplier"
  534   NPITaxonom y .= "|Pre ferred Pro vider Orga nization"
  535   NPITaxonom y .= "|Pre vention Pr ofessional "
  536   NPITaxonom y .= "|Pri vate Vehic le"
  537   NPITaxonom y .= "|Pro gram of Al l-Inclusiv e Care for  the Elder ly (PACE)  Provider O rganizatio n"
  538   NPITaxonom y .= "|Pro sthetic/Or thotic Sup plier"
  539   NPITaxonom y .= "|Pro sthetist"
  540   NPITaxonom y .= "|Psy chiatric H ospital"
  541   NPITaxonom y .= "|Psy chiatric R esidential  Treatment  Facility"
  542   NPITaxonom y .= "|Psy chiatric U nit"
  543   NPITaxonom y .= "|Psy choanalyst "
  544   NPITaxonom y .= "|Psy chologist"
  545   NPITaxonom y .= "|Pub lic Health  or Welfar e"
  546   NPITaxonom y .= "|Pul monary Fun ction Tech nologist"
  547   NPITaxonom y .= "|Rad iologic Te chnologist "
  548   NPITaxonom y .= "|Rad iology Pra ctitioner  Assistant"
  549   NPITaxonom y .= "|Rec reation Th erapist"
  550   NPITaxonom y .= "|Rec reational  Therapist  Assistant"
  551   NPITaxonom y .= "|Ref lexologist "
  552   NPITaxonom y .= "|Reg istered Nu rse"
  553   NPITaxonom y .= "|Reh abilitatio n Counselo r"
  554   NPITaxonom y .= "|Reh abilitatio n Hospital "
  555   NPITaxonom y .= "|Reh abilitatio n Practiti oner"
  556   NPITaxonom y .= "|Reh abilitatio n Unit"
  557   NPITaxonom y .= "|Reh abilitatio n, Substan ce Use Dis order Unit "
  558   NPITaxonom y .= "|Rel igious Non medical He alth Care  Institutio n"
  559   NPITaxonom y .= "|Rel igious Non medical Nu rsing Pers onnel"
  560   NPITaxonom y .= "|Rel igious Non medical Pr actitioner "
  561   NPITaxonom y .= "|Res idential T reatment F acility, E motionally  Disturbed  Children"
  562   NPITaxonom y .= "|Res idential T reatment F acility, M ental Reta rdation an d/or Devel opmental D isabilitie s"
  563   NPITaxonom y .= "|Res idential T reatment F acility, P hysical Di sabilities "
  564   NPITaxonom y .= "|Res piratory T herapist,  Certified"
  565   NPITaxonom y .= "|Res piratory T herapist,  Registered "
  566   NPITaxonom y .= "|Res pite Care"
  567   NPITaxonom y .= "|Sec ured Medic al Transpo rt (VAN)"
  568   NPITaxonom y .= "|Sin gle Specia lty"
  569   NPITaxonom y .= "|Ski lled Nursi ng Facilit y"
  570   NPITaxonom y .= "|Sle ep Special ist, PhD"
  571   NPITaxonom y .= "|Soc ial Worker "
  572   NPITaxonom y .= "|Spe cial Hospi tal"
  573   NPITaxonom y .= "|Spe cialist"
  574   NPITaxonom y .= "|Spe cialist/Te chnologist "
  575   NPITaxonom y .= "|Spe cialist/Te chnologist "
  576   NPITaxonom y .= "|Spe cialist/Te chnologist  Cardiovas cular"
  577   NPITaxonom y .= "|Spe cialist/Te chnologist , Health I nformation "
  578   NPITaxonom y .= "|Spe cialist/Te chnologist , Other"
  579   NPITaxonom y .= "|Spe cialist/Te chnologist , Patholog y"
  580   NPITaxonom y .= "|Spe ech-Langua ge Patholo gist"
  581   NPITaxonom y .= "|Stu dent in an  Organized  Health Ca re Educati on/Trainin g Program"
  582   NPITaxonom y .= "|Sub stance Abu se Disorde r Rehabili tation Fac ility"
  583   NPITaxonom y .= "|Sup ports Brok erage"
  584   NPITaxonom y .= "|Sur gery"
  585   NPITaxonom y .= "|Sur gical Tech nologist"
  586   NPITaxonom y .= "|Tax i"
  587   NPITaxonom y .= "|Tec hnician"
  588   NPITaxonom y .= "|Tec hnician, C ardiology"
  589   NPITaxonom y .= "|Tec hnician, H ealth Info rmation"
  590   NPITaxonom y .= "|Tec hnician, O ther"
  591   NPITaxonom y .= "|Tec hnician, P athology"
  592   NPITaxonom y .= "|Tec hnician/Te chnologist "
  593   NPITaxonom y .= "|Tho racic Surg ery (Cardi othoracic  Vascular S urgery)"
  594   NPITaxonom y .= "|Tra in"
  595   NPITaxonom y .= "|Tra nsplant Su rgery"
  596   NPITaxonom y .= "|Tra nsportatio n Broker"
  597   NPITaxonom y .= "|Uro logy"
  598   NPITaxonom y .= "|Vet erinarian"
  599   NPITaxonom y .= "|Vol untary or  Charitable "
  600  
  601   Global CCC ategories  := blank
  602   CCCategori es .= "|AC UPUNCTURE"
  603   CCCategori es .= "|AL LERGY AND  IMMUNOLOGY "
  604   CCCategori es .= "|AM BULANCE"
  605   CCCategori es .= "|AM BULANCE AI R"
  606   CCCategori es .= "|AM BULATORY S URGERY"
  607   CCCategori es .= "|AN ESTHESIOLO GY"
  608   CCCategori es .= "|AU DIOLOGY"
  609   CCCategori es .= "|BA RIATRIC"
  610   CCCategori es .= "|BI OFEEDBACK"
  611   CCCategori es .= "|CA RDIOLOGY G ENERAL"
  612   CCCategori es .= "|CA RDIOLOGY C ATH/ANGIOG RAM"
  613   CCCategori es .= "|CA RDIOLOGY I MAGING"
  614   CCCategori es .= "|CA RDIOLOGY E CHOCARDIOG RAM"
  615   CCCategori es .= "|CA RDIOLOGY R EHAB"
  616   CCCategori es .= "|CA RDIOLOGY S TRESS TEST "
  617   CCCategori es .= "|CA RDIOLOGY T ESTS, PROC EDURES, ST UDIES"
  618   CCCategori es .= "|CA RDIOLOGY A NGIOPLASTY "
  619   CCCategori es .= "|CA RDIOLOGY A NGIOPLASTY  PTCA AND  OR STENT"
  620   CCCategori es .= "|CA RDIOLOGY A BLATION"
  621   CCCategori es .= "|CA RDIOTHORAC IC SURGERY  (CABG, VA LVE, ETC)"
  622   CCCategori es .= "|CH IROPRACTIC "
  623   CCCategori es .= "|CH IROPRACTIC  WITH MASS AGE THERAP Y"
  624   CCCategori es .= "|CO LONOSCOPY  SCREENING"
  625   CCCategori es .= "|CO LONOSCOPY  DIAGNOSTIC "
  626   CCCategori es .= "|DE NTAL"
  627   CCCategori es .= "|DE NTAL TESTS -PROCEDURE S, STUDIES "
  628   CCCategori es .= "|DE NTAL AESTH ETICS DENT ISTRY"
  629   CCCategori es .= "|DE NTAL ENDOD ONTICS"
  630   CCCategori es .= "|DE NTAL GENER AL DENTIST RY"
  631   CCCategori es .= "|DE NTAL ORAL/ MAXILLOFAC IAL SURGER Y"
  632   CCCategori es .= "|DE NTAL ORTHO DONTICS"
  633   CCCategori es .= "|DE NTAL PERIO DONTICS"
  634   CCCategori es .= "|DE NTAL PROST HODONTICS"
  635   CCCategori es .= "|DE NTAL RESTO RATIVE DEN TISTRY"
  636   CCCategori es .= "|DE RMATOLOGY"
  637   CCCategori es .= "|DE RMATOLOGY  TESTS, PRO CEDURES, S TUDIES"
  638   CCCategori es .= "|EM ERGENCY DE PARTMENT"
  639   CCCategori es .= "|EN DOCRINOLOG Y"
  640   CCCategori es .= "|EN DOCRINOLOG Y TESTS, P ROCEDURES,  STUDIES"
  641   CCCategori es .= "|EN T"
  642   CCCategori es .= "|EN T TESTS, P ROCEDURES,  STUDIES"
  643   CCCategori es .= "|EN T SURGERY"
  644   CCCategori es .= "|GA STROENTERO LOGY"
  645   CCCategori es .= "|GA STROENTERO LOGY TESTS , PROCEDUR ES, STUDIE S"
  646   CCCategori es .= "|GE NETIC TEST ING/COUNSE LING"
  647   CCCategori es .= "|GY NECOLOGY"
  648   CCCategori es .= "|GY NECOLOGY T ESTS, PROC EDURES, ST UDIES"
  649   CCCategori es .= "|HE MATOLOGY/O NCOLOGY"
  650   CCCategori es .= "|BO NE MARROW  ASPIRATION "
  651   CCCategori es .= "|HE P C"
  652   CCCategori es .= "|HO SPICE"
  653   CCCategori es .= "|HY PERBARIC T HERAPY"
  654   CCCategori es .= "|IN FECTIOUS D ISEASE"
  655   CCCategori es .= "|IN PATIENT AD MISSION"
  656   CCCategori es .= "|IN TERVENTION AL RADIOLO GY"
  657   CCCategori es .= "|IV  THERAPY/I NFUSION, C LINIC"
  658   CCCategori es .= "|LA B AND PATH OLOGY"
  659   CCCategori es .= "|MA TERNITY SE RVICES"
  660   CCCategori es .= "|ME NTAL HEALT H"
  661   CCCategori es .= "|ME NTAL HEALT H ADDICTIO N TX"
  662   CCCategori es .= "|ME NTAL HEALT H EATING D ISORDER"
  663   CCCategori es .= "|NE PHROLOGY"
  664   CCCategori es .= "|NE PHROLOGY D IALYSIS"
  665   CCCategori es .= "|NE UROLOGY"
  666   CCCategori es .= "|NE UROLOGY TE STS, PROCE DURES, STU DIES"
  667   CCCategori es .= "|NE UROPSYCH T ESTING"
  668   CCCategori es .= "|NE UROSURGERY "
  669   CCCategori es .= "|NE WBORN CARE  (1st 7 DA YS)"
  670   CCCategori es .= "|NI C ADULT DA Y HEALTH C ARE"
  671   CCCategori es .= "|NI C BOWEL AN D BLADDER  UNSKILLED"
  672   CCCategori es .= "|NI C BOWEL AN D BLADDER  SKILLED"
  673   CCCategori es .= "|NI C HOMEMAKE R/HOME HEA LTH AID"
  674   CCCategori es .= "|NI C HOSPICE/ PALLIATIVE  CARE"
  675   CCCategori es .= "|NI C IV THERA PY/INFUSIO N"
  676   CCCategori es .= "|NI C RESPITE  CARE"
  677   CCCategori es .= "|NI C SKILLED  HOME CARE"
  678   CCCategori es .= "|NI C SKILLED  NURSING"
  679   CCCategori es .= "|NI C SPINAL C ORD INJURY  CARE"
  680   CCCategori es .= "|NI C TOTAL LT C/PACE, PI LOT"
  681   CCCategori es .= "|NU CLEAR MEDI CINE"
  682   CCCategori es .= "|NU TRITION/DI ETITIAN"
  683   CCCategori es .= "|OB STETRICS"
  684   CCCategori es .= "|OC CUPATIONAL  THERAPY"
  685   CCCategori es .= "|ON COLOGY"
  686   CCCategori es .= "|ON COLOGY CHE MOTHERAPY"
  687   CCCategori es .= "|ON COLOGY RAD IATION THE RAPY"
  688   CCCategori es .= "|OP HTHALMOLOG Y"
  689   CCCategori es .= "|OP HTHALMOLOG Y TESTS, P ROCEDURES,  STUDIES"
  690   CCCategori es .= "|OP HTHALMOLOG Y SURGERY"
  691   CCCategori es .= "|OP TOMETRY"
  692   CCCategori es .= "|OR THOPEDICS"
  693   CCCategori es .= "|OR THOPEDICS  TESTS, PRO CEDURES, S TUDIES"
  694   CCCategori es .= "|OR THOPEDIC S URGERY"
  695   CCCategori es .= "|OT  WITH MASS AGE THERAP Y"
  696   CCCategori es .= "|PA LLIATIVE C ARE"
  697   CCCategori es .= "|PA IN MANAGEM ENT"
  698   CCCategori es .= "|PH ARMACY"
  699   CCCategori es .= "|PH YSICAL THE RAPY"
  700   CCCategori es .= "|PL ASTIC SURG ERY"
  701   CCCategori es .= "|PO DIATRY"
  702   CCCategori es .= "|PO DIATRY SUR GERY"
  703   CCCategori es .= "|PR IMARY CARE "
  704   CCCategori es .= "|PT  WITH MASS AGE THERAP Y"
  705   CCCategori es .= "|PU LMONARY"
  706   CCCategori es .= "|PU LMONARY RE HAB"
  707   CCCategori es .= "|PU LMONARY TE STS, PROCE DURES, STU DIES"
  708   CCCategori es .= "|RA DIATION TH ERAPY"
  709   CCCategori es .= "|RA DIOLOGY CT  SCAN"
  710   CCCategori es .= "|RA DIOLOGY DE XA SCAN"
  711   CCCategori es .= "|RA DIOLOGY MA MMOGRAM"
  712   CCCategori es .= "|RA DIOLOGY MR I/MRA"
  713   CCCategori es .= "|RA DIOLOGY NO S"
  714   CCCategori es .= "|RA DIOLOGY PE T SCAN"
  715   CCCategori es .= "|RA DIOLOGY UL TRASOUND"
  716   CCCategori es .= "|RA DIOLOGY IN TERVENTION AL"
  717   CCCategori es .= "|RA DIOLOGY NU CLEAR MEDI CINE"
  718   CCCategori es .= "|RA DIOLOGY RA DIATION TH ERAPY"
  719   CCCategori es .= "|RE HABILITATI ON MEDICIN E"
  720   CCCategori es .= "|RE SPIRATORY  THERAPY"
  721   CCCategori es .= "|RH EUMATOLOGY "
  722   CCCategori es .= "|SL EEP STUDY/ POLYSOMNOG RAPHY"
  723   CCCategori es .= "|SO CIAL WORKE R"
  724   CCCategori es .= "|SP EECH THERA PY"
  725   CCCategori es .= "|SU RGERY GENE RAL"
  726   CCCategori es .= "|TE LEHEALTH"
  727   CCCategori es .= "|TE LEMENTAL H EALTH"
  728   CCCategori es .= "|TH ORACIC SUR GERY"
  729   CCCategori es .= "|UR OLOGY"
  730   CCCategori es .= "|UR OLOGY TEST S, PROCEDU RES, STUDI ES"
  731   CCCategori es .= "|UR OLOGY SURG ERY"
  732   CCCategori es .= "|VA CCINE"
  733   CCCategori es .= "|VA SCULAR"
  734   CCCategori es .= "|VA SCULAR TES TS, PROCED URES, STUD IES"
  735   CCCategori es .= "|VA SCULAR SUR GERY"
  736   CCCategori es .= "|WO UND CARE"
  737   CCCategori es .= "|OT HER"
  738  
  739   /*
  740   Global Pat ientInfo : = []
  741   PatientInf o["name"]  := "Name n ot found"
  742   PatientInf o["ssn"] : = "SSN not  found"
  743   PatientInf o["dob"] : = "DOB not  found"
  744   */
  745  
  746   Global Pat ientInfoNa me := "Nam e not foun d"
  747   Global Pat ientInfoSS N := "SSN  not found"
  748   Global Pat ientInfoDO B := "DOB  not found"
  749  
  750  
  751   Global All AvailableS EOCs := A_ Blank
  752   AllAvailab leSEOCs .=  "|Acupunc ture Initi al"
  753   AllAvailab leSEOCs .=  "|Allergy -Immunolog y"
  754   AllAvailab leSEOCs .=  "|Audiolo gy"
  755   AllAvailab leSEOCs .=  "|Cardiol ogy Cath-P CI"
  756   AllAvailab leSEOCs .=  "|Cardiol ogy Compre hensive"
  757   AllAvailab leSEOCs .=  "|Cardiol ogy TAVR"
  758   AllAvailab leSEOCs .=  "|Chemoth erapy Outp atient"
  759   AllAvailab leSEOCs .=  "|Chiropr actic"
  760   AllAvailab leSEOCs .=  "|Colonos copy-Scree ning"
  761   AllAvailab leSEOCs .=  "|Dermato logy"
  762   AllAvailab leSEOCs .=  "|Emergen t-Urgent C are"
  763   AllAvailab leSEOCs .=  "|Ears No se Throat"
  764   AllAvailab leSEOCs .=  "|Hematol ogy-Oncolo gy Compreh ensive"
  765   AllAvailab leSEOCs .=  "|Hematol ogy "
  766   AllAvailab leSEOCs .=  "|Infecti ous Diseas e"
  767   AllAvailab leSEOCs .=  "|Inferti lity-ART-I VF Female"
  768   AllAvailab leSEOCs .=  "|Inferti lity-ART-I VF Male"
  769   AllAvailab leSEOCs .=  "|Inferti lity-IUI F emale"
  770   AllAvailab leSEOCs .=  "|Inferti lity-IUI M ale"
  771   AllAvailab leSEOCs .=  "|Lab-Pat hology" 
  772   AllAvailab leSEOCs .=  "|Mammogr aphy"
  773   AllAvailab leSEOCs .=  "|Materni ty"
  774   AllAvailab leSEOCs .=  "|Neurolo gy"
  775   AllAvailab leSEOCs .=  "|Neurosu rgery "
  776   AllAvailab leSEOCs .=  "|Ophthal mology"
  777   AllAvailab leSEOCs .=  "|Optomet ry"
  778   AllAvailab leSEOCs .=  "|Orthope dic"
  779   AllAvailab leSEOCs .=  "|Occupat ional Ther apy "
  780   AllAvailab leSEOCs .=  "|OT-func tional or  driver eva l"
  781   AllAvailab leSEOCs .=  "|Pain ma nagement I R-injectio ns"
  782   AllAvailab leSEOCs .=  "|Pain ma nagement s pinal cord  stimulato r"
  783   AllAvailab leSEOCs .=  "|Primary  Care One  Year"
  784   AllAvailab leSEOCs .=  "|Primary  Care Six  Month"
  785   AllAvailab leSEOCs .=  "|Primary  Care Thre e Month"
  786   AllAvailab leSEOCs .=  "|Physica l Therapy"
  787   AllAvailab leSEOCs .=  "|Pulmona ry "
  788   AllAvailab leSEOCs .=  "|Pulmona ry-Rehab"
  789   AllAvailab leSEOCs .=  "|Radiolo gy Broncho scopy"
  790   AllAvailab leSEOCs .=  "|Radiolo gy CT Myel ogram"
  791   AllAvailab leSEOCs .=  "|Radiolo gy CT Scan "
  792   AllAvailab leSEOCs .=  "|Radiolo gy EBUS   
  793   AllAvailab leSEOCs .=  "|Radiolo gy MRI - M RA"
  794   AllAvailab leSEOCs .=  "|Radiolo gy PET Sca n"
  795   AllAvailab leSEOCs .=  "|Radiolo gy TVUS"
  796   AllAvailab leSEOCs .=  "|Radiolo gy Ultraso und"
  797   AllAvailab leSEOCs .=  "|Radiolo gy Venogra m"
  798   AllAvailab leSEOCs .=  "|Renal"
  799   AllAvailab leSEOCs .=  "|Rheumat ology"      
  800   AllAvailab leSEOCs .=  "|Sleep s tudy"
  801   AllAvailab leSEOCs .=  "|Upper l ower GI"
  802   AllAvailab leSEOCs .=  "|Urology "
  803   AllAvailab leSEOCs .=  "|Wound c are"
  804   AllAvailab leSEOCs .=  "|XRT"
  805  
  806   Global Cat egoriesOfC are := A_B lank        ; I think  these are  called se rvice line s
  807   Categories OfCare .=  "|All Cate gories of  Care"
  808   Categories OfCare .=  "|Infertil ity Care"
  809   Categories OfCare .=  "|Lab & Pa thology Se rvice"
  810   Categories OfCare .=  "|Medical  Specialty  Care"
  811   Categories OfCare .=  "|Medical  Specialty  Services"
  812   Categories OfCare .=  "|Physical  Medicine  & Rehabili tation"
  813   Categories OfCare .=  "|Primary  Care"
  814   Categories OfCare .=  "|Radiolog y"
  815   Categories OfCare .=  "|Rehabili tative Ser vices"
  816   Categories OfCare .=  "|Surgical  Specialty  Care"
  817