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

Package: Oncology

Routine: ONCOCRF


Information

ONCOCRF ;HINES OIFO/GWB - FOLLOW-UP ;07/13/00

Source Information

Source file <ONCOCRF.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 3 DD^%DT  ^%DTC  ^DIE  
Oncology 2 UVS^ONCOCRFA  DATEOT^ONCOES  

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

Package Total Caller Graph
Oncology 20 ONCO DELINQUENT(LTF) LIST  ONCO DELINQUENT(LTF) LIST HDR  ONCO DELINQUENT(LTF) LIST2  ONCO DUE FOLLOWUP  ONCO DUE FOLLOWUP-HDR  ONCO DUE FOLLOWUP2  ONCO FOLLOW-UP STATUS LIST  ONCO FOLLOWUP STATUS RPT  
ONCO XABSTRACT RECORD  ONCO XINCIDENCE RPRT  ONCOAIF  ONCOCOC  ONCOFUL  ONCOX11  ONCOXNC  ONCOXPU  
ONCOXU  ^ONCO(160  FOLLOW-UP  ^ONCO(165.5  

Entry Points

Name Comments DBIA/ICR reference
LD ;DATE OF LAST CONTACT OR DEATH (160.04,.01)
R1 ;Kill STATUS (160,15) "AS" and DUE FOLLOW-UP (160,27) "AD"
LDXT ;Return follow-up record for last date of contact excluding this one
SLF ;Set DATE OF LAST CONTACT OR DEATH (160.04,.01) "AA" cross-reference
KLF ;Kill .01 of FOLLOW-UP MULTIPLE-RESETS: #16(1;2), STATUS #15(1;1), FOLLOWUP STATUS #15.2(1;7), DUE FOLLOW-UP #27(2;3), if alive, DATE DEATH #29 (1;8)
SVS ;VITAL STATUS->STATUS (160,15) trigger AND UPDATE DUE FOLLOW-UP IF DEAD
KVS ;Kill: reset STATUS
NF ;Set DUE FOLLOW-UP (160,27)
UPD ;Update the following fields with the most recent FOLLOW-UP (160,400)
SGPRCOC ;CHECK IF PATIENT HAS SINGLE PRIMARY ONLY & CLASS OF CASE 00 OR 30-99
CHKDT04 ;
LFU ;LAST FOLLOW-UP SUMMARY-SELECTED DATA from Last Follow-up
DLC ;DATE LAST CONTACT (160,16) from "AF" cross-reference
CAS ;CANCER STATUS Last Date Contact
DOD ;computed Date of Death
GD ;DATE LAST CONTACT (160,16)
PDLC ;DATE LAST CONTACT (165.5,200)
PDLC1 ;DATE LAST CONTACT FILMANAGER FORMAT
P0
SDA ;SURVIVAL DAYS
SUR ;SURVIVAL (MONTHS)
SYR ;SURVIVAL YEARS
SWK ;WEEKS FOLLOWUP
SD
DC ;DATE COMPARE
DD ;DATE FORMATING
SDF ;DUE FOLLOW-UP-TIGGERED BY NEXT FOLLOW-UP METHOD of FOLLOW-UP MULTIPLE
KDF ;KILL DUE FOLLOW-UP
EX ;KILL variables

External References

Name Field # of Occurrence
DD^%DT UPD+15
^%DTC UPD+11, DC+2
^DIE UPD+12
UVS^ONCOCRFA SVS+3, KVS+2
DATEOT^ONCOES CHKDT04+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?20,"Due follow-up: ",Y
  • Line Location: UPD+15
Function Call: WRITE
  • Prompt: !!," Patient not followed"
  • Line Location: UPD+17
Function Call: WRITE
  • Prompt: ?48,$E($P($G(^ONCO(164.2,ONCSITGP,0)),"^",1),1,20)
  • Line Location: CHKDT04+2
Function Call: WRITE
  • Prompt: ?69,X
  • Line Location: CHKDT04+2
Function Call: WRITE
  • Prompt: !?10,"NO Last Contact Information on Patient",!
  • Line Location: LFU+1
Routine Call
  • DIE
  • Line Location:
    • UPD+12

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] LD+3, LD+5, LD+6, R1+2, R1+3!, R1+4!, LDXT+1, SLF+3*, SLF+6*, SLF+7*
KLF+3!, NF+2*, NF+3*, UPD+14*, UPD+16*, DOD+1, GD+1
^ONCO(164.2 - [#164.2] CHKDT04+2
^ONCO(165.5 - [#165.5] SGPRCOC+4, SGPRCOC+7, SGPRCOC+8, CHKDT04+1, CHKDT04+2, PDLC+1, P0SD

Label References

Name Line Occurrences
DC SD
DLC DOD+1
EX SLF+8, KLF+3, UPD+8, UPD+15, UPD+18, LFU+1, DLC+1, DOD+2, PDLC+1, PDLC1+1
SDA+1, SUR+1, SYR+1, SWK+1
GD LFU+1, DLC+1, PDLC1+1, SD
LD SVS+2, UPD+8
LDXT KVS+1
NF UPD+15
P0 PDLC1+1, SDA+1, SUR+1, SYR+1, SWK+1
R1 UPD+8
SD SDA+1, SUR+1, SYR+1, SWK+1
SGPRCOC UPD+10

Naked Globals

Name Field # of Occurrence
^( LDXT+1
^(1 DOD+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> D0 UPD+7, CHKDT04+1, CHKDT04+2, LFU+1, DLC+1, DOD+1, PDLC+1, P0SD
>> DA LDXT+1, SLF+3, SLF+6, SLF+7, KLF+3, UPD+12*
>> DA(1 SLF+3, KLF+3, SVS+2, KVS+1
DIE UPD+12*, UPD+13!
DNTSKP UPD+10, SGPRCOC+3*, SGPRCOC+9*, EX+1!
DR UPD+12*, UPD+13!
DT SLF+5, UPD+11
DUZ SLF+4
DUZ(2 SGPRCOC+4
FS NF+1, UPD+10*, UPD+11*, UPD+12, UPD+15, EX+1!
LC NF+1, UPD+9*, UPD+11, UPD+16, EX+1!
LD LD+1*, LD+6*, LD+7, LDXT+1*, UPD+8, UPD+9, EX+1!
NF NF+1*, NF+2, NF+3, UPD+15, EX+1!
NM UPD+9*, UPD+10, EX+1!
O1 LD+1~, LD+2*, LD+3*, LD+5
O2 LD+1~, LD+4*, LD+5*, LD+6
OD R1+4*, EX+1!
ONCDT SLF+2~, SLF+5*, SLF+7, EX+1!
ONCDUZ SLF+2~, SLF+4*, SLF+6, EX+1!
>> ONCOVS UPD+9*, UPD+10, UPD+12, UPD+14, UPD+16
>> ONCSITGP CHKDT04+2*
ONCVS EX+1!
OS R1+3*, EX+1!
PRI SGPRCOC+4*, SGPRCOC+10!
PRICNT SGPRCOC+4*, SGPRCOC+5*, SGPRCOC+6, SGPRCOC+10!
STOP LD+1~*, LD+3, LD+5, LD+7*
U LD+7, R1+3, R1+4, SLF+6, SLF+7, NF+2, UPD+9, UPD+14, UPD+16, SGPRCOC+4
DOD+1, P0SD
X SLF+3, KLF+3, UPD+11, CHKDT04+1~*, CHKDT04+2, LFU+1, DOD+2*, GD+1*, PDLC+1*, SUR+1*
SYR+1*, SWK+1*, DC+1*
X1 SLF+3*, KLF+3*, UPD+11*, DC+1*, EX+1!
X2 UPD+11*, DC+1*, EX+1!
XD R1+2*, R1+3, R1+4, DD+1*, EX+1!
XD0 LD+3, LD+5, LD+6, R1+2, R1+3, R1+4, LDXT+1, SLF+3*, SLF+6, SLF+7
KLF+3*, SVS+2*, KVS+1*, NF+2, NF+3, UPD+7*, UPD+12, UPD+14, UPD+16, SGPRCOC+4
SGPRCOC+7, LFU+1*, DLC+1*, GD+1, PDLC1+1, P0*, SDA+1, SUR+1, SYR+1, SWK+1
EX+1!
XDX SD*, DC+1, EX+1!
Y UPD+15*, EX+1!
ZZPRCOC SGPRCOC+8*, SGPRCOC+9, SGPRCOC+10!
ZZPRENT SGPRCOC+7*, SGPRCOC+8, SGPRCOC+10!
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