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

Package: Oncology

Routine: ONCOAI


Information

ONCOAI ;HINES OIFO/GWB - [AI Complete Abstract] ;07/22/11

Source Information

Source file <ONCOAI.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Oncology 9 ($$DIV,$$HIST)^ONCFUNC  ^ONCOAID  EN^ONCOAIF  EN^ONCOAIP  (MS,SDD)^ONCOCOM  (ENVIRON,RACE)^ONCOES  ^ONCPAT  (PH,PRT)^ONCPDI  
^ONCPTHST  
VA FileMan 6 (,IX)^DIC  ^DIE  ^DIK  $$GET1^DIQ  EN^DIQ1  ^DIR  

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

Package Total Caller Graph
Oncology 2 ONCO ABSTRACT-ENTER/EDIT  ONCOAIP  

Entry Points

Name Comments DBIA/ICR reference
BEG
DEM ;Display demographic data
PD
A1
PAT ;Edit ONCOLOGY PATIENT (160) data
HIS ;Patient History
CK ;Check for existing primaries
PRIM1 ;Register a primary for this patient
REG
PRIM2 ;patient in PRIMARY FILE
ASK
EDT ;Select primary to edit
AIP ;Abstract all Primary Data;Return with (D0,ONCOD0P)=Primary Record Number
SET
SET1
CONT ;Continue another patient
FOL ;Follow-Up
KILL ;Kill variables
KIL
ER ;Error
EX
WRTSDC ;CALLED BY [ONCO XDEATH INFO] PRINT TEMPLATE
CON ;ADD CONTACTS
NEWCHECK ;CODE FOR MULTIDIVISION CHECK - PATCH 17

External References

Name Field # of Occurrence
^DIC BEG+3
IX^DIC EDT+1
^DIE SET+13
^DIK SET+7
$$GET1^DIQ PRIM2+2, PRIM2+3, PRIM2+4
EN^DIQ1 WRTSDC+2
^DIR A1+1, HIS+3, REG, ASK, SET+16, CONT+1
$$DIV^ONCFUNC NEWCHECK+3
$$HIST^ONCFUNC SET+14
^ONCOAID DEM+1
EN^ONCOAIF FOL+1
EN^ONCOAIP EDT+2, SET1
MS^ONCOCOM SET1
SDD^ONCOCOM PRIM2+1
ENVIRON^ONCOES PAT+5
RACE^ONCOES PAT+1
^ONCPAT PAT+7
PH^ONCPDI HIS+4
PRT^ONCPDI PD
^ONCPTHST HIS+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!!
  • Line Location: BEG+1
Function Call: WRITE
  • Prompt: !
  • Line Location: A1+0
Function Call: WRITE
  • Prompt: !,"Another user is editing this patient."
  • Line Location: PAT+8
Function Call: WRITE
  • Prompt: !
  • Line Location: HIS+1
Function Call: WRITE
  • Prompt: !,"Another user is editing this patient"
  • Line Location: HIS+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: REG+0
Function Call: WRITE
  • Prompt: !," Date Last Contact: ",$$GET1^DIQ(160,ONCOD0,16,"E")
  • Line Location: PRIM2+2
Function Call: WRITE
  • Prompt: !," Status: ",$$GET1^DIQ(160,ONCOD0,15,"E")
  • Line Location: PRIM2+3
Function Call: WRITE
  • Prompt: !," Follow-up Status: ",$$GET1^DIQ(160,ONCOD0,15.2,"E")
  • Line Location: PRIM2+4
Function Call: WRITE
  • Prompt: !
  • Line Location: EDT+1
Function Call: WRITE
  • Prompt: ?40,"Space bar not allowed!"
  • Line Location: EDT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: SET+16
Function Call: WRITE
  • Prompt: !,"Another user is editing this patient data."
  • Line Location: SET1+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: CONT+1
Function Call: WRITE
  • Prompt: !!?5,"Something is wrong with database!! - See Site Manager"
  • Line Location: ER+1
Function Call: WRITE
  • Prompt: !?4,"State Death Cert: ",ONCSDC(160,D0,19.1)
  • Line Location: WRTSDC+3
Routine Call
  • DIC
  • Line Location:
    • BEG+3
Routine Call
  • DIC
  • Line Location:
    • EDT+1
Routine Call
  • DIE
  • Line Location:
    • SET+13
