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

Package: Oncology

Routine: ONCOCFL1


Information

ONCOCFL1 ;HINES OIFO/GWB - [CF Automatic Casefinding-Lab Search] ;10/21/11

Source Information

Source file <ONCOCFL1.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Oncology 4 $$DIV^ONCFUNC  RPT^ONCOCFL  SER^ONCOCFL1  D^ONCOLRU  
VA FileMan 4 DD^%DT  FILE^DICN  ^DIE  ^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: 2

Package Total Caller Graph
Oncology 2 ONCOCFL  ONCOCFL1  

Entry Points

Name Comments DBIA/ICR reference
EN ;Start Date default
SD ;Start Date
ED ;End Date
SER ;Search LAB DATA (63) file
CK ;Check ONCOLOGY PATIENT (160) file
SET ;Create SUSPENSE (160.075) record
LOOP
LRDFN
LRI
T
M
MX
AU ;AUTOPSY
AUM
Y ;Check for eligible cases
RPT ;Report
DIV ;Check division
SNOMED ;Build SNOMED array for benign brain tumors
EX ;KILL variables

External References

Name Field # of Occurrence
DD^%DT SD+9, ED+9
^%ZIS ED+56
^%ZISC EX+1
^%ZTLOAD ED+60
FILE^DICN CK+4, SET+4
^DIE SET+10
^DIR SD+6, ED+4, ED+17, ED+30
$$DIV^ONCFUNC CK+7
RPT^ONCOCFL RPT+2
SER^ONCOCFL1 ED+57
D^ONCOLRU ED+10, ED+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: SD+1
Function Call: WRITE
  • Prompt: " Future dates not allowed"
  • Line Location: SD+8
Function Call: WRITE
  • Prompt: " ",Y
  • Line Location: SD+9
Function Call: WRITE
  • Prompt: " Invalid date sequence"
  • Line Location: ED+6
Function Call: WRITE
  • Prompt: " Future dates not allowed"
  • Line Location: ED+7
Function Call: WRITE
  • Prompt: " ",Y
  • Line Location: ED+9
Function Call: WRITE
  • Prompt: !
  • Line Location: ED+12
Function Call: WRITE
  • Prompt: !
  • Line Location: ED+21
Function Call: WRITE
  • Prompt: !!?10,"This option will search for ICD-O morphology codes 800-998.",!
  • Line Location: ED+47
Function Call: WRITE
  • Prompt: !?10,"It will also search for High Grade Dysplasia of Stomach, Colon"
  • Line Location: ED+48
Function Call: WRITE
  • Prompt: !?10,"and Esophagus cases.",!
  • Line Location: ED+49
Function Call: WRITE
  • Prompt: !?10,"Exceptions to the above search criteria:",!
  • Line Location: ED+50
Function Call: WRITE
  • Prompt: !?10,"Behavior Code /0 (Benign) codes will be excluded."
  • Line Location: ED+51
Function Call: WRITE
  • Prompt: !?10,"Benign tumors of the central nervous system will be included."
  • Line Location: ED+54
Function Call: WRITE
  • Prompt: !
  • Line Location: ED+55
Function Call: WRITE
  • Prompt: !!,"User does not have an associated DIVISION.",!!
  • Line Location: SER+3
Routine Call
  • DIE
  • Line Location:
    • SET+10
Routine Call
  • DIR
  • Line Location:
    • SD+6
    • ED+4
    • ED+17
    • ED+30
