| [613] | 1 | DVBANTE1 ;ISC/XTSUMBLD KERNEL - Package checksum checker ;APR 10, 1995@13:51:40
|
|---|
| 2 | ;;2.7;AMIE;;Apr 10, 1995
|
|---|
| 3 | ;;7.2;APR 10, 1995@13:51:40
|
|---|
| 4 | S XT4="I 1",X=$T(+3) W !!,"Checksum routine created on ",$P(X,";",4)," by KERNEL V",$P(X,";",3),!
|
|---|
| 5 | 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")
|
|---|
| 6 | ;
|
|---|
| 7 | K %1,%2,%3,X,Y,XT1,XT2,XT3,XT4 Q
|
|---|
| 8 | 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),!
|
|---|
| 9 | W !,"Check a subset of routines:" K ^UTILITY($J) X ^%ZOSF("RSEL")
|
|---|
| 10 | W ! G CONT
|
|---|
| 11 | ROU ;;
|
|---|
| 12 | DVBCPGC ;;3629785
|
|---|
| 13 | DVBCPGD ;;11420689
|
|---|
| 14 | DVBCPGD1 ;;572906
|
|---|
| 15 | DVBCPGH ;;3373772
|
|---|
| 16 | DVBCPGL ;;1850746
|
|---|
| 17 | DVBCPGR ;;9240313
|
|---|
| 18 | DVBCPGR2 ;;5229832
|
|---|
| 19 | DVBCPGU ;;203249
|
|---|
| 20 | DVBCPICK ;;13939469
|
|---|
| 21 | DVBCPNCK ;;10044404
|
|---|
| 22 | DVBCPND1 ;;16899646
|
|---|
| 23 | DVBCPNDR ;;16810308
|
|---|
| 24 | DVBCPRCK ;;9547206
|
|---|
| 25 | DVBCPRN1 ;;13330130
|
|---|
| 26 | DVBCPRNT ;;10116611
|
|---|
| 27 | DVBCPTCK ;;11835787
|
|---|
| 28 | DVBCPTS1 ;;9638269
|
|---|
| 29 | DVBCPUCK ;;8892327
|
|---|
| 30 | DVBCPURG ;;2431903
|
|---|
| 31 | DVBCPWC1 ;;22513970
|
|---|
| 32 | DVBCPWC2 ;;8815419
|
|---|
| 33 | DVBCPWC3 ;;4489767
|
|---|
| 34 | DVBCPWC4 ;;7046962
|
|---|
| 35 | DVBCPWCK ;;12425723
|
|---|
| 36 | DVBCPYCK ;;8272715
|
|---|
| 37 | DVBCRACK ;;8048704
|
|---|
| 38 | DVBCREDT ;;10184147
|
|---|
| 39 | DVBCRELS ;;11302743
|
|---|
| 40 | DVBCREQ1 ;;9905931
|
|---|
| 41 | DVBCREQ2 ;;8627439
|
|---|
| 42 | DVBCREQ3 ;;2872183
|
|---|
| 43 | DVBCREQM ;;3068313
|
|---|
| 44 | DVBCREQP ;;13619707
|
|---|
| 45 | DVBCRLST ;;5612320
|
|---|
| 46 | DVBCRMCK ;;10472657
|
|---|
| 47 | DVBCROP1 ;;2112790
|
|---|
| 48 | DVBCROPN ;;13604559
|
|---|
| 49 | DVBCRPON ;;10309052
|
|---|
| 50 | DVBCRPR1 ;;8547301
|
|---|
| 51 | DVBCRPRT ;;9132762
|
|---|
| 52 | DVBCSCCK ;;14602586
|
|---|
| 53 | DVBCSCHD ;;14356477
|
|---|
| 54 | DVBCSDEV ;;742431
|
|---|
| 55 | DVBCSECK ;;5042896
|
|---|
| 56 | DVBCSKCK ;;16733993
|
|---|
| 57 | DVBCSMCK ;;9642868
|
|---|
| 58 | DVBCSPCK ;;12224238
|
|---|
| 59 | DVBCSRCK ;;10038108
|
|---|
| 60 | DVBCSTCK ;;9443868
|
|---|
| 61 | DVBCSYCK ;;11659947
|
|---|
| 62 | DVBCTRN ;;7222901
|
|---|
| 63 | DVBCTRN1 ;;2117428
|
|---|
| 64 | DVBCTRNN ;;1315735
|
|---|
| 65 | DVBCTSCK ;;9953638
|
|---|
| 66 | DVBCTTCK ;;8903016
|
|---|
| 67 | DVBCULAP ;;6951849
|
|---|
| 68 | DVBCUTA1 ;;7784264
|
|---|
| 69 | DVBCUTA2 ;;7425828
|
|---|
| 70 | DVBCUTA3 ;;6525329
|
|---|
| 71 | DVBCUTA4 ;;1930083
|
|---|
| 72 | DVBCUTIL ;;17784731
|
|---|
| 73 | DVBCUTL2 ;;16484712
|
|---|
| 74 | DVBCUTL3 ;;14291313
|
|---|
| 75 | DVBCUTL4 ;;6410758
|
|---|
| 76 | DVBCUTL5 ;;4812185
|
|---|
| 77 | DVBCUTL6 ;;5521630
|
|---|
| 78 | DVBCUTL7 ;;4066959
|
|---|
| 79 | DVBCUTL8 ;;5560283
|
|---|
| 80 | DVBCVSC1 ;;8410639
|
|---|
| 81 | DVBCVSC2 ;;3179214
|
|---|
| 82 | DVBCVSCK ;;8269704
|
|---|
| 83 | DVBCVW2 ;;3362992
|
|---|
| 84 | DVBCXFRA ;;14804015
|
|---|
| 85 | DVBCXFRB ;;10012404
|
|---|
| 86 | DVBCXFRC ;;14794975
|
|---|
| 87 | DVBCXFRD ;;5143029
|
|---|
| 88 | DVBCXFRE ;;14434836
|
|---|
| 89 | DVBCXFRS ;;6119351
|
|---|
| 90 | DVBCXSCK ;;10643105
|
|---|
| 91 | DVBCXUTL ;;1017429
|
|---|
