source: lang-file4mu1and2/DMLAI003.m@ 1715

Last change on this file since 1715 was 1598, checked in by Sam Habiel, 12 years ago

Updated Language files INIT to be in DMLA rather than DILA per Mr. Timson's request.

File size: 14.9 KB
RevLine 
[1598]1DMLAI003 ; ; 20-NOV-2012
2 ;;22.2;LANGUAGE FILE INITS;;NOV 20, 2012
3 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
4Q Q
5 ;;^UTILITY(U,$J,.85)
6 ;;=^DI(.85,
7 ;;^UTILITY(U,$J,.85,0)
8 ;;=LANGUAGE^.85I^18^533
9 ;;^UTILITY(U,$J,.85,1,0)
10 ;;=ENGLISH^EN^ENG
11 ;;^UTILITY(U,$J,.85,1,1,0)
12 ;;=^.8501^2^2
13 ;;^UTILITY(U,$J,.85,1,1,1,0)
14 ;;=MODERN ENGLISH (1500-)
15 ;;^UTILITY(U,$J,.85,1,1,2,0)
16 ;;=ENGLISH,MODERN (1500-)
17 ;;^UTILITY(U,$J,.85,1,"CRD")
18 ;;=I Y S Y=$FN(Y,",")
19 ;;^UTILITY(U,$J,.85,1,"DD")
20 ;;=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[".")
21 ;;^UTILITY(U,$J,.85,1,"FMTE")
22 ;;=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
23 ;;^UTILITY(U,$J,.85,1,"LC")
24 ;;=S Y=$TR(Y,"ABCDEFGHIJKLMNOPQRSTUVWXYZ","abcdefghijklmnopqrstuvwxyz")
25 ;;^UTILITY(U,$J,.85,1,"ORD")
26 ;;=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")
27 ;;^UTILITY(U,$J,.85,1,"TIME")
28 ;;=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:"")
29 ;;^UTILITY(U,$J,.85,1,"UC")
30 ;;=S Y=$TR(Y,"abcdefghijklmnopqrstuvwxyz","ABCDEFGHIJKLMNOPQRSTUVWXYZ")
31 ;;^UTILITY(U,$J,.85,2,0)
32 ;;=GERMAN^DE^DEU^^GER
33 ;;^UTILITY(U,$J,.85,2,1,0)
34 ;;=^.8501^7^7
35 ;;^UTILITY(U,$J,.85,2,1,1,0)
36 ;;=GERMAN, STANDARD
37 ;;^UTILITY(U,$J,.85,2,1,2,0)
38 ;;=STANDARD GERMAN
39 ;;^UTILITY(U,$J,.85,2,1,3,0)
40 ;;=DEUTSCH
41 ;;^UTILITY(U,$J,.85,2,1,4,0)
42 ;;=DEUTSCH SPRACHE
43 ;;^UTILITY(U,$J,.85,2,1,5,0)
44 ;;=TEDESCO
45 ;;^UTILITY(U,$J,.85,2,1,6,0)
46 ;;=MODERN GERMAN (1500-)
47 ;;^UTILITY(U,$J,.85,2,1,7,0)
48 ;;=GERMAN,MODERN (1500-)
49 ;;^UTILITY(U,$J,.85,2,"CRD")
50 ;;=S:$G(Y) Y=$TR($FN(Y,","),",",".")
51 ;;^UTILITY(U,$J,.85,2,"DD")
52 ;;=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[".")
53 ;;^UTILITY(U,$J,.85,2,"LC")
54 ;;=S Y=$TR(Y,"ABCDEFGHIJKLMNOPQRSTUVWXYZ[]\","abcdefghijklmnopqrstuvwxyz{}|")
55 ;;^UTILITY(U,$J,.85,2,"ORD")
56 ;;=S:$G(Y) Y=Y_"."
57 ;;^UTILITY(U,$J,.85,2,"TIME")
58 ;;=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:"")
59 ;;^UTILITY(U,$J,.85,2,"UC")
60 ;;=S Y=$TR(Y,"abcdefghijklmnopqrstuvwxyz{}|","ABCDEFGHIJKLMNOPQRSTUVWXYZ[]\")
61 ;;^UTILITY(U,$J,.85,3,0)
62 ;;=SPANISH^ES^SPA
63 ;;^UTILITY(U,$J,.85,3,1,0)
64 ;;=^.8501^5^5
65 ;;^UTILITY(U,$J,.85,3,1,1,0)
66 ;;=CASTILIAN
67 ;;^UTILITY(U,$J,.85,3,1,2,0)
68 ;;=CASTELLANO
69 ;;^UTILITY(U,$J,.85,3,1,3,0)
70 ;;=ESPANOL
71 ;;^UTILITY(U,$J,.85,3,1,4,0)
72 ;;=MODERN SPANISH (1500-)
73 ;;^UTILITY(U,$J,.85,3,1,5,0)
74 ;;=SPANISH, MODERN (1500-)
75 ;;^UTILITY(U,$J,.85,4,0)
76 ;;=FRENCH^FR^FRA^^FRE
77 ;;^UTILITY(U,$J,.85,4,1,0)
78 ;;=^.8501^3^3
79 ;;^UTILITY(U,$J,.85,4,1,1,0)
80 ;;=FRANCAIS
81 ;;^UTILITY(U,$J,.85,4,1,2,0)
82 ;;=MODERN FRENCH (1600-)
83 ;;^UTILITY(U,$J,.85,4,1,3,0)
84 ;;=FRENCH, MODERN (1600-)
85 ;;^UTILITY(U,$J,.85,5,0)
86 ;;=FINNISH^FI^FIN
87 ;;^UTILITY(U,$J,.85,5,1,0)
88 ;;=^.8501^3^3
89 ;;^UTILITY(U,$J,.85,5,1,1,0)
90 ;;=SUOMEA
91 ;;^UTILITY(U,$J,.85,5,1,2,0)
92 ;;=SUOMI
93 ;;^UTILITY(U,$J,.85,5,1,3,0)
94 ;;=SUOMEN KIELI
95 ;;^UTILITY(U,$J,.85,5,"DD")
96 ;;=X:$G(Y) ^DD("DD")
97 ;;^UTILITY(U,$J,.85,5,"ORD")
98 ;;=I $G(Y) S Y=Y_"."
99 ;;^UTILITY(U,$J,.85,6,0)
100 ;;=ITALIAN^IT^ITA
101 ;;^UTILITY(U,$J,.85,6,1,0)
102 ;;=^.8501^2^2
103 ;;^UTILITY(U,$J,.85,6,1,1,0)
104 ;;=ITALIANO
105 ;;^UTILITY(U,$J,.85,6,1,2,0)
106 ;;=LINGUA ITALIANA
107 ;;^UTILITY(U,$J,.85,7,0)
108 ;;=PORTUGUESE^PT^POR
109 ;;^UTILITY(U,$J,.85,7,1,0)
110 ;;=^.8501^4^4
111 ;;^UTILITY(U,$J,.85,7,1,1,0)
112 ;;=PORTUGUES
113 ;;^UTILITY(U,$J,.85,7,1,2,0)
114 ;;=LINGUA PORTUGUESA
115 ;;^UTILITY(U,$J,.85,7,1,3,0)
116 ;;=MODERN PORTUGUESE (1516-)
117 ;;^UTILITY(U,$J,.85,7,1,4,0)
118 ;;=PORTUGUESE, MODERN (1516-)
119 ;;^UTILITY(U,$J,.85,8,0)
120 ;;=ABKHAZ^AB^ABK
121 ;;^UTILITY(U,$J,.85,8,1,0)
122 ;;=^.8501^2^2
123 ;;^UTILITY(U,$J,.85,8,1,1,0)
124 ;;=ABKHAZIAN
125 ;;^UTILITY(U,$J,.85,8,1,2,0)
126 ;;=ABXAZO
127 ;;^UTILITY(U,$J,.85,9,0)
128 ;;=ACHINESE^^ACE
129 ;;^UTILITY(U,$J,.85,10,0)
130 ;;=ARABIC^AR^ARA
131 ;;^UTILITY(U,$J,.85,10,1,0)
132 ;;=^.8501^2^2
133 ;;^UTILITY(U,$J,.85,10,1,1,0)
134 ;;=AL-'ARABIYYAH
135 ;;^UTILITY(U,$J,.85,10,1,2,0)
136 ;;='ARABI
137 ;;^UTILITY(U,$J,.85,11,0)
138 ;;=RUSSIAN^RU^RUS
139 ;;^UTILITY(U,$J,.85,11,1,0)
140 ;;=^.8501^2^2
141 ;;^UTILITY(U,$J,.85,11,1,1,0)
142 ;;=RUSSKI
143 ;;^UTILITY(U,$J,.85,11,1,2,0)
144 ;;=RUSSKIY YAZYK
145 ;;^UTILITY(U,$J,.85,12,0)
146 ;;=GREEK^EL^ELL^^GRE
147 ;;^UTILITY(U,$J,.85,12,1,0)
148 ;;=^.8501^9^9
149 ;;^UTILITY(U,$J,.85,12,1,1,0)
150 ;;=ELLINIKA
151 ;;^UTILITY(U,$J,.85,12,1,2,0)
152 ;;=ELLINIKI GLOSSA
153 ;;^UTILITY(U,$J,.85,12,1,3,0)
154 ;;=GRAECAE
155 ;;^UTILITY(U,$J,.85,12,1,4,0)
156 ;;=GREC
157 ;;^UTILITY(U,$J,.85,12,1,5,0)
158 ;;=GRECO
159 ;;^UTILITY(U,$J,.85,12,1,6,0)
160 ;;=NEO-HELLENIC
161 ;;^UTILITY(U,$J,.85,12,1,7,0)
162 ;;=ROMAIC
163 ;;^UTILITY(U,$J,.85,12,1,8,0)
164 ;;=MODERN GREEK (1453-)
165 ;;^UTILITY(U,$J,.85,12,1,9,0)
166 ;;=GREEK, MODERN (1453-)
167 ;;^UTILITY(U,$J,.85,13,0)
168 ;;=ACOLI^^ACH
169 ;;^UTILITY(U,$J,.85,14,0)
170 ;;=ADANGME^^ADA
171 ;;^UTILITY(U,$J,.85,15,0)
172 ;;=ADYGHE^^ADY
173 ;;^UTILITY(U,$J,.85,15,1,0)
174 ;;=^.8501^1^1
175 ;;^UTILITY(U,$J,.85,15,1,1,0)
176 ;;=ADYGEI
177 ;;^UTILITY(U,$J,.85,16,0)
178 ;;=AFAR^AA^AAR
179 ;;^UTILITY(U,$J,.85,16,1,0)
180 ;;=^.8501^4^4
181 ;;^UTILITY(U,$J,.85,16,1,1,0)
182 ;;=QAFAR AF
183 ;;^UTILITY(U,$J,.85,16,1,2,0)
184 ;;='AFAR AF
185 ;;^UTILITY(U,$J,.85,16,1,3,0)
186 ;;=ADAL
187 ;;^UTILITY(U,$J,.85,16,1,4,0)
188 ;;=AFARAF
189 ;;^UTILITY(U,$J,.85,17,0)
190 ;;=AFRIHILI^^AFH
191 ;;^UTILITY(U,$J,.85,18,0)
192 ;;=HEBREW^HE^HEB
193 ;;^UTILITY(U,$J,.85,18,1,0)
194 ;;=^.8501^3^3
195 ;;^UTILITY(U,$J,.85,18,1,1,0)
196 ;;=IVRIT
197 ;;^UTILITY(U,$J,.85,18,1,2,0)
198 ;;=MODERN HEBREW (1881-)
199 ;;^UTILITY(U,$J,.85,18,1,3,0)
200 ;;=HEBREW, MODERN (1881-)
201 ;;^UTILITY(U,$J,.85,19,0)
202 ;;=AFRIKAANS^AF^AFR
203 ;;^UTILITY(U,$J,.85,20,0)
204 ;;=AINU^^AIN
205 ;;^UTILITY(U,$J,.85,21,0)
206 ;;=AKAN^AK^AKA
207 ;;^UTILITY(U,$J,.85,22,0)
208 ;;=AKKADIAN^^AKK
209 ;;^UTILITY(U,$J,.85,23,0)
210 ;;=ALBANIAN^SQ^SQI^^ALB
211 ;;^UTILITY(U,$J,.85,23,1,0)
212 ;;=^.8501^2^2
213 ;;^UTILITY(U,$J,.85,23,1,1,0)
214 ;;=SHQIP
215 ;;^UTILITY(U,$J,.85,23,1,2,0)
216 ;;=GJUHA SHQIPE
217 ;;^UTILITY(U,$J,.85,24,0)
218 ;;=ALEUT^^ALE
219 ;;^UTILITY(U,$J,.85,25,0)
220 ;;=ALTAI, SOUTHERN^^ALT
221 ;;^UTILITY(U,$J,.85,25,1,0)
222 ;;=^.8501^1^1
223 ;;^UTILITY(U,$J,.85,25,1,1,0)
224 ;;=SOUTHERN ALTAI
225 ;;^UTILITY(U,$J,.85,26,0)
226 ;;=AMHARIC^AM^AMH
227 ;;^UTILITY(U,$J,.85,26,1,0)
228 ;;=^.8501^4^4
229 ;;^UTILITY(U,$J,.85,26,1,1,0)
230 ;;=ABYSSINIAN
231 ;;^UTILITY(U,$J,.85,26,1,2,0)
232 ;;=AMARIGNA
233 ;;^UTILITY(U,$J,.85,26,1,3,0)
234 ;;=AMARINYA
235 ;;^UTILITY(U,$J,.85,26,1,4,0)
236 ;;=ETHIOPIAN
237 ;;^UTILITY(U,$J,.85,27,0)
238 ;;=ANCIENT EGYPTIAN^^EGY
239 ;;^UTILITY(U,$J,.85,27,1,0)
240 ;;=^.8501^1^1
241 ;;^UTILITY(U,$J,.85,27,1,1,0)
242 ;;=EGYPTIAN, ANCIENT
243 ;;^UTILITY(U,$J,.85,28,0)
244 ;;=ANCIENT GREEK^^GRC
245 ;;^UTILITY(U,$J,.85,28,1,0)
246 ;;=^.8501^1^1
247 ;;^UTILITY(U,$J,.85,28,1,1,0)
248 ;;=GREEK, ANCIENT (TO 1453)
249 ;;^UTILITY(U,$J,.85,29,0)
250 ;;=ANGIKA^^ANP
251 ;;^UTILITY(U,$J,.85,30,0)
252 ;;=ARAGONESE^AN^ARG
253 ;;^UTILITY(U,$J,.85,30,1,0)
254 ;;=^.8501^6^6
255 ;;^UTILITY(U,$J,.85,30,1,1,0)
256 ;;=ALTOARAGONES
257 ;;^UTILITY(U,$J,.85,30,1,2,0)
258 ;;=ARAGOIERAZ
259 ;;^UTILITY(U,$J,.85,30,1,3,0)
260 ;;=ARAGONES
261 ;;^UTILITY(U,$J,.85,30,1,4,0)
262 ;;=FABLA ARAGONESA
263 ;;^UTILITY(U,$J,.85,30,1,5,0)
264 ;;=HIGH ARAGONESE
265 ;;^UTILITY(U,$J,.85,30,1,6,0)
266 ;;=PATUES
267 ;;^UTILITY(U,$J,.85,31,0)
268 ;;=ARAPAHO^^ARP
269 ;;^UTILITY(U,$J,.85,32,0)
270 ;;=ARAWAK^^ARW
271 ;;^UTILITY(U,$J,.85,33,0)
272 ;;=ARMENIAN^HY^HYE^^ARM
273 ;;^UTILITY(U,$J,.85,33,1,0)
274 ;;=^.8501^7^7
275 ;;^UTILITY(U,$J,.85,33,1,1,0)
276 ;;=HAYEREN
277 ;;^UTILITY(U,$J,.85,33,1,2,0)
278 ;;=ARMJANSKI YAZYK
279 ;;^UTILITY(U,$J,.85,33,1,3,0)
280 ;;=ENA
281 ;;^UTILITY(U,$J,.85,33,1,4,0)
282 ;;=ERMENI DILI
283 ;;^UTILITY(U,$J,.85,33,1,5,0)
284 ;;=ERMENICE
285 ;;^UTILITY(U,$J,.85,33,1,6,0)
286 ;;=HAIEREN
287 ;;^UTILITY(U,$J,.85,33,1,7,0)
288 ;;=SOMKHURI
289 ;;^UTILITY(U,$J,.85,34,0)
290 ;;=AROMANIAN^^RUP
291 ;;^UTILITY(U,$J,.85,34,1,0)
292 ;;=^.8501^2^2
293 ;;^UTILITY(U,$J,.85,34,1,1,0)
294 ;;=ARUMANIAN
295 ;;^UTILITY(U,$J,.85,34,1,2,0)
296 ;;=MACEDO-ROMANIAN
297 ;;^UTILITY(U,$J,.85,35,0)
298 ;;=ASSAMESE^AS^ASM
299 ;;^UTILITY(U,$J,.85,35,1,0)
300 ;;=^.8501^3^3
301 ;;^UTILITY(U,$J,.85,35,1,1,0)
302 ;;=ASAMBE
303 ;;^UTILITY(U,$J,.85,35,1,2,0)
304 ;;=ASAMI
305 ;;^UTILITY(U,$J,.85,35,1,3,0)
306 ;;=ASAMIYA
307 ;;^UTILITY(U,$J,.85,36,0)
308 ;;=ASTURIAN^^AST
309 ;;^UTILITY(U,$J,.85,36,1,0)
310 ;;=^.8501^3^3
311 ;;^UTILITY(U,$J,.85,36,1,1,0)
312 ;;=BABLE
313 ;;^UTILITY(U,$J,.85,36,1,2,0)
314 ;;=LEONESE
315 ;;^UTILITY(U,$J,.85,36,1,3,0)
316 ;;=ASTURLEONESE
317 ;;^UTILITY(U,$J,.85,37,0)
318 ;;=AVARIC^AV^AVA
319 ;;^UTILITY(U,$J,.85,38,0)
320 ;;=AVESTAN^AE^AVE
321 ;;^UTILITY(U,$J,.85,39,0)
322 ;;=AWADHI^^AWA
323 ;;^UTILITY(U,$J,.85,40,0)
324 ;;=AYMARA^AY^AYM
325 ;;^UTILITY(U,$J,.85,41,0)
326 ;;=AZERBAIJANI^AZ^AZE
327 ;;^UTILITY(U,$J,.85,42,0)
328 ;;=BALINESE^^BAN
329 ;;^UTILITY(U,$J,.85,43,0)
330 ;;=BALUCHI^^BAL
331 ;;^UTILITY(U,$J,.85,44,0)
332 ;;=BAMBARA^BM^BAM
333 ;;^UTILITY(U,$J,.85,45,0)
334 ;;=BASA^^BAS
335 ;;^UTILITY(U,$J,.85,46,0)
336 ;;=BASHKIR^BA^BAK
337 ;;^UTILITY(U,$J,.85,47,0)
338 ;;=BASQUE^EU^EUS^^BAQ
339 ;;^UTILITY(U,$J,.85,47,1,0)
340 ;;=^.8501^1^1
341 ;;^UTILITY(U,$J,.85,47,1,1,0)
342 ;;=EUSKARA
343 ;;^UTILITY(U,$J,.85,48,0)
344 ;;=BEJA^^BEJ
345 ;;^UTILITY(U,$J,.85,48,1,0)
346 ;;=^.8501^1^1
347 ;;^UTILITY(U,$J,.85,48,1,1,0)
348 ;;=BEDAWIYET
349 ;;^UTILITY(U,$J,.85,49,0)
350 ;;=BELARUSIAN^BE^BEL
351 ;;^UTILITY(U,$J,.85,50,0)
352 ;;=BEMBA^^BEM
353 ;;^UTILITY(U,$J,.85,51,0)
354 ;;=BENGALI^BN^BEN
355 ;;^UTILITY(U,$J,.85,52,0)
356 ;;=BHOJPURI^^BHO
357 ;;^UTILITY(U,$J,.85,53,0)
358 ;;=BIKOL^^BIK
359 ;;^UTILITY(U,$J,.85,54,0)
360 ;;=BILIN^^BYN
361 ;;^UTILITY(U,$J,.85,54,1,0)
362 ;;=^.8501^1^1
363 ;;^UTILITY(U,$J,.85,54,1,1,0)
364 ;;=BLIN
365 ;;^UTILITY(U,$J,.85,55,0)
366 ;;=BINI^^BIN
367 ;;^UTILITY(U,$J,.85,55,1,0)
368 ;;=^.8501^1^1
369 ;;^UTILITY(U,$J,.85,55,1,1,0)
370 ;;=EDO
371 ;;^UTILITY(U,$J,.85,56,0)
372 ;;=BISLAMA^BI^BIS
373 ;;^UTILITY(U,$J,.85,57,0)
374 ;;=BLISSYMBOLS^^ZBL
375 ;;^UTILITY(U,$J,.85,57,1,0)
376 ;;=^.8501^2^2
377 ;;^UTILITY(U,$J,.85,57,1,1,0)
378 ;;=BLISSYMBOLICS
379 ;;^UTILITY(U,$J,.85,57,1,2,0)
380 ;;=BLISS
381 ;;^UTILITY(U,$J,.85,58,0)
382 ;;=BOSNIAN^BS^BOS
383 ;;^UTILITY(U,$J,.85,59,0)
384 ;;=BRAJ^^BRA
385 ;;^UTILITY(U,$J,.85,60,0)
386 ;;=BRETON^BR^BRE
387 ;;^UTILITY(U,$J,.85,61,0)
388 ;;=BUGINESE^^BUG
389 ;;^UTILITY(U,$J,.85,62,0)
390 ;;=BULGARIAN^BG^BUL
391 ;;^UTILITY(U,$J,.85,63,0)
392 ;;=BURIAT^^BUA
393 ;;^UTILITY(U,$J,.85,64,0)
394 ;;=BURMESE^MY^MYA^^BUR
395 ;;^UTILITY(U,$J,.85,64,1,0)
396 ;;=^.8501^1^1
397 ;;^UTILITY(U,$J,.85,64,1,1,0)
398 ;;=MYANMAR LANGUAGE
399 ;;^UTILITY(U,$J,.85,65,0)
400 ;;=CADDO^^CAD
401 ;;^UTILITY(U,$J,.85,66,0)
402 ;;=CATALAN^CA^CAT
403 ;;^UTILITY(U,$J,.85,66,1,0)
404 ;;=^.8501^1^1
405 ;;^UTILITY(U,$J,.85,66,1,1,0)
406 ;;=VALENCIAN
407 ;;^UTILITY(U,$J,.85,67,0)
408 ;;=CEBUANO^^CEB
409 ;;^UTILITY(U,$J,.85,68,0)
410 ;;=CHAGATAI^^CHG
411 ;;^UTILITY(U,$J,.85,69,0)
412 ;;=CHAMORRO^CH^CHA
413 ;;^UTILITY(U,$J,.85,70,0)
414 ;;=CHECHEN^CE^CHE
415 ;;^UTILITY(U,$J,.85,71,0)
416 ;;=CHEROKEE^^CHR
417 ;;^UTILITY(U,$J,.85,72,0)
418 ;;=CHEYENNE^^CHY
419 ;;^UTILITY(U,$J,.85,73,0)
420 ;;=CHIBCHA^^CHB
421 ;;^UTILITY(U,$J,.85,74,0)
422 ;;=CHICHEWA^NY^NYA
423 ;;^UTILITY(U,$J,.85,74,1,0)
424 ;;=^.8501^2^2
425 ;;^UTILITY(U,$J,.85,74,1,1,0)
426 ;;=CHEWA
427 ;;^UTILITY(U,$J,.85,74,1,2,0)
428 ;;=NYANJA
429 ;;^UTILITY(U,$J,.85,75,0)
430 ;;=CHINESE^ZH^ZHO^^CHI
431 ;;^UTILITY(U,$J,.85,76,0)
432 ;;=CHINOOK JARGON^^CHN
433 ;;^UTILITY(U,$J,.85,77,0)
434 ;;=CHIPEWYAN^^CHP
435 ;;^UTILITY(U,$J,.85,77,1,0)
436 ;;=^.8501^1^1
437 ;;^UTILITY(U,$J,.85,77,1,1,0)
438 ;;=DENE SULINE
439 ;;^UTILITY(U,$J,.85,78,0)
440 ;;=CHOCTAW^^CHO
441 ;;^UTILITY(U,$J,.85,79,0)
442 ;;=CHUUKESE^^CHK
443 ;;^UTILITY(U,$J,.85,80,0)
444 ;;=CHUVASH^CV^CHV
445 ;;^UTILITY(U,$J,.85,81,0)
446 ;;=CLASSICAL NEWARI^^NWC
447 ;;^UTILITY(U,$J,.85,81,1,0)
448 ;;=^.8501^2^2
449 ;;^UTILITY(U,$J,.85,81,1,1,0)
450 ;;=OLD NEWARI
451 ;;^UTILITY(U,$J,.85,81,1,2,0)
452 ;;=CLASSICAL NEPAL BHASA
453 ;;^UTILITY(U,$J,.85,82,0)
454 ;;=CLASSICAL SYRIAC^^SYC
455 ;;^UTILITY(U,$J,.85,83,0)
456 ;;=COPTIC^^COP
457 ;;^UTILITY(U,$J,.85,84,0)
458 ;;=CORNISH^KW^COR
459 ;;^UTILITY(U,$J,.85,85,0)
460 ;;=CORSICAN^CO^COS
461 ;;^UTILITY(U,$J,.85,86,0)
462 ;;=CREE^CR^CRE
463 ;;^UTILITY(U,$J,.85,87,0)
464 ;;=CREEK^^MUS
465 ;;^UTILITY(U,$J,.85,88,0)
466 ;;=CREOLES AND PIDGINS^^CRP
467 ;;^UTILITY(U,$J,.85,89,0)
468 ;;=CREOLES AND PIDGINS, ENGLISH-BASED^^CPE
469 ;;^UTILITY(U,$J,.85,90,0)
470 ;;=CREOLES AND PIDGINS, FRENCH-BASED^^CPF
471 ;;^UTILITY(U,$J,.85,91,0)
472 ;;=CREOLES AND PIDGINS, PORTUGUESE-BASED^^CPP
473 ;;^UTILITY(U,$J,.85,92,0)
474 ;;=CRIMEAN TATAR^^CRH
475 ;;^UTILITY(U,$J,.85,92,1,0)
476 ;;=^.8501^1^1
477 ;;^UTILITY(U,$J,.85,92,1,1,0)
478 ;;=CRIMEAN TURKISH
479 ;;^UTILITY(U,$J,.85,93,0)
480 ;;=CROATIAN^HR^HRV
481 ;;^UTILITY(U,$J,.85,94,0)
482 ;;=CZECH^CS^CES^^CZE
483 ;;^UTILITY(U,$J,.85,95,0)
484 ;;=DAKOTA^^DAK
485 ;;^UTILITY(U,$J,.85,96,0)
486 ;;=DANISH^DA^DAN
487 ;;^UTILITY(U,$J,.85,97,0)
488 ;;=DARGWA^^DAR
489 ;;^UTILITY(U,$J,.85,98,0)
490 ;;=DELAWARE^^DEL
491 ;;^UTILITY(U,$J,.85,99,0)
492 ;;=DINKA^^DIN
493 ;;^UTILITY(U,$J,.85,100,0)
494 ;;=DIVEHI^DV^DIV
495 ;;^UTILITY(U,$J,.85,100,1,0)
496 ;;=^.8501^2^2
497 ;;^UTILITY(U,$J,.85,100,1,1,0)
498 ;;=DHIVEHI
499 ;;^UTILITY(U,$J,.85,100,1,2,0)
500 ;;=MALDIVIAN
501 ;;^UTILITY(U,$J,.85,101,0)
502 ;;=DOGRI^^DOI
503 ;;^UTILITY(U,$J,.85,102,0)
504 ;;=DOGRIB^^DGR
505 ;;^UTILITY(U,$J,.85,103,0)
506 ;;=DUALA^^DUA
507 ;;^UTILITY(U,$J,.85,104,0)
508 ;;=DUTCH^NL^NLD^^DUT
509 ;;^UTILITY(U,$J,.85,104,1,0)
510 ;;=^.8501^1^1
511 ;;^UTILITY(U,$J,.85,104,1,1,0)
512 ;;=FLEMISH
513 ;;^UTILITY(U,$J,.85,105,0)
514 ;;=DYULA^^DYU
515 ;;^UTILITY(U,$J,.85,106,0)
516 ;;=DZONGKHA^DZ^DZO
517 ;;^UTILITY(U,$J,.85,107,0)
518 ;;=EFIK^^EFI
519 ;;^UTILITY(U,$J,.85,108,0)
520 ;;=EKAJUK^^EKA
521 ;;^UTILITY(U,$J,.85,109,0)
522 ;;=ELAMITE^^ELX
523 ;;^UTILITY(U,$J,.85,110,0)
524 ;;=ERZYA^^MYV
525 ;;^UTILITY(U,$J,.85,111,0)
526 ;;=ESPERANTO^EO^EPO
527 ;;^UTILITY(U,$J,.85,112,0)
528 ;;=ESTONIAN^ET^EST
529 ;;^UTILITY(U,$J,.85,113,0)
530 ;;=EWE^EE^EWE
531 ;;^UTILITY(U,$J,.85,114,0)
532 ;;=EWONDO^^EWO
533 ;;^UTILITY(U,$J,.85,115,0)
534 ;;=FANG^^FAN
535 ;;^UTILITY(U,$J,.85,116,0)
536 ;;=FANTI^^FAT
537 ;;^UTILITY(U,$J,.85,117,0)
538 ;;=FAROESE^FO^FAO
539 ;;^UTILITY(U,$J,.85,118,0)
540 ;;=FIJIAN^FJ^FIJ
541 ;;^UTILITY(U,$J,.85,119,0)
542 ;;=FILIPINO^^FIL
543 ;;^UTILITY(U,$J,.85,119,1,0)
544 ;;=^.8501^1^1
545 ;;^UTILITY(U,$J,.85,119,1,1,0)
546 ;;=PILIPINO
547 ;;^UTILITY(U,$J,.85,120,0)
548 ;;=FON^^FON
549 ;;^UTILITY(U,$J,.85,121,0)
550 ;;=FRISIAN, EASTERN^^FRS
551 ;;^UTILITY(U,$J,.85,121,1,0)
552 ;;=^.8501^1^1
553 ;;^UTILITY(U,$J,.85,121,1,1,0)
554 ;;=EASTERN FRISIAN
555 ;;^UTILITY(U,$J,.85,122,0)
556 ;;=FRISIAN, NORTHERN^^FRR
557 ;;^UTILITY(U,$J,.85,122,1,0)
558 ;;=^.8501^1^1
559 ;;^UTILITY(U,$J,.85,122,1,1,0)
560 ;;=NORTHERN FRISIAN
561 ;;^UTILITY(U,$J,.85,123,0)
562 ;;=FRISIAN, WEST^FY^FRY
563 ;;^UTILITY(U,$J,.85,123,1,0)
564 ;;=^.8501^2^2
565 ;;^UTILITY(U,$J,.85,123,1,1,0)
566 ;;=WEST FRISIAN
567 ;;^UTILITY(U,$J,.85,123,1,2,0)
568 ;;=WESTERN FRISIAN
569 ;;^UTILITY(U,$J,.85,124,0)
570 ;;=FRIULIAN^^FUR
571 ;;^UTILITY(U,$J,.85,125,0)
572 ;;=FULA^FF^FUL
573 ;;^UTILITY(U,$J,.85,125,1,0)
574 ;;=^.8501^4^4
575 ;;^UTILITY(U,$J,.85,125,1,1,0)
576 ;;=FULANI
577 ;;^UTILITY(U,$J,.85,125,1,2,0)
578 ;;=FULAH
579 ;;^UTILITY(U,$J,.85,125,1,3,0)
580 ;;=PULAAR
581 ;;^UTILITY(U,$J,.85,125,1,4,0)
582 ;;=PULAR
583 ;;^UTILITY(U,$J,.85,126,0)
584 ;;=GA^^GAA
585 ;;^UTILITY(U,$J,.85,127,0)
586 ;;=GAELIC^GD^GLA
587 ;;^UTILITY(U,$J,.85,127,1,0)
588 ;;=^.8501^2^2
589 ;;^UTILITY(U,$J,.85,127,1,1,0)
590 ;;=SCOTS GAELIC
591 ;;^UTILITY(U,$J,.85,127,1,2,0)
592 ;;=SCOTTISH GAELIC
593 ;;^UTILITY(U,$J,.85,128,0)
594 ;;=GALIBI CARIB^^CAR
595 ;;^UTILITY(U,$J,.85,129,0)
596 ;;=GALICIAN^GL^GLG
597 ;;^UTILITY(U,$J,.85,130,0)
598 ;;=GANDA^LG^LUG
599 ;;^UTILITY(U,$J,.85,131,0)
600 ;;=GAYO^^GAY
601 ;;^UTILITY(U,$J,.85,132,0)
602 ;;=GBAYA^^GBA
603 ;;^UTILITY(U,$J,.85,133,0)
604 ;;=GEEZ^^GEZ
605 ;;^UTILITY(U,$J,.85,134,0)
606 ;;=GEORGIAN^KA^KAT^^GEO
607 ;;^UTILITY(U,$J,.85,135,0)
608 ;;=GILBERTESE^^GIL
609 ;;^UTILITY(U,$J,.85,136,0)
610 ;;=GONDI^^GON
Note: See TracBrowser for help on using the repository browser.