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

Package: Oncology

Routine: ONCOPA3A


Information

ONCOPA3A ;Hines OIFO/RTK - [PA Print Complete Abstract (132c) ;03/11/11

Source Information

Source file <ONCOPA3A.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Oncology 3 $$DIV^ONCFUNC  PCEPRT^ONCOGEN  FORMAT^ONCOPA1  
VA FileMan 2 DD^%DT  ^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: 1

Package Total Caller Graph
Oncology 1 ONCOPA3  

Entry Points

Name Comments DBIA/ICR reference
FH ; Do the Follow-Up History display (#160,#400 multiple "F" node)
P ;
HDR ; Header
CLEANUP ;Cleanup

External References

Name Field # of Occurrence
DD^%DT FH+17
^DIR P+2
$$DIV^ONCFUNC ONCOPA3A+20, FH+5
PCEPRT^ONCOGEN ONCOPA3A+29
FORMAT^ONCOPA1 ONCOPA3A+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,TITLE,!
  • Line Location: ONCOPA3A+4
Function Call: WRITE
  • Prompt: !!," Date of Last Contact: ",ONCAB(165.5,IEN,200)
  • Line Location: ONCOPA3A+6
Function Call: WRITE
  • Prompt: ?50," Last Tumor Status: ",ONCAB(165.5,IEN,95)
  • Line Location: ONCOPA3A+7
Function Call: WRITE
  • Prompt: !!," Date of Death: ",ONCAB(160,PTIEN,29)
  • Line Location: ONCOPA3A+8
Function Call: WRITE
  • Prompt: !," Cause of Death/Cancer: ",ONCAB(160,PTIEN,18.9)
  • Line Location: ONCOPA3A+9
Function Call: WRITE
  • Prompt: $P(IC,U,4)
  • Line Location: ONCOPA3A+11
Function Call: WRITE
  • Prompt: !," Place of Death: ",ONCAB(160,PTIEN,21)
  • Line Location: ONCOPA3A+14
Function Call: WRITE
  • Prompt: !," Care Center at Death: ",ONCAB(160,PTIEN,24.5)
  • Line Location: ONCOPA3A+15
Function Call: WRITE
  • Prompt: !," Autopsy: ",ONCAB(160,PTIEN,22.9)
  • Line Location: ONCOPA3A+16
Function Call: WRITE
  • Prompt: !," Autopsy Date/Time: ",ONCAB(160,PTIEN,23)
  • Line Location: ONCOPA3A+17
Function Call: WRITE
  • Prompt: !," Autopsy No.: ",ONCAB(160,PTIEN,24)
  • Line Location: ONCOPA3A+18
Function Call: WRITE
  • Prompt: !?8,$G(^ONCO(160,PTIEN,4,PATH,0))
  • Line Location: ONCOPA3A+19
Function Call: WRITE
  • Prompt: $P($G(^ONCO(164.42,TSTAT,0)),U,1)
  • Line Location: ONCOPA3A+25
Function Call: WRITE
  • Prompt: $P($G(^ONCO(164.42,TSTAT,0)),U,1)
  • Line Location: ONCOPA3A+26
Function Call: WRITE
  • Prompt: !
  • Line Location: ONCOPA3A+28
Function Call: WRITE
  • Prompt: $P($G(^ONCO(164.42,TSTAT,0)),U,1)
  • Line Location: FH+12
Function Call: WRITE
  • Prompt: $E(TSDLC,4,5)_"/"_$E(TSDLC,6,7)_"/"_($E(TSDLC,1,3)+1700)
  • Line Location: FH+13
Function Call: WRITE
  • Prompt: Y
  • Line Location: FH+17
Function Call: WRITE
  • Prompt: $S(VS=0:"Dead",VS=1:"Alive",1:"")
  • Line Location: FH+21
Function Call: WRITE
  • Prompt: $S(UF=0!(UF=1):"1st unusual method",UF=2:"2nd unusual method",1:"")
  • Line Location: FH+27
Function Call: WRITE
  • Prompt: $E(DTE,4,5)_"/"_$E(DTE,6,7)_"/"_($E(DTE,1,3)+1700)
  • Line Location: FH+29
Function Call: WRITE
  • Prompt: REG1
  • Line Location: FH+30
Function Call: WRITE
  • Prompt: $P($G(^ONCO(160.19,FR,0)),U,2)
  • Line Location: FH+32
Function Call: WRITE
  • Prompt: !?5,$G(^ONCO(160,PTIEN,"F",FHIEN,1,CMIEN,0))
  • Line Location: FH+36
Function Call: WRITE
  • Prompt: !,"--------------------------------------------------------------------------------------------------------------------------------"
  • Line Location: FH+39
Function Call: WRITE
  • Prompt: !
  • Line Location: P+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: CRA,!
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?5," Patient Name: ",PATNAME,?84,"SSN: ",SSAN,!
  • Line Location: HDR+3
Routine Call
  • DIR
  • Line Location:
    • P+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ONCO(160 - [#160] ONCOPA3A+5, ONCOPA3A+19, ONCOPA3A+20, FH+1, FH+2, FH+3, FH+34, FH+36
^ONCO(160.19 - [#160.19] FH+32
^ONCO(164 - [#164] ONCOPA3A+23, FH+9
^ONCO(164.2 - [#164.2] ONCOPA3A+23, FH+9
^ONCO(164.42 - [#164.42] ONCOPA3A+25, ONCOPA3A+26, FH+12
^ONCO(165.5 - [#165.5] ONCOPA3A+20, ONCOPA3A+21, ONCOPA3A+22, ONCOPA3A+24, FH+5, FH+6, FH+8, FH+10, FH+11
^VA(200 - [#200] FH+30

Label References

Name Line Occurrences
FH ONCOPA3A+5
HDR P+3
P ONCOPA3A+7, ONCOPA3A+8, ONCOPA3A+9, ONCOPA3A+14, ONCOPA3A+15, ONCOPA3A+16, ONCOPA3A+17, ONCOPA3A+18, ONCOPA3A+19, ONCOPA3A+26
FH+4, FH+12, FH+20, FH+24, FH+27, FH+28, FH+31, FH+33, FH+36

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CMIEN FH+36*, CLEANUP+1!
CNTR ONCOPA3A+20*, ONCOPA3A+22*, ONCOPA3A+25, ONCOPA3A+26, CLEANUP+1!
CRA HDR+2, CLEANUP+1!
DIR P+2!
DIR("A" P+2*
DIR(0 P+2*
DTE FH+29*, CLEANUP+1!
>> DUZ(2 ONCOPA3A+20, FH+5
DXDT FH+6*, FH+7, CLEANUP+1!
EX ONCOPA3A+5, ONCOPA3A+7, ONCOPA3A+8, ONCOPA3A+9, ONCOPA3A+14, ONCOPA3A+15, ONCOPA3A+16, ONCOPA3A+17, ONCOPA3A+18, ONCOPA3A+19
ONCOPA3A+26, FH+1, FH+3, FH+4, FH+12, FH+20, FH+24, FH+27, FH+28, FH+31
FH+33, FH+36, FH+39, P+1, P+2*, CLEANUP+1!
FHDT FH+3*, FH+7, FH+10, FH+17, CLEANUP+1!
FHIEN FH+2*, FH+3, FH+34, FH+36, CLEANUP+1!
FHZN FH+3*, FH+18, FH+21, FH+22, FH+27, FH+29, FH+30, FH+32, CLEANUP+1!
FM FH+18*, FH+19, CLEANUP+1!
FOLH FH+1*, FH+2, CLEANUP+1!
FR FH+32*, CLEANUP+1!
IC CLEANUP+1!
ICDCD CLEANUP+1!
IEN ONCOPA3A+6, ONCOPA3A+7, CLEANUP+1!
IOF HDR+1
IOST P+2
LINE P+1, CLEANUP+2!
NAME ONCOPA3A+3*, CLEANUP+2!
NF FH+22*, FH+23, CLEANUP+2!
ONCAB CLEANUP+2!
ONCAB( ONCOPA3A+6, ONCOPA3A+7
ONCAB(160 ONCOPA3A+8, ONCOPA3A+9, ONCOPA3A+14, ONCOPA3A+15, ONCOPA3A+16, ONCOPA3A+17, ONCOPA3A+18
OTHPRI FH+5*, FH+6, FH+8, FH+10, FH+11, CLEANUP+2!
PATH ONCOPA3A+19*, CLEANUP+2!
PATNAME HDR+3, CLEANUP+2!
PG HDR+1*, CLEANUP+2!
PRI ONCOPA3A+20*, ONCOPA3A+21, ONCOPA3A+22, ONCOPA3A+24, CLEANUP+2!
PRTPCE ONCOPA3A+29, CLEANUP+2!
PRZN FH+6*, FH+8, CLEANUP+2!
PTIEN ONCOPA3A+5, ONCOPA3A+8, ONCOPA3A+9, ONCOPA3A+14, ONCOPA3A+15, ONCOPA3A+16, ONCOPA3A+17, ONCOPA3A+18, ONCOPA3A+19, ONCOPA3A+20
FH+1, FH+2, FH+3, FH+5, FH+34, FH+36, CLEANUP+2!
REG FH+30*, CLEANUP+3!
REG1 FH+30*, CLEANUP+3!
SITE ONCOPA3A+23*, ONCOPA3A+25, ONCOPA3A+26, FH+9*, FH+12, CLEANUP+3!
SSAN HDR+3, CLEANUP+3!
ST ONCOPA3A+22*, ONCOPA3A+23, FH+8*, FH+9, CLEANUP+3!
TITLE ONCOPA3A+4, CLEANUP+3!
TOP ONCOPA3A+22*, ONCOPA3A+23, FH+8*, FH+9, CLEANUP+3!
>> TSDLC FH+10*, FH+11*, FH+13
>> TSDLCFG FH+10*, FH+11*, FH+14
TSIEN FH+10*, FH+11, CLEANUP+3!
TSTAT ONCOPA3A+24*, ONCOPA3A+25, ONCOPA3A+26, FH+10*, FH+11*, FH+12, CLEANUP+3!
U ONCOPA3A+5, ONCOPA3A+7, ONCOPA3A+8, ONCOPA3A+9, ONCOPA3A+14, ONCOPA3A+15, ONCOPA3A+16, ONCOPA3A+17, ONCOPA3A+18, ONCOPA3A+19
ONCOPA3A+20, ONCOPA3A+22, ONCOPA3A+23, ONCOPA3A+24, ONCOPA3A+25, ONCOPA3A+26, FH+1, FH+3, FH+4, FH+6
FH+8, FH+9, FH+11, FH+12, FH+18, FH+20, FH+21, FH+22, FH+24, FH+27
FH+28, FH+29, FH+30, FH+31, FH+32, FH+33, FH+36, FH+39, P+1, P+2
UF FH+27*, CLEANUP+3!
VS FH+21*, CLEANUP+3!
Y FH+17*, P+2, CLEANUP+3!
ZN ONCOPA3A+21*, ONCOPA3A+22, CLEANUP+3!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All