Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Routine: KMPDUT1

Package: Capacity Management

Routine: KMPDUT1


Information

KMPDUT1 ;OAK/RAK - Test Lab Utility ;6/21/05 10:17

Source Information

Source file <KMPDUT1.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 3 MSG^DIALOG  FILE^DIE  ^DIR  
Capacity Management 2 ROUINQ^KMPDU2  ROUSAVE^KMPDU3  
Kernel 1 $$PATCH^XPDUTL  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Capacity Management 5 KMPDTU01  KMPDUTL2  KMPRBD01  KMPRBD02  KMPRBD04  

Entry Points

Name Comments DBIA/ICR reference
TL ;-entry point for setting up database as a test lab
TESTLAB() ;-extrinsic - test for test lab database

External References

Name Field # of Occurrence
MSG^DIALOG TL+24
FILE^DIE TL+23, TL+40
^DIR TL+9
ROUINQ^KMPDU2 TL+28
ROUSAVE^KMPDU3 TL+29, TL+41
$$PATCH^XPDUTL TL+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: TL+9
Function Call: WRITE
  • Prompt: !!?3,$C(7),"No action taken!"
  • Line Location: TL+10
Function Call: WRITE
  • Prompt: !!?3,"Setting up database..."
  • Line Location: TL+12
Function Call: WRITE
  • Prompt: "done"
  • Line Location: TL+14
Function Call: WRITE
  • Prompt: !
  • Line Location: TL+16
Function Call: WRITE
  • Prompt: !?3,"Updating RUM Weeks to Keep Data = 99 ..."
  • Line Location: TL+17
Function Call: WRITE
  • Prompt: !?3," HL7 Weeks to Keep Data = 99 ..."
  • Line Location: TL+18
Function Call: WRITE
  • Prompt: !?3," Timing Weeks to Keep Data = 99 ..."
  • Line Location: TL+19
Function Call: WRITE
  • Prompt: "done"
  • Line Location: TL+25
Function Call: WRITE
  • Prompt: !
  • Line Location: TL+26
Function Call: WRITE
  • Prompt: !?3,"Saving ZOSVKRT as %ZOSVKR ..."
  • Line Location: TL+27
Function Call: WRITE
  • Prompt: "done"
  • Line Location: TL+30
Function Call: WRITE
  • Prompt: !
  • Line Location: TL+31
Function Call: WRITE
  • Prompt: !?3,"Deleting old ^KMPTMP(""KMPR"" data..."
  • Line Location: TL+32
Function Call: WRITE
  • Prompt: "done"
  • Line Location: TL+34
Function Call: WRITE
  • Prompt: !!?3,"*** This is now a Capacity Planning Test Lab database ***"
  • Line Location: TL+44
Routine Call
  • DIALOG
  • Line Location:
    • TL+24
Routine Call
  • DIE
  • Line Location:
    • TL+23
    • TL+40
Routine Call
  • DIR
  • Line Location:
    • TL+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4.2 - [#4.2] TL+35
^KMPD(8973 - [#8973] TL+13*, TL+15, TESTLAB+6
^KMPTMP("KMPR" TL+33!

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR TL+6~
DIR("A" TL+8*
DIR("B" TL+7*
DIR(0 TL+7*
ERROR TL+6~, TL+24, TL+37!
FDA TL+6~, TL+37!
FDA( TL+20*, TL+21*, TL+22*, TL+39*
IEN TL+6~, TL+15*, TL+20, TL+21, TL+22, TL+35*, TL+36, TL+39
ROUTINE TL+6~, TL+28, TL+29, TL+41
TL TESTLAB+5~, TESTLAB+6*, TESTLAB+7
X TL+6~
Y TL+6~, TL+10
Z TL+6~, TL+29, TL+41
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Local Variables  | All