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

Package: Medicine

Routine: MCOPRG


Information

MCOPRG ; GENERATED FROM 'MCBUILDGENERIC' INPUT TEMPLATE(#2735), FILE 697.2;11/29/04

Source Information

Source file <MCOPRG.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA Fileman 9 E^DIE0  (,0,F,M,N,UNIQFERR,Z)^DIE17  Z^DIE2  ^DIE3  (AST,NOSCR)^DIED  QQ^DIEQ  $$GETTMP^DIKC1  ^DIR  
RW^DIR2  

Entry Points

Name Comments DBIA/ICR reference
C14F1
C14S
DE
X10
12
X11
C13
X9
C14
PR
1
BEGIN
SET
RP
TR
X8
RD
RE
3
2
5
4
7
6
X2
X3
C1
X1
X6
X7
KEYCHK()
X5
A
R16
B
D
C13S
I
13
O
N
15
P
R
T
W
V
Y
X
X12
Z
X14
X15
11
10
QS
C5F1
C5S
14
17
16
9
NKEY
C13F1
C5
X4
M16
C1S
8
C1F1
X13
SAVEVALS

External References

Name Field # of Occurrence
E^DIE0 I+1, 1+3, 2+2, 3+2, 4+2, 5+4, 6+2, 7+2, 8+2, 9+3
, 10+2, 11+2, 12+3
^DIE17 RD
0^DIE17 17
F^DIE17 2, 6, 14, 15
M^DIE17 T
N^DIE17 RP, 1+3, 2+2, 3+2, 4+2, 5+4, 6+2, 7+2, 8+2, 9+3
, 10+2, 11+2, 12+3
UNIQFERR^DIE17 Z
Z^DIE17 X
Z^DIE2 RD+1
^DIE3 T
AST^DIED P
NOSCR^DIED P
QQ^DIEQ QS
$$GETTMP^DIKC1 BEGIN+1
^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
  • Timeout: DTIME
  • Variable: X
  • 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
  • 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
^DD("KEY" - [#.31] N
^DIE("B" X10, X11
^DIE(2735 BEGIN+2
^DISV( RD+2, Z*
^MCAR(697.2 - [#697.2] DE, C1+2!, C1S+2*, C5+2!, C5S+2*, C13+2!, C13S+2*, C14+2!, C14S+2*, X14
, 16+4, M16, R16+1

Label References

Name Line Occurrences
$$KEYCHK Z
16+1 R16+1
@( B, V
A N, Z, Y, RP, 1+3, 2+2, 3+2, 4+2, 5+4, 6+2
, 7+2, 8+2, 9+3, 10+2, 11+2, 12+3
B QS
BEGIN MCOPRG+1
C13F1 C13S
C13S C13
C14F1 C14S
C14S C14
C1F1 C1S
C1S C1
C5F1 C5S
C5S C5
D RD, RD+1, P+1, QS
DE MCOPRG+1, 2, 6, 14, 15, R16
M16 16+3
N Y
NKEY N
O Y, RP
P T
PR RE, I+1
QS RD, NKEY
R R, R+1
RD Y, I, I+1, 1+4, 2+3, 3+3, 4+3, 5+5, 6+3, 7+3
, 8+3, 9+4, 10+3, 11+3, 12+4
RE 13+2, 14+2, 15+2, 16+3, M16+1
RP PR, R, R+1
SAVEVALS Z
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
^("F" SAVEVALS*
^(0 DE+1, R, R+1, 16+3, 16+4, M16, R16+1
^(1 DE+3
^(12.1 T

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DE+1*, DE+2*, DE+3*, T, R+2*, SET+2*
%Z DE+1*, DE+2, DE+3*, DE+4!
>> D N, D*, 16*, 16+1, 16+3*, 16+4*, M16, R16+1*
>> D0 BEGIN+3*
>> DA DE, BEGIN+3, C1+2, C1S+2, C5+2, C5S+2, C13+2, C13S+2, C14+2, C14S+2
, 16+4, M16, R16+1
DB DE!, C1!, C1S!, C5!, C5S!, C13!, C13S!, C14!, C14S!
DB( T, P, X, SET, SET+1, 1+3*, 2+2*, 3+2*, 4+2*, 5+4*
, 6+2*, 7+2*, 8+2*, 9+3*, 10+2*, 11+2*, 12+3*
>> DC RP, 16+1*, M16*
DDER T, T+1!, SET+2
DE DE!
DE( O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, 1+1*
, 1+3, 2+2, 3+2, 4+2, 5+1*, 5+4, 6+2, 7+2, 8+2, 9+3
, 10+2, 11+2, 12+3, 13+1*, 14+1*
DE(1 DE+1*, C1, C1+1, 16!
DE(10 DE+2*
DE(11 DE+2*
DE(12 DE+2*
DE(13 DE+1*, C13, C13+1
DE(14 DE+2*, C14, C14+1
DE(15 DE+3*
DE(16 M16*
DE(2 DE+2*
DE(3 DE+1*
DE(4 DE+2*
DE(5 DE+1*, C5, C5+1
DE(6 DE+1*
DE(7 DE+1*
DE(8 DE+1*
DE(9 DE+2*
DG DE!, PR*, R*, R+1*, R+2, 2, 6, 14, 15
DG( Z*, C1S, C1S+1, C5S, C5S+1, C13S, C13S+1, C14S, C14S+1
>> DGO 16+1*
>> DIC DE*, P*, C1+1*, C1S+1*, C5+1*, C5S+1*, C13+1*, C13S+1*, C14+1*, C14S+1*
>> DIC("S" T, Z!
>> DIC(0 P*
>> DICRREC BEGIN+2*
>> DIE DE*, P, C1+1, C1S+1, C5+1, C5S+1, C13+1, C13S+1, C14+1, C14S+1
DIEBADK BEGIN+1!
DIEFIRE BEGIN+1!
>> DIEL DE*
>> DIEZ BEGIN+3*
DIEZAR BEGIN+1~, BEGIN+2*
DIEZRXR BEGIN+1~
DIEZTMP SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~*
>> DIFLD N, T, D, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 1*, 2*, 3*, 4*
, 5*, 6*, 7*, 8*, 9*, 10*, 11*, 12*, 13*, 14*
, 15*, 16+1*
DIIENS SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~, BEGIN+3*
DIQUIET SET+1~*
DIR SET~
DIR("V" SET*
DIR(0 SET*
DIXR BEGIN+1~
>> DL DE*, W
DLAYGO P*, Z!
>> DLB W, RD+2, Z, D, 1*, 2*, 3*, 4*, 5*, 6*
, 7*, 8*, 9*, 10*, 11*, 12*, 13*, 14*, 15*, 16+1*
>> DNM BEGIN*
>> DOW 16+1*
>> DP DE*, N, T, SAVEVALS, SAVEVALS+1, SAVEVALS+2
>> DQ O+2, A*, B, RE, T, P, P+2, V, X, D
, Y, PR, RP, SET, SET+1, SAVEVALS, BEGIN*, 1+3, C1S, C1S+1
, 2*, 2+2, 3+2, 4+2, 5+4, C5S, C5S+1, 6*, 6+2, 7+2
, 8+2, 9+3, 10+2, 11+2, 12+3, C13S, C13S+1, 14*, C14S, C14S+1
, 15*
>> DQ( A!, P+2, D*, PR
>> DSC( 16+3
DTIME TR, BEGIN+3*
>> DTOUT TR*
>> DU DE*, P, D, PR, SET, 1*, 2*, 3*, 4*, 5*
, 5+2*, 6*, 7*, 8*, 9*, 9+1*, 10*, 11*, 12*, 12+1*
, 13*, 14*, 15*, 15+1*, 16+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+2, 5*, 5+4, 6*, 6+2, 7*, 7+2, 8*, 8+2, 9*
, 9+3, 10*, 10+2, 11*, 11+2, 12*, 12+3, 13*, 14*, 15*
, 16+1*
>> DW Z, D, SAVEVALS+1, KEYCHK, 1*, 1+1, 2*, 3*, 4*, 5*
, 5+1, 6*, 7*, 8*, 9*, 10*, 11*, 12*, 13*, 13+1
, 14*, 14+1, 15*, 16+1*
>> DZ QS*
U DE+1, DE+2, DE+3, TR, P, P+2, Z, D, R, R+1
, SET, BEGIN+3*, 16+4, M16, R16+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*, NKEY*, 1+3*, C1+1*, C1+2, C1S*, C1S+1*, C1S+2, X1!, X1+1!
, 2+2*, X2!, X2+1!, 3+2*, X3!, X3+1!, 4+2*, X4!, X4+1!, 5+4*
, C5+1*, C5+2, C5S*, C5S+1*, C5S+2, 6+2*, X6!, X6+1!, 7+2*, X7!
, X7+1!, 8+2*, X8!, X8+1!, 9+3*, 10+2*, X10!, X10+1!, 11+2*, X11!
, X11+1!, 12+3*, C13+1*, C13+2, C13S*, C13S+1*, C13S+2, X13!, X13+1!, C14+1*
, C14+2, C14S*, C14S+1*, C14S+2, X14!, X14+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+1*, 4+2, 5+3*, 5+4
, 6+1*, 6+2, 7+1*, 7+2, 8+1*, 8+2, 9+2*, 9+3, 10+1*, 10+2
, 11+1*, 11+2, 12+2*, 12+3
>> Y(0 SET+2
YS V!
>> ZTQUEUED X, NKEY

Marked Items

Name Field # of Occurrence
$T(@(3) D
Info |  Source |  Call 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