| 1 | SDRPA11 ;BP-OIFO/ESW - UTILITY ; 6/9/04 8:21am
|
|---|
| 2 | ;;5.3;Scheduling;**376**;Aug 13, 1993
|
|---|
| 3 | EN(ST) ;
|
|---|
| 4 | N SR,II,STR,SA,STE,GG,SS,SQS,ER,SB,SM,SQ
|
|---|
| 5 | F II=1:1 S STR=$P($T(@ST+II),";;",2) Q:+STR'=ST D
|
|---|
| 6 | .S SA=$P(STR,";",2) Q:SA'="B"
|
|---|
| 7 | .S SB=$P(STR,";",3),SM=$P(STR,";",4) D
|
|---|
| 8 | ..F GG=1:1 S STE=$P($T(@ST+II+GG),";;",2) Q:+STE'=ST!($P(STE,";",2)="B") D
|
|---|
| 9 | ...S ER=$P(STE,";",3) S SQS=$P(STE,";",4) F SS=1:1 S SQ=$P(SQS,",",SS) Q:SQ="" D PR^SD376P(SB,SM,ER,SQ)
|
|---|
| 10 | ..;update batch acknowledgement
|
|---|
| 11 | ..S ER="" S SQ=$O(^SDWL(409.6,"AMSG",SM,"")) Q:SQ="" D PR^SD376P(SB,SM,ER,SQ)
|
|---|
| 12 | Q
|
|---|
| 13 | 529 ;;
|
|---|
| 14 | ;;529;B;5297795920;52911332691
|
|---|
| 15 | ;;529;ER;200;11,65,69,105,106,150,247,462,464,467,578,580,588,590,593,680,717,719,861,872,873,952,953,1144,1224,1502,1760,1863,1990,2522,2524,3396,3397,
|
|---|
| 16 | ;;529;ER;200;3461,3562,3565,3566,3567,3919,3921,3922,3923,3925,3926,3928,3929,3931,4102,4270,4272,4273,4276,4277,4394,4427,4491,4638,4641,4643,4645,4646,4647,4648,4707,4709,
|
|---|
| 17 | ;;529;ER;200;4727,4738,4789,4790,4791,4794,4795,4796,4797,4897,4911,4912,4976,4988,4989,4990,4991,4995,4997,
|
|---|
| 18 | ;;529;B;5297795922;52911332697
|
|---|
| 19 | ;;529;ER;200;655,656,1288,1386,1387,1396,1397,1400,1401,1402,4628,4702,4703,4704,4768,4919,
|
|---|
| 20 | ;;529;B;5297796072;52911332854
|
|---|
| 21 | ;;529;ER;200;338,340,1423,1514,2281,2282,3543,4586,4690,4691,
|
|---|
| 22 | ;;529;B;5297796074;52911332856
|
|---|
| 23 | ;;529;ER;200;301,400,1639,1990,4663,4938,4941,
|
|---|
| 24 | ;;529;B;5297796084;52911332866
|
|---|
| 25 | ;;529;ER;200;770,962,4222,4223,4652,
|
|---|
| 26 | ;;529;B;5297796086;52911332868
|
|---|
| 27 | ;;529;ER;200;760,990,1355,1357,1526,1751,4655,4853,4917,4921,
|
|---|
| 28 | ;;529;B;5297796088;52911332870
|
|---|
| 29 | ;;529;ER;200;753,799,1309,1457,1540,1543,2194,4705,4706,4707,4797,4799,4917,4918,4919,4920,4921,4922,
|
|---|
| 30 | ;;529;B;5297796091;52911332873
|
|---|
| 31 | ;;529;ER;200;772,825,1280,2272,2277,3695,4724,4866,
|
|---|
| 32 | ;;529;B;5297796093;52911332876
|
|---|
| 33 | ;;529;ER;200;839,1575,4720,4829,
|
|---|
| 34 | ;;529;B;5297796099;52911332884
|
|---|
| 35 | ;;529;ER;200;144,322,323,324,325,692,733,1021,1022,1023,2457,2681,3627,3801,3846,4210,4596,4597,4726,4727,4729,
|
|---|
| 36 | ;;529;B;5297796104;52911332889
|
|---|
| 37 | ;;529;ER;200;393,781,1112,1113,1115,1158,1623,2585,2586,3308,4548,4549,4639,4642,
|
|---|
| 38 | ;;529;B;5297796109;52911332894
|
|---|
| 39 | ;;529;ER;200;2,158,305,397,607,670,1125,1263,1264,1414,1415,3162,3305,3830,3831,3995,4252,4253,4687,
|
|---|
| 40 | ;;529;B;5297796111;52911332896
|
|---|
| 41 | ;;529;ER;200;689,702,1039,1757,2708,2709,3760,3908,4059,4589,4650,
|
|---|
| 42 | ;;529;B;5297796113;52911332898
|
|---|
| 43 | ;;529;ER;200;576,577,1773,2032,2119,2120,2121,
|
|---|
| 44 | 531 ;;
|
|---|
| 45 | ;;531;B;53119169425;53192855136
|
|---|
| 46 | ;;531;ER;350;2893,
|
|---|
| 47 | ;;531;B;53119169505;53192855212
|
|---|
| 48 | ;;531;ER;400;4221,4222,
|
|---|
| 49 | 534 ;;
|
|---|
| 50 | ;;534;B;53429620410;53419772381
|
|---|
| 51 | ;;534;ER;350;1718,
|
|---|
| 52 | ;;534;B;53429715403;53419846814
|
|---|
| 53 | ;;534;ER;350;601,4771,
|
|---|
| 54 | ;;534;B;53429731676;53419857147
|
|---|
| 55 | ;;534;ER;350;749,
|
|---|
| 56 | ;;534;B;53429732848;53419857945
|
|---|
| 57 | ;;534;ER;350;1482,
|
|---|
| 58 | 537 ;;
|
|---|
| 59 | ;;537;B;53735470560;53745265152
|
|---|
| 60 | ;;537;ER;350;4853,
|
|---|
| 61 | ;;537;B;53735471635;53745266672
|
|---|
| 62 | ;;537;ER;350;3757,
|
|---|
| 63 | ;;537;B;53735471760;53745267247
|
|---|
| 64 | ;;537;ER;350;518,
|
|---|
| 65 | ;;537;B;53735472129;53745267876
|
|---|
| 66 | ;;537;ER;350;756,
|
|---|
| 67 | ;;537;B;53735472828;53745268806
|
|---|
| 68 | ;;537;ER;350;2261,
|
|---|
| 69 | ;;537;B;53735473888;53745270371
|
|---|
| 70 | ;;537;ER;350;733,
|
|---|
| 71 | ;;537;B;53735475021;53745272010
|
|---|
| 72 | ;;537;ER;350;2602,
|
|---|
| 73 | ;;537;B;53735479605;53745279167
|
|---|
| 74 | ;;537;ER;350;4993,
|
|---|
| 75 | ;;537;B;53735503027;53745313697
|
|---|
| 76 | ;;537;ER;350;4652,
|
|---|
| 77 | ;;537;B;53735503953;53745315198
|
|---|
| 78 | ;;537;ER;350;1465,
|
|---|
| 79 | 539 ;;
|
|---|
| 80 | ;;539;B;53933787453;53940055432
|
|---|
| 81 | ;;539;ER;350;513,
|
|---|
| 82 | ;;539;ER;700;51,52,
|
|---|
| 83 | ;;539;B;53933787850;53940055890
|
|---|
| 84 | ;;539;ER;350;2568,2569,
|
|---|
| 85 | ;;539;B;53933798889;53940063916
|
|---|
| 86 | ;;539;ER;350;2033,
|
|---|
| 87 | ;;539;B;53933804361;53940068636
|
|---|
| 88 | ;;539;ER;350;266,
|
|---|
| 89 | ;;539;B;53933862286;53940119176
|
|---|
| 90 | ;;539;ER;350;3501,
|
|---|
| 91 | 541 ;;
|
|---|
| 92 | ;;541;B;54111500367;54180257613
|
|---|
| 93 | ;;541;ER;350;1515,
|
|---|
| 94 | ;;541;B;54111506210;54180292305
|
|---|
| 95 | ;;541;ER;350;1888,
|
|---|
| 96 | ;;541;B;54111507474;54180301756
|
|---|
| 97 | ;;541;ER;350;2487,2488,3501,4664,
|
|---|
| 98 | ;;541;B;54111507861;54180303147
|
|---|
| 99 | ;;541;ER;350;3530,
|
|---|
| 100 | ;;541;B;54111514729;54180342697
|
|---|
| 101 | ;;541;ER;350;4980,
|
|---|
| 102 | ;;541;B;54111521658;54180384213
|
|---|
| 103 | ;;541;ER;350;3902,
|
|---|
| 104 | ;;541;B;54111527072;54180427801
|
|---|
| 105 | ;;541;ER;350;1673,
|
|---|
| 106 | ;;541;B;54111529245;54180441238
|
|---|
| 107 | ;;541;ER;400;5,
|
|---|
| 108 | ;;541;B;54111537488;54180498625
|
|---|
| 109 | ;;541;ER;350;650,
|
|---|
| 110 | ;;541;B;54111539596;54180511438
|
|---|
| 111 | ;;541;ER;350;1312,
|
|---|
| 112 | ;;541;B;54111542820;54180530340
|
|---|
| 113 | ;;541;ER;350;4635,
|
|---|
| 114 | ;;541;B;54111543032;54180531719
|
|---|
| 115 | ;;541;ER;350;3498,
|
|---|
| 116 | ;;541;B;54111637583;54181143457
|
|---|
| 117 | ;;541;ER;700;2688,
|
|---|
| 118 | ;;541;B;54111662851;54181310927
|
|---|
| 119 | ;;541;ER;400;8,
|
|---|
| 120 | 544 ;;
|
|---|
| 121 | ;;544;B;54425329584;54433704269
|
|---|
| 122 | ;;544;ER;350;2563,
|
|---|
| 123 | ;;544;B;54425371042;54433736350
|
|---|
| 124 | ;;544;ER;350;2191,
|
|---|
| 125 | 546 ;;
|
|---|
| 126 | ;;546;B;54654062543;54658177137
|
|---|
| 127 | ;;546;ER;350;2857,3790,
|
|---|
| 128 | ;;546;B;54654075634;54658186625
|
|---|
| 129 | ;;546;ER;350;1142,1616,
|
|---|
| 130 | ;;546;B;54654075856;54658186864
|
|---|
| 131 | ;;546;ER;350;1563,2377,3855,
|
|---|
| 132 | ;;546;B;54654086082;54658198129
|
|---|
| 133 | ;;546;ER;350;3153,
|
|---|
| 134 | ;;546;B;54654089535;54658201995
|
|---|
| 135 | ;;546;ER;350;2404,
|
|---|
| 136 | ;;546;B;54654093439;54658207190
|
|---|
| 137 | ;;546;ER;350;1281,2767,
|
|---|
| 138 | ;;546;B;54654096575;54658211269
|
|---|
| 139 | ;;546;ER;350;887,
|
|---|
| 140 | ;;546;B;54654100397;54658217572
|
|---|
| 141 | ;;546;ER;350;506,
|
|---|
| 142 | ;;546;B;54654115613;54658239891
|
|---|
| 143 | ;;546;ER;350;149,
|
|---|
| 144 | ;;546;B;54654116042;54658240421
|
|---|
| 145 | ;;546;ER;350;7,
|
|---|
| 146 | ;;546;B;54654116758;54658241465
|
|---|
| 147 | ;;546;ER;350;3987,
|
|---|
| 148 | ;;546;B;54654128189;54658246454
|
|---|
| 149 | ;;546;ER;350;1314,
|
|---|
| 150 | ;;546;B;54654132002;54658252972
|
|---|
| 151 | ;;546;ER;350;216,1566,
|
|---|
| 152 | ;;546;B;54654152367;54658277081
|
|---|
| 153 | ;;546;ER;350;189,1155,
|
|---|
