Routine: IB20P567

IB20P567 ;ALB/RRA UPDATE PAYER FILE- ;06/07/2016

 ;;2.0;INTEGRATED BILLING;**567**;21-MAR-94;Build 5

 ;;Per VA Directive 6402, this routine should not be modified.

 ; Compare local PAYER file with national and

 ; update missing entries

EN ;

 N IBLINE,IBN,IB1,DA,DIE,DR,IBA,IBNAME,IBCNT,IBERRM,IBACT,IBIIV

 N IBAUTO,IBID,IBNID,IBNEW,IBNOAP

 S IBCNT=0,IBNOAP=0

 D BMES^XPDUTL(">>>Evaluating PAYER file...")

 F IBLINE=1:1 S IBN=$T(PAYER+IBLINE) S IB1=$P(IBN,";;",2) Q:IB1="EXIT"  D UPDATE

 I 'IBNOAP D

 .F IBLINE=1:1 S IBN=$T(PAYER+IBLINE^IB2P567A) S IB1=$P(IBN,";;",2) Q:IB1="EXIT"  D UPDATE

 D BMES^XPDUTL("  ")

 D BMES^XPDUTL("TOTAL OF "_IBCNT_" ADDED TO THE PAYER FILE")

 D BMES^XPDUTL("  ")

 D BMES^XPDUTL(">>>PAYER file update complete!!...")

UPDATE ;CHECK AND ADD MISSING RECORDS

 Q:IBNOAP

 S IBNID=$P(IB1,U,2)

 ;QUIT IF AN ENTRY ALREADY EXIST FOR THAT NATIONAL ID

 Q:+$O(^IBE(365.12,"C",IBNID,""))

 S IBACT=$S($P(IB1,U,5)="Y":1,1:0)

 S IBAUTO=$S($P(IB1,U,9)="Y":1,1:0)

 S IBID=$S($P(IB1,U,6)="Y":1,1:0)

 S IBIIV=$O(^IBE(365.13,"B","IIV",0))

 I 'IBIIV D

 .N DIC,X,Y

 .S DIC="^IBE(365.13,",X="IIV",DIC(0)=""

 .K DD,DO

 .D FILE^DICN

 .K DO

 .S IBIIV=+Y

 I 'IBIIV D  Q

 .S IBNOAP=1

 .D BMES^XPDUTL("Unable to add IIV to the PAYER APPLICATION file!")

 S IBA(365.12,"+1,",.01)=$P(IB1,U)

 S IBA(365.12,"+1,",.02)=IBNID

 S IBA(365.12,"+1,",.05)=$P(IB1,U,3)

 S IBA(365.12,"+1,",.06)=$P(IB1,U,4)

 S IBA(365.121,"+2,+1,",.01)=IBIIV

 S IBA(365.121,"+2,+1,",.02)=IBACT

 S IBA(365.121,"+2,+1,",.08)=IBID

 S IBA(365.121,"+2,+1,",.1)=0

 S IBA(365.121,"+2,+1,",.13)=$$NOW^XLFDT()

 S IBA(365.121,"+2,+1,",.14)=$P(IB1,U,7)

 S IBA(365.121,"+2,+1,",.15)=$P(IB1,U,8)

 S IBA(365.121,"+2,+1,",.07)=IBAUTO

 D UPDATE^DIE("","IBA","","IBERRM") ; file new PAYER entry

 I $D(IBERRM) D  Q

 . D BMES^XPDUTL("******Unable to add PAYER : "_$P(IB1,U))

 S IBCNT=IBCNT+1

 D BMES^XPDUTL("PAYER "_$P(IB1,U)_" ADDED WITH A NATIONAL ID OF: "_IBNID)

PAYER ;PAYER NAME^VA NAT ID^EDI ID NUM-PROF^EDI ID NUM-INST^NAT ACTIVE^IDENT REQ SUB ID^FUT SERV DAYS^PAST SERV DAYS^AUTO-ACCEPT

 ;;AARP HEALTH PLAN^VA764^36273^36273^Y^Y^0^0^Y

 ;;ACS BENEFIT SERVICES^VA2642^72467^72467^Y^Y^0^0^N

 ;;ADVANTRA (TX, NM, AZ)^VA825^25152^25152^Y^N^90^545^N

 ;;AETNA^VA1^60054^60054^Y^Y^0^730^Y

 ;;AETNA SENIOR SUPPLEMENTAL^VA1964^62118^62118^Y^N^9999^9999^Y

 ;;AFLAC - DENTAL^VA524^^^Y^Y^9999^9999^Y

 ;;AFLAC MEDICARE SUPPLEMENTAL^VA2456^^^Y^N^0^0^N

 ;;AFTRA HEALTH FUND^VA90^13346^13346^Y^Y^9999^9999^Y

 ;;ALLEGIANCE BENEFITS PLAN MANAGEMENT^VA1864^81040^81040^Y^Y^31^365^N

 ;;ALLIANT HEALTH PLANS^VA2560^58234^58234^Y^N^0^0^N

 ;;ALLIED BENEFIT SYSTEMS^VA1644^37308^37308^Y^N^9999^9999^Y

 ;;ALLSAVERS INSURANCE COMPANY^VA2703^81400^81400^Y^Y^0^0^N

 ;;ALTIUS HEALTH PLANS^VA182^25149^25149^Y^N^90^545^Y

 ;;AMERICAN FAMILY^VA1664^56071^56071^Y^N^9999^9999^Y

 ;;AMERICAN NATIONAL INSURANCE^VA1364^74048^74048^Y^N^9999^9999^Y

 ;;AMERICAN POSTAL WRKRS UNION (APWU)^VA129^44444^44444^Y^N^9999^365^Y

 ;;AMERICAN REPUBLIC INS CO (ARIC)^VA74^42011^42011^Y^N^0^0^Y

 ;;AMERICHOICE OF NJ (COMMERCIAL)^VA2^^^Y^Y^365^365^N

 ;;AMERIGROUP CORPORATION^VA264^2751N^2751N^Y^Y^9999^9999^Y

 ;;AMERIHEALTH ADMINISTRATORS^VA1046^^54763^Y^Y^9999^9999^Y

 ;;AMERITAS - STANDARD INSURANCE (DENTAL)^VA2723^47009^47009^Y^Y^0^0^N

 ;;AMERITAS LIFE INS CO^VA156^47009^47009^Y^Y^9999^9999^N

 ;;ASSOC DE MAESTROS PUERTO RICO^VA1825^^^Y^Y^9999^9999^N

 ;;ASURIS NORTHWEST HEALTH^VA1284^SX179^SX179^Y^Y^42^730^Y

 ;;AULTCARE^VA2666^^^Y^N^0^9999^N

 ;;AUXIANT^VA2620^26202^26202^Y^N^0^0^N

 ;;AVERA HEALTH PLANS^VA2356^46045^46045^Y^N^0^365^N

 ;;AVMED^VA123^59274^^Y^Y^31^365^Y

 ;;BANKERS LIFE AND CASUALTY^VA2046^36066^36066^Y^Y^30^365^Y

 ;;BCBS HAWAII - LOCAL^VA1304^SB971^12B62^Y^N^9999^9999^Y

 ;;BCBS OF ALABAMA^VA65^SB510^12B54^Y^Y^31^365^Y

 ;;BCBS OF ALASKA (PREMERA)^VA564^SB930^12B47^Y^Y^31^365^Y

 ;;BCBS OF ARIZONA^VA6^SB530^12B02^Y^Y^31^9999^Y

 ;;BCBS OF ARKANSAS^VA284^SB520^12021^Y^Y^9999^9999^Y

 ;;BCBS OF CENTRAL NEW YORK^VA1024^SB805^12B37^Y^Y^9999^9999^N

 ;;BCBS OF COLORADO^VA162^SB550^12B03^Y^Y^31^545^Y

 ;;BCBS OF CONNECTICUT^VA344^SB560^12B04^Y^Y^31^1095^Y

 ;;BCBS OF DELAWARE^VA704^SB570^12B76^Y^Y^31^365^Y

 ;;BCBS OF DIST OF COLUMBIA (CAREFIRST)^VA706^SB580^12000^Y^Y^0^0^Y

 ;;BCBS OF FLORIDA^VA66^SB590^12B34^Y^Y^9999^9999^Y

 ;;BCBS OF GEORGIA^VA168^SB600^12015^Y^Y^9999^9999^Y

 ;;BCBS OF HAWAII^VA1004^SB971^12B62^Y^Y^9999^9999^Y

 ;;BCBS OF ILLINOIS^VA167^SB621^12B08^Y^Y^31^730^Y

 ;;BCBS OF INDIANA^VA444^SB630^12B09^Y^Y^31^1095^Y

 ;;BCBS OF IOWA^VA469^SB640^12B10^Y^Y^365^365^Y

 ;;BCBS OF KANSAS^VA385^SB650^57325^Y^Y^31^730^Y

 ;;BCBS OF KANSAS CITY^VA884^^12B66^Y^Y^31^730^Y

 ;;BCBS OF KENTUCKY^VA445^SB660^12B11^Y^Y^31^1095^Y

 ;;BCBS OF LOUISIANA^VA3^23738^12B12^Y^Y^9999^9999^Y

 ;;BCBS OF MAINE^VA345^SB680^12B13^Y^Y^31^1095^Y

 ;;BCBS OF MARYLAND (CAREFIRST)^VA707^SB690^12011^Y^Y^0^0^Y

 ;;BCBS OF MASSACHUSETTS^VA7^SB700^12B14^Y^Y^9999^9999^Y

 ;;BCBS OF MICHIGAN^VA346^SB710^12B18^Y^Y^31^365^Y

 ;;BCBS OF MINNESOTA^VA67^SB720^12B16^Y^Y^9999^9999^Y

 ;;BCBS OF MISSISSIPPI^VA8^SB730^12B17^Y^Y^9999^9999^Y

 ;;BCBS OF MISSOURI^VA446^SB741^12B66^Y^Y^31^1095^Y

 ;;BCBS OF MONTANA^VA984^SB751^12B77^Y^Y^31^365^Y

 ;;BCBS OF NEBRASKA^VA468^SB760^12B19^Y^Y^31^730^Y

 ;;BCBS OF NEVADA^VA684^SB765^12B20^Y^Y^31^545^Y

 ;;BCBS OF NEW HAMPSHIRE^VA447^SB770^12B21^Y^Y^31^1095^Y

 ;;BCBS OF NEW JERSEY (HORIZON)^VA4^22099^22099^Y^Y^0^730^Y

 ;;BCBS OF NEW MEXICO^VA68^SB790^12B22^Y^Y^0^0^Y

 ;;BCBS OF NEW YORK (EMPIRE)^VA5^SB803^55093^Y^Y^9999^9999^Y

 ;;BCBS OF NEW YORK (EXCELLUS)^VA969^SB805^12B71^Y^Y^31^365^Y

 ;;BCBS OF NEW YORK HEALTHNOW/WESTERN^VA970^SB801^12B39^Y^Y^31^365^Y

 ;;BCBS OF NORTH CAROLINA^VA685^SB810^12B23^Y^Y^9999^1095^Y

 ;;BCBS OF NORTH DAKOTA^VA924^SB820^12B78^Y^Y^31^365^Y

 ;;BCBS OF OHIO^VA364^SB338^12B24^Y^Y^31^1095^Y

 ;;BCBS OF OKLAHOMA^VA1005^SB840^12B59^Y^Y^9999^9999^Y

 ;;BCBS OF OREGON (REGENCE)^VA204^SB850^12B41^Y^Y^180^730^Y

 ;;BCBS OF PENNSYLVANIA (HIGHMARK)^VA304^SB865^12B60^Y^Y^182^365^Y

 ;;BCBS OF RHODE ISLAND^VA425^SB871^^Y^Y^31^365^Y

 ;;BCBS OF ROCHESTER AREA (NY)^VA1025^SB804^12B40^Y^Y^9999^9999^Y

 ;;BCBS OF SOUTH CAROLINA^VA185^SB880^12B55^Y^Y^365^1095^Y

 ;;BCBS OF SOUTH DAKOTA^VA470^SB889^12B33^Y^Y^31^365^Y

 ;;BCBS OF TENNESSEE^VA744^SB890^12B45^Y^Y^30^365^Y

 ;;BCBS OF TEXAS^VA69^SB900^12B31^Y^Y^9999^730^Y

 ;;BCBS OF UTICA-WATERTOWN (NY)^VA1026^SB806^12B38^Y^Y^9999^9999^Y

 ;;BCBS OF VERMONT^VA1027^SB915^12B32^Y^Y^9999^9999^Y

 ;;BCBS OF VIRGINIA^VA347^SB923^12002^Y^Y^31^1095^Y

 ;;BCBS OF WEST VIRGINIA^VA1007^SB941^12B28^Y^Y^182^730^Y

 ;;BCBS OF WISCONSIN^VA448^SB950^12B29^Y^Y^31^1095^Y

 ;;BCBS OF WYOMING^VA925^SB960^12B30^Y^Y^31^365^Y

 ;;BEST LIFE & HEALTH^VA91^95604^95604^Y^Y^9999^9999^N

 ;;BLUE CROSS OF CALIFORNIA^VA9^47198^47198^Y^Y^9999^9999^Y

 ;;BLUE CROSS OF IDAHO^VA384^SB612^12B07^Y^Y^9999^9999^Y

 ;;BLUE CROSS OF PENNSYLVANIA (CAPITAL)^VA467^23045^23045^Y^Y^182^365^Y

 ;;BLUE CROSS OF PENNSYLVANIA (INDEPENDENCE)^VA424^SX083^12X26^Y^Y^31^730^Y

 ;;BLUE CROSS OF PENNSYLVANIA (NORTHEASTERN)^VA430^^^Y^Y^547^730^Y

 ;;BLUE CROSS OF UTAH (REGENCE)^VA1006^SB801^12B39^Y^Y^9999^9999^Y

 ;;BLUE CROSS OF WASHINGTON (PREMERA)^VA565^SB930^12B27^Y^Y^31^365^Y

 ;;BLUE SHIELD OF CALIFORNIA^VA126^94036^94036^Y^Y^31^365^Y

 ;;BLUE SHIELD OF IDAHO^VA1028^SB611^12B88^Y^Y^9999^9999^Y

 ;;BLUE SHIELD OF NEW YORK (NORTHEASTERN)^VA1029^SB800^12B68^Y^Y^9999^9999^Y

 ;;BLUE SHIELD OF WASHINGTON (REGENCE)^VA205^SB931^^Y^Y^9999^9999^Y

 ;;BLUEGRASS FAMILY HEALTH^VA784^61124^61124^Y^Y^9999^9999^Y

 ;;BOON-CHAPMAN BENEFIT ADMIN^VA1047^74238^74238^Y^Y^9999^9999^Y

 ;;C AND O EMP HOSP ASSOC^VA2271^23708^23708^Y^N^9999^9999^N

 ;;CAPITAL DISTRICT PHYSICIANS-CDPHP^VA966^SX065^12X03^Y^Y^9999^9999^Y

 ;;CAPITOL ADMINISTRATORS^VA2253^68011^68011^Y^N^0^365^N

 ;;CARE IMPROVEMENT PLUS^VA2396^77082^77082^Y^N^30^730^N

 ;;CENTENE - ABSOLUTE TOTAL CARE^VA2314^68069^68069^Y^Y^0^0^N

 ;;CENTRAL STATES FUND^VA1065^36215^36215^Y^N^9999^9999^Y

 ;;CENTRAL STATES INDEMNITY^VA2026^36215^36215^Y^Y^0^0^N

 ;;CHAMPVA-SPINA BIFIDA- HAC^VA116^84146^84146^Y^N^0^0^Y

 ;;CHC OF FLORIDA^VA1724^25133^25133^Y^N^90^545^Y

 ;;CHC OF ILLINOIS^VA181^25146^25146^Y^N^90^545^Y

 ;;CHC OF KANSAS^VA37^25133^25133^Y^N^90^545^Y

 ;;CIGNA^VA10^62308^62308^Y^Y^31^9999^Y

 ;;CIGNA BEHAVIORAL HEALTH^VA2540^SX071^^Y^N^9999^730^Y

 ;;CMS^VA2086^SMTX1^12M61^Y^Y^120^820^Y

 ;;COLONIAL PENN LIFE^VA2166^36066^36066^Y^Y^30^365^Y

 ;;COLORADO ACCESS^VA169^84129^^Y^Y^9999^9999^N

 ;;COMMUNITY CARE OF OKLAHOMA^VA324^73143^73143^Y^Y^9999^9999^Y

 ;;CONNECTICARE^VA945^6105^6105^Y^Y^9999^9999^Y

 ;;CONSOLIDATED ASSOCIATES RAILROAD (CARE)^VA2478^75284^75284^Y^N^0^0^N

 ;;COOPERATIVE BENEFIT ADMIN (CBA)^VA75^52132^52132^Y^N^9999^9999^Y

 ;;CORESOURCE (FMH)^VA428^48117^48117^Y^Y^9999^9999^Y

 ;;CORESOURCE (LITTLE ROCK)^VA77^75136^75136^Y^Y^9999^9999^Y

 ;;CORESOURCE (MD PA IL NC IN)^VA78^35182^35182^Y^Y^9999^9999^Y

 ;;CORESOURCE (OH)^VA80^35183^35183^Y^Y^9999^9999^Y

 ;;COUNTRY LIFE INSURANCE CO^VA1904^62553^62553^Y^N^0^0^Y

 ;;COVENTRY GROUP HEALTH PLAN (GHP)^VA31^25141^25141^Y^N^90^545^Y

 ;;COVENTRY HEALTH AMERICA/HAPA^VA32^25126^25126^Y^N^90^545^Y

 ;;COVENTRY HEALTH AND LIFE (OKLAHOMA)^VA584^25133^25133^Y^N^90^545^Y

 ;;COVENTRY HEALTH AND LIFE (TENN)^VA585^25141^25141^Y^N^90^545^N

 ;;COVENTRY HEALTH AND LIFE-NEVADA^VA826^25149^25149^Y^N^90^545^N

 ;;COVENTRY HEALTH CARE CARELINK^VA33^25139^25139^Y^N^90^545^Y

 ;;COVENTRY HEALTH CARE FEDERAL^VA905^62413^62413^Y^N^90^545^Y

 ;;COVENTRY HEALTH CARE OF DELAWARE^VA39^25130^25130^Y^N^90^545^Y

 ;;COVENTRY HEALTH CARE OF GEORGIA^VA40^25127^25127^Y^N^90^545^Y

 ;;COVENTRY HEALTH CARE OF IOWA^VA41^25132^25132^Y^N^90^545^Y

 ;;COVENTRY HEALTH CARE OF LOUISIANA^VA42^25135^25135^Y^N^90^545^Y

 ;;COVENTRY HEALTH CARE OF NEBRASKA^VA43^25136^25136^Y^N^90^545^Y

 ;;COVENTRY HEALTHCARE NATIONAL NETWK^VA85^25133^25133^Y^N^9999^9999^Y

 ;;COVENTRY MISSOURI^VA828^25133^25133^Y^N^90^545^Y

 ;;COVENTRY OF THE CAROLINAS -WELLPATH^VA61^25129^25129^Y^N^90^545^Y

 ;;COVENTRY SOUTHERN HEALTH SVCS (SHS)^VA62^25128^25128^Y^N^90^545^Y

 ;;COVENTRYONE^VA804^87043^87043^Y^N^90^545^Y

 ;;DAKOTA CARE^VA1404^^^Y^N^9999^9999^Y

 ;;DEAN HEALTH PLAN^VA1849^39113^39113^Y^Y^31^9999^N

 ;;DENVER HEALTH MEDICAL PLAN^VA2518^84135^84135^Y^N^0^365^N

 ;;DESERET MUTUAL^VA1624^SX105^12X35^Y^Y^9999^9999^N

 ;;EBMS^VA2126^SX182^12X44^Y^N^9999^9999^N

 ;;EMBLEMHEALTH^VA604^^^Y^Y^0^0^Y

 ;;ESSENCE HEALTHCARE^VA2316^20818^20818^Y^N^9999^9999^Y

 ;;EVERENCE FINANCIAL^VA2418^35605^35605^Y^N^0^0^N

 ;;EVERGREEN HEALTH CO-OP^VA2580^45319^45319^Y^Y^9999^9999^N

 ;;FCE BENEFIT ADMINISTRATORS INC.^VA1745^33033^33033^Y^Y^9999^9999^Y

 ;;FEDERATED INSURANCE COMPANY^VA84^41041^41041^Y^Y^9999^9999^Y

 ;;FIRST AMERITAS OF NEW YORK^VA157^72630^72630^Y^Y^9999^9999^N

 ;;FIRST RELIANCE STANDARD LIFE INS CO^VA159^13317^13317^Y^Y^9999^9999^N

 ;;FIRST UNITED AMERICAN INSURANCE CO^VA2479^55821^55821^Y^N^0^0^N

 ;;FIRSTCARE^VA2146^TH003^12T03^Y^N^0^365^N

 ;;FLORIDA HEALTH CARE PLANS^VA2251^59322^59322^Y^N^365^730^N

 ;;FLORIDA HOSPITAL HEALTHCARE SYSTEM^VA1049^59321^59321^Y^Y^0^365^N

 ;;GEISINGER HEALTH PLAN^VA1504^75273^75273^Y^Y^31^365^Y

 ;;GLOBE LIFE AND ACCIDENT INSURANCE CO^VA2641^55001^55001^Y^N^0^0^N

 ;;GMP EMPLOYER RETIREE TRUST^VA2683^11794^11794^Y^N^9999^9999^N

 ;;GOLDEN RULE INSURANCE^VA1850^37602^37602^Y^N^31^540^Y

 ;;GOVT EMPLOYEES HSPTL ASSOC (GEHA)^VA429^44054^44054^Y^Y^0^0^Y

 ;;GREAT WEST HEALTHCARE^VA132^80705^80705^Y^Y^9999^540^Y

 ;;GROUP & PENSION ADMINISTRATORS^VA173^48143^48143^Y^Y^9999^9999^Y

 ;;GROUP HEALTH COOPERATIVE^VA1524^91051^91051^Y^Y^9999^9999^Y

 ;;HARVARD PILGRIM HEALTH CARE^VA405^4271^4271^Y^N^31^1095^Y

 ;;HEALTH ALLIANCE MEDICAL PLANS (HAP-MI)^VA426^38224^38224^Y^N^9999^9999^Y

 ;;HEALTH ALLIANCE MEDICAL PLANS (IL)^VA2376^5977^5977^Y^N^0^730^Y

 ;;HEALTH FIRST OF NEW JERSEY^VA1066^80141^80141^Y^Y^9999^9999^N

 ;;HEALTH NET (AZ, CA, OR, NORTHEAST)^VA464^38309^38309^Y^Y^31^365^Y

 ;;HEALTH NEW ENGLAND^VA1604^^^Y^N^9999^9999^N

 ;;HEALTH PARTNERS OF PHILADELPHIA^VA170^80142^80142^Y^Y^31^9999^Y

 ;;HEALTH PLAN OF UPPER OHIO VALLEY^VA2643^34150^34150^Y^Y^9999^9999^N

 ;;HEALTHCARE SOLUTIONS GROUP^VA1050^73147^73147^Y^N^0^0^N

 ;;HEALTHCOMP ADMINISTRATORS^VA2274^85729^85729^Y^N^9999^9999^N

 ;;HEALTHFIRST OF NEW YORK^VA94^80141^80141^Y^Y^9999^9999^Y

 ;;HEALTHGRAM^VA2250^56144^56144^Y^N^0^0^N

 ;;HEALTHPARTNERS (MN)^VA1125^SX009^12X51^Y^N^60^365^Y

 ;;HEALTHPLANS INC^VA1986^44273^44273^Y^N^0^1095^N

 ;;HEALTHPLUS OF MICHIGAN^VA427^38216^38216^Y^N^9999^9999^Y

 ;;HEALTHSCOPE^VA1564^71063^71063^Y^Y^9999^9999^N

 ;;HEALTHSPRING^VA1051^63092^63092^Y^Y^9999^9999^Y

 ;;HOMETOWN HEALTH PLAN^VA971^88023^88023^Y^N^60^365^Y

 ;;HUMANA^VA163^61101^61101^Y^Y^365^365^Y

 ;;IDEAL LIFE INSURANCE^VA2029^75300^75300^Y^Y^0^0^N

 ;;INDEPENDENT HEALTH^VA1544^SX073^12X01^Y^N^31^365^Y

 ;;INTERNATIONAL MEDICAL CARD INC^VA2293^66053^66053^Y^Y^9999^9999^Y

 ;;JOHN ALDEN LIFE INS CO (JALIC)^VA89^41099^41099^Y^Y^9999^9999^Y

 ;;JOHN HOPKINS HEALTH PLAN^VA1052^52189^52189^Y^Y^9999^9999^N

 ;;KAISER FDN HEALTHPLAN- COLORADO^VA109^^^Y^Y^9999^9999^Y

 ;;KAISER FDN HEALTHPLAN- HAWAII^VA131^^^Y^Y^9999^9999^Y

 ;;KAISER FDN HEALTHPLAN- NORTHWEST^VA112^^^Y^Y^9999^9999^Y

 ;;KAISER PERMANENTE OF GEORGIA^VA110^21313^21313^Y^Y^9999^9999^Y

 ;;KAISER PERMANENTE OF N CALIFORNIA^VA114^^^Y^N^9999^9999^Y

 ;;KAISER PERMANENTE OF S CALIFORNIA^VA115^94134^94134^Y^N^9999^9999^Y

 ;;KITSAP PHYSICIAN SERVICES^VA964^KPS01^KPS01^Y^Y^90^365^Y

 ;;KSKJ LIFE^VA2030^75300^75300^Y^Y^0^0^N

 ;;LIFETIME BENEFIT SERVICES (RMSCO)^VA2246^16117^16117^Y^Y^9999^9999^N

 ;;LINCOLN HERITAGE^VA2031^75300^75300^Y^Y^0^0^N

 ;;LOOMIS COMPANY^VA1985^23223^23223^Y^Y^9999^9999^N

 ;;LOYAL AMERICAN MEDICARE SUPP^VA1645^13193^13193^Y^N^9999^9999^Y

 ;;EXIT

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIB20P567   13910     printed  Mar 13, 2025@21:08:34                                                                                                                                                                                                   Page 2

