Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: TIUNTEG

TIUNTEG.m

Go to the documentation of this file.
  1. TIUNTEG ;ISC/XTSUMBLD KERNEL - Package checksum checker ;2970620.123138
  1. ;;1.0;TEXT INTEGRATION UTILITIES;;Jun 20, 1997
  1. ;;7.3;2970620.123138
  1. S XT4="I 1",X=$T(+3) W !!,"Checksum routine created on ",$P(X,";",4)," by KERNEL V",$P(X,";",3),!
  1. 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")
  1. G CONT^TIUNTEG0
  1. K %1,%2,%3,X,Y,XT1,XT2,XT3,XT4 Q
  1. 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),!
  1. W !,"Check a subset of routines:" K ^UTILITY($J) X ^%ZOSF("RSEL")
  1. W ! G CONT
  1. ROU ;;
  1. TIUADD ;;7939178
  1. TIUALRT ;;7724825
  1. TIUAPIOK ;;3873064
  1. TIUAUDIT ;;1559021
  1. TIUBPEDT ;;508305
  1. TIUBR ;;16765412
  1. TIUBRWS ;;1237447
  1. TIUCHLP ;;5315023
  1. TIUCNSLT ;;3238172
  1. TIUDD ;;6376918
  1. TIUDD0 ;;21480632
  1. TIUDD01 ;;20076138
  1. TIUDD8 ;;2520260
  1. TIUDD98 ;;3931207
  1. TIUDEV ;;663743
  1. TIUDIRH ;;6774537
  1. TIUDIRT ;;4819153
  1. TIUDPEDT ;;536132
  1. TIUDSCNV ;;16495251
  1. TIUEDI1 ;;12991861
  1. TIUEDI2 ;;2954081
  1. TIUEDIH ;;2975
  1. TIUEDIM ;;4154959
  1. TIUEDIT ;;15928365
  1. TIUEDITR ;;3870968
  1. TIUELST ;;6772054
  1. TIUENV ;;2421536
  1. TIUEPRNT ;;2624119
  1. TIUFA ;;7724519
  1. TIUFA1 ;;8087670
  1. TIUFC ;;16465224
  1. TIUFC1 ;;19039288
  1. TIUFD ;;13475272
  1. TIUFD1 ;;7389491
  1. TIUFD2 ;;9547245
  1. TIUFD3 ;;14786473
  1. TIUFD4 ;;10720702
  1. TIUFH ;;4847823
  1. TIUFH1 ;;8382917
  1. TIUFHA ;;11209902
  1. TIUFHA1 ;;16234597
  1. TIUFHA2 ;;20808986
  1. TIUFHA3 ;;15228639
  1. TIUFHA4 ;;12217790
  1. TIUFHA5 ;;12641740
  1. TIUFHA6 ;;12852158
  1. TIUFHLP ;;18092533
  1. TIUFHLP1 ;;7453350
  1. TIUFJ ;;1653738
  1. TIUFL ;;8221970
  1. TIUFL1 ;;9625979
  1. TIUFLA ;;6405212
  1. TIUFLA1 ;;2988344
  1. TIUFLD ;;11125322
  1. TIUFLD1 ;;4692678
  1. TIUFLF ;;4692333
  1. TIUFLF1 ;;16152310
  1. TIUFLF2 ;;6745681
  1. TIUFLF3 ;;15793790
  1. TIUFLF4 ;;5459448
  1. TIUFLF5 ;;11369224
  1. TIUFLF6 ;;8814847
  1. TIUFLF7 ;;9734560
  1. TIUFLF8 ;;9404495
  1. TIUFLJ ;;12909079
  1. TIUFLJ1 ;;3627713
  1. TIUFLLM ;;2495187
  1. TIUFLLM1 ;;6144428
  1. TIUFLLM2 ;;12502975
  1. TIUFLLM3 ;;2548
  1. TIUFLT ;;3650017
  1. TIUFLX ;;12531676
  1. TIUFPR ;;9166442
  1. TIUFT ;;14588286
  1. TIUFT1 ;;10470637
  1. TIUFX ;;3844855
  1. TIUFXHL1 ;;9104209
  1. TIUFXHLX ;;18092984
  1. TIUHELP ;;4390368
  1. TIUIL ;;10707933
  1. TIUIL1 ;;10268200
  1. TIUIL10 ;;7628768
  1. TIUIL2 ;;11877224
  1. TIUIL3 ;;10819358
  1. TIUIL4 ;;9431475
  1. TIUIL5 ;;11262828
  1. TIUIL6 ;;9326742
  1. TIUIL7 ;;9797774
  1. TIUIL8 ;;11200556
  1. TIUIL9 ;;9274343
  1. TIULA ;;9753874
  1. TIULA1 ;;6870970
  1. TIULA2 ;;11422552
  1. TIULA3 ;;3916214
  1. TIULA4 ;;4078327
  1. TIULAB ;;2641708
  1. TIULADR ;;929390
  1. TIULAPI ;;2326288
  1. TIULAPIC ;;1609587
  1. TIULAPIS ;;2575326
  1. TIULC ;;8062118
  1. TIULC1 ;;5470005
  1. TIULD ;;4208524
  1. TIULE ;;1891756
  1. TIULEXP ;;835975
  1. TIULF ;;2643087
  1. TIULG ;;2290558
  1. TIULIP ;;1481077
  1. TIULM ;;1683142
  1. TIULMED ;;1603954
  1. TIULO ;;10506939
  1. TIULO1 ;;1280434
  1. TIULP ;;5129626
  1. TIULP1 ;;9230018
  1. TIULQ ;;4047639
  1. TIULQ2 ;;2252073
  1. TIULS ;;6580172
  1. TIULS1 ;;1692
  1. TIULV ;;8064646
  1. TIULX ;;3630728
  1. TIUMOVE ;;6394806
  1. TIUPD ;;7130073
  1. TIUPEDSP ;;452634
  1. TIUPEFIX ;;8681313
  1. TIUPEVN1 ;;629456
  1. TIUPEVNT ;;12440029
  1. TIUPL ;;1185
  1. TIUPLST ;;6597575
  1. TIUPNAPI ;;2629902
  1. TIUPNCV ;;11015132
  1. TIUPNCV1 ;;4045073
  1. TIUPNCV2 ;;9243409
  1. TIUPNCV3 ;;6588806
  1. TIUPNCV4 ;;7285743
  1. TIUPNCV5 ;;6195313
  1. TIUPNCV6 ;;4479485
  1. TIUPNCV7 ;;5344754
  1. TIUPNCV8 ;;6071067
  1. TIUPNCVX ;;6339101
  1. TIUPOST ;;1636376
  1. TIUPRD ;;3348806
  1. TIUPRDS ;;2346057
  1. TIUPRDS1 ;;16479696
  1. TIUPRDS2 ;;4555312
  1. TIUPREF ;;449069
  1. TIUPRPN ;;1209356
  1. TIUPRPN1 ;;14535169
  1. TIUPRPN2 ;;3472106
  1. TIUPRPN3 ;;6243546
  1. TIUPRPN4 ;;3435921
  1. TIUPRPN5 ;;8277668
  1. TIUPRPN6 ;;4171463
  1. TIUPRPN7 ;;9719095
  1. TIUPUTC ;;11775034
  1. TIUPUTD ;;6772714
  1. TIUPUTPN ;;6063243
  1. TIUPUTU ;;5268373
  1. TIUPXAP1 ;;5360722
  1. TIUPXAP2 ;;2016671
  1. TIUPXAPC ;;6952381
  1. TIUPXAPI ;;11865817
  1. TIUPXAPS ;;2373559