181 lines
3.5 KiB
Mathematica
181 lines
3.5 KiB
Mathematica
SDNTEG ;ISC/XTSUMBLD KERNEL - Package checksum checker ;AUG 13, 1993@12:51:49
|
|
;;5.3;Scheduling;;Aug 13, 1993
|
|
;;7.0;AUG 13, 1993@12:51:49
|
|
S XT4="I 1",X=$T(+3) W !!,"Checksum routine created on ",$P(X,";",4)," by KERNEL V",$P(X,";",3),!
|
|
CONT 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")
|
|
G CONT^SDNTEG0
|
|
K %1,%2,%3,X,Y,XT1,XT2,XT3,XT4 Q
|
|
ONE S XT4="I $D(^UTILITY($J,X))",X=$T(+3) W !!,"Checksum routine created on ",$P(X,";",4)," by KERNEL V",$P(X,";",3),!
|
|
W !,"Check a subset of routines:" K ^UTILITY($J) X ^%ZOSF("RSEL")
|
|
W ! G CONT
|
|
ROU ;;
|
|
SD ;;804795
|
|
SDA223AN ;;5976444
|
|
SDA223N ;;15706566
|
|
SDA223N1 ;;1453813
|
|
SDACS ;;3663833
|
|
SDACS0 ;;8480166
|
|
SDACS1 ;;15001549
|
|
SDACSCG ;;13087344
|
|
SDACSCGB ;;14826419
|
|
SDACSCGP ;;16113980
|
|
SDAL ;;5804280
|
|
SDAL0 ;;11625993
|
|
SDAM ;;3230589
|
|
SDAM1 ;;8184632
|
|
SDAM10 ;;2952107
|
|
SDAM2 ;;7920545
|
|
SDAM3 ;;4512652
|
|
SDAM5 ;;3960436
|
|
SDAMBAE ;;14898871
|
|
SDAMBAE0 ;;10423066
|
|
SDAMBAE1 ;;12061053
|
|
SDAMBAE2 ;;14284562
|
|
SDAMBAE3 ;;8934007
|
|
SDAMBAE4 ;;4962021
|
|
SDAMBAE5 ;;4282115
|
|
SDAMBAE6 ;;1267277
|
|
SDAMBCL ;;9282452
|
|
SDAMBEE ;;285989
|
|
SDAMBMR ;;17161851
|
|
SDAMBMR1 ;;17719721
|
|
SDAMBMR2 ;;14320995
|
|
SDAMBMR3 ;;13093130
|
|
SDAMC ;;5653136
|
|
SDAMEP ;;3031106
|
|
SDAMEP1 ;;8403410
|
|
SDAMEP2 ;;6257643
|
|
SDAMEP3 ;;2601010
|
|
SDAMEP4 ;;456357
|
|
SDAMEVT ;;9977931
|
|
SDAMEVT0 ;;2555
|
|
SDAMEVT1 ;;6083206
|
|
SDAMEVT2 ;;2164883
|
|
SDAMEVT3 ;;5224872
|
|
SDAMEVT4 ;;3158378
|
|
SDAMEX ;;7750940
|
|
SDAMEX1 ;;498097
|
|
SDAMLD ;;6800106
|
|
SDAMN ;;3294769
|
|
SDAMO ;;3484006
|
|
SDAMO0 ;;2572315
|
|
SDAMO1 ;;2965567
|
|
SDAMO11 ;;7155191
|
|
SDAMO2 ;;4539854
|
|
SDAMODO ;;4758418
|
|
SDAMODO1 ;;1799429
|
|
SDAMODO2 ;;6940403
|
|
SDAMODO3 ;;7227049
|
|
SDAMOL ;;1948337
|
|
SDAMOL1 ;;15707520
|
|
SDAMOLP ;;4924500
|
|
SDAMOS ;;7939456
|
|
SDAMOS0 ;;2977018
|
|
SDAMOS1 ;;5801474
|
|
SDAMOSP ;;7809048
|
|
SDAMQ ;;4702330
|
|
SDAMQ1 ;;4494515
|
|
SDAMQ2 ;;5530986
|
|
SDAMQ3 ;;5302646
|
|
SDAMQ4 ;;2800995
|
|
SDAMQ5 ;;2347715
|
|
SDAMU ;;1269661
|
|
SDAMWI ;;6378214
|
|
SDAMWI1 ;;2383935
|
|
SDAPP ;;4770952
|
|
SDASEE ;;14445544
|
|
SDASEE1 ;;7969810
|
|
SDASEE2 ;;2176573
|
|
SDASEP ;;11261741
|
|
SDASO ;;7227723
|
|
SDAUT1 ;;3642937
|
|
SDAUT2 ;;19663831
|
|
SDB ;;9944374
|
|
SDB0 ;;6741618
|
|
SDB1 ;;12121223
|
|
SDC ;;14900742
|
|
SDC0 ;;14671704
|
|
SDC1 ;;3434743
|
|
SDC2 ;;7784041
|
|
SDC3 ;;5313137
|
|
SDC4 ;;1142041
|
|
SDCAN ;;785063
|
|
SDCCP ;;3508258
|
|
SDCD ;;6752619
|
|
SDCI ;;1611841
|
|
SDCIAL ;;11232401
|
|
SDCLAS ;;13141298
|
|
SDCLAS0 ;;12392553
|
|
SDCLAS1 ;;14835834
|
|
SDCLAV ;;7282312
|
|
SDCLAV0 ;;4873869
|
|
SDCLAV1 ;;13150157
|
|
SDCLDOW ;;5388954
|
|
SDCLK ;;19141458
|
|
SDCNL ;;14997623
|
|
SDCNP ;;13115963
|
|
SDCNP0 ;;19213709
|
|
SDCNP1 ;;12622692
|
|
SDCNP1A ;;18920698
|
|
SDCNP2 ;;6743499
|
|
SDCO ;;2028989
|
|
SDCO0 ;;9640540
|
|
SDCO1 ;;6940811
|
|
SDCO2 ;;4571129
|
|
SDCO20 ;;3099353
|
|
SDCO21 ;;2878529
|
|
SDCO22 ;;2672854
|
|
SDCO23 ;;2021308
|
|
SDCO3 ;;5529902
|
|
SDCO31 ;;1167543
|
|
SDCO4 ;;5802239
|
|
SDCO41 ;;1622955
|
|
SDCO5 ;;653104
|
|
SDCO6 ;;2985390
|
|
SDCO7 ;;1746597
|
|
SDCO8 ;;1488932
|
|
SDCOAM ;;7877912
|
|
SDCODD ;;951277
|
|
SDCODEL ;;4028664
|
|
SDCOM ;;3597941
|
|
SDCOU ;;2812724
|
|
SDCOU1 ;;307548
|
|
SDCOU2 ;;618877
|
|
SDCOUR ;;2941998
|
|
SDCP ;;15308939
|
|
SDCSSD ;;5210687
|
|
SDCVP ;;15690811
|
|
SDCWL ;;20480131
|
|
SDCWL1 ;;19198498
|
|
SDCWL2 ;;15060622
|
|
SDCWL3 ;;12725071
|
|
SDD ;;6872339
|
|
SDD0 ;;13858093
|
|
SDDADT ;;1358703
|
|
SDDADT0 ;;11414282
|
|
SDDIV ;;5127804
|
|
SDDPA ;;17722979
|
|
SDDSO ;;7872162
|
|
SDDSSA ;;4192206
|
|
SDDSSA0 ;;19997912
|
|
SDDSSA1 ;;13066332
|
|
SDF ;;11416969
|
|
SDF1 ;;8010091
|
|
SDHOL ;;347989
|
|
SDKILL ;;10034892
|
|
SDL1 ;;8211181
|
|
SDLT ;;5076280
|
|
SDLTE ;;2306144
|
|
SDLTP ;;16470189
|
|
SDM ;;16978464
|
|
SDM0 ;;15944427
|
|
SDM1 ;;18343842
|
|
SDM1A ;;11720115
|
|
SDM2 ;;11018279
|
|
SDM3 ;;10287325
|
|
SDM4 ;;7146893
|
|
SDMEAN ;;6896890
|
|
SDMM ;;18035821
|
|
SDMM1 ;;7854683
|
|
SDMT ;;7004794
|