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

ESPNTEG.m

Go to the documentation of this file.
  1. ESPNTEG ;ISC/XTSUMBLD KERNEL - Package checksum checker ;MAR 31, 1994@08:01:37
  1. ;;1.0;POLICE & SECURITY;;Mar 31, 1994
  1. ;;7.1;MAR 31, 1994@08:01:37
  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. ESPCLEAN ;;3617130
  1. ESPDISP ;;8445950
  1. ESPEVID ;;2633580
  1. ESPFM ;;671826
  1. ESPJOU ;;7420205
  1. ESPLKUP ;;1111906
  1. ESPMNI ;;8390757
  1. ESPMNI0 ;;6907068
  1. ESPMNI1 ;;11760087
  1. ESPMNI2 ;;7339736
  1. ESPOFF ;;9577402
  1. ESPOFF0 ;;4501317
  1. ESPOFF1 ;;11861002
  1. ESPOFF2 ;;7874513
  1. ESPOFF3 ;;2612029
  1. ESPOFFC ;;1826778
  1. ESPOFFCL ;;4293110
  1. ESPOFFDE ;;1304355
  1. ESPOFFE ;;9140986
  1. ESPOFI ;;2873726
  1. ESPOFP ;;4985097
  1. ESPOID ;;1183794
  1. ESPORM ;;6476318
  1. ESPORM1 ;;9780856
  1. ESPORM2 ;;11613373
  1. ESPORM3 ;;9391867
  1. ESPORM4 ;;7212940
  1. ESPORM5 ;;8440221
  1. ESPORO ;;1939123
  1. ESPORP ;;6209059
  1. ESPORP1 ;;7690242
  1. ESPORP2 ;;8758394
  1. ESPORP3 ;;7608208
  1. ESPORP4 ;;5994947
  1. ESPORP5 ;;5709927
  1. ESPORR ;;1457912
  1. ESPOST ;;75075
  1. ESPQNC ;;15482737
  1. ESPRE ;;1342
  1. ESPREG ;;5049457
  1. ESPSCR ;;6634426
  1. ESPSCR0 ;;7329208
  1. ESPSCR1 ;;6394895
  1. ESPSOUN ;;8321687
  1. ESPUCD ;;1892232
  1. ESPUCM ;;3234667
  1. ESPUCM1 ;;13162314
  1. ESPUCM2 ;;11602226
  1. ESPUCM3 ;;12134922
  1. ESPUCM4 ;;10696088
  1. ESPUCM5 ;;7624962
  1. ESPUCM6 ;;5207702
  1. ESPUCP ;;3031002
  1. ESPUCP1 ;;9796208
  1. ESPUCP2 ;;8227056
  1. ESPUCP3 ;;8371546
  1. ESPUCP4 ;;7009374
  1. ESPUCP5 ;;5482768
  1. ESPUCP6 ;;3564270
  1. ESPUCR ;;7931679
  1. ESPUCR1 ;;7602101
  1. ESPUCR2 ;;5688017
  1. ESPUCR3 ;;3880770
  1. ESPUCR4 ;;10238627
  1. ESPUCR5 ;;3574673
  1. ESPUOR ;;284432
  1. ESPUTIL ;;289821
  1. ESPUVN ;;11161871
  1. ESPVAL ;;2569800
  1. ESPVEH ;;618734
  1. ESPVNE ;;1686447
  1. ESPVNP ;;8453293
  1. ESPVREG ;;9086257
  1. ESPWR ;;6006260
  1. ESPWR1 ;;1123731
  1. ESPXREF ;;2231562