IB20P567  ;ALB/RRA UPDATE PAYER FILE- ;06/07/2016

 +1       ;;2.0;INTEGRATED BILLING;**567**;21-MAR-94;Build 5

 +2       ;;Per VA Directive 6402, this routine should not be modified.

 +3       ;

 +4       ; Compare local PAYER file with national and

 +5       ; update missing entries

 +6        QUIT

 +7       ;

 +8       ;

EN        ;

 +1        NEW IBLINE,IBN,IB1,DA,DIE,DR,IBA,IBNAME,IBCNT,IBERRM,IBACT,IBIIV

 +2        NEW IBAUTO,IBID,IBNID,IBNEW,IBNOAP

 +3        SET IBCNT=0

           SET IBNOAP=0

 +4        DO BMES^XPDUTL(">>>Evaluating PAYER file...")

 +5        FOR IBLINE=1:1

               SET IBN=$TEXT(PAYER+IBLINE)

               SET IB1=$PIECE(IBN,";;",2)

               if IB1="EXIT"

                   QUIT

               DO UPDATE

 +6        IF 'IBNOAP

               Begin DoDot:1

 +7                FOR IBLINE=1:1

                       SET IBN=$TEXT(PAYER+IBLINE^IB2P567A)

                       SET IB1=$PIECE(IBN,";;",2)

                       if IB1="EXIT"

                           QUIT

                       DO UPDATE

               End DoDot:1

 +8        DO BMES^XPDUTL("  ")

 +9        DO BMES^XPDUTL("TOTAL OF "_IBCNT_" ADDED TO THE PAYER FILE")

 +10       DO BMES^XPDUTL("  ")

 +11       DO BMES^XPDUTL(">>>PAYER file update complete!!...")

 +12       QUIT

