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  | All
Print Page as PDF
Routine: ONCOFUL

Package: Oncology

Routine: ONCOFUL


Information

ONCOFUL ;Hines OIFO/GWB - FOLLOWUP PROCEDURES ;07/12/00

Source Information

Source file <ONCOFUL.m>

Call Graph

Call Graph

Call Graph Total: 17

Package Total Call Graph
Oncology 9 (DEL,SUM)^ONCOAIF  UPD^ONCOCRF  LST^ONCODLF  DEAD^ONCOFDP  TSK^ONCOFUL  ^ONCOFUM  LET^ONCOFUP  $$LCASE^ONCOU  
^ONCOXCL  
VA FileMan 5 ^DIC  ^DIE  ^DIK  EN^DIQ1  ^DIR  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  

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

Package Total Caller Graph
Oncology 4 ONCO FOLL-ADD CONTACT  ONCO FOLL-ATTEMPT FOLLOWUP  ONCO FOLL-PATIENT INQUIRY  ONCOFUL  

Entry Points

Name Comments DBIA/ICR reference
PAT ;Select patient
AP
DCL ;DISPLAY CONTACT LIST
FI
X
ADC ;ADD CONTACTS
EC
SA
ATM ;[AF Attempt a Follow-up] [ONCO FOLL-ATTEMPT FOLLOWUP]
FA
FOL
FOLDR
DIE
UPDAT
UPOUT ;UPARROW out-check before deleting
DEL ;delete entry
IN ;
NAM
T
TSK ;Task for Patient Inquiry
DI
HD
EX ;EXIT ROUTINE

External References

Name Field # of Occurrence
^%ZIS T
^%ZISC DI+8
^%ZTLOAD T+2
^DIC PAT+2, DCL+2, FOL+1, NAM
^DIE EC+1, FAFOLDR+1, DIE+2
^DIK DEL+1
EN^DIQ1 UPDAT+3, DI+2
^DIR SAUPDAT+9
DEL^ONCOAIF UPOUT+1
SUM^ONCOAIF DI+7
UPD^ONCOCRF UPDAT
LST^ONCODLF UPDATDI+7
DEAD^ONCOFDP UPDAT+9
TSK^ONCOFUL T+1
^ONCOFUM X
LET^ONCOFUP FA+1
$$LCASE^ONCOU PAT+5, DCL+3
^ONCOXCL ADC+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PAT+1
Function Call: WRITE
  • Prompt: @IOF,!!,?20,"********* DISPLAY CONTACTS **********",!!
  • Line Location: DCL+1
Function Call: WRITE
  • Prompt: !!?20,"********** ADD/EDIT CONTACTS **********",!!
  • Line Location: EC+0
Function Call: WRITE
  • Prompt: ?20,"for: ",ONCONM,!!
  • Condition for execution: $D(ONCONM)
  • Line Location: EC+0
Function Call: WRITE
  • Prompt: @IOF,!!?20,"********** ATTEMPT A FOLLOW-UP **********",!!
  • Line Location: ATM+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: FA+0
Function Call: WRITE
  • Prompt: !!?5,"Generate Letter...!!"
  • Line Location: FA+1
Function Call: WRITE
  • Prompt: !!?10,"Complete Follow-up for Successful Contact!!",!
  • Line Location: FA+2
Function Call: WRITE
  • Prompt: !,?5,"**********Following fields have been updated********",!
  • Line Location: UPDAT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: UPDAT+3
Function Call: WRITE
  • Prompt: !?2,"Name..: ",ONC(160,ONCOD0,.01)
  • Line Location: UPDAT+4
Function Call: WRITE
  • Prompt: ?35,"Date Last Contact: ",ONC(160,ONCOD0,16)
  • Line Location: UPDAT+5
Function Call: WRITE
  • Prompt: !?2,"Status: ",ONC(160,ONCOD0,15)
  • Line Location: UPDAT+6
Function Call: WRITE
  • Prompt: ?35,"Follow-Up Status.: ",ONC(160,ONCOD0,15.2)
  • Line Location: UPDAT+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: UPDAT+8
Function Call: WRITE
  • Prompt: "*",$P(^(0),U,6)
  • Condition for execution: $D(^ONCO(160,ONCOD0,"A",ONCOD1,0))
  • Line Location: DEL+2
Function Call: WRITE
  • Prompt: !!,?10,"*********************ENTRY DELETED*************************",!!
  • Line Location: DEL+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: NAM+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: T+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DI+2
Function Call: WRITE
  • Prompt: !?2,"Name..: ",ONC(160,ONCOD0,.01)
  • Line Location: DI+3
Function Call: WRITE
  • Prompt: ?35,"Date Last Contact: ",ONC(160,ONCOD0,16)
  • Line Location: DI+4
Function Call: WRITE
  • Prompt: !?2,"Status: ",ONC(160,ONCOD0,15)
  • Line Location: DI+5
Function Call: WRITE
  • Prompt: ?35,"Follow-Up Status.: ",ONC(160,ONCOD0,15.2)
  • Line Location: DI+6
Function Call: WRITE
  • Prompt: @IOF,!!!?15,"********** Patient Follow-up Inquiry ***********",!
  • Line Location: HD+0
