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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: MCOPRG1

Package: Medicine

Routine: MCOPRG1


Information

MCOPRG1 ; ;08/19/97

Source Information

Source file <MCOPRG1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 8 ^DIC  E^DIE0  (,0,F,M,N,Z)^DIE17  Z^DIE2  ^DIE3  QQ^DIEQ  ^DIR  RW^DIR2  

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: 1

Package Total Caller Graph
Medicine 1 MCOPRG  

Entry Points

Name Comments DBIA/ICR reference
DE
W
O
TR
A
B
RE
N
RD
T
P
V
Z
X
QS
D
Y
PR
R
RP
I
SET
BEGIN
1
X1
2
X2
3
X3
4
X4
5
C5
C5S
X5
6
C6
C6S
X6
7
X7
8
M8
R8
9

External References

Name Field # of Occurrence
^DIC P
E^DIE0 I+1, 1+3, 2+2, 3+2, 4+3
^DIE17 RD
0^DIE17 9
F^DIE17 6, 7
M^DIE17 T
N^DIE17 RP, 1+3, 2+2, 3+2, 4+3
Z^DIE17 X
Z^DIE2 RD+1
^DIE3 T
QQ^DIEQ QS
^DIR SET+2
RW^DIR2 O+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: W
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !?DL+DL-2,DLB_": "
  • Line Location: W+0
Function Call: WRITE
  • Prompt: W
  • Line Location: O+0
Function Call: WRITE
  • Prompt: Y
  • Line Location: O+0
Function Call: WRITE
  • Prompt: !?9
  • Condition for execution: $X>45
  • Line Location: O+0
Function Call: WRITE
  • Prompt: " (No Editing)"
  • Line Location: O+2
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: TR+0
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: TR+0
Function Call: WRITE
  • Prompt: " "_X
  • Line Location: RD+2
Routine Call
  • DIC
  • Line Location:
    • P
Routine Call
  • DIR
  • Line Location:
    • SET+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^MCAR(697.2 - [#697.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( T, R, R+1
^DD("DD" R+2
^DIE("B" X2, X3
^DISV( RD+2, Z*
^MCAR(697.2 - [#697.2] DE, C5+1!, C5S+1*, C6+1!, C6S+1*, X6, 8+4, M8, R8+1

Label References

Name Line Occurrences
8+1 R8+1
@( B, V
A N, Z, Y, RP, 1+3, 2+2, 3+2, 4+3
B QS
BEGIN MCOPRG1+1
C5S C5
C6S C6
D RD, RD+1, P+1, QS
DE MCOPRG1+1, 6, 7, R8
M8 8+3
N Y
O Y, RP
P T
PR RE, I+1
QS RD
R R, R+1
RD Y, I, I+1, 1+4, 2+3, 3+3, 4+4
RE 5+2, 6+2, 7+2, 8+3, M8+1
RP PR, R, R+1
SET T
TR RE
V T, P+1
W O, RE
X N, T+1, P, Y
Z P+1

Naked Globals

Name Field # of Occurrence
^( RD+2, R, R+1
^(0 DE+1, R, R+1, 8+3, 8+4, M8, R8+1
^(1 DE+2
^(12.1 T

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DE+1*, DE+2*, T, R+2*, SET+2*
%Z DE+1*, DE+2*, DE+3!
>> D N, D*, 8*, 8+1, 8+3*, 8+4*, M8, R8+1*
>> DA DE, C5+1, C5S+1, C6+1, C6S+1, 8+4, M8, R8+1
DB DE!, C5!, C5S!, C6!, C6S!
DB( T, P, X, SET, SET+1, 1+3*, 2+2*, 3+2*, 4+3*
>> DC RP, 8+1*, M8*
DDER T, T+1!, SET+2
DE DE!
DE( O+2, RE, Y, PR, RP, 1+3, 2+2, 3+2, 4+3, 5+1*
, 6+1*
DE(1 DE+1*, 8!
DE(2 DE+1*
DE(3 DE+1*
DE(4 DE+1*
DE(5 DE+1*, C5
DE(6 DE+1*, C6
DE(7 DE+2*
DE(8 M8*
DG DE!, PR*, R*, R+1*, R+2, 6, 7
DG( Z*, C5S, C6S
>> DGO 8+1*
>> DIC DE*, P*, C5*, C5S*, C6*, C6S*
>> DIC("S" T, Z!
>> DIC(0 P*
>> DIE DE*, P, C5, C5S, C6, C6S
>> DIEL DE*
>> DIFLD T, D, 1*, 2*, 3*, 4*, 5*, 6*, 7*, 8+1*
DIQUIET SET+1~*
DIR SET~
DIR("V" SET*
DIR(0 SET*
>> DL DE*, W
DLAYGO P*, Z!
>> DLB W, RD+2, Z, D, 1*, 2*, 3*, 4*, 5*, 6*
, 7*, 8+1*
>> DNM BEGIN*
>> DOW 8+1*
>> DP DE*, T
>> DQ O+2, A*, B, RE, T, P, P+2, V, X, D
, Y, PR, RP, SET, SET+1, BEGIN*, 1+3, 2+2, 3+2, 4+3
, C5S, 6*, C6S, 7*
>> DQ( A!, P+2, D*, PR
>> DSC( 8+3
DTIME TR
>> DTOUT TR*
>> DU DE*, P, D, PR, SET, 1*, 1+1*, 2*, 3*, 4*
, 4+1*, 5*, 6*, 7*, 7+1*, 8+2*
DUZ RD+2, Z
>> DV O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y
, PR, RP, I, 1*, 1+3, 2*, 2+2, 3*, 3+2, 4*
, 4+3, 5*, 6*, 7*, 8+1*
>> DW Z, D, 1*, 2*, 3*, 4*, 5*, 5+1, 6*, 6+1
, 7*, 8+1*
>> DZ QS*
U DE+1, DE+2, TR, P, P+2, Z, D, R, R+1, SET
, 8+4, M8, R8+1
X O+2*, TR*, N, RD, RD+1, RD+2*, T, P*, P+1!, P+2*
, Z, X+1*, QS, Y*, PR*, R*, R+1*, R+2, RP*, I+1
, SET+2*, 1+3*, 2+2*, X2!, X2+1!, 3+2*, X3!, X3+1!, 4+3*, C5*
, C5+1, C5S*, C5S+1, X5!, X5+1!, C6*, C6+1, C6S*, C6S+1, X6!
, X6+1!
>> Y O, O+1, O+2, P, Y, PR*, R*, R+1*, R+2*, SET+2
, 1+2*, 1+3, 2+1*, 2+2, 3+1*, 3+2, 4+2*, 4+3
>> Y(0 SET+2
YS V!
>> ZTQUEUED X

Marked Items

Name Field # of Occurrence
$T(@(3) D
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All