BGP53W3 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAR 16, 2015;
;;15.1;IHS CLINICAL REPORTING;;MAY 06, 2015;Build 143
;
START ;
K:'$G(ATXPGMC) ^TMP("ATX",$J)
S ATXPGMC=$G(ATXPGMC)+1
F ATXI=1:1 S X=$P($T(TMP+ATXI),";;",2,99) Q:X="" S X="^TMP(""ATX"",$J,"_X,ATXI=ATXI+1,Y=$P($T(TMP+ATXI),";;",2,99) S @X=Y
Q
;
TMP ;;TAXONOMY (WITH BULLETIN)
;;9002226.02101,"614,14752-0 ",.02)
;;14752-0
;;9002226.02101,"614,14753-8 ",.01)
;;14753-8
;;9002226.02101,"614,14753-8 ",.02)
;;14753-8
;;9002226.02101,"614,14754-6 ",.01)
;;14754-6
;;9002226.02101,"614,14754-6 ",.02)
;;14754-6
;;9002226.02101,"614,14755-3 ",.01)
;;14755-3
;;9002226.02101,"614,14755-3 ",.02)
;;14755-3
;;9002226.02101,"614,14756-1 ",.01)
;;14756-1
;;9002226.02101,"614,14756-1 ",.02)
;;14756-1
;;9002226.02101,"614,14757-9 ",.01)
;;14757-9
;;9002226.02101,"614,14757-9 ",.02)
;;14757-9
;;9002226.02101,"614,14758-7 ",.01)
;;14758-7
;;9002226.02101,"614,14758-7 ",.02)
;;14758-7
;;9002226.02101,"614,14759-5 ",.01)
;;14759-5
;;9002226.02101,"614,14759-5 ",.02)
;;14759-5
;;9002226.02101,"614,14760-3 ",.01)
;;14760-3
;;9002226.02101,"614,14760-3 ",.02)
;;14760-3
;;9002226.02101,"614,14761-1 ",.01)
;;14761-1
;;9002226.02101,"614,14761-1 ",.02)
;;14761-1
;;9002226.02101,"614,14762-9 ",.01)
;;14762-9
;;9002226.02101,"614,14762-9 ",.02)
;;14762-9
;;9002226.02101,"614,14763-7 ",.01)
;;14763-7
;;9002226.02101,"614,14763-7 ",.02)
;;14763-7
;;9002226.02101,"614,14764-5 ",.01)
;;14764-5
;;9002226.02101,"614,14764-5 ",.02)
;;14764-5
;;9002226.02101,"614,14765-2 ",.01)
;;14765-2
;;9002226.02101,"614,14765-2 ",.02)
;;14765-2
;;9002226.02101,"614,14766-0 ",.01)
;;14766-0
;;9002226.02101,"614,14766-0 ",.02)
;;14766-0
;;9002226.02101,"614,14767-8 ",.01)
;;14767-8
;;9002226.02101,"614,14767-8 ",.02)
;;14767-8
;;9002226.02101,"614,14768-6 ",.01)
;;14768-6
;;9002226.02101,"614,14768-6 ",.02)
;;14768-6
;;9002226.02101,"614,14769-4 ",.01)
;;14769-4
;;9002226.02101,"614,14769-4 ",.02)
;;14769-4
;;9002226.02101,"614,14770-2 ",.01)
;;14770-2
;;9002226.02101,"614,14770-2 ",.02)
;;14770-2
;;9002226.02101,"614,14771-0 ",.01)
;;14771-0
;;9002226.02101,"614,14771-0 ",.02)
;;14771-0
;;9002226.02101,"614,1491-0 ",.01)
;;1491-0
;;9002226.02101,"614,1491-0 ",.02)
;;1491-0
;;9002226.02101,"614,1492-8 ",.01)
;;1492-8
;;9002226.02101,"614,1492-8 ",.02)
;;1492-8
;;9002226.02101,"614,1493-6 ",.01)
;;1493-6
;;9002226.02101,"614,1493-6 ",.02)
;;1493-6
;;9002226.02101,"614,1494-4 ",.01)
;;1494-4
;;9002226.02101,"614,1494-4 ",.02)
;;1494-4
;;9002226.02101,"614,1496-9 ",.01)
;;1496-9
;;9002226.02101,"614,1496-9 ",.02)
;;1496-9
;;9002226.02101,"614,1497-7 ",.01)
;;1497-7
;;9002226.02101,"614,1497-7 ",.02)
;;1497-7
;;9002226.02101,"614,1498-5 ",.01)
;;1498-5
;;9002226.02101,"614,1498-5 ",.02)
;;1498-5
;;9002226.02101,"614,1499-3 ",.01)
;;1499-3
;;9002226.02101,"614,1499-3 ",.02)
;;1499-3
;;9002226.02101,"614,14995-5 ",.01)
;;14995-5
;;9002226.02101,"614,14995-5 ",.02)
;;14995-5
;;9002226.02101,"614,14996-3 ",.01)
;;14996-3
;;9002226.02101,"614,14996-3 ",.02)
;;14996-3
;;9002226.02101,"614,1500-8 ",.01)
;;1500-8
;;9002226.02101,"614,1500-8 ",.02)
;;1500-8
;;9002226.02101,"614,1501-6 ",.01)
;;1501-6
;;9002226.02101,"614,1501-6 ",.02)
;;1501-6
;;9002226.02101,"614,1502-4 ",.01)
;;1502-4
;;9002226.02101,"614,1502-4 ",.02)
;;1502-4
;;9002226.02101,"614,1504-0 ",.01)
;;1504-0
;;9002226.02101,"614,1504-0 ",.02)
;;1504-0
;;9002226.02101,"614,1506-5 ",.01)
;;1506-5
;;9002226.02101,"614,1506-5 ",.02)
;;1506-5
;;9002226.02101,"614,1507-3 ",.01)
;;1507-3
;;9002226.02101,"614,1507-3 ",.02)
;;1507-3
;;9002226.02101,"614,15074-8 ",.01)
;;15074-8
;;9002226.02101,"614,15074-8 ",.02)
;;15074-8
;;9002226.02101,"614,1508-1 ",.01)
;;1508-1
;;9002226.02101,"614,1508-1 ",.02)
;;1508-1
;;9002226.02101,"614,1510-7 ",.01)
;;1510-7
;;9002226.02101,"614,1510-7 ",.02)
;;1510-7
;;9002226.02101,"614,1511-5 ",.01)
;;1511-5
;;9002226.02101,"614,1511-5 ",.02)
;;1511-5
;;9002226.02101,"614,1512-3 ",.01)
;;1512-3
;;9002226.02101,"614,1512-3 ",.02)
;;1512-3
;;9002226.02101,"614,1513-1 ",.01)
;;1513-1
;;9002226.02101,"614,1513-1 ",.02)
;;1513-1
;;9002226.02101,"614,1514-9 ",.01)
;;1514-9
;;9002226.02101,"614,1514-9 ",.02)
;;1514-9
;;9002226.02101,"614,1515-6 ",.01)
;;1515-6
;;9002226.02101,"614,1515-6 ",.02)
;;1515-6
;;9002226.02101,"614,1517-2 ",.01)
;;1517-2
;;9002226.02101,"614,1517-2 ",.02)
;;1517-2
;;9002226.02101,"614,1518-0 ",.01)
;;1518-0
;;9002226.02101,"614,1518-0 ",.02)
;;1518-0
;;9002226.02101,"614,1519-8 ",.01)
;;1519-8
;;9002226.02101,"614,1519-8 ",.02)
;;1519-8
;;9002226.02101,"614,1521-4 ",.01)
;;1521-4
;;9002226.02101,"614,1521-4 ",.02)
;;1521-4
;;9002226.02101,"614,1522-2 ",.01)
;;1522-2
;;9002226.02101,"614,1522-2 ",.02)
;;1522-2
;;9002226.02101,"614,1523-0 ",.01)
;;1523-0
;;9002226.02101,"614,1523-0 ",.02)
;;1523-0
;;9002226.02101,"614,1524-8 ",.01)
;;1524-8
;;9002226.02101,"614,1524-8 ",.02)
;;1524-8
;;9002226.02101,"614,1525-5 ",.01)
;;1525-5
;;9002226.02101,"614,1525-5 ",.02)
;;1525-5
;;9002226.02101,"614,1526-3 ",.01)
;;1526-3
;;9002226.02101,"614,1526-3 ",.02)
;;1526-3
;;9002226.02101,"614,1527-1 ",.01)
;;1527-1
;;9002226.02101,"614,1527-1 ",.02)
;;1527-1
;;9002226.02101,"614,1528-9 ",.01)
;;1528-9
;;9002226.02101,"614,1528-9 ",.02)
;;1528-9
;;9002226.02101,"614,1529-7 ",.01)
;;1529-7
;;9002226.02101,"614,1529-7 ",.02)
;;1529-7
;;9002226.02101,"614,1530-5 ",.01)
;;1530-5
;;9002226.02101,"614,1530-5 ",.02)
;;1530-5
;;9002226.02101,"614,1531-3 ",.01)
;;1531-3
;;9002226.02101,"614,1531-3 ",.02)
;;1531-3
;;9002226.02101,"614,1532-1 ",.01)
;;1532-1
;;9002226.02101,"614,1532-1 ",.02)
;;1532-1
;;9002226.02101,"614,1533-9 ",.01)
;;1533-9
;;9002226.02101,"614,1533-9 ",.02)
;;1533-9
;;9002226.02101,"614,1534-7 ",.01)
;;1534-7
;;9002226.02101,"614,1534-7 ",.02)
;;1534-7
;;9002226.02101,"614,1535-4 ",.01)
;;1535-4
;;9002226.02101,"614,1535-4 ",.02)
;;1535-4
;;9002226.02101,"614,1536-2 ",.01)
;;1536-2
;;9002226.02101,"614,1536-2 ",.02)
;;1536-2
;;9002226.02101,"614,1537-0 ",.01)
;;1537-0
;;9002226.02101,"614,1537-0 ",.02)
;;1537-0
;;9002226.02101,"614,1538-8 ",.01)
;;1538-8
;;9002226.02101,"614,1538-8 ",.02)
;;1538-8
;;9002226.02101,"614,1539-6 ",.01)
;;1539-6
;;9002226.02101,"614,1539-6 ",.02)
;;1539-6
;;9002226.02101,"614,1540-4 ",.01)
;;1540-4
;;9002226.02101,"614,1540-4 ",.02)
;;1540-4
;;9002226.02101,"614,1541-2 ",.01)
;;1541-2
;;9002226.02101,"614,1541-2 ",.02)
;;1541-2
;;9002226.02101,"614,1542-0 ",.01)
;;1542-0
;;9002226.02101,"614,1542-0 ",.02)
;;1542-0
;;9002226.02101,"614,1543-8 ",.01)
;;1543-8
;;9002226.02101,"614,1543-8 ",.02)
;;1543-8
;;9002226.02101,"614,1544-6 ",.01)
;;1544-6
;;9002226.02101,"614,1544-6 ",.02)
;;1544-6
;;9002226.02101,"614,1545-3 ",.01)
;;1545-3
;;9002226.02101,"614,1545-3 ",.02)
;;1545-3
;;9002226.02101,"614,1547-9 ",.01)
;;1547-9
;;9002226.02101,"614,1547-9 ",.02)
;;1547-9
;;9002226.02101,"614,1548-7 ",.01)
;;1548-7
;;9002226.02101,"614,1548-7 ",.02)
;;1548-7
;;9002226.02101,"614,1549-5 ",.01)
;;1549-5
;;9002226.02101,"614,1549-5 ",.02)
;;1549-5
;;9002226.02101,"614,1550-3 ",.01)
;;1550-3
;;9002226.02101,"614,1550-3 ",.02)
;;1550-3
;;9002226.02101,"614,1551-1 ",.01)
;;1551-1
;;9002226.02101,"614,1551-1 ",.02)
;;1551-1
;;9002226.02101,"614,1552-9 ",.01)
;;1552-9
;;9002226.02101,"614,1552-9 ",.02)
;;1552-9
;;9002226.02101,"614,1553-7 ",.01)
;;1553-7
;;9002226.02101,"614,1553-7 ",.02)
;;1553-7
;;9002226.02101,"614,1554-5 ",.01)
;;1554-5
;;9002226.02101,"614,1554-5 ",.02)
;;1554-5
;;9002226.02101,"614,1555-2 ",.01)
;;1555-2
;;9002226.02101,"614,1555-2 ",.02)
;;1555-2
;;9002226.02101,"614,1556-0 ",.01)
;;1556-0
;;9002226.02101,"614,1556-0 ",.02)
;;1556-0
;;9002226.02101,"614,1557-8 ",.01)
;;1557-8
;;9002226.02101,"614,1557-8 ",.02)
;;1557-8
;;9002226.02101,"614,1558-6 ",.01)
;;1558-6
;;9002226.02101,"614,1558-6 ",.02)
;;1558-6
;;9002226.02101,"614,16165-3 ",.01)
;;16165-3
;;9002226.02101,"614,16165-3 ",.02)
;;16165-3
;;9002226.02101,"614,16166-1 ",.01)
;;16166-1
;;9002226.02101,"614,16166-1 ",.02)
;;16166-1
;;9002226.02101,"614,16167-9 ",.01)
;;16167-9
;;9002226.02101,"614,16167-9 ",.02)
;;16167-9
;;9002226.02101,"614,16168-7 ",.01)
;;16168-7
;;9002226.02101,"614,16168-7 ",.02)
;;16168-7
;;9002226.02101,"614,16169-5 ",.01)
;;16169-5
;;9002226.02101,"614,16169-5 ",.02)
;;16169-5
;;9002226.02101,"614,16170-3 ",.01)
;;16170-3
;;9002226.02101,"614,16170-3 ",.02)
;;16170-3
;;9002226.02101,"614,16906-0 ",.01)
;;16906-0
;;9002226.02101,"614,16906-0 ",.02)
;;16906-0
;;9002226.02101,"614,16907-8 ",.01)
;;16907-8
;;9002226.02101,"614,16907-8 ",.02)
;;16907-8
;;9002226.02101,"614,16908-6 ",.01)
;;16908-6
;;9002226.02101,"614,16908-6 ",.02)
;;16908-6
;;9002226.02101,"614,16909-4 ",.01)
;;16909-4
;;9002226.02101,"614,16909-4 ",.02)
;;16909-4
;;9002226.02101,"614,16910-2 ",.01)
;;16910-2
;;9002226.02101,"614,16910-2 ",.02)
;;16910-2
;;9002226.02101,"614,16911-0 ",.01)
;;16911-0
;;9002226.02101,"614,16911-0 ",.02)
;;16911-0
;;9002226.02101,"614,16912-8 ",.01)
;;16912-8
;;9002226.02101,"614,16912-8 ",.02)
;;16912-8
;;9002226.02101,"614,16913-6 ",.01)
;;16913-6
;;9002226.02101,"614,16913-6 ",.02)
;;16913-6
;;9002226.02101,"614,16914-4 ",.01)
;;16914-4
;;9002226.02101,"614,16914-4 ",.02)
;;16914-4
;;9002226.02101,"614,16915-1 ",.01)
;;16915-1
;;9002226.02101,"614,16915-1 ",.02)
;;16915-1
;;9002226.02101,"614,17865-7 ",.01)
;;17865-7
;;9002226.02101,"614,17865-7 ",.02)
;;17865-7
;;9002226.02101,"614,18296-4 ",.01)
;;18296-4
;;9002226.02101,"614,18296-4 ",.02)
;;18296-4
;;9002226.02101,"614,18342-6 ",.01)
;;18342-6
;;9002226.02101,"614,18342-6 ",.02)
;;18342-6
;;9002226.02101,"614,18353-3 ",.01)
;;18353-3
;;9002226.02101,"614,18353-3 ",.02)
;;18353-3
;;9002226.02101,"614,18354-1 ",.01)
;;18354-1
;;9002226.02101,"614,18354-1 ",.02)
;;18354-1
;;9002226.02101,"614,19104-9 ",.01)
;;19104-9
;;9002226.02101,"614,19104-9 ",.02)
;;19104-9
;;9002226.02101,"614,19105-6 ",.01)
;;19105-6
;;9002226.02101,"614,19105-6 ",.02)
;;19105-6
;;9002226.02101,"614,20436-2 ",.01)
;;20436-2
;;9002226.02101,"614,20436-2 ",.02)
;;20436-2
;;9002226.02101,"614,20437-0 ",.01)
;;20437-0
;;9002226.02101,"614,20437-0 ",.02)
;;20437-0
;;9002226.02101,"614,20438-8 ",.01)
;;20438-8
;;9002226.02101,"614,20438-8 ",.02)
;;20438-8
;;9002226.02101,"614,20439-6 ",.01)
;;20439-6
;;9002226.02101,"614,20439-6 ",.02)
;;20439-6
;;9002226.02101,"614,20440-4 ",.01)
;;20440-4
;;9002226.02101,"614,20440-4 ",.02)
;;20440-4
;;9002226.02101,"614,20441-2 ",.01)
;;20441-2
;;9002226.02101,"614,20441-2 ",.02)
;;20441-2
;;9002226.02101,"614,21004-7 ",.01)
;;21004-7
;;9002226.02101,"614,21004-7 ",.02)
;;21004-7
;;9002226.02101,"614,21308-2 ",.01)
;;21308-2
;;9002226.02101,"614,21308-2 ",.02)
;;21308-2
;;9002226.02101,"614,21309-0 ",.01)
;;21309-0
;;9002226.02101,"614,21309-0 ",.02)
;;21309-0
;;9002226.02101,"614,21310-8 ",.01)
;;21310-8
;;9002226.02101,"614,21310-8 ",.02)
;;21310-8
;;9002226.02101,"614,2339-0 ",.01)
;;2339-0
;;9002226.02101,"614,2339-0 ",.02)
;;2339-0
;;9002226.02101,"614,2340-8 ",.01)
;;2340-8
;;9002226.02101,"614,2340-8 ",.02)
;;2340-8
;;9002226.02101,"614,2341-6 ",.01)
;;2341-6
;;9002226.02101,"614,2341-6 ",.02)
;;2341-6
BGP53W3 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAR 16, 2015;
+1 ;;15.1;IHS CLINICAL REPORTING;;MAY 06, 2015;Build 143
+2 ;
START ;
+1 IF '$GET(ATXPGMC)
KILL ^TMP("ATX",$JOB)
+2 SET ATXPGMC=$GET(ATXPGMC)+1
+3 FOR ATXI=1:1
SET X=$PIECE($TEXT(TMP+ATXI),";;",2,99)
IF X=""
QUIT
SET X="^TMP(""ATX"",$J,"_X
SET ATXI=ATXI+1
SET Y=$PIECE($TEXT(TMP+ATXI),";;",2,99)
SET @X=Y
+4 QUIT
+5 ;
TMP ;;TAXONOMY (WITH BULLETIN)
+1 ;;9002226.02101,"614,14752-0 ",.02)
+2 ;;14752-0
+3 ;;9002226.02101,"614,14753-8 ",.01)
+4 ;;14753-8
+5 ;;9002226.02101,"614,14753-8 ",.02)
+6 ;;14753-8
+7 ;;9002226.02101,"614,14754-6 ",.01)
+8 ;;14754-6
+9 ;;9002226.02101,"614,14754-6 ",.02)
+10 ;;14754-6
+11 ;;9002226.02101,"614,14755-3 ",.01)
+12 ;;14755-3
+13 ;;9002226.02101,"614,14755-3 ",.02)
+14 ;;14755-3
+15 ;;9002226.02101,"614,14756-1 ",.01)
+16 ;;14756-1
+17 ;;9002226.02101,"614,14756-1 ",.02)
+18 ;;14756-1
+19 ;;9002226.02101,"614,14757-9 ",.01)
+20 ;;14757-9
+21 ;;9002226.02101,"614,14757-9 ",.02)
+22 ;;14757-9
+23 ;;9002226.02101,"614,14758-7 ",.01)
+24 ;;14758-7
+25 ;;9002226.02101,"614,14758-7 ",.02)
+26 ;;14758-7
+27 ;;9002226.02101,"614,14759-5 ",.01)
+28 ;;14759-5
+29 ;;9002226.02101,"614,14759-5 ",.02)
+30 ;;14759-5
+31 ;;9002226.02101,"614,14760-3 ",.01)
+32 ;;14760-3
+33 ;;9002226.02101,"614,14760-3 ",.02)
+34 ;;14760-3
+35 ;;9002226.02101,"614,14761-1 ",.01)
+36 ;;14761-1
+37 ;;9002226.02101,"614,14761-1 ",.02)
+38 ;;14761-1
+39 ;;9002226.02101,"614,14762-9 ",.01)
+40 ;;14762-9
+41 ;;9002226.02101,"614,14762-9 ",.02)
+42 ;;14762-9
+43 ;;9002226.02101,"614,14763-7 ",.01)
+44 ;;14763-7
+45 ;;9002226.02101,"614,14763-7 ",.02)
+46 ;;14763-7
+47 ;;9002226.02101,"614,14764-5 ",.01)
+48 ;;14764-5
+49 ;;9002226.02101,"614,14764-5 ",.02)
+50 ;;14764-5
+51 ;;9002226.02101,"614,14765-2 ",.01)
+52 ;;14765-2
+53 ;;9002226.02101,"614,14765-2 ",.02)
+54 ;;14765-2
+55 ;;9002226.02101,"614,14766-0 ",.01)
+56 ;;14766-0
+57 ;;9002226.02101,"614,14766-0 ",.02)
+58 ;;14766-0
+59 ;;9002226.02101,"614,14767-8 ",.01)
+60 ;;14767-8
+61 ;;9002226.02101,"614,14767-8 ",.02)
+62 ;;14767-8
+63 ;;9002226.02101,"614,14768-6 ",.01)
+64 ;;14768-6
+65 ;;9002226.02101,"614,14768-6 ",.02)
+66 ;;14768-6
+67 ;;9002226.02101,"614,14769-4 ",.01)
+68 ;;14769-4
+69 ;;9002226.02101,"614,14769-4 ",.02)
+70 ;;14769-4
+71 ;;9002226.02101,"614,14770-2 ",.01)
+72 ;;14770-2
+73 ;;9002226.02101,"614,14770-2 ",.02)
+74 ;;14770-2
+75 ;;9002226.02101,"614,14771-0 ",.01)
+76 ;;14771-0
+77 ;;9002226.02101,"614,14771-0 ",.02)
+78 ;;14771-0
+79 ;;9002226.02101,"614,1491-0 ",.01)
+80 ;;1491-0
+81 ;;9002226.02101,"614,1491-0 ",.02)
+82 ;;1491-0
+83 ;;9002226.02101,"614,1492-8 ",.01)
+84 ;;1492-8
+85 ;;9002226.02101,"614,1492-8 ",.02)
+86 ;;1492-8
+87 ;;9002226.02101,"614,1493-6 ",.01)
+88 ;;1493-6
+89 ;;9002226.02101,"614,1493-6 ",.02)
+90 ;;1493-6
+91 ;;9002226.02101,"614,1494-4 ",.01)
+92 ;;1494-4
+93 ;;9002226.02101,"614,1494-4 ",.02)
+94 ;;1494-4
+95 ;;9002226.02101,"614,1496-9 ",.01)
+96 ;;1496-9
+97 ;;9002226.02101,"614,1496-9 ",.02)
+98 ;;1496-9
+99 ;;9002226.02101,"614,1497-7 ",.01)
+100 ;;1497-7
+101 ;;9002226.02101,"614,1497-7 ",.02)
+102 ;;1497-7
+103 ;;9002226.02101,"614,1498-5 ",.01)
+104 ;;1498-5
+105 ;;9002226.02101,"614,1498-5 ",.02)
+106 ;;1498-5
+107 ;;9002226.02101,"614,1499-3 ",.01)
+108 ;;1499-3
+109 ;;9002226.02101,"614,1499-3 ",.02)
+110 ;;1499-3
+111 ;;9002226.02101,"614,14995-5 ",.01)
+112 ;;14995-5
+113 ;;9002226.02101,"614,14995-5 ",.02)
+114 ;;14995-5
+115 ;;9002226.02101,"614,14996-3 ",.01)
+116 ;;14996-3
+117 ;;9002226.02101,"614,14996-3 ",.02)
+118 ;;14996-3
+119 ;;9002226.02101,"614,1500-8 ",.01)
+120 ;;1500-8
+121 ;;9002226.02101,"614,1500-8 ",.02)
+122 ;;1500-8
+123 ;;9002226.02101,"614,1501-6 ",.01)
+124 ;;1501-6
+125 ;;9002226.02101,"614,1501-6 ",.02)
+126 ;;1501-6
+127 ;;9002226.02101,"614,1502-4 ",.01)
+128 ;;1502-4
+129 ;;9002226.02101,"614,1502-4 ",.02)
+130 ;;1502-4
+131 ;;9002226.02101,"614,1504-0 ",.01)
+132 ;;1504-0
+133 ;;9002226.02101,"614,1504-0 ",.02)
+134 ;;1504-0
+135 ;;9002226.02101,"614,1506-5 ",.01)
+136 ;;1506-5
+137 ;;9002226.02101,"614,1506-5 ",.02)
+138 ;;1506-5
+139 ;;9002226.02101,"614,1507-3 ",.01)
+140 ;;1507-3
+141 ;;9002226.02101,"614,1507-3 ",.02)
+142 ;;1507-3
+143 ;;9002226.02101,"614,15074-8 ",.01)
+144 ;;15074-8
+145 ;;9002226.02101,"614,15074-8 ",.02)
+146 ;;15074-8
+147 ;;9002226.02101,"614,1508-1 ",.01)
+148 ;;1508-1
+149 ;;9002226.02101,"614,1508-1 ",.02)
+150 ;;1508-1
+151 ;;9002226.02101,"614,1510-7 ",.01)
+152 ;;1510-7
+153 ;;9002226.02101,"614,1510-7 ",.02)
+154 ;;1510-7
+155 ;;9002226.02101,"614,1511-5 ",.01)
+156 ;;1511-5
+157 ;;9002226.02101,"614,1511-5 ",.02)
+158 ;;1511-5
+159 ;;9002226.02101,"614,1512-3 ",.01)
+160 ;;1512-3
+161 ;;9002226.02101,"614,1512-3 ",.02)
+162 ;;1512-3
+163 ;;9002226.02101,"614,1513-1 ",.01)
+164 ;;1513-1
+165 ;;9002226.02101,"614,1513-1 ",.02)
+166 ;;1513-1
+167 ;;9002226.02101,"614,1514-9 ",.01)
+168 ;;1514-9
+169 ;;9002226.02101,"614,1514-9 ",.02)
+170 ;;1514-9
+171 ;;9002226.02101,"614,1515-6 ",.01)
+172 ;;1515-6
+173 ;;9002226.02101,"614,1515-6 ",.02)
+174 ;;1515-6
+175 ;;9002226.02101,"614,1517-2 ",.01)
+176 ;;1517-2
+177 ;;9002226.02101,"614,1517-2 ",.02)
+178 ;;1517-2
+179 ;;9002226.02101,"614,1518-0 ",.01)
+180 ;;1518-0
+181 ;;9002226.02101,"614,1518-0 ",.02)
+182 ;;1518-0
+183 ;;9002226.02101,"614,1519-8 ",.01)
+184 ;;1519-8
+185 ;;9002226.02101,"614,1519-8 ",.02)
+186 ;;1519-8
+187 ;;9002226.02101,"614,1521-4 ",.01)
+188 ;;1521-4
+189 ;;9002226.02101,"614,1521-4 ",.02)
+190 ;;1521-4
+191 ;;9002226.02101,"614,1522-2 ",.01)
+192 ;;1522-2
+193 ;;9002226.02101,"614,1522-2 ",.02)
+194 ;;1522-2
+195 ;;9002226.02101,"614,1523-0 ",.01)
+196 ;;1523-0
+197 ;;9002226.02101,"614,1523-0 ",.02)
+198 ;;1523-0
+199 ;;9002226.02101,"614,1524-8 ",.01)
+200 ;;1524-8
+201 ;;9002226.02101,"614,1524-8 ",.02)
+202 ;;1524-8
+203 ;;9002226.02101,"614,1525-5 ",.01)
+204 ;;1525-5
+205 ;;9002226.02101,"614,1525-5 ",.02)
+206 ;;1525-5
+207 ;;9002226.02101,"614,1526-3 ",.01)
+208 ;;1526-3
+209 ;;9002226.02101,"614,1526-3 ",.02)
+210 ;;1526-3
+211 ;;9002226.02101,"614,1527-1 ",.01)
+212 ;;1527-1
+213 ;;9002226.02101,"614,1527-1 ",.02)
+214 ;;1527-1
+215 ;;9002226.02101,"614,1528-9 ",.01)
+216 ;;1528-9
+217 ;;9002226.02101,"614,1528-9 ",.02)
+218 ;;1528-9
+219 ;;9002226.02101,"614,1529-7 ",.01)
+220 ;;1529-7
+221 ;;9002226.02101,"614,1529-7 ",.02)
+222 ;;1529-7
+223 ;;9002226.02101,"614,1530-5 ",.01)
+224 ;;1530-5
+225 ;;9002226.02101,"614,1530-5 ",.02)
+226 ;;1530-5
+227 ;;9002226.02101,"614,1531-3 ",.01)
+228 ;;1531-3
+229 ;;9002226.02101,"614,1531-3 ",.02)
+230 ;;1531-3
+231 ;;9002226.02101,"614,1532-1 ",.01)
+232 ;;1532-1
+233 ;;9002226.02101,"614,1532-1 ",.02)
+234 ;;1532-1
+235 ;;9002226.02101,"614,1533-9 ",.01)
+236 ;;1533-9
+237 ;;9002226.02101,"614,1533-9 ",.02)
+238 ;;1533-9
+239 ;;9002226.02101,"614,1534-7 ",.01)
+240 ;;1534-7
+241 ;;9002226.02101,"614,1534-7 ",.02)
+242 ;;1534-7
+243 ;;9002226.02101,"614,1535-4 ",.01)
+244 ;;1535-4
+245 ;;9002226.02101,"614,1535-4 ",.02)
+246 ;;1535-4
+247 ;;9002226.02101,"614,1536-2 ",.01)
+248 ;;1536-2
+249 ;;9002226.02101,"614,1536-2 ",.02)
+250 ;;1536-2
+251 ;;9002226.02101,"614,1537-0 ",.01)
+252 ;;1537-0
+253 ;;9002226.02101,"614,1537-0 ",.02)
+254 ;;1537-0
+255 ;;9002226.02101,"614,1538-8 ",.01)
+256 ;;1538-8
+257 ;;9002226.02101,"614,1538-8 ",.02)
+258 ;;1538-8
+259 ;;9002226.02101,"614,1539-6 ",.01)
+260 ;;1539-6
+261 ;;9002226.02101,"614,1539-6 ",.02)
+262 ;;1539-6
+263 ;;9002226.02101,"614,1540-4 ",.01)
+264 ;;1540-4
+265 ;;9002226.02101,"614,1540-4 ",.02)
+266 ;;1540-4
+267 ;;9002226.02101,"614,1541-2 ",.01)
+268 ;;1541-2
+269 ;;9002226.02101,"614,1541-2 ",.02)
+270 ;;1541-2
+271 ;;9002226.02101,"614,1542-0 ",.01)
+272 ;;1542-0
+273 ;;9002226.02101,"614,1542-0 ",.02)
+274 ;;1542-0
+275 ;;9002226.02101,"614,1543-8 ",.01)
+276 ;;1543-8
+277 ;;9002226.02101,"614,1543-8 ",.02)
+278 ;;1543-8
+279 ;;9002226.02101,"614,1544-6 ",.01)
+280 ;;1544-6
+281 ;;9002226.02101,"614,1544-6 ",.02)
+282 ;;1544-6
+283 ;;9002226.02101,"614,1545-3 ",.01)
+284 ;;1545-3
+285 ;;9002226.02101,"614,1545-3 ",.02)
+286 ;;1545-3
+287 ;;9002226.02101,"614,1547-9 ",.01)
+288 ;;1547-9
+289 ;;9002226.02101,"614,1547-9 ",.02)
+290 ;;1547-9
+291 ;;9002226.02101,"614,1548-7 ",.01)
+292 ;;1548-7
+293 ;;9002226.02101,"614,1548-7 ",.02)
+294 ;;1548-7
+295 ;;9002226.02101,"614,1549-5 ",.01)
+296 ;;1549-5
+297 ;;9002226.02101,"614,1549-5 ",.02)
+298 ;;1549-5
+299 ;;9002226.02101,"614,1550-3 ",.01)
+300 ;;1550-3
+301 ;;9002226.02101,"614,1550-3 ",.02)
+302 ;;1550-3
+303 ;;9002226.02101,"614,1551-1 ",.01)
+304 ;;1551-1
+305 ;;9002226.02101,"614,1551-1 ",.02)
+306 ;;1551-1
+307 ;;9002226.02101,"614,1552-9 ",.01)
+308 ;;1552-9
+309 ;;9002226.02101,"614,1552-9 ",.02)
+310 ;;1552-9
+311 ;;9002226.02101,"614,1553-7 ",.01)
+312 ;;1553-7
+313 ;;9002226.02101,"614,1553-7 ",.02)
+314 ;;1553-7
+315 ;;9002226.02101,"614,1554-5 ",.01)
+316 ;;1554-5
+317 ;;9002226.02101,"614,1554-5 ",.02)
+318 ;;1554-5
+319 ;;9002226.02101,"614,1555-2 ",.01)
+320 ;;1555-2
+321 ;;9002226.02101,"614,1555-2 ",.02)
+322 ;;1555-2
+323 ;;9002226.02101,"614,1556-0 ",.01)
+324 ;;1556-0
+325 ;;9002226.02101,"614,1556-0 ",.02)
+326 ;;1556-0
+327 ;;9002226.02101,"614,1557-8 ",.01)
+328 ;;1557-8
+329 ;;9002226.02101,"614,1557-8 ",.02)
+330 ;;1557-8
+331 ;;9002226.02101,"614,1558-6 ",.01)
+332 ;;1558-6
+333 ;;9002226.02101,"614,1558-6 ",.02)
+334 ;;1558-6
+335 ;;9002226.02101,"614,16165-3 ",.01)
+336 ;;16165-3
+337 ;;9002226.02101,"614,16165-3 ",.02)
+338 ;;16165-3
+339 ;;9002226.02101,"614,16166-1 ",.01)
+340 ;;16166-1
+341 ;;9002226.02101,"614,16166-1 ",.02)
+342 ;;16166-1
+343 ;;9002226.02101,"614,16167-9 ",.01)
+344 ;;16167-9
+345 ;;9002226.02101,"614,16167-9 ",.02)
+346 ;;16167-9
+347 ;;9002226.02101,"614,16168-7 ",.01)
+348 ;;16168-7
+349 ;;9002226.02101,"614,16168-7 ",.02)
+350 ;;16168-7
+351 ;;9002226.02101,"614,16169-5 ",.01)
+352 ;;16169-5
+353 ;;9002226.02101,"614,16169-5 ",.02)
+354 ;;16169-5
+355 ;;9002226.02101,"614,16170-3 ",.01)
+356 ;;16170-3
+357 ;;9002226.02101,"614,16170-3 ",.02)
+358 ;;16170-3
+359 ;;9002226.02101,"614,16906-0 ",.01)
+360 ;;16906-0
+361 ;;9002226.02101,"614,16906-0 ",.02)
+362 ;;16906-0
+363 ;;9002226.02101,"614,16907-8 ",.01)
+364 ;;16907-8
+365 ;;9002226.02101,"614,16907-8 ",.02)
+366 ;;16907-8
+367 ;;9002226.02101,"614,16908-6 ",.01)
+368 ;;16908-6
+369 ;;9002226.02101,"614,16908-6 ",.02)
+370 ;;16908-6
+371 ;;9002226.02101,"614,16909-4 ",.01)
+372 ;;16909-4
+373 ;;9002226.02101,"614,16909-4 ",.02)
+374 ;;16909-4
+375 ;;9002226.02101,"614,16910-2 ",.01)
+376 ;;16910-2
+377 ;;9002226.02101,"614,16910-2 ",.02)
+378 ;;16910-2
+379 ;;9002226.02101,"614,16911-0 ",.01)
+380 ;;16911-0
+381 ;;9002226.02101,"614,16911-0 ",.02)
+382 ;;16911-0
+383 ;;9002226.02101,"614,16912-8 ",.01)
+384 ;;16912-8
+385 ;;9002226.02101,"614,16912-8 ",.02)
+386 ;;16912-8
+387 ;;9002226.02101,"614,16913-6 ",.01)
+388 ;;16913-6
+389 ;;9002226.02101,"614,16913-6 ",.02)
+390 ;;16913-6
+391 ;;9002226.02101,"614,16914-4 ",.01)
+392 ;;16914-4
+393 ;;9002226.02101,"614,16914-4 ",.02)
+394 ;;16914-4
+395 ;;9002226.02101,"614,16915-1 ",.01)
+396 ;;16915-1
+397 ;;9002226.02101,"614,16915-1 ",.02)
+398 ;;16915-1
+399 ;;9002226.02101,"614,17865-7 ",.01)
+400 ;;17865-7
+401 ;;9002226.02101,"614,17865-7 ",.02)
+402 ;;17865-7
+403 ;;9002226.02101,"614,18296-4 ",.01)
+404 ;;18296-4
+405 ;;9002226.02101,"614,18296-4 ",.02)
+406 ;;18296-4
+407 ;;9002226.02101,"614,18342-6 ",.01)
+408 ;;18342-6
+409 ;;9002226.02101,"614,18342-6 ",.02)
+410 ;;18342-6
+411 ;;9002226.02101,"614,18353-3 ",.01)
+412 ;;18353-3
+413 ;;9002226.02101,"614,18353-3 ",.02)
+414 ;;18353-3
+415 ;;9002226.02101,"614,18354-1 ",.01)
+416 ;;18354-1
+417 ;;9002226.02101,"614,18354-1 ",.02)
+418 ;;18354-1
+419 ;;9002226.02101,"614,19104-9 ",.01)
+420 ;;19104-9
+421 ;;9002226.02101,"614,19104-9 ",.02)
+422 ;;19104-9
+423 ;;9002226.02101,"614,19105-6 ",.01)
+424 ;;19105-6
+425 ;;9002226.02101,"614,19105-6 ",.02)
+426 ;;19105-6
+427 ;;9002226.02101,"614,20436-2 ",.01)
+428 ;;20436-2
+429 ;;9002226.02101,"614,20436-2 ",.02)
+430 ;;20436-2
+431 ;;9002226.02101,"614,20437-0 ",.01)
+432 ;;20437-0
+433 ;;9002226.02101,"614,20437-0 ",.02)
+434 ;;20437-0
+435 ;;9002226.02101,"614,20438-8 ",.01)
+436 ;;20438-8
+437 ;;9002226.02101,"614,20438-8 ",.02)
+438 ;;20438-8
+439 ;;9002226.02101,"614,20439-6 ",.01)
+440 ;;20439-6
+441 ;;9002226.02101,"614,20439-6 ",.02)
+442 ;;20439-6
+443 ;;9002226.02101,"614,20440-4 ",.01)
+444 ;;20440-4
+445 ;;9002226.02101,"614,20440-4 ",.02)
+446 ;;20440-4
+447 ;;9002226.02101,"614,20441-2 ",.01)
+448 ;;20441-2
+449 ;;9002226.02101,"614,20441-2 ",.02)
+450 ;;20441-2
+451 ;;9002226.02101,"614,21004-7 ",.01)
+452 ;;21004-7
+453 ;;9002226.02101,"614,21004-7 ",.02)
+454 ;;21004-7
+455 ;;9002226.02101,"614,21308-2 ",.01)
+456 ;;21308-2
+457 ;;9002226.02101,"614,21308-2 ",.02)
+458 ;;21308-2
+459 ;;9002226.02101,"614,21309-0 ",.01)
+460 ;;21309-0
+461 ;;9002226.02101,"614,21309-0 ",.02)
+462 ;;21309-0
+463 ;;9002226.02101,"614,21310-8 ",.01)
+464 ;;21310-8
+465 ;;9002226.02101,"614,21310-8 ",.02)
+466 ;;21310-8
+467 ;;9002226.02101,"614,2339-0 ",.01)
+468 ;;2339-0
+469 ;;9002226.02101,"614,2339-0 ",.02)
+470 ;;2339-0
+471 ;;9002226.02101,"614,2340-8 ",.01)
+472 ;;2340-8
+473 ;;9002226.02101,"614,2340-8 ",.02)
+474 ;;2340-8
+475 ;;9002226.02101,"614,2341-6 ",.01)
+476 ;;2341-6
+477 ;;9002226.02101,"614,2341-6 ",.02)
+478 ;;2341-6
