SDRPA17 ;BP-OIFO/ESW - UTILITY ; 10/31/04 6:00pm
;;5.3;Scheduling;**376**;Aug 13, 1993
EN(ST) ;
N SR,II,STR,SA,STE,GG,SS,SQS,ER,SB,SM,SQ,SBE,SME
F II=1:1 S STR=$P($T(@ST+II),";;",2) Q:STR="" D
.S SA=$P(STR,";") Q:SA="E"
.S SB=$P(STR,";"),SM=$P(STR,";",2) D
..F GG=1:1 S STE=$P($T(@ST+II+GG),";;",2) Q:$P(STE,";")'="E" D
...S ER=$P(STE,";",2) S SQS=$P(STE,";",3) F SS=1:1 S SQ=$P(SQS,",",SS) Q:SQ="" S SBE=ST_SB,SME=ST_SM D PR^SD376P(SBE,SME,ER,SQ)
..S ER="" S SQ=$O(^SDWL(409.6,"AMSG",SM,"")) Q:SQ="" D PR^SD376P(SB,SM,ER,SQ)
Q
;batch;ms
;E;ere cd;seq1,seq2,
674 ;;
;;25217915;48941214
;;E;350;2192,
;;25277627;49053629
;;E;200;367,384,475,521,1190,1271,1318,1708,1710,1759,1961,2038,2093,2729,3126,3440,3688,3736,3793,3817,3856,
;;25283907;49065301
;;E;200;378,717,949,2020,2136,2527,2741,3082,3367,3385,3446,3711,3836,4029,4071,4376,4928,
;;25294638;49080201
;;E;200;476,747,1433,1455,1637,2486,2524,2594,2622,2646,2727,2887,2912,3222,3241,3344,3519,3787,3889,4121,4413,4894,
;;25303583;49092494
;;E;200;502,565,725,726,761,965,1415,1626,1752,1999,2074,2077,2089,2101,2114,2435,2574,3193,3352,3463,3685,3750,3760,3761,3932,4173,4180,
;;E;200;517,607,778,867,913,944,1224,1309,1476,1481,1668,1922,2155
;;E;200;517,607,778,867,913,944,1224,1309,1476,1481,1668,1922,2155,2284,2300,2320,2454,2569,2572,2658,2696,2801,2904,2907,2913,2918,2971,2975,2984,
;;E;200;3002,3017,3067,3108,3171,3240,3411,3479,3601,3625,3796,3808,4057,4218,
;;25318368;49107676
;;E;200;609,921,1170,1173,1267,1726,1962,2000,2872,2947,2959,2975,2988,2991,3117,3128,3183,3286,3293,3340,3416,3506,3526,3530,3543,3698,3742,4003,4095,4125,4192,4229,4244,4297,4310,
;;25325672;49115510
;;E;200;341,413,417,486,523,769,1069,1184,1232,1302,1313,1418,1490,1599,2392,2404,2566,2675,2737,2993,3011,3251,3295,3523,3584,3747,3962,4352,
;;25326509;49119268
;;E;200;192,194,384,502,504,624,662,769,954,1006,1517,1615,1821,2026,2057,2175,2293,2420,2502,2526,2541,2672,2817,2862,3022,3085,3092,3115,3257,3333,3487,3610,3660,3688,3782,3804,3831,3933,3980,4416,4878,4887,
;;25326945;49119456
;;E;200;2477,2682,2761,2763,2770,2795,2815,2869,2925,3278,3283,3330,3334,3507,3519,3701,3966,4005,4293,4367,4372,4380,4384,
;;25327195;49120057
;;E;200;564,703,1024,1803,1852,2144,2165,2693,2707,3077,3104,3500,3837,4281,4415,4563,
;;E;350;1512,
;;25327503;49120443
;;E;200;22,561,1122,1927,2297,2353,2471,2534,2652,2832,2919,2920,4120,4323,4561,4881,
;;25328054;49120936
;;E;200;519,670,817,1501,2433,2926,3111,4358,
;;25328395;49121277
;;E;200;246,654,1379,1960,2090,2355,2601,2608,3171,3690,3716,3730,
;;25328504;49125090
;;E;200;400,460,1006,1032,2128,2613,2795,3098,3439,3892,4502,4662,
;;25328711;49130992
;;E;200;1355,1609,1653,1863,1887,2179,2420,2445,2463,2681,2927,4059,4409,4497,
;;25331266;49133070
;;E;200;407,570,1342,2418,2634,3503,3933,4091,4356,4667,4961,
;;25334891;49135124
;;E;200;1024,2445,3476,
;;25341571;49141053
;;E;200;1404,2995,4559,
;;25350367;49150046
;;E;200;2172,2190,2288,2913,3303,3416,3418,4523,
;;25359268;49158911
;;E;200;1527,2338,2384,2412,3269,3318,3375,3758,4970,
;;25374264;49172416
;;E;200;385,1172,1195,2012,2229,2553,2706,2850,3356,3358,3486,3740,
;;E;200;358,2303,3529,3676,3764,3878,4271,4295,4743,
;;E;200;358,2303,3529,3676,3764,3878,4271,4295,4743,
;;25394823;49196200
;;E;200;2387,3542,3543,3544,3578,3954,4012,4953,
;;25395743;49198142
;;E;200;402,1723,1724,2526,2592,4947,
;;25396049;49199202
;;E;200;736,1095,1305,1812,2190,2245,2557,2720,2821,2939,3037,3088,3274,3388,3500,3551,4086,4542,
;;25397679;49200650
;;E;200;295,868,1329,1918,2102,2206,2222,2351,2403,2529,2551,2556,2632,2807,2972,3235,3553,3742,3782,3878,
;;25397799;49201471
;;E;200;203,1110,1554,2324,2334,2355,2623,3662,4231,4427,
;;25399817;49202495
;;E;200;815,1046,1799,2175,2346,3786,3838,4055,
;;25400603;49204834
;;E;200;1023,1204,1428,2303,2873,2898,3199,3259,3615,4437,4905,
;;25401313;49205730
;;E;200;285,976,3091,3706,
;;E;350;702,
;;25402604;49207029
;;E;200;1606,2163,2967,3121,3199,3274,3843,
;;25404729;49209854
;;E;200;1656,4942,
;;25407371;49213437
;;E;200;645,911,1420,1422,1424,3406,3522,
;;25409997;49217489
;;E;200;1299,4549,4943,4954,4959,
;;25412615;49221198
;;E;200;1244,1460,1542,2094,2180,2626,2658,3149,3160,3806,4220,4297,4811,
;;25414954;49224644
;;E;200;1119,1358,1641,1725,3899,4105,4983,
;;25416867;49227691
;;E;200;249,985,2098,2162,2229,2678,3224,4156,4216,
;;25418438;49230058
;;E;200;2151,2659,2865,
;;25419453;49232241
;;E;200;2858,3711,3720,
;;25420309;49233464
;;E;200;2041,2857,3629,3634,3670,4869,
;;25421225;49234819
;;E;200;2462,2577,2603,2910,3491,3512,
;;25422730;49236705
;;E;200;202,755,1802,2196,3016,3360,3899,3934,4457,
;;25424211;49238806
;;E;200;823,865,1449,2497,3544,3555,
;;25425867;49240848
;;E;200;457,661,1056,2314,2882,2954,3500,3538,3655,3865,
;;25427378;49243258
;;E;200;1158,1268,2363,2922,3089,3730,3952,4046,4087,4346,4975,
;;25429538;49245769
;;E;200;228,342,1041,1289,1324,1825,1870,1962,2329,2590,2646,2785,3217,3386,3455,3897,4154,
;;E;350;2364,
;;25434564;49249773
;;E;200;228,261,905,1351,1997,2766,2847,2850,2956,2995,3816,4163,4448,4583,4615,
;;25443721;49264947
;;E;200;267,357,707,1165,2431,3759,3843,
;;25452444;49279635
;;E;200;580,623,1059,1547,2403,2666,2896,3019,4405,4496,
;;25461201;49294789
;;E;200;23,1175,2026,2202,2215,3245,4533,
;;25468737;49310022
;;E;200;189,1515,2342,2656,
;;25468907;49314903
;;E;200;112,1062,1063,1064,1367,1854,2327,2608,2884,2974,4032,4354,
;;E;200;357,1869,1880,2391,4181,4404,
;;E;200;357,1869,1880,2391,4181,4404,
;;25469461;49315572
;;E;200;1446,1616,1786,2413,2704,2975,3527,3602,4202,
;;25469691;49315992
;;E;200;2906,3213,3256,4417,
;;25470125;49316720
;;E;200;34,1321,3175,
;;E;350;899,
;;25471835;49318630
;;E;200;439,1527,3394,
;;25472066;49319452
;;E;200;2996,3225,3439,3795,3897,4314,
;;25472460;49319895
;;E;200;2911,3944,3952,4075,4317,
;;25473511;49320217
;;E;200;1508,1551,2981,
;;25476116;49323337
;;E;200;1528,3138,3806,4295,4977,
;;25480593;49326190
;;E;200;746,1134,1692,2836,3127,
;;25485809;49330202
;;E;200;1324,3437,3734,3825,
;;25492908;49339053
;;E;200;357,1504,2342,2678,2823,3040,3729,3975,4190,4891,4960,
;;25500445;49351142
;;E;200;411,1133,1249,1277,1956,2351,2426,2479,2736,2898,4798,
;;25505015;49362568
;;E;200;266,843,1599,2231,2269,2944,3387,3554,3560,3760,
;;25505257;49362915
;;E;200;2928,3338,4208,4590,4996,
;;25505404;49363170
;;E;200;261,1464,2449,2536,4973,
;;25505757;49363649
;;E;200;1667,3542,3877,4368,4650,4940,
;;25505949;49363966
;;E;200;2656,3482,3861,4027,4453,
;;25506011;49364101
;;E;200;839,1178,2616,3213,3603,3954,
;;25506117;49364326
;;E;200;1169,2100,3391,4860,
;;25506465;49365020
;;E;200;326,477,1416,1990,4320,
;;25507536;49365318
;;E;200;813,1430,2867,3164,4528,
;;25516134;49372625
;;E;200;982,1734,2632,3932,4626,
;;25520238;49377650
;;E;200;647,1939,2004,2972,3866,4211,
;;25531241;49394904
;;E;200;288,1031,2160,2319,3980,4043,4097,
;;25541170;49411587
;;E;200;1675,1856,2193,2250,2546,2838,3127,3323,3727,3739,3831,3894,3903,4050,
;;25548018;49425352
;;E;200;8,907,938,1218,2342,2699,3474,3564,3632,4247,
;;25555062;49438387
;;E;200;511,1784,2369,3049,3067,3128,3318,3445,3769,4436,4633,
;;25561820;49452155
;;E;200;270,1223,1278,1466,1948,2055,2860,3127,3139,3226,3328,4020,4823,
;;25567090;49463144
;;E;200;1606,4213,
;;25573772;49474801
;;E;200;478,1756,2888,3180,
;;25625346;49568812
;;E;200;198,1650,2029,2330,2346,2462,2531,3096,3774,
;;25643600;49593770
;;E;200;1273,2727,2976,4287,
;;25655016;49610188
;;E;200;2781,3110,3779,4016,4213,
;;25666966;49627379
;;E;200;407,2026,2098,3821,4367,
;;25679867;49645638
;;E;200;194,563,576,2504,3237,
;;25690081;49661769
;;E;200;2567,3003,4260,
;;25700586;49678334
;;E;200;2850,3041,3280,4995,
;;25710517;49694824
;;E;200;387,769,837,1882,3110,4737,
;;25716592;49708375
;;E;200;719,1123,2018,3161,
;;25717026;49711576
;;E;200;1371,3359,
;;25717197;49711953
;;E;200;2292,2467,2542,4158,4960,
;;25718056;49712467
;;E;200;326,719,934,989,1552,1815,2000,2277,2446,2498,2892,3094,3114,3251,4038,4321,4599,
;;25719726;49713442
;;E;200;176,193,1128,1205,1443,1518,1601,1733,2017,2281,2585,3285,3474,3775,3902,3996,4397,4495,4590,4788,
;;25722959;49717477
;;E;200;270,499,502,1217,1379,1412,1660,1846,2204,2705,2726,2792,3009,3256,3511,3712,3865,4507,4548,
;;25727920;49721425
;;E;200;463,1576,1852,3433,3590,3637,3663,4130,4218,
;;25736902;49729062
;;E;200;859,1049,1689,1819,2346,2699,3582,
;;25747319;49739528
;;E;200;764,1868,2243,3196,3254,3385,3602,
;;25757985;49749729
;;E;200;1363,1580,3528,3851,4457,4979,
;;25773129;49765154
;;E;200;1044,1505,3616,4998,
;;25783897;49776025
;;E;200;924,1852,2186,2924,3551,3558,3660,
;;25796860;49788059
;;E;200;430,1158,1319,1593,1972,2802,
;;E;400;4977,4978,
;;25807730;49801466
;;E;200;1260,3237,4127,4674,4901,
;;25815463;49809685
;;E;200;244,2444,
;;25823127;49815307
;;E;200;2151,2161,3514,3584,
;;25831454;49824154
;;E;200;2695,3009,3060,3815,4020,4534,4759,
;;25836868;49830035
;;E;200;1566,
;;25843436;49836859
;;E;200;639,3326,4438,
;;25849534;49844065
;;E;200;1503,2259,3123,
;;25863893;49858904
;;E;200;597,1251,1856,1974,2099,2754,2789,3140,
;;25866728;49862842
;;E;200;811,877,1678,2178,
;;25869715;49868135
;;E;200;1015,2935,3181,3285,
;;25873785;49874214
;;E;200;2294,2583,2910,3573,3592,
;;25875986;49877861
;;E;200;3237,3238,4448,
;;25878155;49880484
;;E;200;3693,
;;25879802;49883628
;;E;200;969,3433,
;;25881077;49886044
;;E;200;2871,
;;25882473;49887880
;;E;200;1129,
;;25884241;49890003
;;E;200;481,
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HSDRPA17 9972 printed Dec 13, 2024@03:00:26 Page 2
SDRPA17 ;BP-OIFO/ESW - UTILITY ; 10/31/04 6:00pm
+1 ;;5.3;Scheduling;**376**;Aug 13, 1993
EN(ST) ;
+1 NEW SR,II,STR,SA,STE,GG,SS,SQS,ER,SB,SM,SQ,SBE,SME
+2 FOR II=1:1
SET STR=$PIECE($TEXT(@ST+II),";;",2)
if STR=""
QUIT
Begin DoDot:1
+3 SET SA=$PIECE(STR,";")
if SA="E"
QUIT
+4 SET SB=$PIECE(STR,";")
SET SM=$PIECE(STR,";",2)
Begin DoDot:2
+5 FOR GG=1:1
SET STE=$PIECE($TEXT(@ST+II+GG),";;",2)
if $PIECE(STE,";")'="E"
QUIT
Begin DoDot:3
+6 SET ER=$PIECE(STE,";",2)
SET SQS=$PIECE(STE,";",3)
FOR SS=1:1
SET SQ=$PIECE(SQS,",",SS)
if SQ=""
QUIT
SET SBE=ST_SB
SET SME=ST_SM
DO PR^SD376P(SBE,SME,ER,SQ)
End DoDot:3
+7 SET ER=""
SET SQ=$ORDER(^SDWL(409.6,"AMSG",SM,""))
if SQ=""
QUIT
DO PR^SD376P(SB,SM,ER,SQ)
End DoDot:2
End DoDot:1
+8 QUIT
+9 ;batch;ms
+10 ;E;ere cd;seq1,seq2,
674 ;;
+1 ;;25217915;48941214
+2 ;;E;350;2192,
+3 ;;25277627;49053629
+4 ;;E;200;367,384,475,521,1190,1271,1318,1708,1710,1759,1961,2038,2093,2729,3126,3440,3688,3736,3793,3817,3856,
+5 ;;25283907;49065301
+6 ;;E;200;378,717,949,2020,2136,2527,2741,3082,3367,3385,3446,3711,3836,4029,4071,4376,4928,
+7 ;;25294638;49080201
+8 ;;E;200;476,747,1433,1455,1637,2486,2524,2594,2622,2646,2727,2887,2912,3222,3241,3344,3519,3787,3889,4121,4413,4894,
+9 ;;25303583;49092494
+10 ;;E;200;502,565,725,726,761,965,1415,1626,1752,1999,2074,2077,2089,2101,2114,2435,2574,3193,3352,3463,3685,3750,3760,3761,3932,4173,4180,
+11 ;;E;200;517,607,778,867,913,944,1224,1309,1476,1481,1668,1922,2155
+12 ;;E;200;517,607,778,867,913,944,1224,1309,1476,1481,1668,1922,2155,2284,2300,2320,2454,2569,2572,2658,2696,2801,2904,2907,2913,2918,2971,2975,2984,
+13 ;;E;200;3002,3017,3067,3108,3171,3240,3411,3479,3601,3625,3796,3808,4057,4218,
+14 ;;25318368;49107676
+15 ;;E;200;609,921,1170,1173,1267,1726,1962,2000,2872,2947,2959,2975,2988,2991,3117,3128,3183,3286,3293,3340,3416,3506,3526,3530,3543,3698,3742,4003,4095,4125,4192,4229,4244,4297,4310,
+16 ;;25325672;49115510
+17 ;;E;200;341,413,417,486,523,769,1069,1184,1232,1302,1313,1418,1490,1599,2392,2404,2566,2675,2737,2993,3011,3251,3295,3523,3584,3747,3962,4352,
+18 ;;25326509;49119268
+19 ;;E;200;192,194,384,502,504,624,662,769,954,1006,1517,1615,1821,2026,2057,2175,2293,2420,2502,2526,2541,2672,2817,2862,3022,3085,3092,3115,3257,3333,3487,3610,3660,3688,3782,3804,3831,3933,3980,4416,4878,4887,
+20 ;;25326945;49119456
+21 ;;E;200;2477,2682,2761,2763,2770,2795,2815,2869,2925,3278,3283,3330,3334,3507,3519,3701,3966,4005,4293,4367,4372,4380,4384,
+22 ;;25327195;49120057
+23 ;;E;200;564,703,1024,1803,1852,2144,2165,2693,2707,3077,3104,3500,3837,4281,4415,4563,
+24 ;;E;350;1512,
+25 ;;25327503;49120443
+26 ;;E;200;22,561,1122,1927,2297,2353,2471,2534,2652,2832,2919,2920,4120,4323,4561,4881,
+27 ;;25328054;49120936
+28 ;;E;200;519,670,817,1501,2433,2926,3111,4358,
+29 ;;25328395;49121277
+30 ;;E;200;246,654,1379,1960,2090,2355,2601,2608,3171,3690,3716,3730,
+31 ;;25328504;49125090
+32 ;;E;200;400,460,1006,1032,2128,2613,2795,3098,3439,3892,4502,4662,
+33 ;;25328711;49130992
+34 ;;E;200;1355,1609,1653,1863,1887,2179,2420,2445,2463,2681,2927,4059,4409,4497,
+35 ;;25331266;49133070
+36 ;;E;200;407,570,1342,2418,2634,3503,3933,4091,4356,4667,4961,
+37 ;;25334891;49135124
+38 ;;E;200;1024,2445,3476,
+39 ;;25341571;49141053
+40 ;;E;200;1404,2995,4559,
+41 ;;25350367;49150046
+42 ;;E;200;2172,2190,2288,2913,3303,3416,3418,4523,
+43 ;;25359268;49158911
+44 ;;E;200;1527,2338,2384,2412,3269,3318,3375,3758,4970,
+45 ;;25374264;49172416
+46 ;;E;200;385,1172,1195,2012,2229,2553,2706,2850,3356,3358,3486,3740,
+47 ;;E;200;358,2303,3529,3676,3764,3878,4271,4295,4743,
+48 ;;E;200;358,2303,3529,3676,3764,3878,4271,4295,4743,
+49 ;;25394823;49196200
+50 ;;E;200;2387,3542,3543,3544,3578,3954,4012,4953,
+51 ;;25395743;49198142
+52 ;;E;200;402,1723,1724,2526,2592,4947,
+53 ;;25396049;49199202
+54 ;;E;200;736,1095,1305,1812,2190,2245,2557,2720,2821,2939,3037,3088,3274,3388,3500,3551,4086,4542,
+55 ;;25397679;49200650
+56 ;;E;200;295,868,1329,1918,2102,2206,2222,2351,2403,2529,2551,2556,2632,2807,2972,3235,3553,3742,3782,3878,
+57 ;;25397799;49201471
+58 ;;E;200;203,1110,1554,2324,2334,2355,2623,3662,4231,4427,
+59 ;;25399817;49202495
+60 ;;E;200;815,1046,1799,2175,2346,3786,3838,4055,
+61 ;;25400603;49204834
+62 ;;E;200;1023,1204,1428,2303,2873,2898,3199,3259,3615,4437,4905,
+63 ;;25401313;49205730
+64 ;;E;200;285,976,3091,3706,
+65 ;;E;350;702,
+66 ;;25402604;49207029
+67 ;;E;200;1606,2163,2967,3121,3199,3274,3843,
+68 ;;25404729;49209854
+69 ;;E;200;1656,4942,
+70 ;;25407371;49213437
+71 ;;E;200;645,911,1420,1422,1424,3406,3522,
+72 ;;25409997;49217489
+73 ;;E;200;1299,4549,4943,4954,4959,
+74 ;;25412615;49221198
+75 ;;E;200;1244,1460,1542,2094,2180,2626,2658,3149,3160,3806,4220,4297,4811,
+76 ;;25414954;49224644
+77 ;;E;200;1119,1358,1641,1725,3899,4105,4983,
+78 ;;25416867;49227691
+79 ;;E;200;249,985,2098,2162,2229,2678,3224,4156,4216,
+80 ;;25418438;49230058
+81 ;;E;200;2151,2659,2865,
+82 ;;25419453;49232241
+83 ;;E;200;2858,3711,3720,
+84 ;;25420309;49233464
+85 ;;E;200;2041,2857,3629,3634,3670,4869,
+86 ;;25421225;49234819
+87 ;;E;200;2462,2577,2603,2910,3491,3512,
+88 ;;25422730;49236705
+89 ;;E;200;202,755,1802,2196,3016,3360,3899,3934,4457,
+90 ;;25424211;49238806
+91 ;;E;200;823,865,1449,2497,3544,3555,
+92 ;;25425867;49240848
+93 ;;E;200;457,661,1056,2314,2882,2954,3500,3538,3655,3865,
+94 ;;25427378;49243258
+95 ;;E;200;1158,1268,2363,2922,3089,3730,3952,4046,4087,4346,4975,
+96 ;;25429538;49245769
+97 ;;E;200;228,342,1041,1289,1324,1825,1870,1962,2329,2590,2646,2785,3217,3386,3455,3897,4154,
+98 ;;E;350;2364,
+99 ;;25434564;49249773
+100 ;;E;200;228,261,905,1351,1997,2766,2847,2850,2956,2995,3816,4163,4448,4583,4615,
+101 ;;25443721;49264947
+102 ;;E;200;267,357,707,1165,2431,3759,3843,
+103 ;;25452444;49279635
+104 ;;E;200;580,623,1059,1547,2403,2666,2896,3019,4405,4496,
+105 ;;25461201;49294789
+106 ;;E;200;23,1175,2026,2202,2215,3245,4533,
+107 ;;25468737;49310022
+108 ;;E;200;189,1515,2342,2656,
+109 ;;25468907;49314903
+110 ;;E;200;112,1062,1063,1064,1367,1854,2327,2608,2884,2974,4032,4354,
+111 ;;E;200;357,1869,1880,2391,4181,4404,
+112 ;;E;200;357,1869,1880,2391,4181,4404,
+113 ;;25469461;49315572
+114 ;;E;200;1446,1616,1786,2413,2704,2975,3527,3602,4202,
+115 ;;25469691;49315992
+116 ;;E;200;2906,3213,3256,4417,
+117 ;;25470125;49316720
+118 ;;E;200;34,1321,3175,
+119 ;;E;350;899,
+120 ;;25471835;49318630
+121 ;;E;200;439,1527,3394,
+122 ;;25472066;49319452
+123 ;;E;200;2996,3225,3439,3795,3897,4314,
+124 ;;25472460;49319895
+125 ;;E;200;2911,3944,3952,4075,4317,
+126 ;;25473511;49320217
+127 ;;E;200;1508,1551,2981,
+128 ;;25476116;49323337
+129 ;;E;200;1528,3138,3806,4295,4977,
+130 ;;25480593;49326190
+131 ;;E;200;746,1134,1692,2836,3127,
+132 ;;25485809;49330202
+133 ;;E;200;1324,3437,3734,3825,
+134 ;;25492908;49339053
+135 ;;E;200;357,1504,2342,2678,2823,3040,3729,3975,4190,4891,4960,
+136 ;;25500445;49351142
+137 ;;E;200;411,1133,1249,1277,1956,2351,2426,2479,2736,2898,4798,
+138 ;;25505015;49362568
+139 ;;E;200;266,843,1599,2231,2269,2944,3387,3554,3560,3760,
+140 ;;25505257;49362915
+141 ;;E;200;2928,3338,4208,4590,4996,
+142 ;;25505404;49363170
+143 ;;E;200;261,1464,2449,2536,4973,
+144 ;;25505757;49363649
+145 ;;E;200;1667,3542,3877,4368,4650,4940,
+146 ;;25505949;49363966
+147 ;;E;200;2656,3482,3861,4027,4453,
+148 ;;25506011;49364101
+149 ;;E;200;839,1178,2616,3213,3603,3954,
+150 ;;25506117;49364326
+151 ;;E;200;1169,2100,3391,4860,
+152 ;;25506465;49365020
+153 ;;E;200;326,477,1416,1990,4320,
+154 ;;25507536;49365318
+155 ;;E;200;813,1430,2867,3164,4528,
+156 ;;25516134;49372625
+157 ;;E;200;982,1734,2632,3932,4626,
+158 ;;25520238;49377650
+159 ;;E;200;647,1939,2004,2972,3866,4211,
+160 ;;25531241;49394904
+161 ;;E;200;288,1031,2160,2319,3980,4043,4097,
+162 ;;25541170;49411587
+163 ;;E;200;1675,1856,2193,2250,2546,2838,3127,3323,3727,3739,3831,3894,3903,4050,
+164 ;;25548018;49425352
+165 ;;E;200;8,907,938,1218,2342,2699,3474,3564,3632,4247,
+166 ;;25555062;49438387
+167 ;;E;200;511,1784,2369,3049,3067,3128,3318,3445,3769,4436,4633,
+168 ;;25561820;49452155
+169 ;;E;200;270,1223,1278,1466,1948,2055,2860,3127,3139,3226,3328,4020,4823,
+170 ;;25567090;49463144
+171 ;;E;200;1606,4213,
+172 ;;25573772;49474801
+173 ;;E;200;478,1756,2888,3180,
+174 ;;25625346;49568812
+175 ;;E;200;198,1650,2029,2330,2346,2462,2531,3096,3774,
+176 ;;25643600;49593770
+177 ;;E;200;1273,2727,2976,4287,
+178 ;;25655016;49610188
+179 ;;E;200;2781,3110,3779,4016,4213,
+180 ;;25666966;49627379
+181 ;;E;200;407,2026,2098,3821,4367,
+182 ;;25679867;49645638
+183 ;;E;200;194,563,576,2504,3237,
+184 ;;25690081;49661769
+185 ;;E;200;2567,3003,4260,
+186 ;;25700586;49678334
+187 ;;E;200;2850,3041,3280,4995,
+188 ;;25710517;49694824
+189 ;;E;200;387,769,837,1882,3110,4737,
+190 ;;25716592;49708375
+191 ;;E;200;719,1123,2018,3161,
+192 ;;25717026;49711576
+193 ;;E;200;1371,3359,
+194 ;;25717197;49711953
+195 ;;E;200;2292,2467,2542,4158,4960,
+196 ;;25718056;49712467
+197 ;;E;200;326,719,934,989,1552,1815,2000,2277,2446,2498,2892,3094,3114,3251,4038,4321,4599,
+198 ;;25719726;49713442
+199 ;;E;200;176,193,1128,1205,1443,1518,1601,1733,2017,2281,2585,3285,3474,3775,3902,3996,4397,4495,4590,4788,
+200 ;;25722959;49717477
+201 ;;E;200;270,499,502,1217,1379,1412,1660,1846,2204,2705,2726,2792,3009,3256,3511,3712,3865,4507,4548,
+202 ;;25727920;49721425
+203 ;;E;200;463,1576,1852,3433,3590,3637,3663,4130,4218,
+204 ;;25736902;49729062
+205 ;;E;200;859,1049,1689,1819,2346,2699,3582,
+206 ;;25747319;49739528
+207 ;;E;200;764,1868,2243,3196,3254,3385,3602,
+208 ;;25757985;49749729
+209 ;;E;200;1363,1580,3528,3851,4457,4979,
+210 ;;25773129;49765154
+211 ;;E;200;1044,1505,3616,4998,
+212 ;;25783897;49776025
+213 ;;E;200;924,1852,2186,2924,3551,3558,3660,
+214 ;;25796860;49788059
+215 ;;E;200;430,1158,1319,1593,1972,2802,
+216 ;;E;400;4977,4978,
+217 ;;25807730;49801466
+218 ;;E;200;1260,3237,4127,4674,4901,
+219 ;;25815463;49809685
+220 ;;E;200;244,2444,
+221 ;;25823127;49815307
+222 ;;E;200;2151,2161,3514,3584,
+223 ;;25831454;49824154
+224 ;;E;200;2695,3009,3060,3815,4020,4534,4759,
+225 ;;25836868;49830035
+226 ;;E;200;1566,
+227 ;;25843436;49836859
+228 ;;E;200;639,3326,4438,
+229 ;;25849534;49844065
+230 ;;E;200;1503,2259,3123,
+231 ;;25863893;49858904
+232 ;;E;200;597,1251,1856,1974,2099,2754,2789,3140,
+233 ;;25866728;49862842
+234 ;;E;200;811,877,1678,2178,
+235 ;;25869715;49868135
+236 ;;E;200;1015,2935,3181,3285,
+237 ;;25873785;49874214
+238 ;;E;200;2294,2583,2910,3573,3592,
+239 ;;25875986;49877861
+240 ;;E;200;3237,3238,4448,
+241 ;;25878155;49880484
+242 ;;E;200;3693,
+243 ;;25879802;49883628
+244 ;;E;200;969,3433,
+245 ;;25881077;49886044
+246 ;;E;200;2871,
+247 ;;25882473;49887880
+248 ;;E;200;1129,
+249 ;;25884241;49890003
+250 ;;E;200;481,