Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: IB20P567

IB20P567.m

Go to the documentation of this file.
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
 Q
 ;
 ;
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!!...")
 Q
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)
 Q
 ;
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