Routine: ONCPTX

Package	Total	Call Graph
Oncology	2	FST^ONCOAIP ^ONCOCC
VA FileMan	2	$$GET1^DIQ EN^DIQ1

Package	Total	Caller Graph
Oncology	1	ONCTXSM

Name	Comments	DBIA/ICR reference
NCDS	;Surgical Diagnostic and Staging Procedure
ROADS	;Surgical Procedures (ROADS)
FORDS	;Surgical Procedures (FORDS)
RAD	;Radiation
ST	;Systemic Therapy
OTH	;Other Treatment
PRO	;Palliative Care/Protocol Participation
TXT	;Text formatting
UCASE	;Mixed case to upper case conversion
EXIT	;KILL local varibles
CLEANUP	;Cleanup

Name	Field # of Occurrence
$$GET1^DIQ	NCDS+2
EN^DIQ1	NCDS+17, ROADS+5, FORDS+9, RAD+6, ST+8, OTH+8, PRO+8
FST^ONCOAIP	NCDS+19, ROADS+7, FORDS+11, RAD+1, ST+1, OTH+1, PRO+1
^ONCOCC	NCDS+41

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !," SURGICAL DIAGNOSTIC AND STAGING PROCEDURE" Line Location: NCDS+20
Function Call: WRITE	Prompt: !," -----------------------------------------" Line Location: NCDS+21
Function Call: WRITE	Prompt: !," Surgical Dx/Staging Proc.....: ",$E(ONC(165.5,D0,58.3),1,6)_$E(ONC(165.5,D0,58.3),9,10),?41,TXT1 Line Location: NCDS+23
Function Call: WRITE	Prompt: !," Surg Dx/Staging Proc @fac....: ",$E(ONC(165.5,D0,58.5),1,6)_$E(ONC(165.5,D0,58.5),9,10),?41,TXT1 Line Location: NCDS+26
Function Call: WRITE	Prompt: !!," Tx Guidelines Discussion.....: ",ONC(165.5,D0,281) Line Location: NCDS+28
Function Call: WRITE	Prompt: !," Treatment Guideline(s).......: ",TXGL Line Location: NCDS+33
Function Call: WRITE	Prompt: !!," Date 1st Crs RX CoC..........: ",ONC(165.5,D0,49) Line Location: NCDS+38
Function Call: WRITE	Prompt: !," Date Initial RX SEER.........: ",ONC(165.5,D0,49.9) Line Location: NCDS+39
Function Call: WRITE	Prompt: !,DASHES Line Location: NCDS+40
Function Call: WRITE	Prompt: !," Pre-2003 cases require the following ROADS surgery items to be coded:" Line Location: ROADS+9
Function Call: WRITE	Prompt: !,DASHES Line Location: ROADS+10
Function Call: WRITE	Prompt: !," Surgical Approach.........(R): ",ONC(165.5,DA,74) Line Location: ROADS+13
Function Call: WRITE	Prompt: !," Number of LN removed..... (R): ",ONC(165.5,D0,140) Line Location: ROADS+18
Function Call: WRITE	Prompt: !," Number of LN removed @fac.(R): ",ONC(165.5,D0,140.1) Line Location: ROADS+21
Function Call: WRITE	Prompt: !,DASHES Line Location: ROADS+26
Function Call: WRITE	Prompt: !," Surgical margins.............: ",ONC(165.5,DA,59) Line Location: FORDS+26
Function Call: WRITE	Prompt: !," Scope of ln surgery.......(F): ",$E(ONC(165.5,D0,138.2),1,6)_$E(ONC(165.5,D0,138.2),9,10),?41,TXT1 Line Location: FORDS+29
Function Call: WRITE	Prompt: !," Scope of ln surgery @fac..(F): ",$E(ONC(165.5,D0,138.3),1,6)_$E(ONC(165.5,D0,138.3),9,10),?41,TXT1 Line Location: FORDS+32
Function Call: WRITE	Prompt: !," Surg proc/other site......(F): ",$E(ONC(165.5,D0,139.2),1,6)_$E(ONC(165.5,D0,139.2),9,10),?41,TXT1 Line Location: FORDS+35
Function Call: WRITE	Prompt: !," METS site resected...........: ",$E(ONC(165.5,D0,139.7),1,6)_$E(ONC(165.5,D0,139.7),9,10),?41,TXT1 Line Location: FORDS+38
Function Call: WRITE	Prompt: !," Surg proc/other site @fac.(F): ",$E(ONC(165.5,D0,139.3),1,6)_$E(ONC(165.5,D0,139.3),9,10),?41,TXT1 Line Location: FORDS+41
Function Call: WRITE	Prompt: !," Date First Surgical Procedure: ",$E(ONC(165.5,D0,170),1,6)_$E(ONC(165.5,D0,170),9,10) Line Location: FORDS+43
Function Call: WRITE	Prompt: !," Date of surgical discharge...: ",$E(ONC(165.5,D0,435),1,6)_$E(ONC(165.5,D0,435),9,10) Line Location: FORDS+47
Function Call: WRITE	Prompt: !," Readmission w/i 30 days/surg.: ",ONC(165.5,D0,14) Line Location: FORDS+48
Function Call: WRITE	Prompt: !," Reason no surgery of primary.: ",ONC(165.5,D0,58) Line Location: FORDS+49
Function Call: WRITE	Prompt: !," CAP Protocol Review..........: ",ONC(165.5,D0,46) Line Location: FORDS+50
Function Call: WRITE	Prompt: !,DASHES Line Location: FORDS+52
Function Call: WRITE	Prompt: !," Radiation....................: ",ONC(165.5,DA,51.2) Line Location: RAD+9
Function Call: WRITE	Prompt: !," Date radiation started.......: ",ONC(165.5,DA,51) Line Location: RAD+10
Function Call: WRITE	Prompt: !," Radiation @fac...............: ",ONC(165.5,DA,51.5)," ",ONC(165.5,DA,51.4) Line Location: RAD+11
Function Call: WRITE	Prompt: !," Location of radiation tx.....: ",ONC(165.5,DA,126) Line Location: RAD+12
Function Call: WRITE	Prompt: !," Phase II rad treatment volume..........: ",ONC(165.5,DA,5514) Line Location: RAD+28
Function Call: WRITE	Prompt: !," Phase II rad to draining lymph nodes...: ",ONC(165.5,DA,5515) Line Location: RAD+29
Function Call: WRITE	Prompt: !," Phase II treatment modality............: ",ONC(165.5,DA,5516) Line Location: RAD+30
Function Call: WRITE	Prompt: !," Phase II rad external beam planning....: ",ONC(165.5,DA,5512) Line Location: RAD+31
Function Call: WRITE	Prompt: !," Phase II dose per fraction.............: ",ONC(165.5,DA,5511) Line Location: RAD+32
Function Call: WRITE	Prompt: !," Phase II number of fractions...........: ",ONC(165.5,DA,5513) Line Location: RAD+33
Function Call: WRITE	Prompt: !," Phase II total dose....................: ",ONC(165.5,DA,5517) Line Location: RAD+34
Function Call: WRITE	Prompt: !," Phase III rad treatment volume.........: ",ONC(165.5,DA,5524) Line Location: RAD+35
Function Call: WRITE	Prompt: !," Phase III rad to draining lymph nodes..: ",ONC(165.5,DA,5525) Line Location: RAD+36
Function Call: WRITE	Prompt: !," Phase III treatment modality...........: ",ONC(165.5,DA,5526) Line Location: RAD+37
Function Call: WRITE	Prompt: !," Phase III rad external beam planning...: ",ONC(165.5,DA,5522) Line Location: RAD+38
Function Call: WRITE	Prompt: !," Phase III dose per fraction............: ",ONC(165.5,DA,5521) Line Location: RAD+39
Function Call: WRITE	Prompt: !," Phase III number of fractions..........: ",ONC(165.5,DA,5523) Line Location: RAD+40
Function Call: WRITE	Prompt: !," Phase III total dose...................: ",ONC(165.5,DA,5527) Line Location: RAD+41
Function Call: WRITE	Prompt: !," Radiation/surgery sequence...: ",ONC(165.5,DA,51.3) Line Location: RAD+45
Function Call: WRITE	Prompt: !," Date radiation ended.........: ",ONC(165.5,DA,361) Line Location: RAD+46
Function Call: WRITE	Prompt: !," Reason for no radiation......: ",ONC(165.5,DA,75) Line Location: RAD+47
Function Call: WRITE	Prompt: !,DASHES Line Location: RAD+48
Function Call: WRITE	Prompt: !," Date systemic therapy started.: ",ONC(165.5,DA,152) Line Location: ST+10
Function Call: WRITE	Prompt: !," Chemotherapy..................: ",ONC(165.5,DA,53)," ",$E(ONC(165.5,DA,53.2),1,34) Line Location: ST+11
Function Call: WRITE	Prompt: !," Chemotherapy @fac.............: ",ONC(165.5,DA,53.4)," ",$E(ONC(165.5,DA,53.3),1,34) Line Location: ST+12
Function Call: WRITE	Prompt: !," Hormone therapy...............: ",ONC(165.5,DA,54)," ",$E(ONC(165.5,DA,54.2),1,34) Line Location: ST+18
Function Call: WRITE	Prompt: !," Hormone therapy @fac..........: ",ONC(165.5,DA,54.4)," ",$E(ONC(165.5,DA,54.3),1,34) Line Location: ST+19
Function Call: WRITE	Prompt: !," Immunotherapy.................: ",ONC(165.5,DA,55)," ",$E(ONC(165.5,DA,55.2),1,34) Line Location: ST+20
Function Call: WRITE	Prompt: !," Immunotherapy @fac............: ",ONC(165.5,DA,55.4)," ",$E(ONC(165.5,DA,55.3),1,34) Line Location: ST+21
Function Call: WRITE	Prompt: !," Hema Trans/Endocrine Proc.....: ",ONC(165.5,DA,153.1)," ",$E(ONC(165.5,DA,153),1,34) Line Location: ST+22
Function Call: WRITE	Prompt: !," Hema Trans/Endocrine Proc @fac: ",ONC(165.5,DA,153.3)," ",$E(ONC(165.5,DA,153.2),1,34) Line Location: ST+23
Function Call: WRITE	Prompt: !,DASHES Line Location: ST+25
Function Call: WRITE	Prompt: !," Other treatment...............: ",ONC(165.5,DA,57)," ",ONC(165.5,DA,57.2) Line Location: OTH+10
Function Call: WRITE	Prompt: !," Other treatment @fac..........: ",ONC(165.5,DA,57.4)," ",ONC(165.5,DA,57.3) Line Location: OTH+11
Function Call: WRITE	Prompt: !,DASHES Line Location: OTH+12
Function Call: WRITE	Prompt: !," Palliative care...............: ",ONC(165.5,DA,12) Line Location: PRO+10
Function Call: WRITE	Prompt: !," Palliative care @fac..........: ",ONC(165.5,DA,13) Line Location: PRO+11
Function Call: WRITE	Prompt: ! Line Location: PRO+12
Function Call: WRITE	Prompt: !," Clinical Trials Discussion....: "_ONC(165.5,DA,279) Line Location: PRO+13
Function Call: WRITE	Prompt: ! Line Location: PRO+14
Function Call: WRITE	Prompt: !," Protocol eligibility status...: "_ONC(165.5,DA,346) Line Location: PRO+15
Function Call: WRITE	Prompt: !," Protocol participation........: "_ONC(165.5,DA,560) Line Location: PRO+16
Function Call: WRITE	Prompt: !," Year put on protocol..........: "_ONC(165.5,DA,133) Line Location: PRO+17
Function Call: WRITE	Prompt: !,DASHES Line Location: PRO+18

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

