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