source: FOIAVistA/tag/r/MAILMAN-XM/XMNTEG.m@ 668

Last change on this file since 668 was 628, checked in by George Lilly, 15 years ago

initial load of FOIAVistA 6/30/08 version
File size: 3.5 KB
Line 
1XMNTEG ;ISC/XTSUMBLD KERNEL - Package checksum checker ;07/23/2002 10:18
2 ;;8.0;MailMan;;Jun 28, 2002
3 ;;7.3;Apr 19, 2002@07:52:43
4 S XT4="I 1",X=$T(+3) W !!,"Checksum routine created on ",$P(X,";",4)," by KERNEL V",$P(X,";",3),!
5CONT F XT1=1:1 S XT2=$T(ROU+XT1) Q:XT2="" S X=$P(XT2," ",1),XT3=$P(XT2,";",3) X XT4 I $T W !,X X ^%ZOSF("TEST") S:'$T XT3=0 X:XT3 ^%ZOSF("RSUM") W ?10,$S('XT3:"Routine not in UCI",XT3'=Y:"Calculated "_$C(7)_Y_", off by "_(Y-XT3),1:"ok")
6 G CONT^XMNTEG0
7 K %1,%2,%3,X,Y,XT1,XT2,XT3,XT4 Q
8ONE S XT4="I $D(^UTILITY($J,X))",X=$T(+3) W !!,"Checksum routine created on ",$P(X,";",4)," by KERNEL V",$P(X,";",3),!
9 W !,"Check a subset of routines:" K ^UTILITY($J) X ^%ZOSF("RSEL")
10 W ! G CONT
11ROU ;;
12XM ;;10750940
13XMA ;;193377
14XMA0 ;;305822
15XMA03 ;;66257
16XMA11 ;;19543
17XMA11A ;;295406
18XMA1B ;;741680
19XMA1C ;;99629
20XMA2 ;;1117192
21XMA21 ;;2501947
22XMA21C ;;5477330
23XMA2B ;;4983521
24XMA2R ;;3986868
25XMA3 ;;11956281
26XMA30 ;;10571799
27XMA32 ;;8481844
28XMA32A ;;9150003
29XMA7 ;;16522
30XMAD2 ;;208202
31XMADGO ;;10833
32XMAFTP ;;3725650
33XMAH ;;1584093
34XMAH1 ;;2176845
35XMAI2 ;;2084332
36XMAPBLOB ;;4954112
37XMAPHOST ;;7077399
38XMASEC ;;46560
39XMB ;;4289569
40XMBBLOB ;;1692263
41XMBGRP ;;8136862
42XMC ;;3542655
43XMC1 ;;9454283
44XMC11 ;;2246886
45XMC1A ;;3411138
46XMC1B ;;2460937
47XMCB ;;3553056
48XMCD ;;4131908
49XMCDNT ;;401792
50XMCE ;;1460559
51XMCP ;;2311480
52XMCQ ;;4988121
53XMCQA ;;6380548
54XMCQH ;;2468361
55XMCSIZE ;;1758419
56XMCTLK ;;8483546
57XMCTRAP ;;161791
58XMCU1 ;;787300
59XMCX ;;5550363
60XMCXT ;;2533239
61XMCXU ;;5743394
62XMD ;;7748228
63XMDIR1 ;;9778409
64XMDIR1A ;;4299248
65XMDIR1B ;;3077473
66XMDIRQST ;;7707598
67XMDIRRCV ;;1925075
68XMDIRSND ;;2039595
69XMFAX ;;5011960
70XMGAPI0 ;;2470973
71XMGAPI1 ;;22159
72XMGAPI2 ;;3885630
73XMGAPI3 ;;2143520
74XMGAPI4 ;;5418259
75XMHIG ;;6374158
76XMHIU ;;9084627
77XMJBL ;;4988691
78XMJBM ;;11064135
79XMJBM1 ;;3151843
80XMJBN ;;10845646
81XMJBN1 ;;5454531
82XMJBU ;;2768827
83XMJDIR ;;6153613
84XMJERR ;;375271
85XMJMA ;;3612338
86XMJMBULL ;;1994222
87XMJMC ;;9725999
88XMJMCODE ;;12533067
89XMJMD ;;9375016
90XMJMF ;;3844343
91XMJMF1 ;;11350281
92XMJMF2 ;;6670003
93XMJMFA ;;6729708
94XMJMFB ;;17121533
95XMJMFC ;;12108437
96XMJML ;;12709285
97XMJMLN ;;14794710
98XMJMLR ;;14272339
99XMJMLR1 ;;6881581
100XMJMOI ;;14666274
101XMJMOI1 ;;8385762
102XMJMOIE ;;3277725
103XMJMP ;;15497599
104XMJMP1 ;;18918998
105XMJMP2 ;;2708969
106XMJMQ ;;14078177
107XMJMQ1 ;;13480745
108XMJMR ;;10472863
109XMJMR1 ;;10598504
110XMJMRO ;;5049970
111XMJMS ;;7995221
112XMJMSA ;;1902278
113XMJMSO ;;10097928
114XMJMT ;;8959953
115XMKP ;;16206281
116XMKP1 ;;1811191
117XMKPL ;;2912755
118XMKPLQ ;;5786623
119XMKPO ;;2469366
120XMKPR ;;10051281
121XMKPR1 ;;5051210
122XMKPRD ;;5470763
123XML ;;5119164
124XML1CRC ;;5596625
125XML4CRC ;;11722711
126XML4CRC1 ;;6216754
127XMLPC ;;2821947
128XMLSWP ;;5626101
129XMLSWP0 ;;5152871
130XMLSWP2 ;;3134547
131XMLTCP ;;2332071
132XMM1 ;;3866874
133XMM2 ;;2670817
134XMP ;;8830587
135XMP2 ;;9384926
136XMP2A ;;8263048
137XMJMOR ;;14793912
138XMJMORX ;;13578226
139XMJMORX1 ;;7116146
140XMP3 ;;6720603
141XMPC ;;5352206
142XMPG ;;4410165
143XMPH ;;4952939
144XMPSEC ;;7152889
145XMR ;;11613068
146XMR0BLOB ;;4867143
147XMR1 ;;10825754
148XMR2 ;;2314394
149XMR3 ;;14650619
150XMR3A ;;2650246
151XMR4 ;;11545724
152XMRENT ;;2261713
153XMRFTP ;;3153916
154XMRFTPUX ;;3165955
155XMRINETD ;;363486
156XMRMSM ;;338607
157XMRONT ;;390591
158XMRPCTS ;;4756429
159XMRPCTS0 ;;5251212
160XMRPCTS1 ;;5706972
161XMRPCTSA ;;3495721
162XMRPOP ;;11311549
163XMRTCP ;;3549159
164XMRTCPGO ;;2857890
165XMRUCX ;;1143285
166XMS ;;8210098
167XMS0BLOB ;;6743955
168XMS1 ;;9572683
169XMS2 ;;5021128
170XMS3 ;;11387711
171XMSFTP ;;3096740
172XMSFTPUX ;;3150307
173XMTDF ;;7250797
174XMTDL ;;18753082
175XMTDL1 ;;4584627
176XMTDL2 ;;10414584
177XMTDO ;;1726768
178XMTDR ;;10257008
179XMTDT ;;8338601
180XMUCXPOP ;;361549
181XMUDCHK ;;1578565
182XMUDCHR ;;8046508
183XMUDNC ;;14028901
184XMUDTOP ;;3796998
Note: See TracBrowser for help on using the repository browser.