Routine Call
  • DIR
  • Line Location:
    • A1+1
    • HIS+3
    • REG
    • ASK
    • SET+16
    • CONT+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ONCO(160 - [#160] Classic Fileman Calls,  GET1^DIQ
^ONCO(165.5 - [#165.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ONCO(160 - [#160] PAT+7, HIS+6, SET+2, SET+3, SET+4, SET+6
^ONCO(164.1 - [#164.1] SET+16
^ONCO(165.5 - [#165.5] CK+3, SET+13, SET+21*, SET+22*, NEWCHECK+2
^ONCO(169.3 - [#169.3] SET+16
^TMP($J CK+3, NEWCHECK+1!, NEWCHECK+3*

Label References

Name Line Occurrences
@( AIP+1
AIP REG, ASK
BEG EDT+1, CONT+1
CK HIS+3
CONT A1+1, HIS+3, REG, ASK, AIP+1
EDT ASK, EDT+1
EX BEG, BEG+3, A1+1, HIS+3, REG, ASK, EDT+2, AIP+1, SET+16, CONT+1
FOL ASK
HIS A1+1
KIL REG
KILL EX
NEWCHECK CK+2
PD BEG+6
PRIM2 CK+3
SET AIP+1
SET1 SET+15, SET+16

Naked Globals

Name Field # of Occurrence
^(0 CK+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%W EX+3!
%X EX+3!
%Y EX+3!
%ZISOS KIL+4!, EX+3!
A KIL+1!, EX+2!
ABS KIL+1!
AG KIL+1!, EX+2!
AN KIL+1!
ANS KIL+1!
C KIL+1!, EX+2!
CC KIL+1!
COB KIL!
COC KIL!
CS SET*, SET+5*, SET1+2!, EX+1!
CT KIL+1!
CTY KIL+1!
D EDT+1*!, KIL!
D0 BEG+4*, PD*, HIS+4*, SET+10*, SET+21, SET+22, KIL!, EX+1!, EX+2!, WRTSDC+2
, WRTSDC+3
D0P KIL+2!
D1 KIL!, EX+2!
DA PAT+6*, PAT+7, HIS+5*, HIS+6, SET+7*, SET+10*, SET+13, SET+14, KIL!, EX+1!
, EX+2!, WRTSDC+1~, WRTSDC+2*
DA(1 SET+7*
DEF KIL+1!
DI KIL!, WRTSDC+1~
DIC BEG+2*, BEG+3!, EDT+1*!, KIL!, EX+1!, WRTSDC+1~, WRTSDC+2*
DIC("A" BEG+2*
DIC(0 BEG+3*, EDT+1*
DIE SET+9*, KIL!, EX+1!
DIK SET+7*, KIL+1!
DIOT PD!
DIQ WRTSDC+2!*
DIR A1!, HIS+1!, ASK!, SET+16!, CONT+1!, KIL!, EX+1!
DIR("A" A1*, HIS+2*, REG*, ASK*, CONT+1*
DIR("B" A1*, HIS+2*, REG*, ASK*, CONT+1*
DIR(0 A1*, HIS+2*, REG*, ASK*, SET+16*, CONT+1*
DLAYGO BEG+2*, BEG+3!, KIL+1!
DN KIL!
DOP EX+2!
DQ EX+1!
DR SET+12*, KIL!, EX+1!, WRTSDC+2*
DUZ(2 CK+3, SET+2, NEWCHECK+4
DXS PD!, KIL+2!, EX+2!
ER EX+1!
FG KIL+3!
FIL KIL+2!, EX+2!
G KIL+2!, EX+2!
I KIL+2!, EX+2!
I2 KIL+1!
I9 KIL+1!
ICD KIL+2!, EX+2!
IIN KILL+3!
IOF BEG+1
J KIL+2!, EX+2!
K KIL+2!, EX+2!
KK KIL+3!
L KIL+2!, EX+2!
M KIL+2!, EX+2!
MC KIL+3!
MO SET*, SET+6*, SET+14*, SET+15, SET+16, SET+19, SET+21, SET+22, SET1+2!, KIL+3!
MS EX+1!
N KIL+2!, EX+2!
N2 KIL+2!
NM KIL!, KIL+2!, EX+2!
O2 KIL+2!, EX+2!
OD KIL+3!
ONCO KILL+1!, EX+3!
ONCOACN KILL+1!
ONCOAD KIL+3!, EX+3!
ONCOAI FOL+1*, KILL+3!
ONCOANS KILL+3!, EX+1!
ONCOD0 BEG+4*, PD, PAT+6, HIS+4, HIS+5, PRIM2+2, PRIM2+3, PRIM2+4, SET+2, SET+3
, SET+4, SET+6, SET+7, KILL+1!, EX+3!, NEWCHECK+2
ONCOD0P EDT+2*, SET+10, KILL+1!, EX+3!
ONCODD KIL+3!, EX+3!
ONCOEDIT KILL+2!
ONCOICD KIL+3!
ONCOL PAT+6*, PAT+7*, PAT+8, PAT+9!, HIS+5*, HIS+6*, HIS+7, HIS+8!, SET+8*, SET+13*
, SET1+1, SET1+2!
ONCOMR KILL+1!
ONCONAM BEG+5*, KILL+2!
ONCONM BEG+5*, EDT+1, KILL+1!, EX+3!
ONCOOUT KILL+1!
ONCOP CK+3*, AIP+1, KILL+1!
ONCOP0 CK+3*, AIP+1, KILL+1!
ONCOPB KILL+2!
ONCOPN KILL+2!
ONCOSIT KILL+2!
ONCOSN KILL+1!
ONCOSX PD+2*, KILL+2!
ONCOT KILL+3!
ONCOVP BEG+4*, KILL+2!
ONCOVS KILL+2!
ONCOX KILL+2!
ONCOYR KILL+3!, EX+2!
ONCSDC WRTSDC+4!
ONCSDC(160 WRTSDC+3
OP EX+3!
OS KIL+3!
OT KIL+2!, EX+2!
P KIL+3!
POB KIL!
PR KIL+3!, EX+1!
PRI NEWCHECK+2*, NEWCHECK+3, NEWCHECK+4, NEWCHECK+6!
PRIDIV NEWCHECK+3*, NEWCHECK+4, NEWCHECK+6!
PT0 BEG+6*, KIL+1!
PTR KIL+1!
Q KIL+3!
R KIL!
R1 PAT+1~, PAT+3*, PAT+4, KIL+2!, EX+1!
R2 KIL+2!, EX+1!
RACE PAT+1~*, PAT+4*
RC KIL!
RCC KIL!
RIP EX+1!
RIPD0 KIL+2!
RS EX+1!
RTKARY NEWCHECK+2!
RTKARY( NEWCHECK+4*
RY KIL+3!
S KIL+3!, EX+1!
SC KIL+4!
SDD KIL+1!
SEX BEG+6*, PD+1, KIL!
SITEGP KILL+3!
SITTAB KILL+3!
SN KIL!
SR SET*, SET+4*, SET+5, SET1+2!, KIL+4!, EX+1!
SSN KILL+3!
SSPIEN SET+1~, SET+2*, SET+3, SET+4, SET+6, SET+7
ST KIL+1!, EX+1!
STAT EX+4!
SX PD+1*, PD+2, KIL!
SY EX+1!
T KIL+4!, EX+1!
TAB KILL+3!
TD EX+2!
TL KIL!
TM EX+1!
TOPCOD KILL+3!
TOPNAM KILL+4!
TOPTAB KILL+4!
TS KIL+4!
TX EX+2!
U BEG+4, BEG+6, A1+1, HIS+3, ASK, SET+3, SET+4, SET+6, SET+21, SET+22
UF KIL+4!
VAERR KIL+2!, EX+3!
VP0 KIL+1!
VPR KIL+2!
X PAT+2, PAT+3, EDT+1*!, KIL!
XD SET*, SET+3*, SET+16, SET+21, SET+22, SET1+2!
XD0 EX+1!
XD1 EX+1!
XDA KIL+4!
XDT KIL+3!
XLC KIL+4!
XN KIL+2!
XS KIL+3!
XTS KIL+3!
XX EX+2!
XY KIL+4!
Y BEG+3, BEG+4, A1+1, HIS+3, REG, ASK!, EDT+1, EDT+2, AIP+1, SET+16
, CONT+1, ER+1*
Y(0 BEG+5, BEG+6
Z EX+1!
ZIP KIL+3!
ZP KIL+3!
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