UPDATE    ;CHECK AND ADD MISSING RECORDS

 +1        if IBNOAP

               QUIT

 +2        SET IBNID=$PIECE(IB1,U,2)

 +3       ;QUIT IF AN ENTRY ALREADY EXIST FOR THAT NATIONAL ID

 +4        if +$ORDER(^IBE(365.12,"C",IBNID,""))

               QUIT

 +5        SET IBACT=$SELECT($PIECE(IB1,U,5)="Y":1,1:0)

 +6        SET IBAUTO=$SELECT($PIECE(IB1,U,9)="Y":1,1:0)

 +7        SET IBID=$SELECT($PIECE(IB1,U,6)="Y":1,1:0)

 +8        SET IBIIV=$ORDER(^IBE(365.13,"B","IIV",0))

 +9        IF 'IBIIV

               Begin DoDot:1

 +10               NEW DIC,X,Y

 +11               SET DIC="^IBE(365.13,"

                   SET X="IIV"

                   SET DIC(0)=""

 +12               KILL DD,DO

 +13               DO FILE^DICN

 +14               KILL DO

 +15               SET IBIIV=+Y

               End DoDot:1

 +16       IF 'IBIIV

               Begin DoDot:1

 +17               SET IBNOAP=1

 +18               DO BMES^XPDUTL("Unable to add IIV to the PAYER APPLICATION file!")

               End DoDot:1

               QUIT

 +19       SET IBA(365.12,"+1,",.01)=$PIECE(IB1,U)

 +20       SET IBA(365.12,"+1,",.02)=IBNID

 +21       SET IBA(365.12,"+1,",.05)=$PIECE(IB1,U,3)

 +22       SET IBA(365.12,"+1,",.06)=$PIECE(IB1,U,4)

 +23       SET IBA(365.121,"+2,+1,",.01)=IBIIV

 +24       SET IBA(365.121,"+2,+1,",.02)=IBACT

 +25       SET IBA(365.121,"+2,+1,",.08)=IBID

 +26       SET IBA(365.121,"+2,+1,",.1)=0

 +27       SET IBA(365.121,"+2,+1,",.13)=$$NOW^XLFDT()

 +28       SET IBA(365.121,"+2,+1,",.14)=$PIECE(IB1,U,7)

 +29       SET IBA(365.121,"+2,+1,",.15)=$PIECE(IB1,U,8)

 +30       SET IBA(365.121,"+2,+1,",.07)=IBAUTO

 +31      ; file new PAYER entry

           DO UPDATE^DIE("","IBA","","IBERRM")

 +32       IF $DATA(IBERRM)

               Begin DoDot:1

 +33               DO BMES^XPDUTL("******Unable to add PAYER : "_$PIECE(IB1,U))

               End DoDot:1

               QUIT

 +34       SET IBCNT=IBCNT+1

 +35       DO BMES^XPDUTL("PAYER "_$PIECE(IB1,U)_" ADDED WITH A NATIONAL ID OF: "_IBNID)

 +36       QUIT

 +37      ;