Routine Call
  • %ZIS
  • Line Location:
    • ED+56

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)
^DD(160 SET+3
^DPT - [#2] CK+2
^LAB(61 - [#61] T, AU+1
^LAB(61.1 - [#61.1] MX, MX+1
^LAB(61.4 - [#61.4] M+3
^LR - [#63] SER+11, CK+2, LOOP, LRDFN, LRI, T, M, M+1, M+2, AU+1
, AUM, DIV+4, DIV+5, DIV+7, DIV+8
^LRO(68 - [#68] DIV+13, DIV+15
^ONCO(160 - [#160] CK+3, CK+5, SET+7*
^ONCO(160.1 - [#160.1] EN+1, ED+8*, SER+2, SER+4
^ONCO(164.1 - [#164.1] SET+8
^ONCO(165.5 - [#165.5] CK+7
^TMP("ONCO" SER+5!, SER+8*, SET+5*
^TMP($J SER+5!, SER+11, M+6*, MX+1*

Label References

Name Line Occurrences
@( LRDFN
AUM AU+1
CK SER+11
DIV CK+1
ED ED+7
EN ED+19
EX SD+7, ED+5, ED+18, ED+31, ED+56, ED+57, ED+62, SER+3
LOOP SER+9
LRDFN LOOP
M T
MX M, AUM
RPT SER+11
SD SD+8, ED+6
SET CK+4, CK+7, CK+8
SNOMED SER+6
T LRI
Y MX+1

Naked Globals

Name Field # of Occurrence
^( SER+11, T, M, AU+1, AUM

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS ED+56*, EX+2!
ACCIEN DIV+13*, DIV+15, EX+3!
AFFDIV SER+2*, SER+4*, DIV+16, EX+3!
BBT EX+3!
BBT( Y+4
BBT(45000 SNOMED+1*
BBT(45010 SNOMED+2*
BBT(45020 SNOMED+3*
BBT(45030 SNOMED+4*
BBT(45100 SNOMED+5*
BBT(45110 SNOMED+6*
BBT(45120 SNOMED+7*
BBT(45300 SNOMED+8*, SNOMED+9*
BBT(45301 SNOMED+10*
BBT(45302 SNOMED+11*
BBT(45303 SNOMED+12*
BBT(45304 SNOMED+13*
BBT(45305 SNOMED+14*
BBT(45520 SNOMED+15*
BBT(45521 SNOMED+16*
BBT(45522 SNOMED+17*
BBT(45523 SNOMED+18*
BBT(45524 SNOMED+19*
BBT(45525 SNOMED+20*
D CK+4*, EX+3!
DA SET+7*, EX+3!
DA(1 SET+2*, SET+6*
DD SET+1!
DIC CK+4*, SET+2*, EX+3!
DIC("P" SET+3*
DIC(0 CK+4*, SET+3*
DIE SET+6!*, EX+3!
DIR SD+2!, ED+1!, ED+13!, ED+23!, ED+33!, EX+3!
DIR("?" ED+27*, ED+28*, ED+29*
DIR("A" SD+4*, ED+3*, ED+15*, ED+25*
DIR("B" SD+5*, ED+16*, ED+26*
DIR(0 SD+3*, ED+2*, ED+14*, ED+24*
DO CK+4!, SET+1!, SET+4!
DR SET+9*, EX+3!
DT EN+2, SD+8, ED+7
DUZ(2 SER+2, CK+6, CK+7
DVMTCH CK+1, DIV+2*, DIV+10*, DIV+16*, EX+3!
DZCODE M+3*, M+4, M+5, EX+3!
DZMORP M+5*, M+6, EX+3!
DZPTR M+2*, M+3, M+6, EX+3!
DZX M+1*, M+2, EX+3!
I M, MX+1, Y+2*, Y+4*, Y+6*, Y+8*, Y+9*, Y+10*, EX+4!
I(1 Y+10*
I(2 Y+10*
INST DIV+2*, DIV+15*, DIV+16, EX+4!
IO("Q" ED+57
LBACC DIV+4*, DIV+7*, DIV+9, DIV+10, DIV+11, DIV+12, EX+4!
LBAREA DIV+11*, DIV+13, EX+4!
LBNUM DIV+12*, DIV+15, EX+4!
LBYEAR DIV+5*, DIV+8*, DIV+9, DIV+14*, DIV+15, EX+4!
LD SER+11*, SET+8, EX+4!
LRD M*, MX, MX+1, AUM*, EX+4!
LRDFN SER+10*, SER+11*, CK+2, SET+7, LRDFN*, LRI, T, M, M+1, M+2
, M+6, MX+1, AU+1, AUM, DIV+4, DIV+5, DIV+7, DIV+8, EX+4!
LRI SER+11*, LRI*, T, M, M+1, M+2, M+6, MX+1, AU+1*, DIV+7
, DIV+8, EX+4!
LRLDT ED+9*, ED+11, ED+35, ED+36*, SER+7, SER+9*, LOOP, EX+4!
LRLST ED+11*, EX+4!
LRM M*, AUM*, EX+4!
LRM( ED+37*, MX+1
LRM(67654 ED+38*
LRM(67664 ED+39*
LRM(67674 ED+40*
LRM(67684 ED+41*
LRM(69760 ED+42*
LRM(74000 ED+43*
LRM(74006 ED+44*
LRM(74007 ED+45*
LRM(74008 ED+46*
LRN EX+4!
LRN( ED+37*, MX+1
LRN(67654 ED+38*
LRN(67664 ED+39*
LRN(67674 ED+40*
LRN(67684 ED+41*
LRN(69760 ED+42*
LRN(74000 ED+43*
LRN(74006 ED+44*
LRN(74007 ED+45*
LRN(74008 ED+46*
LRSDT SD+9*, ED+6, ED+10, ED+35, ED+36*, SER+7, SER+9*, SER+11*, LOOP*, LRDFN
, LRI, M+6, MX+1, EX+5!
LRSS SER+9*, SER+11*, SET+7, LRDFN, T, M, M+1, M+2, M+6, MX+1
, DIV+3, DIV+4, DIV+5, DIV+6, DIV+7, DIV+8, EX+5!
LRSTR ED+10*, EX+5!
LRT T*, M+6, MX+1, AU+1*, EX+5!
LRXR SER+9*, LOOP, LRDFN, LRI, EX+5!
M M*, AUM*, EX+5!
ONCDIVS CK+5*, CK+6, EX+5!
ONCDIVSP SER+2*, SER+3, SER+4, EX+5!
ONCIEN CK+3*, CK+4*, CK+7, SET+2, SET+6, SET+7, EX+5!
ONCMRPH SET+8*, EX+5!
ONCO EX+5!
ONCO("ED" ED+35*
ONCO("SD" ED+35*
ONCOEN RPT+1~, RPT+2*
ONCOST RPT+1~, RPT+2*
ONCS CK+5*, EX+5!
ONCSUB SET+7*, EX+6!
ONLDT SER+7*, SER+9, EX+6!
ONSDT SER+7*, SER+9, EX+6!
OSP EN+1, ED+8, EX+6!
POP ED+56, EX+6!
SBCIND ED+22*, ED+32*, ED+52, ED+53, Y+2, Y+6, EX+7!
SDDEF EN+1*, EN+2*, EN+3*, SD+5, EX+6!
SNOMED T*, AU+1*, Y+4, Y+6, Y+9, EX+6!
SR SET+7*, EX+6!
T T*, M, M+1, M+2, AU+1*, AUM, EX+6!
TIS T*, M+6, MX+1, AU+1*, EX+6!
U EN+1, SD+7, ED+5, ED+8, ED+18, ED+31, SER+4, SER+11, CK+2, CK+5
, CK+7, SET+3, SET+7, SET+8, T, M, M+3, M+6, MX+1, AU+1
, AUM, DIV+4, DIV+5, DIV+7, DIV+8
W MX+1*, EX+6!
X SD+9*, ED+9*, ED+37*, CK+2*, CK+3*, SET+3*, M*, MX+1*, AUM*, Y+2
, Y+4, Y+6, Y+7, Y+9, Y+10, EX+6!
XD0 CK+3*, CK+4, CK+5, EX+6!
XD1 CK+2*, EX+6!
XD2 CK+7*, CK+8, EX+6!
XDT SER+11*, CK+7, SET+3, EX+6!
XDX CK+7*, EX+7!
Y SD+7, SD+8, SD+9, ED+5, ED+6, ED+7, ED+8, ED+9, ED+10*, ED+11*
, ED+18, ED+19, ED+31, ED+32, ED+37*, CK+4, SET+7, MX+1*, EX+7!
Y(1 MX+1*, Y+10
Y(2 MX+1*, Y+7, Y+10
Z ED+37*, SER+4*, MX+1*, EX+7!
ZTDESC ED+59*, ED+61!
ZTRTN ED+58*, ED+61!
ZTSAVE ED+61!
ZTSAVE("LR*" ED+58*
ZTSAVE("ONCO*" ED+58*
ZTSAVE("SBCIND" ED+58*
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