Name	Line Occurrences (* Changed, ! Killed)
^ONCO(165.5 - [#165.5]	ONCPTX+4, NCDS+4, NCDS+5, NCDS+6, NCDS+7, NCDS+8, NCDS+9, NCDS+10, NCDS+11, NCDS+12! , FORDS+2, FORDS+4, FORDS+5, RAD+9, RAD+11, RAD+13, RAD+20

Name	Line Occurrences
EXIT	NCDS+42, ROADS+27, FORDS+53, RAD+49, ST+26, OTH+13, PRO+19
TXT	NCDS+22, NCDS+25, ROADS+11, ROADS+14, ROADS+16, ROADS+19, ROADS+22, ROADS+24, FORDS+14, FORDS+17 , FORDS+20, FORDS+23, FORDS+28, FORDS+31, FORDS+34, FORDS+37, FORDS+40, FORDS+44
UCASE	NCDS+18, ROADS+6, FORDS+10, RAD+7, RAD+8, ST+9, OTH+9, PRO+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
COC	NCDS+1~, NCDS+2*, NCDS+3, NCDS+41
D0	ONCPTX+4, NCDS+2, NCDS+4, NCDS+5, NCDS+6, NCDS+7, NCDS+8, NCDS+9, NCDS+10, NCDS+11 , NCDS+12, NCDS+17, NCDS+18, NCDS+22, NCDS+23, NCDS+25, NCDS+26, NCDS+28, NCDS+30, NCDS+31 , NCDS+32, NCDS+34, NCDS+35, NCDS+36, NCDS+37, NCDS+38, NCDS+39, ROADS+5, ROADS+6, ROADS+11 , ROADS+14, ROADS+16, ROADS+18, ROADS+19, ROADS+21, ROADS+22, ROADS+24, FORDS+2, FORDS+4, FORDS+5 , FORDS+9, FORDS+10, FORDS+14, FORDS+15, FORDS+17, FORDS+18, FORDS+20, FORDS+21, FORDS+23, FORDS+24 , FORDS+28, FORDS+29, FORDS+31, FORDS+32, FORDS+34, FORDS+35, FORDS+37, FORDS+38, FORDS+40, FORDS+41 , FORDS+43, FORDS+44, FORDS+47, FORDS+48, FORDS+49, FORDS+50, FORDS+51, RAD+6, RAD+7, RAD+8 , RAD+9, RAD+11, RAD+13, RAD+20, ST+8, ST+9, OTH+8, OTH+9, PRO+8, PRO+9 , CLEANUP+1!
DA	NCDS+14~, NCDS+17, ROADS+2~, ROADS+5, ROADS+13, FORDS+6~, FORDS+9, FORDS+26, FORDS+27, RAD+3~ , RAD+6, RAD+9, RAD+10, RAD+11, RAD+12, RAD+14, RAD+15, RAD+16, RAD+17, RAD+18 , RAD+19, RAD+21, RAD+22, RAD+23, RAD+24, RAD+25, RAD+26, RAD+27, RAD+28, RAD+29 , RAD+30, RAD+31, RAD+32, RAD+33, RAD+34, RAD+35, RAD+36, RAD+37, RAD+38, RAD+39 , RAD+40, RAD+41, RAD+42, RAD+43, RAD+44, RAD+45, RAD+46, RAD+47, ST+5~, ST+8* , ST+10, ST+11, ST+12, ST+13, ST+14, ST+15, ST+16, ST+17, ST+18, ST+19 , ST+20, ST+21, ST+22, ST+23, ST+24, OTH+5~, OTH+8, OTH+10, OTH+11, PRO+5~ , PRO+8, PRO+10, PRO+11, PRO+13, PRO+15, PRO+16, PRO+17
DASHES	NCDS+13~, NCDS+40, ROADS+1~, ROADS+10, ROADS+26, FORDS+1~, FORDS+52, RAD+2~, RAD+48, ST+2~* , ST+25, OTH+2~, OTH+12, PRO+2~, PRO+18
DATEDX	ONCPTX+3~, ONCPTX+4*, NCDS+36, FORDS+15, FORDS+16, FORDS+18, FORDS+19, FORDS+21, FORDS+22, FORDS+24 , FORDS+25, FORDS+27, FORDS+45, ST+24
DI	NCDS+14~, ROADS+2~, FORDS+6~, RAD+3~, ST+5~, OTH+5~, PRO+5~
DIC	NCDS+14~, NCDS+15, ROADS+2~, ROADS+3, FORDS+6~, FORDS+7, RAD+3~, RAD+4, ST+5~, ST+6* , OTH+5~, OTH+6, PRO+5~, PRO+6
DIQ	NCDS+14~, NCDS+17, ROADS+2~, ROADS+5, FORDS+6~, FORDS+9, RAD+3~, RAD+6, ST+5~, ST+8* , OTH+5~, OTH+8, PRO+5~, PRO+8
DR	NCDS+14~, NCDS+16, ROADS+2~, ROADS+4, FORDS+6~, FORDS+8, RAD+3~, RAD+5, ST+5~, ST+7* , OTH+5~, OTH+7, PRO+5~, PRO+7
I	NCDS+18, ROADS+6, FORDS+10, RAD+7, RAD+8, ST+9, OTH+9, PRO+9, EXIT+1!
LEN	NCDS+22, NCDS+25, ROADS+11, ROADS+14, ROADS+16, ROADS+19, ROADS+22, ROADS+24, FORDS+14, FORDS+17 , FORDS+20, FORDS+23, FORDS+28, FORDS+31, FORDS+34, FORDS+37, FORDS+40, FORDS+44, TXT+2, TXT+3 , EXIT+1!
LOS	TXT+1~, TXT+2*
NOP	TXT+1~, TXT+3*, TXT+4
ONC	NCDS+14!, ROADS+2!, FORDS+6!, RAD+3!, ST+5!, OTH+5!, PRO+5!, EXIT+1!
ONC(	NCDS+18, NCDS+22, NCDS+23, NCDS+25, NCDS+26, NCDS+28, NCDS+30, NCDS+31, NCDS+32, NCDS+34 , NCDS+35, NCDS+36, NCDS+37, NCDS+38, NCDS+39, ROADS+6, ROADS+11, ROADS+13, ROADS+14, ROADS+16 , ROADS+18, ROADS+19, ROADS+21, ROADS+22, ROADS+24, FORDS+10, FORDS+14, FORDS+15, FORDS+17, FORDS+18 , FORDS+20, FORDS+21, FORDS+23, FORDS+24, FORDS+26, FORDS+27, FORDS+28, FORDS+29, FORDS+31, FORDS+32 , FORDS+34, FORDS+35, FORDS+37, FORDS+38, FORDS+40, FORDS+41, FORDS+43, FORDS+44, FORDS+47, FORDS+48 , FORDS+49, FORDS+50, FORDS+51, RAD+7, RAD+8, RAD+9, RAD+10, RAD+11, RAD+12, RAD+14 , RAD+15, RAD+16, RAD+17, RAD+18, RAD+19, RAD+21, RAD+22, RAD+23, RAD+24, RAD+25 , RAD+26, RAD+27, RAD+28, RAD+29, RAD+30, RAD+31, RAD+32, RAD+33, RAD+34, RAD+35 , RAD+36, RAD+37, RAD+38, RAD+39, RAD+40, RAD+41, RAD+42, RAD+43, RAD+44, RAD+45 , RAD+46, RAD+47, ST+9, ST+10, ST+11, ST+12, ST+13, ST+14, ST+15, ST+16 , ST+17, ST+18, ST+19, ST+20, ST+21, ST+22, ST+23, ST+24, OTH+9, OTH+10 , OTH+11, PRO+9, PRO+10, PRO+11, PRO+13, PRO+15, PRO+16, PRO+17
TOPX	FORDS+2*, FORDS+3, EXIT+1!
TXDT	NCDS+1~, NCDS+10*, NCDS+12
TXGL	NCDS+29, NCDS+30, NCDS+31, NCDS+32, NCDS+33, NCDS+34, NCDS+35, EXIT+1!
TXT	NCDS+22, NCDS+25, ROADS+11, ROADS+14, ROADS+16, ROADS+19, ROADS+22, ROADS+24, FORDS+14, FORDS+17 , FORDS+20, FORDS+23, FORDS+28, FORDS+31, FORDS+34, FORDS+37, FORDS+40, FORDS+44, TXT+2, TXT+3 , TXT+4, EXIT+1!
TXT1	NCDS+23, NCDS+26, ROADS+12, ROADS+15, ROADS+17, ROADS+20, ROADS+23, ROADS+25, FORDS+15, FORDS+18 , FORDS+21, FORDS+24, FORDS+29, FORDS+32, FORDS+35, FORDS+38, FORDS+41, FORDS+45, TXT+2, TXT+4 , EXIT+1!
TXT2	NCDS+24, NCDS+27, ROADS+12, ROADS+15, ROADS+17, ROADS+20, ROADS+23, ROADS+25, FORDS+16, FORDS+19 , FORDS+22, FORDS+25, FORDS+30, FORDS+33, FORDS+36, FORDS+39, FORDS+42, FORDS+46, TXT+2, TXT+4 , EXIT+1!
U	ONCPTX+4, NCDS+4, NCDS+5, NCDS+6, NCDS+7, NCDS+8, NCDS+9, NCDS+10, NCDS+11, FORDS+2 , FORDS+4, FORDS+5
X	NCDS+18, ROADS+6, FORDS+10, RAD+7, RAD+8, ST+9, OTH+9, PRO+9, UCASE+1*, EXIT+1!

Customize PDF page

Package: Oncology

Routine: ONCPTX

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: