Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields
Print Page as PDF
Global: ^KMPD(8972.1

Package: Capacity Management

Global: ^KMPD(8972.1


Information

FileMan FileNo FileMan Filename Package
8972.1 CP CODE EVALUATOR Capacity Management

Description

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Capacity Management 2 KMPDU3    KMPDUTL8    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Kernel 1 NEW PERSON(#200)[.03, 2.02]    

Fields, Total: 23

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X
  • HELP-PROMPT:  NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION
  • CROSS-REFERENCE:  8972.1^B
    1)= S ^KMPD(8972.1,"B",$E(X,1,30),DA)=""
    2)= K ^KMPD(8972.1,"B",$E(X,1,30),DA)
.02 DATE/TIME ENTERED 0;2 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  AUG 20, 1999
.03 ENTERED BY 0;3 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  AUG 20, 1999
.04 CPU TIME 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  AUG 20, 1999
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
.05 DIO REFERENCES 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  AUG 20, 1999
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
.06 BIO REFERENCES 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  AUG 20, 1999
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
.07 PAGE FAULTS 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  AUG 20, 1999
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
.08 M COMMANDS 0;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  AUG 20, 1999
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
.09 GLOBAL REFERENCES 0;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  AUG 20, 1999
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
.1 COUNT 0;10 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  MAR 15, 2000
  • HELP-PROMPT:  Answer must be 1-15 characters in length
.11 ACTIVE 0;11 SET
  • '0' FOR not active;
  • '1' FOR active;

  • LAST EDITED:  JUL 06, 2009
.12 ELAPSED TIME (SECONDS) 0;12 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>12!($L(X)<1) X
  • LAST EDITED:  NOV 15, 2005
  • HELP-PROMPT:  Answer must be 1-12 characters in length
1.01 BRIEF DESCRIPTION 1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>60!($L(X)<1) X
  • LAST EDITED:  MAR 16, 2000
  • HELP-PROMPT:  Answer must be 1-60 characters in length
2.01 DATE/TIME LAST EDITED 2;1 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  MAR 29, 2000
  • HELP-PROMPT:  (No range limit on date)
2.02 LAST EDITED BY 2;2 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAR 29, 2000
10 COMMENTS 10;0 WORD-PROCESSING #8972.11

  • LAST EDITED:  AUG 20, 1999
11 ASSOCIATED ROUTINE 11;0 Multiple #8972.111 8972.111
99.04 AVE CPU TIME COMPUTED

  • MUMPS CODE:  X ^DD(8972.1,99.04,9.4) S X=$E(Y(8972.1,99.04,5),Y(8972.1,99.04,6),X)
    9.2 = S Y(8972.1,99.04,1)=$S($D(^KMPD(8972.1,D0,0)):^(0),1:"") S X=$P(Y(8972.1,99.04,1),U,10),Y(8972.1,99.04,2)=X S X=$P(Y(8972.1,99.04,1),U,4),X=$S($P(Y(8972.1,99.04,1),U,10):X/$P(Y(8972.1,99.04,1),U,10),1:"*******")
    9.3 = X ^DD(8972.1,99.04,9.2) S Y(8972.1,99.04,3)=X S X=1,Y(8972.1,99.04,4)=X S X=$P(Y(8972.1,99.04,1),U,4)
    9.4 = X ^DD(8972.1,99.04,9.3) S X=$S(Y(8972.1,99.04,2):Y(8972.1,99.04,3),Y(8972.1,99.04,4):X),Y(8972.1,99.04,5)=X S X=1,Y(8972.1,99.04,6)=X S X=15
  • ALGORITHM:  $E($S(COUNT:CPU TIME/COUNT,1:CPU TIME),1,15)
  • LAST EDITED:  APR 04, 2000
99.05 AVE DIO REFERENCES COMPUTED

  • MUMPS CODE:  X ^DD(8972.1,99.05,9.4) S X=$E(Y(8972.1,99.05,5),Y(8972.1,99.05,6),X)
    9.2 = S Y(8972.1,99.05,1)=$S($D(^KMPD(8972.1,D0,0)):^(0),1:"") S X=$P(Y(8972.1,99.05,1),U,10),Y(8972.1,99.05,2)=X S X=$P(Y(8972.1,99.05,1),U,5),X=$S($P(Y(8972.1,99.05,1),U,10):X/$P(Y(8972.1,99.05,1),U,10),1:"*******")
    9.3 = X ^DD(8972.1,99.05,9.2) S Y(8972.1,99.05,3)=X S X=1,Y(8972.1,99.05,4)=X S X=$P(Y(8972.1,99.05,1),U,5)
    9.4 = X ^DD(8972.1,99.05,9.3) S X=$S(Y(8972.1,99.05,2):Y(8972.1,99.05,3),Y(8972.1,99.05,4):X),Y(8972.1,99.05,5)=X S X=1,Y(8972.1,99.05,6)=X S X=15
  • ALGORITHM:  $E($S(COUNT:DIO REFERENCES/COUNT,1:DIO REFERENCES),1,15)
  • LAST EDITED:  APR 04, 2000
99.06 AVE BIO REFERENCES COMPUTED

  • MUMPS CODE:  X ^DD(8972.1,99.06,9.4) S X=$E(Y(8972.1,99.06,5),Y(8972.1,99.06,6),X)
    9.2 = S Y(8972.1,99.06,1)=$S($D(^KMPD(8972.1,D0,0)):^(0),1:"") S X=$P(Y(8972.1,99.06,1),U,10),Y(8972.1,99.06,2)=X S X=$P(Y(8972.1,99.06,1),U,6),X=$S($P(Y(8972.1,99.06,1),U,10):X/$P(Y(8972.1,99.06,1),U,10),1:"*******")
    9.3 = X ^DD(8972.1,99.06,9.2) S Y(8972.1,99.06,3)=X S X=1,Y(8972.1,99.06,4)=X S X=$P(Y(8972.1,99.06,1),U,6)
    9.4 = X ^DD(8972.1,99.06,9.3) S X=$S(Y(8972.1,99.06,2):Y(8972.1,99.06,3),Y(8972.1,99.06,4):X),Y(8972.1,99.06,5)=X S X=1,Y(8972.1,99.06,6)=X S X=15
  • ALGORITHM:  $E($S(COUNT:BIO REFERENCES/COUNT,1:BIO REFERENCES),1,15)
  • LAST EDITED:  APR 04, 2000
99.07 AVE PAGE FAULTS COMPUTED

  • MUMPS CODE:  X ^DD(8972.1,99.07,9.4) S X=$E(Y(8972.1,99.07,5),Y(8972.1,99.07,6),X)
    9.2 = S Y(8972.1,99.07,1)=$S($D(^KMPD(8972.1,D0,0)):^(0),1:"") S X=$P(Y(8972.1,99.07,1),U,10),Y(8972.1,99.07,2)=X S X=$P(Y(8972.1,99.07,1),U,7),X=$S($P(Y(8972.1,99.07,1),U,10):X/$P(Y(8972.1,99.07,1),U,10),1:"*******")
    9.3 = X ^DD(8972.1,99.07,9.2) S Y(8972.1,99.07,3)=X S X=1,Y(8972.1,99.07,4)=X S X=$P(Y(8972.1,99.07,1),U,7)
    9.4 = X ^DD(8972.1,99.07,9.3) S X=$S(Y(8972.1,99.07,2):Y(8972.1,99.07,3),Y(8972.1,99.07,4):X),Y(8972.1,99.07,5)=X S X=1,Y(8972.1,99.07,6)=X S X=15
  • ALGORITHM:  $E($S(COUNT:PAGE FAULTS/COUNT,1:PAGE FAULTS),1,15)
  • LAST EDITED:  APR 04, 2000
99.08 AVE M COMMANDS COMPUTED

  • MUMPS CODE:  X ^DD(8972.1,99.08,9.4) S X=$E(Y(8972.1,99.08,5),Y(8972.1,99.08,6),X)
    9.2 = S Y(8972.1,99.08,1)=$S($D(^KMPD(8972.1,D0,0)):^(0),1:"") S X=$P(Y(8972.1,99.08,1),U,10),Y(8972.1,99.08,2)=X S X=$P(Y(8972.1,99.08,1),U,8),X=$S($P(Y(8972.1,99.08,1),U,10):X/$P(Y(8972.1,99.08,1),U,10),1:"*******")
    9.3 = X ^DD(8972.1,99.08,9.2) S Y(8972.1,99.08,3)=X S X=1,Y(8972.1,99.08,4)=X S X=$P(Y(8972.1,99.08,1),U,8)
    9.4 = X ^DD(8972.1,99.08,9.3) S X=$S(Y(8972.1,99.08,2):Y(8972.1,99.08,3),Y(8972.1,99.08,4):X),Y(8972.1,99.08,5)=X S X=1,Y(8972.1,99.08,6)=X S X=15
  • ALGORITHM:  $E($S(COUNT:M COMMANDS/COUNT,1:M COMMANDS),1,15)
  • LAST EDITED:  APR 04, 2000
99.09 AVE GLOBAL REFERENCES COMPUTED

  • MUMPS CODE:  X ^DD(8972.1,99.09,9.4) S X=$E(Y(8972.1,99.09,5),Y(8972.1,99.09,6),X)
    9.2 = S Y(8972.1,99.09,1)=$S($D(^KMPD(8972.1,D0,0)):^(0),1:"") S X=$P(Y(8972.1,99.09,1),U,10),Y(8972.1,99.09,2)=X S X=$P(Y(8972.1,99.09,1),U,9),X=$S($P(Y(8972.1,99.09,1),U,10):X/$P(Y(8972.1,99.09,1),U,10),1:"*******")
    9.3 = X ^DD(8972.1,99.09,9.2) S Y(8972.1,99.09,3)=X S X=1,Y(8972.1,99.09,4)=X S X=$P(Y(8972.1,99.09,1),U,9)
    9.4 = X ^DD(8972.1,99.09,9.3) S X=$S(Y(8972.1,99.09,2):Y(8972.1,99.09,3),Y(8972.1,99.09,4):X),Y(8972.1,99.09,5)=X S X=1,Y(8972.1,99.09,6)=X S X=15
  • ALGORITHM:  $E($S(COUNT:GLOBAL REFERENCES/COUNT,1:GLOBAL REFERENCES),1,15)
  • LAST EDITED:  APR 04, 2000
Info |  Desc |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields