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 |  Label References |  Local Variables  | All
Print Page as PDF
Routine: ONCODLF

Package: Oncology

Routine: ONCODLF


Information

ONCODLF ;Hines OIFO/GWB - DISPLAY FOLLOW-UP DATA, ALL/LATEST ;07/23/10

Source Information

Source file <ONCODLF.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Oncology 3 MTS^ONCOCOFA  DATEOT^ONCOES  ^ONCOXDI  

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

Package Total Caller Graph
Oncology 7 ONCOAIF  ONCOFUL  ONCOX11  ONCOY58  ^ONCO(160  ^ONCO(165.5  ^ONCO(165.59  

Entry Points

Name Comments DBIA/ICR reference
LFS ;LAST FOLLOW-UP STATUS (from D0 #165.59 - computed primary
LST ;Display last FOLLOW-UP (160,400) data
LF
FHC ;'COMPUTED-FIELD' EXPRESSION for HISTORY-FOLLOWUP (160,46)
F
END
DEAD ;DEATH INFORMATION
FHP ;COMPUTED-FIELD' EXPRESSION for FOLLOW-UP HISTORY (165.5,150)
P
FIN
DAT ;Get Reference date
HD ;header for Follow-up History
WD
1
3
4
6
11
12
PC ;COMMENTS (160.45,.01)
C
DT
N
T
EX ;Kill and Exit
CLEANUP ;Cleanup

External References

Name Field # of Occurrence
MTS^ONCOCOFA F+2, P+5
DATEOT^ONCOES WD+4, 12
^ONCOXDI DEAD+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "--------------------------------------------------------------------------------"
  • Line Location: HD+1
Function Call: WRITE
  • Prompt: !?2,"Date of Last Contact or Death.:",?34,X(0)
  • Line Location: 12+1
Function Call: WRITE
  • Prompt: !
  • Line Location: 12+2
Function Call: WRITE
  • Prompt: !?2,"Vital Status..................:",?34,X(1)
  • Line Location: 12+3
Function Call: WRITE
  • Prompt: !?2,"Follow-up Source..............:",?34,X(3)
  • Line Location: 12+4
Function Call: WRITE
  • Prompt: !?2,"Next Follow-up Source.........:",?34,X(6)
  • Line Location: 12+5
Function Call: WRITE
  • Prompt: !?2,"Registrar.....................:",?34,X(11)
  • Line Location: 12+6
Function Call: WRITE
  • Prompt: !?2,"Date entered..................:",?34,X(12)
  • Line Location: 12+7
Function Call: WRITE
  • Prompt: !?2,"Comments:"
  • Line Location: 12+8
Function Call: WRITE
  • Prompt: !?2,^ONCO(160,XD0,"F",XD1,1,X,0)
  • Line Location: PC+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PC+3
Function Call: WRITE
  • Prompt: #
  • Line Location: C+4
Function Call: WRITE
  • Prompt: ?10,"*************** FOLLOWUP HISTORY ***************",!!
  • Line Location: C+6
Function Call: WRITE
  • Prompt: $P("JAN^FEB^MAR^APR^MAY^JUN^JUL^AUG^SEP^OCT^NOV^DEC",U,$E(Y,4,5))_" "
  • Line Location: DT+0
Function Call: WRITE
  • Prompt: $J(Y#100\1,2)_","
  • Condition for execution: Y#100
  • Line Location: DT+0
Function Call: WRITE
  • Prompt: Y\10000+1700
  • Line Location: DT+0
Function Call: WRITE
  • Prompt: " "_$E(Y_0,9,10)_":"_$E(Y_"000",11,12)
  • Condition for execution: Y#1
  • Line Location: DT+0
Function Call: WRITE
  • Prompt: !
  • Line Location: N+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ONCO(160 - [#160] LF, LF+1, LF+2, LF+3, F+2, END+2, P+5, PC+2, C+1
^ONCO(165.5 - [#165.5] LFS+1, P
^UTILITY($J C+5, T
^VA(200 - [#200] 11

Label References

Name Line Occurrences
C F+2, END+1
DAT P+2
DEAD END+3
END F+2
EX LF, LF+4, END, END+3, DEAD+1, P+1, FIN
FIN P+5
HD F+2, END+1, P+5, C+3
LF LFS+1
WD LF+4, F+2, P+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D0 LFS+1, LST+1, FHC+1, F+2*, DEAD+1*, FHP+2, P+5*, EX+1*, CLEANUP+1!
D1 F+2*, P+5*, CLEANUP+1!
DIOT DEAD+1!
DIOT(2 T
DIWF T, CLEANUP+1!
DN T, CLEANUP+1!
DXS DEAD+1!
FDAT F+2*, FHP+1~, P+5*
FUQA 12+2, CLEANUP+1!
HIS FHC+1*, EX+2!
I WD*, PC+2*, EX+2!
IOSL C+2, T
LST FHC+1*, F+2, P+3*, P+5, CLEANUP+1!
NL LF+3*, F+2!, P+5!, C, C+1*, C+2, EX+2!
OD0 LST+1*, FHC+1*, FHP+2*, EX+1, EX+2!
OJ F~, F+1*, F+2*, END+1, FHP+1~, P+4*, P+5*
TL C+2*, CLEANUP+1!
U LFS+1, LF+3, F+2, END+2, P+3, P+5, DAT+1, DAT+3, WD, WD+1
, WD+2, WD+3, 11, C+1, DT
VS END+2*, END+3, EX+2!
X WD+4*, 1*, 3*, 4*, 6*, 11*, 12*, PC+1*, PC+2*, EX+2*
, CLEANUP+1!
X( WD*
X(0 WD+4*, 12+1
X(1 1*, 12+3
X(11 WD+2*, 11*, 12+6
X(12 WD+3*, 12*, 12+7
X(3 3*, 12+4
X(4 4*
X(6 WD+1*, 6*, 12+5
X1 EX+2!
X2 EX+2!
XD0 LFS+1*, LST+1*, LF, LF+1, LF+2, LF+3, FHC+1*, F+2, END+2, DEAD+1
, FHP+2*, P*, P+1, P+3*, P+5, DAT+1, DAT+3, PC+2, C+1, EX+2!
XD1 LF*, LF+1*, LF+2, LF+3, LF+4, F+2*, END, P+5*, PC+2, C+1
, EX+2!
XDD DAT+3, DAT+4*, CLEANUP+1!
XLC P+3, DAT+1*, CLEANUP+1!
XX EX+2!
XXD0 LF+2*, F+2*, P+5*, WD, WD+1, WD+2, WD+3, EX+2!
XXD1 F~, F+1*, F+2*, P+4*, P+5*
Y DT, CLEANUP+1!
YR DAT+3*, DAT+4, CLEANUP+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All