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

ENXINTEG.m

Go to the documentation of this file.
  1. ENXINTEG ;ISC/XTSUMBLD KERNEL - Package checksum checker ;2960502.131141
  1. ;;7.0;ENGINEERING;**29**;AUG 17, 1993
  1. ;;7.3;2960502.131141
  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. ;
  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. ENEQ1 ;;15943609
  1. ENEQ2 ;;3718555
  1. ENEQ3 ;;9567935
  1. ENFAACQ ;;3251203
  1. ENFABAL ;;7395231
  1. ENFABAL1 ;;6148095
  1. ENFABAL2 ;;4772133
  1. ENFABETR ;;6586420
  1. ENFACHG ;;8006179
  1. ENFACHG1 ;;4952416
  1. ENFADEL ;;7044336
  1. ENFAR5 ;;2158505
  1. ENFAR5A ;;5963313
  1. ENFAR5B ;;4664964
  1. ENFAR6 ;;4453095
  1. ENFAR7 ;;4442374
  1. ENFAR8 ;;9004680
  1. ENFAR9 ;;4795054
  1. ENFAUTL ;;5899860
  1. ENFAVAL ;;5036996
  1. ENFAXFR ;;11159800
  1. ENFAXMT ;;6799082
  1. ENFAXMT1 ;;1943030
  1. ENFAXMT2 ;;3087087
  1. ENFAXMT3 ;;2819864
  1. ENFAXMTM ;;13047900
  1. ENXII001 ;;10753466
  1. ENXII002 ;;10015525
  1. ENXII003 ;;4340468
  1. ENXII004 ;;12599245
  1. ENXII005 ;;16230405
  1. ENXII006 ;;9901233
  1. ENXII007 ;;8714324
  1. ENXII008 ;;11121727
  1. ENXII009 ;;15165236
  1. ENXII00A ;;9549838
  1. ENXII00B ;;2260736
  1. ENXII00C ;;9464213
  1. ENXII00D ;;6163681
  1. ENXII00E ;;5979267
  1. ENXII00F ;;7149044
  1. ENXII00G ;;8106054
  1. ENXII00H ;;6876419
  1. ENXII00I ;;7505659
  1. ENXII00J ;;1666345
  1. ENXII00K ;;7134128
  1. ENXII00L ;;7927807
  1. ENXII00M ;;8369132
  1. ENXII00N ;;7175350
  1. ENXII00O ;;7152387
  1. ENXII00P ;;7850369
  1. ENXII00Q ;;8469378
  1. ENXII00R ;;8155274
  1. ENXII00S ;;7493063
  1. ENXII00T ;;7133566
  1. ENXII00U ;;7885107
  1. ENXII00V ;;7140619
  1. ENXII00W ;;7148774
  1. ENXII00X ;;7981917
  1. ENXII00Y ;;7395102
  1. ENXII00Z ;;2908187
  1. ENXII010 ;;8139617
  1. ENXII011 ;;2293500
  1. ENXII012 ;;1544611
  1. ENXII013 ;;11875590
  1. ENXII014 ;;8877057
  1. ENXII015 ;;8383757
  1. ENXII016 ;;10831159
  1. ENXII017 ;;6054024
  1. ENXIIEN ;;2138630
  1. ENXIINI1 ;;4931412
  1. ENXIINI2 ;;5232612
  1. ENXIINI3 ;;16807402
  1. ENXIINI4 ;;3357784
  1. ENXIINI5 ;;1219345
  1. ENXIINIT ;;10512210
  1. ENXIIPR ;;692591
  1. ENXIIPS ;;2761988