PAYER     ;PAYER NAME^VA NAT ID^EDI ID NUM-PROF^EDI ID NUM-INST^NAT ACTIVE^IDENT REQ SUB ID^FUT SERV DAYS^PAST SERV DAYS^AUTO-ACCEPT

 +1       ;;AARP HEALTH PLAN^VA764^36273^36273^Y^Y^0^0^Y

 +2       ;;ACS BENEFIT SERVICES^VA2642^72467^72467^Y^Y^0^0^N

 +3       ;;ADVANTRA (TX, NM, AZ)^VA825^25152^25152^Y^N^90^545^N

 +4       ;;AETNA^VA1^60054^60054^Y^Y^0^730^Y

 +5       ;;AETNA SENIOR SUPPLEMENTAL^VA1964^62118^62118^Y^N^9999^9999^Y

 +6       ;;AFLAC - DENTAL^VA524^^^Y^Y^9999^9999^Y

 +7       ;;AFLAC MEDICARE SUPPLEMENTAL^VA2456^^^Y^N^0^0^N

 +8       ;;AFTRA HEALTH FUND^VA90^13346^13346^Y^Y^9999^9999^Y

 +9       ;;ALLEGIANCE BENEFITS PLAN MANAGEMENT^VA1864^81040^81040^Y^Y^31^365^N

 +10      ;;ALLIANT HEALTH PLANS^VA2560^58234^58234^Y^N^0^0^N

 +11      ;;ALLIED BENEFIT SYSTEMS^VA1644^37308^37308^Y^N^9999^9999^Y

 +12      ;;ALLSAVERS INSURANCE COMPANY^VA2703^81400^81400^Y^Y^0^0^N

 +13      ;;ALTIUS HEALTH PLANS^VA182^25149^25149^Y^N^90^545^Y

 +14      ;;AMERICAN FAMILY^VA1664^56071^56071^Y^N^9999^9999^Y

 +15      ;;AMERICAN NATIONAL INSURANCE^VA1364^74048^74048^Y^N^9999^9999^Y

 +16      ;;AMERICAN POSTAL WRKRS UNION (APWU)^VA129^44444^44444^Y^N^9999^365^Y

 +17      ;;AMERICAN REPUBLIC INS CO (ARIC)^VA74^42011^42011^Y^N^0^0^Y

 +18      ;;AMERICHOICE OF NJ (COMMERCIAL)^VA2^^^Y^Y^365^365^N

 +19      ;;AMERIGROUP CORPORATION^VA264^2751N^2751N^Y^Y^9999^9999^Y

 +20      ;;AMERIHEALTH ADMINISTRATORS^VA1046^^54763^Y^Y^9999^9999^Y

 +21      ;;AMERITAS - STANDARD INSURANCE (DENTAL)^VA2723^47009^47009^Y^Y^0^0^N

 +22      ;;AMERITAS LIFE INS CO^VA156^47009^47009^Y^Y^9999^9999^N

 +23      ;;ASSOC DE MAESTROS PUERTO RICO^VA1825^^^Y^Y^9999^9999^N

 +24      ;;ASURIS NORTHWEST HEALTH^VA1284^SX179^SX179^Y^Y^42^730^Y

 +25      ;;AULTCARE^VA2666^^^Y^N^0^9999^N

 +26      ;;AUXIANT^VA2620^26202^26202^Y^N^0^0^N

 +27      ;;AVERA HEALTH PLANS^VA2356^46045^46045^Y^N^0^365^N

 +28      ;;AVMED^VA123^59274^^Y^Y^31^365^Y

 +29      ;;BANKERS LIFE AND CASUALTY^VA2046^36066^36066^Y^Y^30^365^Y

 +30      ;;BCBS HAWAII - LOCAL^VA1304^SB971^12B62^Y^N^9999^9999^Y

 +31      ;;BCBS OF ALABAMA^VA65^SB510^12B54^Y^Y^31^365^Y

 +32      ;;BCBS OF ALASKA (PREMERA)^VA564^SB930^12B47^Y^Y^31^365^Y

 +33      ;;BCBS OF ARIZONA^VA6^SB530^12B02^Y^Y^31^9999^Y

 +34      ;;BCBS OF ARKANSAS^VA284^SB520^12021^Y^Y^9999^9999^Y

 +35      ;;BCBS OF CENTRAL NEW YORK^VA1024^SB805^12B37^Y^Y^9999^9999^N

 +36      ;;BCBS OF COLORADO^VA162^SB550^12B03^Y^Y^31^545^Y

 +37      ;;BCBS OF CONNECTICUT^VA344^SB560^12B04^Y^Y^31^1095^Y

 +38      ;;BCBS OF DELAWARE^VA704^SB570^12B76^Y^Y^31^365^Y

 +39      ;;BCBS OF DIST OF COLUMBIA (CAREFIRST)^VA706^SB580^12000^Y^Y^0^0^Y

 +40      ;;BCBS OF FLORIDA^VA66^SB590^12B34^Y^Y^9999^9999^Y

 +41      ;;BCBS OF GEORGIA^VA168^SB600^12015^Y^Y^9999^9999^Y

 +42      ;;BCBS OF HAWAII^VA1004^SB971^12B62^Y^Y^9999^9999^Y

 +43      ;;BCBS OF ILLINOIS^VA167^SB621^12B08^Y^Y^31^730^Y

 +44      ;;BCBS OF INDIANA^VA444^SB630^12B09^Y^Y^31^1095^Y

 +45      ;;BCBS OF IOWA^VA469^SB640^12B10^Y^Y^365^365^Y

 +46      ;;BCBS OF KANSAS^VA385^SB650^57325^Y^Y^31^730^Y

 +47      ;;BCBS OF KANSAS CITY^VA884^^12B66^Y^Y^31^730^Y

 +48      ;;BCBS OF KENTUCKY^VA445^SB660^12B11^Y^Y^31^1095^Y

 +49      ;;BCBS OF LOUISIANA^VA3^23738^12B12^Y^Y^9999^9999^Y

 +50      ;;BCBS OF MAINE^VA345^SB680^12B13^Y^Y^31^1095^Y

 +51      ;;BCBS OF MARYLAND (CAREFIRST)^VA707^SB690^12011^Y^Y^0^0^Y

 +52      ;;BCBS OF MASSACHUSETTS^VA7^SB700^12B14^Y^Y^9999^9999^Y

 +53      ;;BCBS OF MICHIGAN^VA346^SB710^12B18^Y^Y^31^365^Y

 +54      ;;BCBS OF MINNESOTA^VA67^SB720^12B16^Y^Y^9999^9999^Y

 +55      ;;BCBS OF MISSISSIPPI^VA8^SB730^12B17^Y^Y^9999^9999^Y

 +56      ;;BCBS OF MISSOURI^VA446^SB741^12B66^Y^Y^31^1095^Y

 +57      ;;BCBS OF MONTANA^VA984^SB751^12B77^Y^Y^31^365^Y

 +58      ;;BCBS OF NEBRASKA^VA468^SB760^12B19^Y^Y^31^730^Y

 +59      ;;BCBS OF NEVADA^VA684^SB765^12B20^Y^Y^31^545^Y

 +60      ;;BCBS OF NEW HAMPSHIRE^VA447^SB770^12B21^Y^Y^31^1095^Y

 +61      ;;BCBS OF NEW JERSEY (HORIZON)^VA4^22099^22099^Y^Y^0^730^Y

 +62      ;;BCBS OF NEW MEXICO^VA68^SB790^12B22^Y^Y^0^0^Y

 +63      ;;BCBS OF NEW YORK (EMPIRE)^VA5^SB803^55093^Y^Y^9999^9999^Y

 +64      ;;BCBS OF NEW YORK (EXCELLUS)^VA969^SB805^12B71^Y^Y^31^365^Y

 +65      ;;BCBS OF NEW YORK HEALTHNOW/WESTERN^VA970^SB801^12B39^Y^Y^31^365^Y

 +66      ;;BCBS OF NORTH CAROLINA^VA685^SB810^12B23^Y^Y^9999^1095^Y

 +67      ;;BCBS OF NORTH DAKOTA^VA924^SB820^12B78^Y^Y^31^365^Y

 +68      ;;BCBS OF OHIO^VA364^SB338^12B24^Y^Y^31^1095^Y

 +69      ;;BCBS OF OKLAHOMA^VA1005^SB840^12B59^Y^Y^9999^9999^Y

 +70      ;;BCBS OF OREGON (REGENCE)^VA204^SB850^12B41^Y^Y^180^730^Y

 +71      ;;BCBS OF PENNSYLVANIA (HIGHMARK)^VA304^SB865^12B60^Y^Y^182^365^Y

 +72      ;;BCBS OF RHODE ISLAND^VA425^SB871^^Y^Y^31^365^Y

 +73      ;;BCBS OF ROCHESTER AREA (NY)^VA1025^SB804^12B40^Y^Y^9999^9999^Y

 +74      ;;BCBS OF SOUTH CAROLINA^VA185^SB880^12B55^Y^Y^365^1095^Y

 +75      ;;BCBS OF SOUTH DAKOTA^VA470^SB889^12B33^Y^Y^31^365^Y

 +76      ;;BCBS OF TENNESSEE^VA744^SB890^12B45^Y^Y^30^365^Y

 +77      ;;BCBS OF TEXAS^VA69^SB900^12B31^Y^Y^9999^730^Y

 +78      ;;BCBS OF UTICA-WATERTOWN (NY)^VA1026^SB806^12B38^Y^Y^9999^9999^Y

 +79      ;;BCBS OF VERMONT^VA1027^SB915^12B32^Y^Y^9999^9999^Y

 +80      ;;BCBS OF VIRGINIA^VA347^SB923^12002^Y^Y^31^1095^Y

 +81      ;;BCBS OF WEST VIRGINIA^VA1007^SB941^12B28^Y^Y^182^730^Y

 +82      ;;BCBS OF WISCONSIN^VA448^SB950^12B29^Y^Y^31^1095^Y

 +83      ;;BCBS OF WYOMING^VA925^SB960^12B30^Y^Y^31^365^Y

 +84      ;;BEST LIFE & HEALTH^VA91^95604^95604^Y^Y^9999^9999^N

 +85      ;;BLUE CROSS OF CALIFORNIA^VA9^47198^47198^Y^Y^9999^9999^Y

 +86      ;;BLUE CROSS OF IDAHO^VA384^SB612^12B07^Y^Y^9999^9999^Y

 +87      ;;BLUE CROSS OF PENNSYLVANIA (CAPITAL)^VA467^23045^23045^Y^Y^182^365^Y

 +88      ;;BLUE CROSS OF PENNSYLVANIA (INDEPENDENCE)^VA424^SX083^12X26^Y^Y^31^730^Y

 +89      ;;BLUE CROSS OF PENNSYLVANIA (NORTHEASTERN)^VA430^^^Y^Y^547^730^Y

 +90      ;;BLUE CROSS OF UTAH (REGENCE)^VA1006^SB801^12B39^Y^Y^9999^9999^Y

 +91      ;;BLUE CROSS OF WASHINGTON (PREMERA)^VA565^SB930^12B27^Y^Y^31^365^Y

 +92      ;;BLUE SHIELD OF CALIFORNIA^VA126^94036^94036^Y^Y^31^365^Y

 +93      ;;BLUE SHIELD OF IDAHO^VA1028^SB611^12B88^Y^Y^9999^9999^Y

 +94      ;;BLUE SHIELD OF NEW YORK (NORTHEASTERN)^VA1029^SB800^12B68^Y^Y^9999^9999^Y

 +95      ;;BLUE SHIELD OF WASHINGTON (REGENCE)^VA205^SB931^^Y^Y^9999^9999^Y

 +96      ;;BLUEGRASS FAMILY HEALTH^VA784^61124^61124^Y^Y^9999^9999^Y

 +97      ;;BOON-CHAPMAN BENEFIT ADMIN^VA1047^74238^74238^Y^Y^9999^9999^Y

 +98      ;;C AND O EMP HOSP ASSOC^VA2271^23708^23708^Y^N^9999^9999^N

 +99      ;;CAPITAL DISTRICT PHYSICIANS-CDPHP^VA966^SX065^12X03^Y^Y^9999^9999^Y

 +100     ;;CAPITOL ADMINISTRATORS^VA2253^68011^68011^Y^N^0^365^N

 +101     ;;CARE IMPROVEMENT PLUS^VA2396^77082^77082^Y^N^30^730^N

 +102     ;;CENTENE - ABSOLUTE TOTAL CARE^VA2314^68069^68069^Y^Y^0^0^N

 +103     ;;CENTRAL STATES FUND^VA1065^36215^36215^Y^N^9999^9999^Y

 +104     ;;CENTRAL STATES INDEMNITY^VA2026^36215^36215^Y^Y^0^0^N

 +105     ;;CHAMPVA-SPINA BIFIDA- HAC^VA116^84146^84146^Y^N^0^0^Y

 +106     ;;CHC OF FLORIDA^VA1724^25133^25133^Y^N^90^545^Y

 +107     ;;CHC OF ILLINOIS^VA181^25146^25146^Y^N^90^545^Y

 +108     ;;CHC OF KANSAS^VA37^25133^25133^Y^N^90^545^Y

 +109     ;;CIGNA^VA10^62308^62308^Y^Y^31^9999^Y

 +110     ;;CIGNA BEHAVIORAL HEALTH^VA2540^SX071^^Y^N^9999^730^Y

 +111     ;;CMS^VA2086^SMTX1^12M61^Y^Y^120^820^Y

 +112     ;;COLONIAL PENN LIFE^VA2166^36066^36066^Y^Y^30^365^Y

 +113     ;;COLORADO ACCESS^VA169^84129^^Y^Y^9999^9999^N

 +114     ;;COMMUNITY CARE OF OKLAHOMA^VA324^73143^73143^Y^Y^9999^9999^Y

 +115     ;;CONNECTICARE^VA945^6105^6105^Y^Y^9999^9999^Y

 +116     ;;CONSOLIDATED ASSOCIATES RAILROAD (CARE)^VA2478^75284^75284^Y^N^0^0^N

 +117     ;;COOPERATIVE BENEFIT ADMIN (CBA)^VA75^52132^52132^Y^N^9999^9999^Y

 +118     ;;CORESOURCE (FMH)^VA428^48117^48117^Y^Y^9999^9999^Y

 +119     ;;CORESOURCE (LITTLE ROCK)^VA77^75136^75136^Y^Y^9999^9999^Y

 +120     ;;CORESOURCE (MD PA IL NC IN)^VA78^35182^35182^Y^Y^9999^9999^Y

 +121     ;;CORESOURCE (OH)^VA80^35183^35183^Y^Y^9999^9999^Y

 +122     ;;COUNTRY LIFE INSURANCE CO^VA1904^62553^62553^Y^N^0^0^Y

 +123     ;;COVENTRY GROUP HEALTH PLAN (GHP)^VA31^25141^25141^Y^N^90^545^Y

 +124     ;;COVENTRY HEALTH AMERICA/HAPA^VA32^25126^25126^Y^N^90^545^Y

 +125     ;;COVENTRY HEALTH AND LIFE (OKLAHOMA)^VA584^25133^25133^Y^N^90^545^Y

 +126     ;;COVENTRY HEALTH AND LIFE (TENN)^VA585^25141^25141^Y^N^90^545^N

 +127     ;;COVENTRY HEALTH AND LIFE-NEVADA^VA826^25149^25149^Y^N^90^545^N

 +128     ;;COVENTRY HEALTH CARE CARELINK^VA33^25139^25139^Y^N^90^545^Y

 +129     ;;COVENTRY HEALTH CARE FEDERAL^VA905^62413^62413^Y^N^90^545^Y

 +130     ;;COVENTRY HEALTH CARE OF DELAWARE^VA39^25130^25130^Y^N^90^545^Y

 +131     ;;COVENTRY HEALTH CARE OF GEORGIA^VA40^25127^25127^Y^N^90^545^Y

 +132     ;;COVENTRY HEALTH CARE OF IOWA^VA41^25132^25132^Y^N^90^545^Y

 +133     ;;COVENTRY HEALTH CARE OF LOUISIANA^VA42^25135^25135^Y^N^90^545^Y

 +134     ;;COVENTRY HEALTH CARE OF NEBRASKA^VA43^25136^25136^Y^N^90^545^Y

 +135     ;;COVENTRY HEALTHCARE NATIONAL NETWK^VA85^25133^25133^Y^N^9999^9999^Y

 +136     ;;COVENTRY MISSOURI^VA828^25133^25133^Y^N^90^545^Y

 +137     ;;COVENTRY OF THE CAROLINAS -WELLPATH^VA61^25129^25129^Y^N^90^545^Y

 +138     ;;COVENTRY SOUTHERN HEALTH SVCS (SHS)^VA62^25128^25128^Y^N^90^545^Y

 +139     ;;COVENTRYONE^VA804^87043^87043^Y^N^90^545^Y

 +140     ;;DAKOTA CARE^VA1404^^^Y^N^9999^9999^Y

 +141     ;;DEAN HEALTH PLAN^VA1849^39113^39113^Y^Y^31^9999^N

 +142     ;;DENVER HEALTH MEDICAL PLAN^VA2518^84135^84135^Y^N^0^365^N

 +143     ;;DESERET MUTUAL^VA1624^SX105^12X35^Y^Y^9999^9999^N

 +144     ;;EBMS^VA2126^SX182^12X44^Y^N^9999^9999^N

 +145     ;;EMBLEMHEALTH^VA604^^^Y^Y^0^0^Y

 +146     ;;ESSENCE HEALTHCARE^VA2316^20818^20818^Y^N^9999^9999^Y

 +147     ;;EVERENCE FINANCIAL^VA2418^35605^35605^Y^N^0^0^N

 +148     ;;EVERGREEN HEALTH CO-OP^VA2580^45319^45319^Y^Y^9999^9999^N

 +149     ;;FCE BENEFIT ADMINISTRATORS INC.^VA1745^33033^33033^Y^Y^9999^9999^Y

 +150     ;;FEDERATED INSURANCE COMPANY^VA84^41041^41041^Y^Y^9999^9999^Y

 +151     ;;FIRST AMERITAS OF NEW YORK^VA157^72630^72630^Y^Y^9999^9999^N

 +152     ;;FIRST RELIANCE STANDARD LIFE INS CO^VA159^13317^13317^Y^Y^9999^9999^N

 +153     ;;FIRST UNITED AMERICAN INSURANCE CO^VA2479^55821^55821^Y^N^0^0^N

 +154     ;;FIRSTCARE^VA2146^TH003^12T03^Y^N^0^365^N

 +155     ;;FLORIDA HEALTH CARE PLANS^VA2251^59322^59322^Y^N^365^730^N

 +156     ;;FLORIDA HOSPITAL HEALTHCARE SYSTEM^VA1049^59321^59321^Y^Y^0^365^N

 +157     ;;GEISINGER HEALTH PLAN^VA1504^75273^75273^Y^Y^31^365^Y

 +158     ;;GLOBE LIFE AND ACCIDENT INSURANCE CO^VA2641^55001^55001^Y^N^0^0^N

 +159     ;;GMP EMPLOYER RETIREE TRUST^VA2683^11794^11794^Y^N^9999^9999^N

 +160     ;;GOLDEN RULE INSURANCE^VA1850^37602^37602^Y^N^31^540^Y

 +161     ;;GOVT EMPLOYEES HSPTL ASSOC (GEHA)^VA429^44054^44054^Y^Y^0^0^Y

 +162     ;;GREAT WEST HEALTHCARE^VA132^80705^80705^Y^Y^9999^540^Y

 +163     ;;GROUP & PENSION ADMINISTRATORS^VA173^48143^48143^Y^Y^9999^9999^Y

 +164     ;;GROUP HEALTH COOPERATIVE^VA1524^91051^91051^Y^Y^9999^9999^Y

 +165     ;;HARVARD PILGRIM HEALTH CARE^VA405^4271^4271^Y^N^31^1095^Y

 +166     ;;HEALTH ALLIANCE MEDICAL PLANS (HAP-MI)^VA426^38224^38224^Y^N^9999^9999^Y

 +167     ;;HEALTH ALLIANCE MEDICAL PLANS (IL)^VA2376^5977^5977^Y^N^0^730^Y

 +168     ;;HEALTH FIRST OF NEW JERSEY^VA1066^80141^80141^Y^Y^9999^9999^N

 +169     ;;HEALTH NET (AZ, CA, OR, NORTHEAST)^VA464^38309^38309^Y^Y^31^365^Y

 +170     ;;HEALTH NEW ENGLAND^VA1604^^^Y^N^9999^9999^N

 +171     ;;HEALTH PARTNERS OF PHILADELPHIA^VA170^80142^80142^Y^Y^31^9999^Y

 +172     ;;HEALTH PLAN OF UPPER OHIO VALLEY^VA2643^34150^34150^Y^Y^9999^9999^N

 +173     ;;HEALTHCARE SOLUTIONS GROUP^VA1050^73147^73147^Y^N^0^0^N

 +174     ;;HEALTHCOMP ADMINISTRATORS^VA2274^85729^85729^Y^N^9999^9999^N

 +175     ;;HEALTHFIRST OF NEW YORK^VA94^80141^80141^Y^Y^9999^9999^Y

 +176     ;;HEALTHGRAM^VA2250^56144^56144^Y^N^0^0^N

 +177     ;;HEALTHPARTNERS (MN)^VA1125^SX009^12X51^Y^N^60^365^Y

 +178     ;;HEALTHPLANS INC^VA1986^44273^44273^Y^N^0^1095^N

 +179     ;;HEALTHPLUS OF MICHIGAN^VA427^38216^38216^Y^N^9999^9999^Y

 +180     ;;HEALTHSCOPE^VA1564^71063^71063^Y^Y^9999^9999^N

 +181     ;;HEALTHSPRING^VA1051^63092^63092^Y^Y^9999^9999^Y

 +182     ;;HOMETOWN HEALTH PLAN^VA971^88023^88023^Y^N^60^365^Y

 +183     ;;HUMANA^VA163^61101^61101^Y^Y^365^365^Y

 +184     ;;IDEAL LIFE INSURANCE^VA2029^75300^75300^Y^Y^0^0^N

 +185     ;;INDEPENDENT HEALTH^VA1544^SX073^12X01^Y^N^31^365^Y

 +186     ;;INTERNATIONAL MEDICAL CARD INC^VA2293^66053^66053^Y^Y^9999^9999^Y

 +187     ;;JOHN ALDEN LIFE INS CO (JALIC)^VA89^41099^41099^Y^Y^9999^9999^Y

 +188     ;;JOHN HOPKINS HEALTH PLAN^VA1052^52189^52189^Y^Y^9999^9999^N

 +189     ;;KAISER FDN HEALTHPLAN- COLORADO^VA109^^^Y^Y^9999^9999^Y

 +190     ;;KAISER FDN HEALTHPLAN- HAWAII^VA131^^^Y^Y^9999^9999^Y

 +191     ;;KAISER FDN HEALTHPLAN- NORTHWEST^VA112^^^Y^Y^9999^9999^Y

 +192     ;;KAISER PERMANENTE OF GEORGIA^VA110^21313^21313^Y^Y^9999^9999^Y

 +193     ;;KAISER PERMANENTE OF N CALIFORNIA^VA114^^^Y^N^9999^9999^Y

 +194     ;;KAISER PERMANENTE OF S CALIFORNIA^VA115^94134^94134^Y^N^9999^9999^Y

 +195     ;;KITSAP PHYSICIAN SERVICES^VA964^KPS01^KPS01^Y^Y^90^365^Y

 +196     ;;KSKJ LIFE^VA2030^75300^75300^Y^Y^0^0^N

 +197     ;;LIFETIME BENEFIT SERVICES (RMSCO)^VA2246^16117^16117^Y^Y^9999^9999^N

 +198     ;;LINCOLN HERITAGE^VA2031^75300^75300^Y^Y^0^0^N

 +199     ;;LOOMIS COMPANY^VA1985^23223^23223^Y^Y^9999^9999^N

 +200     ;;LOYAL AMERICAN MEDICARE SUPP^VA1645^13193^13193^Y^N^9999^9999^Y

 +201     ;;EXIT

IB20P567.m