Routine Call
  • %ZIS
  • Line Location:
    • T
Routine Call
  • DIC
  • Line Location:
    • PAT+2
    • DCL+2
    • FOL+1
    • NAM
Routine Call
  • DIE
  • Line Location:
    • EC+1
    • FA
    • FOLDR+1
    • DIE+2
Routine Call
  • DIR
  • Line Location:
    • SA
    • UPDAT+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ONCO(160 - [#160] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ONCO(160 - [#160] XFAFA+1, FOL*, UPOUT+1, DEL+2

Label References

Name Line Occurrences
AP SA
ATM SAFA+1, FOLDR+1, UPDAT+9, UPOUT+1
DCL SA
DEL FA
DIE FA+2, UPDAT+9
EC SA
EX DCL+2, SAATM+5, ATM+7, FAFOL+1, DEL+3, NAMT+1, T+2
FI DCL+2
HD NAMDI
NAM T
PAT ATM+5, ATM+7
SA FA+2, UPDAT+9
UPDAT FOLDR+1
UPOUT FOLDR+1, DIE+2

Naked Globals

Name Field # of Occurrence
^(0 UPOUT+1, DEL+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%Y EX+2!
>> %ZIS T*
%ZISOS EX+1!
ABS EX+2!
AC EX+2!
D EX+2!
D0 X*, ADC+1*, FA, UPDAT*, NAM*, DI*, EX+1!
D1 X!*, FAEX+1!
DA PAT+4*, DCL+2*, EC+1*, FA*, FOL+1*, DIE*, UPDAT+2*, DEL+1*, DI+1*, EX+1!
DA(1 FOL*, DEL+1*
>> DFN FI*
DI EX+1!
DIC PAT+2*, DCL+2*, ATM+4!, FOL*, UPDAT+2*, NAM*, DI+1*, EX+1!
DIC("A" PAT+2*, DCL+2*, NAM*
DIC(0 PAT+2*, DCL+2*, FOL*, NAM*
DIC1 EX+1!
DIE EC+1*, ATM+4!, FA*, FOL*, FOL+1*, DIE+2*, EX+1!, EX+2!
DIK DEL+1*, EX+1!
DIOT ADC+1!, UPDAT!
DIQ UPDAT+2!*, DI+1!*
DIR UPDAT+8!
DIR("A" SA*, UPDAT+8*
DIR("B" SA*, UPDAT+8*
DIR(0 SA*, UPDAT+8*
DIYS EX+2!
>> DLAYGO FOL*
DN EX+2!
DR EC+1*, FA*, FOLDR*, DIE+1*, UPDAT+2*, DI+1*, EX+2!
DT ATM+2
DUZ ATM+2
DXS ADC+1!, FOL!, DIE!, UPDAT!, EX+2!
F0 EC+1*, EX+2!
>> FG FA*, FOLDR+1*, DIE+2*
FIL FI*, EX+2!
GLR FI*, EX+2!
IO DI
IO("Q" T!, T+1
IOF DCL+1, ATM+3, HD
J EX+2!
L FA*, EX+2!
LA EX+2!
LN DCL+3*, EX+2!
NM EX+2!
OD EX+2!
OF EX+2!
ONC UPDAT+2!, DI+1!
ONC(160 UPDAT+4, UPDAT+5, UPDAT+6, UPDAT+7, DI+3, DI+4, DI+5, DI+6
ONCDT ATM+1~, ATM+2*
ONCDUZ ATM+1~, ATM+2*
ONCOC0 FA+1*!
ONCOD0 PAT+4*, AP!, DCL+2*, XADC+1, EC+1, ATM+5, FAFA+1, FOL
DIEUPDATUPDAT+2, UPDAT+4, UPDAT+5, UPDAT+6, UPDAT+7, UPOUT+1, DEL+1, DEL+2
, NAM*, DIDI+1, DI+3, DI+4, DI+5, DI+6, EX+1!
ONCOD1 FA+1, UPOUT+1, DEL+1, DEL+2, EX+1!
ONCON EX+2!
ONCONM PAT+5*, AP!, DCL+3*, ECATM+6, ATM+7, UPDAT+9!, EX+1!
ONCOPAT PAT+4*, DCL+2*, EX+1!
>> ONCOSTAT DIE*
>> ONCOUT T*
ONCOVP PAT+4*, AP!, DCL+2*, FIEX+1!
ONCOVS ATM+4!, FOLDR+1*, DIE+2*, UPDAT+9, EX+1!
ONCOX EX+2!
OS EX+2!
P EX+2!
>> POP T
S EX+2!
U PAT+3, PAT+4, DCL+2, FIFAFA+1, UPDAT+9, UPOUT+1, DEL+2
VS ATM+4!
>> X PAT+4*, PAT+5*, DCL+2*, DCL+3*, FI*, FOL*
>> XDT FOL
>> XRS FA+2
>> XTY FA+2
>> XX FA+1*
Y PAT+3, PAT+4, DCL+2, SAATM+5, ATM+7, FAFOL+1, UPDAT+2~, UPDAT+9
NAM
Y(0 PAT+4, DCL+2
>> ZTDESC T+2*
>> ZTRTN T+2*
>> ZTSAVE("ONCOD0" T+2*
ZZL EX+2!
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  | All