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

XTNTEG.m

Go to the documentation of this file.
  1. XTNTEG ;ISC/XTSUMBLD KERNEL - Package checksum checker ;2950425.092013
  1. ;;7.3;TOOLKIT;;Apr 25, 1995
  1. ;;7.3;2950425.092013
  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^XTNTEG0
  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. XDRCNT ;;7651887
  1. XDRDADD ;;8133407
  1. XDRDADJ ;;4509269
  1. XDRDCOMP ;;4431965
  1. XDRDFPD ;;7816795
  1. XDRDLIST ;;7786460
  1. XDRDMAIN ;;5700890
  1. XDRDOC ;;19083
  1. XDRDOC1 ;;13351
  1. XDRDOC2 ;;19767
  1. XDRDPDTI ;;2075925
  1. XDRDPRGE ;;3959904
  1. XDRDQUE ;;9275556
  1. XDRDSCOR ;;1855732
  1. XDRDSTAT ;;2676366
  1. XDRDUP ;;3547600
  1. XDREMSG ;;4302480
  1. XDRERR ;;127648
  1. XDRHLP ;;2681700
  1. XDRMADD ;;6382715
  1. XDRMAIN ;;7563507
  1. XDRMAINI ;;14611797
  1. XDRMPACK ;;2927651
  1. XDRMRG ;;14311248
  1. XDRMRG1 ;;1874512
  1. XDRMSG ;;1827956
  1. XDRMVFY ;;1318075
  1. XDRPREI ;;293004
  1. XDRU1 ;;1782236
  1. XINDEX ;;7227772
  1. XINDX1 ;;6096231
  1. XINDX10 ;;12585180
  1. XINDX11 ;;7471101
  1. XINDX2 ;;5054188
  1. XINDX3 ;;3897455
  1. XINDX4 ;;4711071
  1. XINDX5 ;;6259999
  1. XINDX51 ;;9529173
  1. XINDX52 ;;2298647
  1. XINDX53 ;;4122188
  1. XINDX6 ;;10179476
  1. XINDX7 ;;7575886
  1. XINDX8 ;;6101428
  1. XINDX9 ;;4045898
  1. XTBASE ;;2331979
  1. XTCMFILN ;;4125344
  1. XTEDTVXD ;;1542362
  1. XTFC0 ;;11055774
  1. XTFC1 ;;14547133
  1. XTFCE ;;5859522
  1. XTFCE1 ;;6311273
  1. XTFCR ;;5587602
  1. XTFCR1 ;;3692308
  1. XTINEND ;;5215462
  1. XTINI001 ;;5950864
  1. XTINI002 ;;4393549
  1. XTINI003 ;;6019987
  1. XTINI004 ;;4028880
  1. XTINI005 ;;3990558
  1. XTINI006 ;;9416677
  1. XTINI007 ;;9086371
  1. XTINI008 ;;8419298
  1. XTINI009 ;;8019911
  1. XTINI00A ;;9113926
  1. XTINI00B ;;11110278
  1. XTINI00C ;;11151493
  1. XTINI00D ;;9306443
  1. XTINI00E ;;8494510
  1. XTINI00F ;;8489467
  1. XTINI00G ;;7747693
  1. XTINI00H ;;7094018
  1. XTINI00I ;;7643278
  1. XTINI00J ;;8405097
  1. XTINI00K ;;7198108
  1. XTINI00L ;;6651500
  1. XTINI00M ;;8180768
  1. XTINI00N ;;7132260
  1. XTINI00O ;;2910462
  1. XTINI00P ;;7694041
  1. XTINI00Q ;;8160242
  1. XTINI00R ;;9440499
  1. XTINI00S ;;9016307
  1. XTINI00T ;;9491800
  1. XTINI00U ;;10283373
  1. XTINI00V ;;8766708
  1. XTINI00W ;;6509886
  1. XTINI00X ;;8595714
  1. XTINI00Y ;;7948819
  1. XTINI00Z ;;1773424
  1. XTINI010 ;;7071607
  1. XTINI011 ;;5531060
  1. XTINI012 ;;7968888
  1. XTINI013 ;;11142565
  1. XTINI014 ;;2687098
  1. XTINI015 ;;8767076
  1. XTINI016 ;;3859202
  1. XTINI017 ;;7490625
  1. XTINI018 ;;2613367
  1. XTINI019 ;;4541347
  1. XTINI01A ;;7350290
  1. XTINI01B ;;3719011
  1. XTINI01C ;;6289769
  1. XTINI01D ;;1212716
  1. XTINI01E ;;5998915
  1. XTINI01F ;;5482770
  1. XTINI01G ;;3469421
  1. XTINI01H ;;1876516
  1. XTINI01I ;;5948679
  1. XTINI01J ;;5624949
  1. XTINI01K ;;7118498
  1. XTINI01L ;;5020375
  1. XTINI01M ;;6515584
  1. XTINI01N ;;7612374
  1. XTINI01O ;;7804125
  1. XTINI01P ;;7864176
  1. XTINI01Q ;;7980433
  1. XTINI01R ;;7872517
  1. XTINI01S ;;7885668
  1. XTINI01T ;;8156338
  1. XTINI01U ;;5743708
  1. XTINI01V ;;8379152
  1. XTINI01W ;;7143097
  1. XTINI01X ;;6494785
  1. XTINI01Y ;;6468654
  1. XTINI01Z ;;6344717
  1. XTINI020 ;;6053332
  1. XTINI021 ;;6154942
  1. XTINI022 ;;6263758
  1. XTINI023 ;;6988435
  1. XTINI024 ;;7095170
  1. XTINI025 ;;5225531
  1. XTINI026 ;;6836611
  1. XTINI027 ;;7165347
  1. XTINI028 ;;7867999
  1. XTINI029 ;;5902113
  1. XTINI02A ;;7114778
  1. XTINI02B ;;6562588
  1. XTINI02C ;;5066519
  1. XTINI02D ;;4746121
  1. XTINI02E ;;3747162
  1. XTINI02F ;;1763576
  1. XTINIS ;;2134872
  1. XTINIT ;;11072830
  1. XTINIT1 ;;5762600
  1. XTINIT2 ;;5232093
  1. XTINIT3 ;;16090016
  1. XTINIT4 ;;3357263
  1. XTINIT5 ;;1525744
  1. XTINITY ;;15382450
  1. XTINOK ;;2394003
  1. XTKERM1 ;;5596187
  1. XTKERM2 ;;7359658
  1. XTKERM3 ;;2782884
  1. XTKERM4 ;;5378382
  1. XTKERMIT ;;2016322
  1. XTLATSET ;;6413686
  1. XTLKDICL ;;2562328