DMLAI003 ; ; 20-NOV-2012
 ;;22.2;LANGUAGE FILE INITS;;NOV 20, 2012
 Q:'DIFQR(.85)  F I=1:2 S X=$T(Q+I) Q:X=""  S Y=$E($T(Q+I+1),4,999),X=$E(X,4,999) S:$A(Y)=126 I=I+1,Y=$E(Y,2,999)_$E($T(Q+I+1),5,999) S:$A(Y)=61 Y=$E(Y,2,999) X NO E  S @X=Y
Q Q
 ;;^UTILITY(U,$J,.85)
 ;;=^DI(.85,
 ;;^UTILITY(U,$J,.85,0)
 ;;=LANGUAGE^.85I^18^533
 ;;^UTILITY(U,$J,.85,1,0)
 ;;=ENGLISH^EN^ENG
 ;;^UTILITY(U,$J,.85,1,1,0)
 ;;=^.8501^2^2
 ;;^UTILITY(U,$J,.85,1,1,1,0)
 ;;=MODERN ENGLISH (1500-)
 ;;^UTILITY(U,$J,.85,1,1,2,0)
 ;;=ENGLISH,MODERN (1500-)
 ;;^UTILITY(U,$J,.85,1,"CRD")
 ;;=I Y S Y=$FN(Y,",")
 ;;^UTILITY(U,$J,.85,1,"DD")
 ;;=S:Y Y=$S($E(Y,4,5):$P("JAN^FEB^MAR^APR^MAY^JUN^JUL^AUG^SEP^OCT^NOV^DEC","^",+$E(Y,4,5))_" ",1:"")_$S($E(Y,6,7):+$E(Y,6,7)_",",1:"")_($E(Y,1,3)+1700)_$P("@"_$E(Y_0,9,10)_":"_$E(Y_"000",11,12)_$S($E(Y,13,14):":"_$E(Y_0,13,14),1:""),"^",Y[".")
 ;;^UTILITY(U,$J,.85,1,"FMTE")
 ;;=N RTN,%T S %T="."_$E($P(Y,".",2)_"000000",1,7),%F=$G(%F),RTN="F"_$S(%F<1:1,%F>7:1,1:+%F\1)_"^DILIBF" D @RTN S Y=%R
 ;;^UTILITY(U,$J,.85,1,"LC")
 ;;=S Y=$TR(Y,"ABCDEFGHIJKLMNOPQRSTUVWXYZ","abcdefghijklmnopqrstuvwxyz")
 ;;^UTILITY(U,$J,.85,1,"ORD")
 ;;=I $G(Y) S Y=Y_$S(Y#10=1&(Y#100-11):"ST",Y#10=2&(Y#100-12):"ND",Y#10=3&(Y#100-13):"RD",1:"TH")
 ;;^UTILITY(U,$J,.85,1,"TIME")
 ;;=S Y=$S($L($G(Y),".")>1:$E(Y_0,9,10)_":"_$E(Y_"000",11,12)_$S($E(Y,13,14):":"_$E(Y_0,13,14),1:""),1:"")
 ;;^UTILITY(U,$J,.85,1,"UC")
 ;;=S Y=$TR(Y,"abcdefghijklmnopqrstuvwxyz","ABCDEFGHIJKLMNOPQRSTUVWXYZ")
 ;;^UTILITY(U,$J,.85,2,0)
 ;;=GERMAN^DE^DEU^^GER
 ;;^UTILITY(U,$J,.85,2,1,0)
 ;;=^.8501^7^7
 ;;^UTILITY(U,$J,.85,2,1,1,0)
 ;;=GERMAN, STANDARD
 ;;^UTILITY(U,$J,.85,2,1,2,0)
 ;;=STANDARD GERMAN
 ;;^UTILITY(U,$J,.85,2,1,3,0)
 ;;=DEUTSCH
 ;;^UTILITY(U,$J,.85,2,1,4,0)
 ;;=DEUTSCH SPRACHE
 ;;^UTILITY(U,$J,.85,2,1,5,0)
 ;;=TEDESCO
 ;;^UTILITY(U,$J,.85,2,1,6,0)
 ;;=MODERN GERMAN (1500-)
 ;;^UTILITY(U,$J,.85,2,1,7,0)
 ;;=GERMAN,MODERN (1500-)
 ;;^UTILITY(U,$J,.85,2,"CRD")
 ;;=S:$G(Y) Y=$TR($FN(Y,","),",",".")
 ;;^UTILITY(U,$J,.85,2,"DD")
 ;;=S:Y Y=$S($E(Y,6,7):$E(Y,6,7)_".",1:"")_$S($E(Y,4,5):$E(Y,4,5)_".",1:"")_($E(Y,1,3)+1700)_$P(" "_$E(Y_0,9,10)_":"_$E(Y_"000",11,12)_$S($E(Y,13,14):":"_$E(Y_0,13,14),1:""),"^",Y[".")
 ;;^UTILITY(U,$J,.85,2,"LC")
 ;;=S Y=$TR(Y,"ABCDEFGHIJKLMNOPQRSTUVWXYZ[]\","abcdefghijklmnopqrstuvwxyz{}|")
 ;;^UTILITY(U,$J,.85,2,"ORD")
 ;;=S:$G(Y) Y=Y_"."
 ;;^UTILITY(U,$J,.85,2,"TIME")
 ;;=S Y=$S($L($G(Y),".")>1:$E(Y_0,9,10)_":"_$E(Y_"000",11,12)_$S($E(Y,13,14):":"_$E(Y_0,13,14),1:""),1:"")
 ;;^UTILITY(U,$J,.85,2,"UC")
 ;;=S Y=$TR(Y,"abcdefghijklmnopqrstuvwxyz{}|","ABCDEFGHIJKLMNOPQRSTUVWXYZ[]\")
 ;;^UTILITY(U,$J,.85,3,0)
 ;;=SPANISH^ES^SPA
 ;;^UTILITY(U,$J,.85,3,1,0)
 ;;=^.8501^5^5
 ;;^UTILITY(U,$J,.85,3,1,1,0)
 ;;=CASTILIAN
 ;;^UTILITY(U,$J,.85,3,1,2,0)
 ;;=CASTELLANO
 ;;^UTILITY(U,$J,.85,3,1,3,0)
 ;;=ESPANOL
 ;;^UTILITY(U,$J,.85,3,1,4,0)
 ;;=MODERN SPANISH (1500-)
 ;;^UTILITY(U,$J,.85,3,1,5,0)
 ;;=SPANISH, MODERN (1500-)
 ;;^UTILITY(U,$J,.85,4,0)
 ;;=FRENCH^FR^FRA^^FRE
 ;;^UTILITY(U,$J,.85,4,1,0)
 ;;=^.8501^3^3
 ;;^UTILITY(U,$J,.85,4,1,1,0)
 ;;=FRANCAIS
 ;;^UTILITY(U,$J,.85,4,1,2,0)
 ;;=MODERN FRENCH (1600-)
 ;;^UTILITY(U,$J,.85,4,1,3,0)
 ;;=FRENCH, MODERN (1600-)
 ;;^UTILITY(U,$J,.85,5,0)
 ;;=FINNISH^FI^FIN
 ;;^UTILITY(U,$J,.85,5,1,0)
 ;;=^.8501^3^3
 ;;^UTILITY(U,$J,.85,5,1,1,0)
 ;;=SUOMEA
 ;;^UTILITY(U,$J,.85,5,1,2,0)
 ;;=SUOMI
 ;;^UTILITY(U,$J,.85,5,1,3,0)
 ;;=SUOMEN KIELI
 ;;^UTILITY(U,$J,.85,5,"DD")
 ;;=X:$G(Y) ^DD("DD")
 ;;^UTILITY(U,$J,.85,5,"ORD")
 ;;=I $G(Y) S Y=Y_"."
 ;;^UTILITY(U,$J,.85,6,0)
 ;;=ITALIAN^IT^ITA
 ;;^UTILITY(U,$J,.85,6,1,0)
 ;;=^.8501^2^2
 ;;^UTILITY(U,$J,.85,6,1,1,0)
 ;;=ITALIANO
 ;;^UTILITY(U,$J,.85,6,1,2,0)
 ;;=LINGUA ITALIANA
 ;;^UTILITY(U,$J,.85,7,0)
 ;;=PORTUGUESE^PT^POR
 ;;^UTILITY(U,$J,.85,7,1,0)
 ;;=^.8501^4^4
 ;;^UTILITY(U,$J,.85,7,1,1,0)
 ;;=PORTUGUES
 ;;^UTILITY(U,$J,.85,7,1,2,0)
 ;;=LINGUA PORTUGUESA
 ;;^UTILITY(U,$J,.85,7,1,3,0)
 ;;=MODERN PORTUGUESE (1516-)
 ;;^UTILITY(U,$J,.85,7,1,4,0)
 ;;=PORTUGUESE, MODERN (1516-)
 ;;^UTILITY(U,$J,.85,8,0)
 ;;=ABKHAZ^AB^ABK
 ;;^UTILITY(U,$J,.85,8,1,0)
 ;;=^.8501^2^2
 ;;^UTILITY(U,$J,.85,8,1,1,0)
 ;;=ABKHAZIAN
 ;;^UTILITY(U,$J,.85,8,1,2,0)
 ;;=ABXAZO
 ;;^UTILITY(U,$J,.85,9,0)
 ;;=ACHINESE^^ACE
 ;;^UTILITY(U,$J,.85,10,0)
 ;;=ARABIC^AR^ARA
 ;;^UTILITY(U,$J,.85,10,1,0)
 ;;=^.8501^2^2
 ;;^UTILITY(U,$J,.85,10,1,1,0)
 ;;=AL-'ARABIYYAH
 ;;^UTILITY(U,$J,.85,10,1,2,0)
 ;;='ARABI
 ;;^UTILITY(U,$J,.85,11,0)
 ;;=RUSSIAN^RU^RUS
 ;;^UTILITY(U,$J,.85,11,1,0)
 ;;=^.8501^2^2
 ;;^UTILITY(U,$J,.85,11,1,1,0)
 ;;=RUSSKI
 ;;^UTILITY(U,$J,.85,11,1,2,0)
 ;;=RUSSKIY YAZYK
 ;;^UTILITY(U,$J,.85,12,0)
 ;;=GREEK^EL^ELL^^GRE
 ;;^UTILITY(U,$J,.85,12,1,0)
 ;;=^.8501^9^9
 ;;^UTILITY(U,$J,.85,12,1,1,0)
 ;;=ELLINIKA
 ;;^UTILITY(U,$J,.85,12,1,2,0)
 ;;=ELLINIKI GLOSSA
 ;;^UTILITY(U,$J,.85,12,1,3,0)
 ;;=GRAECAE
 ;;^UTILITY(U,$J,.85,12,1,4,0)
 ;;=GREC
 ;;^UTILITY(U,$J,.85,12,1,5,0)
 ;;=GRECO
 ;;^UTILITY(U,$J,.85,12,1,6,0)
 ;;=NEO-HELLENIC
 ;;^UTILITY(U,$J,.85,12,1,7,0)
 ;;=ROMAIC
 ;;^UTILITY(U,$J,.85,12,1,8,0)
 ;;=MODERN GREEK (1453-)
 ;;^UTILITY(U,$J,.85,12,1,9,0)
 ;;=GREEK, MODERN (1453-)
 ;;^UTILITY(U,$J,.85,13,0)
 ;;=ACOLI^^ACH
 ;;^UTILITY(U,$J,.85,14,0)
 ;;=ADANGME^^ADA
 ;;^UTILITY(U,$J,.85,15,0)
 ;;=ADYGHE^^ADY
 ;;^UTILITY(U,$J,.85,15,1,0)
 ;;=^.8501^1^1
 ;;^UTILITY(U,$J,.85,15,1,1,0)
 ;;=ADYGEI
 ;;^UTILITY(U,$J,.85,16,0)
 ;;=AFAR^AA^AAR
 ;;^UTILITY(U,$J,.85,16,1,0)
 ;;=^.8501^4^4
 ;;^UTILITY(U,$J,.85,16,1,1,0)
 ;;=QAFAR AF
 ;;^UTILITY(U,$J,.85,16,1,2,0)
 ;;='AFAR AF
 ;;^UTILITY(U,$J,.85,16,1,3,0)
 ;;=ADAL
 ;;^UTILITY(U,$J,.85,16,1,4,0)
 ;;=AFARAF
 ;;^UTILITY(U,$J,.85,17,0)
 ;;=AFRIHILI^^AFH
 ;;^UTILITY(U,$J,.85,18,0)
 ;;=HEBREW^HE^HEB
 ;;^UTILITY(U,$J,.85,18,1,0)
 ;;=^.8501^3^3
 ;;^UTILITY(U,$J,.85,18,1,1,0)
 ;;=IVRIT
 ;;^UTILITY(U,$J,.85,18,1,2,0)
 ;;=MODERN HEBREW (1881-)
 ;;^UTILITY(U,$J,.85,18,1,3,0)
 ;;=HEBREW, MODERN (1881-)
 ;;^UTILITY(U,$J,.85,19,0)
 ;;=AFRIKAANS^AF^AFR
 ;;^UTILITY(U,$J,.85,20,0)
 ;;=AINU^^AIN
 ;;^UTILITY(U,$J,.85,21,0)
 ;;=AKAN^AK^AKA
 ;;^UTILITY(U,$J,.85,22,0)
 ;;=AKKADIAN^^AKK
 ;;^UTILITY(U,$J,.85,23,0)
 ;;=ALBANIAN^SQ^SQI^^ALB
 ;;^UTILITY(U,$J,.85,23,1,0)
 ;;=^.8501^2^2
 ;;^UTILITY(U,$J,.85,23,1,1,0)
 ;;=SHQIP
 ;;^UTILITY(U,$J,.85,23,1,2,0)
 ;;=GJUHA SHQIPE
 ;;^UTILITY(U,$J,.85,24,0)
 ;;=ALEUT^^ALE
 ;;^UTILITY(U,$J,.85,25,0)
 ;;=ALTAI, SOUTHERN^^ALT
 ;;^UTILITY(U,$J,.85,25,1,0)
 ;;=^.8501^1^1
 ;;^UTILITY(U,$J,.85,25,1,1,0)
 ;;=SOUTHERN ALTAI
 ;;^UTILITY(U,$J,.85,26,0)
 ;;=AMHARIC^AM^AMH
 ;;^UTILITY(U,$J,.85,26,1,0)
 ;;=^.8501^4^4
 ;;^UTILITY(U,$J,.85,26,1,1,0)
 ;;=ABYSSINIAN
 ;;^UTILITY(U,$J,.85,26,1,2,0)
 ;;=AMARIGNA
 ;;^UTILITY(U,$J,.85,26,1,3,0)
 ;;=AMARINYA
 ;;^UTILITY(U,$J,.85,26,1,4,0)
 ;;=ETHIOPIAN
 ;;^UTILITY(U,$J,.85,27,0)
 ;;=ANCIENT EGYPTIAN^^EGY
 ;;^UTILITY(U,$J,.85,27,1,0)
 ;;=^.8501^1^1
 ;;^UTILITY(U,$J,.85,27,1,1,0)
 ;;=EGYPTIAN, ANCIENT
 ;;^UTILITY(U,$J,.85,28,0)
 ;;=ANCIENT GREEK^^GRC
 ;;^UTILITY(U,$J,.85,28,1,0)
 ;;=^.8501^1^1
 ;;^UTILITY(U,$J,.85,28,1,1,0)
 ;;=GREEK, ANCIENT (TO 1453)
 ;;^UTILITY(U,$J,.85,29,0)
 ;;=ANGIKA^^ANP
 ;;^UTILITY(U,$J,.85,30,0)
 ;;=ARAGONESE^AN^ARG
 ;;^UTILITY(U,$J,.85,30,1,0)
 ;;=^.8501^6^6
 ;;^UTILITY(U,$J,.85,30,1,1,0)
 ;;=ALTOARAGONES
 ;;^UTILITY(U,$J,.85,30,1,2,0)
 ;;=ARAGOIERAZ
 ;;^UTILITY(U,$J,.85,30,1,3,0)
 ;;=ARAGONES
 ;;^UTILITY(U,$J,.85,30,1,4,0)
 ;;=FABLA ARAGONESA
 ;;^UTILITY(U,$J,.85,30,1,5,0)
 ;;=HIGH ARAGONESE
 ;;^UTILITY(U,$J,.85,30,1,6,0)
 ;;=PATUES
 ;;^UTILITY(U,$J,.85,31,0)
 ;;=ARAPAHO^^ARP
 ;;^UTILITY(U,$J,.85,32,0)
 ;;=ARAWAK^^ARW
 ;;^UTILITY(U,$J,.85,33,0)
 ;;=ARMENIAN^HY^HYE^^ARM
 ;;^UTILITY(U,$J,.85,33,1,0)
 ;;=^.8501^7^7
 ;;^UTILITY(U,$J,.85,33,1,1,0)
 ;;=HAYEREN
 ;;^UTILITY(U,$J,.85,33,1,2,0)
 ;;=ARMJANSKI YAZYK
 ;;^UTILITY(U,$J,.85,33,1,3,0)
 ;;=ENA
 ;;^UTILITY(U,$J,.85,33,1,4,0)
 ;;=ERMENI DILI
 ;;^UTILITY(U,$J,.85,33,1,5,0)
 ;;=ERMENICE
 ;;^UTILITY(U,$J,.85,33,1,6,0)
 ;;=HAIEREN
 ;;^UTILITY(U,$J,.85,33,1,7,0)
 ;;=SOMKHURI
 ;;^UTILITY(U,$J,.85,34,0)
 ;;=AROMANIAN^^RUP
 ;;^UTILITY(U,$J,.85,34,1,0)
 ;;=^.8501^2^2
 ;;^UTILITY(U,$J,.85,34,1,1,0)
 ;;=ARUMANIAN
 ;;^UTILITY(U,$J,.85,34,1,2,0)
 ;;=MACEDO-ROMANIAN
 ;;^UTILITY(U,$J,.85,35,0)
 ;;=ASSAMESE^AS^ASM
 ;;^UTILITY(U,$J,.85,35,1,0)
 ;;=^.8501^3^3
 ;;^UTILITY(U,$J,.85,35,1,1,0)
 ;;=ASAMBE
 ;;^UTILITY(U,$J,.85,35,1,2,0)
 ;;=ASAMI
 ;;^UTILITY(U,$J,.85,35,1,3,0)
 ;;=ASAMIYA
 ;;^UTILITY(U,$J,.85,36,0)
 ;;=ASTURIAN^^AST
 ;;^UTILITY(U,$J,.85,36,1,0)
 ;;=^.8501^3^3
 ;;^UTILITY(U,$J,.85,36,1,1,0)
 ;;=BABLE
 ;;^UTILITY(U,$J,.85,36,1,2,0)
 ;;=LEONESE
 ;;^UTILITY(U,$J,.85,36,1,3,0)
 ;;=ASTURLEONESE
 ;;^UTILITY(U,$J,.85,37,0)
 ;;=AVARIC^AV^AVA
 ;;^UTILITY(U,$J,.85,38,0)
 ;;=AVESTAN^AE^AVE
 ;;^UTILITY(U,$J,.85,39,0)
 ;;=AWADHI^^AWA
 ;;^UTILITY(U,$J,.85,40,0)
 ;;=AYMARA^AY^AYM
 ;;^UTILITY(U,$J,.85,41,0)
 ;;=AZERBAIJANI^AZ^AZE
 ;;^UTILITY(U,$J,.85,42,0)
 ;;=BALINESE^^BAN
 ;;^UTILITY(U,$J,.85,43,0)
 ;;=BALUCHI^^BAL
 ;;^UTILITY(U,$J,.85,44,0)
 ;;=BAMBARA^BM^BAM
 ;;^UTILITY(U,$J,.85,45,0)
 ;;=BASA^^BAS
 ;;^UTILITY(U,$J,.85,46,0)
 ;;=BASHKIR^BA^BAK
 ;;^UTILITY(U,$J,.85,47,0)
 ;;=BASQUE^EU^EUS^^BAQ
 ;;^UTILITY(U,$J,.85,47,1,0)
 ;;=^.8501^1^1
 ;;^UTILITY(U,$J,.85,47,1,1,0)
 ;;=EUSKARA
 ;;^UTILITY(U,$J,.85,48,0)
 ;;=BEJA^^BEJ
 ;;^UTILITY(U,$J,.85,48,1,0)
 ;;=^.8501^1^1
 ;;^UTILITY(U,$J,.85,48,1,1,0)
 ;;=BEDAWIYET
 ;;^UTILITY(U,$J,.85,49,0)
 ;;=BELARUSIAN^BE^BEL
 ;;^UTILITY(U,$J,.85,50,0)
 ;;=BEMBA^^BEM
 ;;^UTILITY(U,$J,.85,51,0)
 ;;=BENGALI^BN^BEN
 ;;^UTILITY(U,$J,.85,52,0)
 ;;=BHOJPURI^^BHO
 ;;^UTILITY(U,$J,.85,53,0)
 ;;=BIKOL^^BIK
 ;;^UTILITY(U,$J,.85,54,0)
 ;;=BILIN^^BYN
 ;;^UTILITY(U,$J,.85,54,1,0)
 ;;=^.8501^1^1
 ;;^UTILITY(U,$J,.85,54,1,1,0)
 ;;=BLIN
 ;;^UTILITY(U,$J,.85,55,0)
 ;;=BINI^^BIN
 ;;^UTILITY(U,$J,.85,55,1,0)
 ;;=^.8501^1^1
 ;;^UTILITY(U,$J,.85,55,1,1,0)
 ;;=EDO
 ;;^UTILITY(U,$J,.85,56,0)
 ;;=BISLAMA^BI^BIS
 ;;^UTILITY(U,$J,.85,57,0)
 ;;=BLISSYMBOLS^^ZBL
 ;;^UTILITY(U,$J,.85,57,1,0)
 ;;=^.8501^2^2
 ;;^UTILITY(U,$J,.85,57,1,1,0)
 ;;=BLISSYMBOLICS
 ;;^UTILITY(U,$J,.85,57,1,2,0)
 ;;=BLISS
 ;;^UTILITY(U,$J,.85,58,0)
 ;;=BOSNIAN^BS^BOS
 ;;^UTILITY(U,$J,.85,59,0)
 ;;=BRAJ^^BRA
 ;;^UTILITY(U,$J,.85,60,0)
 ;;=BRETON^BR^BRE
 ;;^UTILITY(U,$J,.85,61,0)
 ;;=BUGINESE^^BUG
 ;;^UTILITY(U,$J,.85,62,0)
 ;;=BULGARIAN^BG^BUL
 ;;^UTILITY(U,$J,.85,63,0)
 ;;=BURIAT^^BUA
 ;;^UTILITY(U,$J,.85,64,0)
 ;;=BURMESE^MY^MYA^^BUR
 ;;^UTILITY(U,$J,.85,64,1,0)
 ;;=^.8501^1^1
 ;;^UTILITY(U,$J,.85,64,1,1,0)
 ;;=MYANMAR LANGUAGE
 ;;^UTILITY(U,$J,.85,65,0)
 ;;=CADDO^^CAD
 ;;^UTILITY(U,$J,.85,66,0)
 ;;=CATALAN^CA^CAT
 ;;^UTILITY(U,$J,.85,66,1,0)
 ;;=^.8501^1^1
 ;;^UTILITY(U,$J,.85,66,1,1,0)
 ;;=VALENCIAN
 ;;^UTILITY(U,$J,.85,67,0)
 ;;=CEBUANO^^CEB
 ;;^UTILITY(U,$J,.85,68,0)
 ;;=CHAGATAI^^CHG
 ;;^UTILITY(U,$J,.85,69,0)
 ;;=CHAMORRO^CH^CHA
 ;;^UTILITY(U,$J,.85,70,0)
 ;;=CHECHEN^CE^CHE
 ;;^UTILITY(U,$J,.85,71,0)
 ;;=CHEROKEE^^CHR
 ;;^UTILITY(U,$J,.85,72,0)
 ;;=CHEYENNE^^CHY
 ;;^UTILITY(U,$J,.85,73,0)
 ;;=CHIBCHA^^CHB
 ;;^UTILITY(U,$J,.85,74,0)
 ;;=CHICHEWA^NY^NYA
 ;;^UTILITY(U,$J,.85,74,1,0)
 ;;=^.8501^2^2
 ;;^UTILITY(U,$J,.85,74,1,1,0)
 ;;=CHEWA
 ;;^UTILITY(U,$J,.85,74,1,2,0)
 ;;=NYANJA
 ;;^UTILITY(U,$J,.85,75,0)
 ;;=CHINESE^ZH^ZHO^^CHI
 ;;^UTILITY(U,$J,.85,76,0)
 ;;=CHINOOK JARGON^^CHN
 ;;^UTILITY(U,$J,.85,77,0)
 ;;=CHIPEWYAN^^CHP
 ;;^UTILITY(U,$J,.85,77,1,0)
 ;;=^.8501^1^1
 ;;^UTILITY(U,$J,.85,77,1,1,0)
 ;;=DENE SULINE
 ;;^UTILITY(U,$J,.85,78,0)
 ;;=CHOCTAW^^CHO
 ;;^UTILITY(U,$J,.85,79,0)
 ;;=CHUUKESE^^CHK
 ;;^UTILITY(U,$J,.85,80,0)
 ;;=CHUVASH^CV^CHV
 ;;^UTILITY(U,$J,.85,81,0)
 ;;=CLASSICAL NEWARI^^NWC
 ;;^UTILITY(U,$J,.85,81,1,0)
 ;;=^.8501^2^2
 ;;^UTILITY(U,$J,.85,81,1,1,0)
 ;;=OLD NEWARI
 ;;^UTILITY(U,$J,.85,81,1,2,0)
 ;;=CLASSICAL NEPAL BHASA
 ;;^UTILITY(U,$J,.85,82,0)
 ;;=CLASSICAL SYRIAC^^SYC
 ;;^UTILITY(U,$J,.85,83,0)
 ;;=COPTIC^^COP
 ;;^UTILITY(U,$J,.85,84,0)
 ;;=CORNISH^KW^COR
 ;;^UTILITY(U,$J,.85,85,0)
 ;;=CORSICAN^CO^COS
 ;;^UTILITY(U,$J,.85,86,0)
 ;;=CREE^CR^CRE
 ;;^UTILITY(U,$J,.85,87,0)
 ;;=CREEK^^MUS
 ;;^UTILITY(U,$J,.85,88,0)
 ;;=CREOLES AND PIDGINS^^CRP
 ;;^UTILITY(U,$J,.85,89,0)
 ;;=CREOLES AND PIDGINS, ENGLISH-BASED^^CPE
 ;;^UTILITY(U,$J,.85,90,0)
 ;;=CREOLES AND PIDGINS, FRENCH-BASED^^CPF
 ;;^UTILITY(U,$J,.85,91,0)
 ;;=CREOLES AND PIDGINS, PORTUGUESE-BASED^^CPP
 ;;^UTILITY(U,$J,.85,92,0)
 ;;=CRIMEAN TATAR^^CRH
 ;;^UTILITY(U,$J,.85,92,1,0)
 ;;=^.8501^1^1
 ;;^UTILITY(U,$J,.85,92,1,1,0)
 ;;=CRIMEAN TURKISH
 ;;^UTILITY(U,$J,.85,93,0)
 ;;=CROATIAN^HR^HRV
 ;;^UTILITY(U,$J,.85,94,0)
 ;;=CZECH^CS^CES^^CZE
 ;;^UTILITY(U,$J,.85,95,0)
 ;;=DAKOTA^^DAK
 ;;^UTILITY(U,$J,.85,96,0)
 ;;=DANISH^DA^DAN
 ;;^UTILITY(U,$J,.85,97,0)
 ;;=DARGWA^^DAR
 ;;^UTILITY(U,$J,.85,98,0)
 ;;=DELAWARE^^DEL
 ;;^UTILITY(U,$J,.85,99,0)
 ;;=DINKA^^DIN
 ;;^UTILITY(U,$J,.85,100,0)
 ;;=DIVEHI^DV^DIV
 ;;^UTILITY(U,$J,.85,100,1,0)
 ;;=^.8501^2^2
 ;;^UTILITY(U,$J,.85,100,1,1,0)
 ;;=DHIVEHI
 ;;^UTILITY(U,$J,.85,100,1,2,0)
 ;;=MALDIVIAN
 ;;^UTILITY(U,$J,.85,101,0)
 ;;=DOGRI^^DOI
 ;;^UTILITY(U,$J,.85,102,0)
 ;;=DOGRIB^^DGR
 ;;^UTILITY(U,$J,.85,103,0)
 ;;=DUALA^^DUA
 ;;^UTILITY(U,$J,.85,104,0)
 ;;=DUTCH^NL^NLD^^DUT
 ;;^UTILITY(U,$J,.85,104,1,0)
 ;;=^.8501^1^1
 ;;^UTILITY(U,$J,.85,104,1,1,0)
 ;;=FLEMISH
 ;;^UTILITY(U,$J,.85,105,0)
 ;;=DYULA^^DYU
 ;;^UTILITY(U,$J,.85,106,0)
 ;;=DZONGKHA^DZ^DZO
 ;;^UTILITY(U,$J,.85,107,0)
 ;;=EFIK^^EFI
 ;;^UTILITY(U,$J,.85,108,0)
 ;;=EKAJUK^^EKA
 ;;^UTILITY(U,$J,.85,109,0)
 ;;=ELAMITE^^ELX
 ;;^UTILITY(U,$J,.85,110,0)
 ;;=ERZYA^^MYV
 ;;^UTILITY(U,$J,.85,111,0)
 ;;=ESPERANTO^EO^EPO
 ;;^UTILITY(U,$J,.85,112,0)
 ;;=ESTONIAN^ET^EST
 ;;^UTILITY(U,$J,.85,113,0)
 ;;=EWE^EE^EWE
 ;;^UTILITY(U,$J,.85,114,0)
 ;;=EWONDO^^EWO
 ;;^UTILITY(U,$J,.85,115,0)
 ;;=FANG^^FAN
 ;;^UTILITY(U,$J,.85,116,0)
 ;;=FANTI^^FAT
 ;;^UTILITY(U,$J,.85,117,0)
 ;;=FAROESE^FO^FAO
 ;;^UTILITY(U,$J,.85,118,0)
 ;;=FIJIAN^FJ^FIJ
 ;;^UTILITY(U,$J,.85,119,0)
 ;;=FILIPINO^^FIL
 ;;^UTILITY(U,$J,.85,119,1,0)
 ;;=^.8501^1^1
 ;;^UTILITY(U,$J,.85,119,1,1,0)
 ;;=PILIPINO
 ;;^UTILITY(U,$J,.85,120,0)
 ;;=FON^^FON
 ;;^UTILITY(U,$J,.85,121,0)
 ;;=FRISIAN, EASTERN^^FRS
 ;;^UTILITY(U,$J,.85,121,1,0)
 ;;=^.8501^1^1
 ;;^UTILITY(U,$J,.85,121,1,1,0)
 ;;=EASTERN FRISIAN
 ;;^UTILITY(U,$J,.85,122,0)
 ;;=FRISIAN, NORTHERN^^FRR
 ;;^UTILITY(U,$J,.85,122,1,0)
 ;;=^.8501^1^1
 ;;^UTILITY(U,$J,.85,122,1,1,0)
 ;;=NORTHERN FRISIAN
 ;;^UTILITY(U,$J,.85,123,0)
 ;;=FRISIAN, WEST^FY^FRY
 ;;^UTILITY(U,$J,.85,123,1,0)
 ;;=^.8501^2^2
 ;;^UTILITY(U,$J,.85,123,1,1,0)
 ;;=WEST FRISIAN
 ;;^UTILITY(U,$J,.85,123,1,2,0)
 ;;=WESTERN FRISIAN
 ;;^UTILITY(U,$J,.85,124,0)
 ;;=FRIULIAN^^FUR
 ;;^UTILITY(U,$J,.85,125,0)
 ;;=FULA^FF^FUL
 ;;^UTILITY(U,$J,.85,125,1,0)
 ;;=^.8501^4^4
 ;;^UTILITY(U,$J,.85,125,1,1,0)
 ;;=FULANI
 ;;^UTILITY(U,$J,.85,125,1,2,0)
 ;;=FULAH
 ;;^UTILITY(U,$J,.85,125,1,3,0)
 ;;=PULAAR
 ;;^UTILITY(U,$J,.85,125,1,4,0)
 ;;=PULAR
 ;;^UTILITY(U,$J,.85,126,0)
 ;;=GA^^GAA
 ;;^UTILITY(U,$J,.85,127,0)
 ;;=GAELIC^GD^GLA
 ;;^UTILITY(U,$J,.85,127,1,0)
 ;;=^.8501^2^2
 ;;^UTILITY(U,$J,.85,127,1,1,0)
 ;;=SCOTS GAELIC
 ;;^UTILITY(U,$J,.85,127,1,2,0)
 ;;=SCOTTISH GAELIC
 ;;^UTILITY(U,$J,.85,128,0)
 ;;=GALIBI CARIB^^CAR
 ;;^UTILITY(U,$J,.85,129,0)
 ;;=GALICIAN^GL^GLG
 ;;^UTILITY(U,$J,.85,130,0)
 ;;=GANDA^LG^LUG
 ;;^UTILITY(U,$J,.85,131,0)
 ;;=GAYO^^GAY
 ;;^UTILITY(U,$J,.85,132,0)
 ;;=GBAYA^^GBA
 ;;^UTILITY(U,$J,.85,133,0)
 ;;=GEEZ^^GEZ
 ;;^UTILITY(U,$J,.85,134,0)
 ;;=GEORGIAN^KA^KAT^^GEO
 ;;^UTILITY(U,$J,.85,135,0)
 ;;=GILBERTESE^^GIL
 ;;^UTILITY(U,$J,.85,136,0)
 ;;=GONDI^^GON