Routine: ONCACDU2

Package	Total	Call Graph
Oncology	5	($$DATE,CHKADDS)^ONCACDU1 ($$FCNODE,$$SUB164)^ONCACDU2 $$HEMATO^ONCFUNC ^ONCODIS $$DPTLRT^ONCOES
Kernel	1	($$STRIP,$$TRIM)^XLFSTR
Master Patient Index VistA	1	$$GETICN^MPIF001
VA FileMan	1	$$GET1^DIQ

Package	Total	Caller Graph
Oncology	4	ONC2PS10 ONCACDU2 ONCSCHMU ONCTXSM

Entry Points

Name	Comments	DBIA/ICR reference
VAFLD(ACDANS)	;Convert data to NAACCR format
ICN(ACD160)	;Patient ICN (2,991.01 & 991.02) [72-94] ; ICN OR X =999999999999V999999 format
VASIT()	;VISN (160.1,7) [2340-2341]
COCACC()	;COC ACCREDITATION (160.1,68) [2547-2548]
SNCNT(IEN)	;Sequence Number--Central [380] 281-282
COCO(IEN)	;COC Coding Sys--Original [2150] 1202-1203
VENDOR()	;Vendor Name [2170] 1204-1213
WORD(IEN,NODE,LEN)	;Get word processing data
STAGE(IEN,TYPE)	;TNM Descriptors
STAGEEX
CCOUNTY(ACD160)	;County--Current [1840] 2192-2194
CCEX
SUB(IEN,CNT,FIELD)	;
SUB164(IEN,SUBFLD,ENTRY)	;ICDO TOPOGRAPHY (164)
RXPRI(IEN,FIELD,SUBFLD)	;
FNODE(ACD160,FIELD)	;FOLLOW-UP (160,400)
LAST(ACD160)	;Get last FOLLOW-UP(160,400)
FCNODE(ACD160,FIELD,IE)	;FOLLOW-UP CONTACT (160,420)
CS(IEN)	;Cancer Status [1770] 1303-1303
CCTST(ACD160)	;
CSTST(ACD160)	;
ADDCTRY(IEN,ITEM)	;
DPTLRT(ACD160)	;check if pt from Patient or Referral file
ICD(ICD)	;ICD Code
ICDR(ICD)	;ICD Revision Number [1920] 1392-1392
PPAY(IEN)	;PRIMARY PAYER AT DX (165.5,18)
DS(IEN)	;RX Date--Surgery [1200] 755-762
STRIP	;Replace punctuation marks with spaces
STRIP1	;Strip out punctuation marks
STNUM	;get 3-digit state number for state extract. reporting facility must be the same w/ 160.1 entry.
CLEANUP	;Cleanup

Name	Field # of Occurrence
$$GET1^DIQ	SNCNT+2, SNCNT+3, SNCNT+4, SNCNT+5, COCO+2, STAGE+5, STAGE+6, STAGE+12, CCOUNTY+3, CCOUNTY+5 , SUB+10, SUB+12, SUB+19, SUB164+3, SUB164+4, RXPRI+13, RXPRI+14, RXPRI+16, FNODE+13, FCNODE+13 , FCNODE+14, CS+10, CS+12, CCTST+5, CCTST+6, CSTST+5, CSTST+8, CSTST+9, CSTST+10, ADDCTRY+14 , ADDCTRY+17, ADDCTRY+18, ADDCTRY+19, ADDCTRY+20, ICD+3, ICDR+3, PPAY+2, PPAY+3, DS+2, DS+3 , DS+4, STNUM+4, STNUM+8
$$GETICN^MPIF001	ICN+7
$$DATE^ONCACDU1	DS+6
CHKADDS^ONCACDU1	CSTST+4, ADDCTRY+12
$$FCNODE^ONCACDU2	ADDCTRY+20
$$SUB164^ONCACDU2	SUB+21, RXPRI+15, RXPRI+17
$$HEMATO^ONCFUNC	SUB164+7
^ONCODIS	VENDOR+5
$$DPTLRT^ONCOES	CCOUNTY+1, CCTST+5, CCTST+6
$$STRIP^XLFSTR	CCTST+7, STRIP1+1
$$TRIM^XLFSTR	STRIP+2

FileNo	Call Tags
^ONCO(160 - [#160]	GET1^DIQ
160.03	GET1^DIQ
160.04	GET1^DIQ
^ONCO(160.3 - [#160.3]	GET1^DIQ
^ONCO(160.4 - [#160.4]	GET1^DIQ
^ONCO(160.6 - [#160.6]	GET1^DIQ
^ONCO(164 - [#164]	GET1^DIQ
^ONCO(164.42 - [#164.42]	GET1^DIQ
^ONCO(165 - [#165]	GET1^DIQ
^ONCO(165.5 - [#165.5]	GET1^DIQ
165.51	GET1^DIQ
165.573	GET1^DIQ
^DPT - [#2]	GET1^DIQ
^VA(200 - [#200]	GET1^DIQ
^DIC(5 - [#5]	GET1^DIQ
^LRT(67 - [#67]	GET1^DIQ
^HL(779.004 - [#779.004]	GET1^DIQ
^ICD9 - [#80]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^ONCO(160 - [#160]	ICN+5, LAST+3, LAST+4, FCNODE+9, CCTST+4, CSTST+7, ADDCTRY+16, DPTLRT+3, DPTLRT+4
^ONCO(160.1 - [#160.1]	VASIT+2, VASIT+3, COCACC+2, COCACC+3, STNUM+5, STNUM+6, STNUM+7
^ONCO(160.16 - [#160.16]	VENDOR+2, VENDOR+4
^ONCO(164 - [#164]	SUB164+11
^ONCO(165.5 - [#165.5]	WORD+3, WORD+7, WORD+8, WORD+9, WORD+11, SUB+5, SUB+7, CS+4, CS+7
^ONCO(167 - [#167]	SUB+13
^VIC(5.11 - [#5.11]	ADDCTRY+20

Name	Line Occurrences
$$DPTLRT	CSTST+8, CSTST+9, ADDCTRY+17, ADDCTRY+18
$$ICD	ICDR+2
$$LAST	FNODE+9
CCEX	CCOUNTY+1
STAGEEX	STAGE+7, STAGE+8

Name	Field # of Occurrence
^(1	STNUM+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACD160	ICN~, ICN+4, ICN+5, CCOUNTY~, CCOUNTY+1, CCOUNTY+3, FNODE~, FNODE+9, FNODE+12, LAST~ , LAST+3, LAST+4, FCNODE~, FCNODE+9, FCNODE+12, CCTST~, CCTST+3, CSTST~, CSTST+5, CSTST+7 , CSTST+8, CSTST+9, ADDCTRY+16, ADDCTRY+17, ADDCTRY+18, ADDCTRY+20, DPTLRT~, DPTLRT+3, DPTLRT+4, ICDR+3
ACDANS	VAFLD~, VAFLD+1, VAFLD+2, VAFLD+3, VAFLD+4, ADDCTRY+13, ADDCTRY+18, ADDCTRY+21, ADDCTRY+22, ADDCTRY+23 , ADDCTRY+24, ADDCTRY+25, ADDCTRY+26, ADDCTRY+27, ADDCTRY+28, ADDCTRY+29, ADDCTRY+30, ADDCTRY+31, ADDCTRY+32, ADDCTRY+33 , ADDCTRY+34, ADDCTRY+35, ADDCTRY+36, ADDCTRY+37, ADDCTRY+38, ADDCTRY+39, STRIP+1, STRIP+2, STRIP1+1, STNUM+5 , STNUM+7, STNUM+8, STNUM+9
BEHAV	SNCNT+1~, SNCNT+5*, SNCNT+7
CD	STAGE+3~, STAGE+5*, STAGE+7
CNT	WORD+4~, WORD+5, WORD+7, WORD+8, WORD+9, WORD+11, SUB~, SUB+3*, SUB+7
CONTACT	FCNODE+7~, FCNODE+13*, FCNODE+14
D0	CCTST+2~, CCTST+3*, CCTST+4, CCTST+5, CCTST+6
DATEDX	SNCNT+1~, SNCNT+2, SNCNT+7, COCO+2, COCO+3
DLC	LAST+1~, LAST+2, LAST+3, LAST+4
DPT	CCOUNTY+2~, CCOUNTY+3*, CCOUNTY+4
DPTLRT	DPTLRT+1~, DPTLRT+2, DPTLRT+3, DPTLRT+4*, DPTLRT+5
DPTPNT	CCOUNTY+2~, CCOUNTY+4*, CCOUNTY+5
ENTRY	SUB+6~, SUB+10, SUB+15, SUB+16, SUB+17, SUB+18, SUB+19, SUB+21, SUB164~, SUB164+11 , RXPRI+11~, RXPRI+14, RXPRI+15, RXPRI+16, RXPRI+17
EXTR	VENDOR+1~, VENDOR+2*, VENDOR+3
EXTRACT	VENDOR+2, VENDOR+4, CLEANUP+1!
FCNODE	FCNODE+7~, FCNODE+9*, FCNODE+10, FCNODE+12
FIELD	SUB~, SUB+10, SUB+14, SUB+15, SUB+16, SUB+17, SUB+20, SUB+22, SUB164+5, SUB164+6 , SUB164+8, RXPRI~, RXPRI+14, RXPRI+15, RXPRI+16, FNODE~, FNODE+13, FCNODE~, FCNODE+14
FNODE	FNODE+8~, FNODE+9, FNODE+10, FNODE+12, CS+1~, CS+2, CS+4, CS+5, CS+7, CS+8 , CS+9
HEMA	SUB+2~, SUB+11, SUB+13, SUB+16, SUB+17
HEMAPT	SUB+2~, SUB+12*, SUB+13
HIST	SNCNT+1~, SNCNT+4*, SNCNT+7
I	SUB+2~, SUB+7*
ICD	ICD~, ICD+3, ICD+4, ICD+5, ICD+6, ICD+7, ICD+8, ICD+9, ICDR~, ICDR+2* , ICDR+3
ICDR	ICDR+1~, ICDR+3, ICDR+4, ICDR+5
IE	FCNODE~, FCNODE+14
IEN	SNCNT~, SNCNT+2, SNCNT+3, SNCNT+4, SNCNT+5, COCO~, COCO+2, WORD~, WORD+3, WORD+7 , WORD+8, WORD+9, WORD+11, STAGE~, STAGE+5, STAGE+6, STAGE+12, SUB~, SUB+5, SUB+7 , SUB+9, SUB+19, SUB+21, SUB164~, SUB164+3, SUB164+7, RXPRI~, RXPRI+13, RXPRI+14, RXPRI+15 , RXPRI+16, RXPRI+17, CS~, CS+4, CS+7, CS+9, ADDCTRY~, ADDCTRY+14, PPAY~, PPAY+2 , DS~, DS+2, DS+3, DS+4, STNUM+4
IENS	SUB+6~, SUB+9, SUB+10, SUB+12, FNODE+11~, FNODE+12, FNODE+13, FCNODE+11~, FCNODE+12, FCNODE+13 , CS+6~, CS+9, CS+10
ITEM	CSTST+4*, ADDCTRY~, ADDCTRY+14, ADDCTRY+15, ADDCTRY+20
LEN	WORD~, WORD+7, WORD+10
LINE	WORD+4~, WORD+6, WORD+9, WORD+10, WORD+11*, WORD+12
LOC	STAGE+3~, STAGE+9*, STAGE+12
NODE	WORD~, WORD+3, WORD+7, WORD+8, WORD+9, WORD+11
ONC1601	STNUM+2~, STNUM+4, STNUM+5, STNUM+6, STNUM+7
ONC16019	STNUM+2~, STNUM+4*, STNUM+6
ONC201	ICN+2~, ICN+5*, ICN+6
ONC3DIG	STNUM+2~, STNUM+3, STNUM+7, STNUM+8, STNUM+9
ONC3IEN	STNUM+2~, STNUM+7*
>> ONCADDF	CSTST+4, ADDCTRY+12
ONCLINE	WORD+4~, WORD+6, WORD+7, WORD+9, WORD+10
ONCPT01	ICN+2~, ICN+6*, ICN+7
ONCX	CSTST+2~, CSTST+5, CSTST+7, CSTST+11, CSTST+12, CSTST+13, CSTST+14, CSTST+15, CSTST+16
OSPIEN	VASIT+2, VASIT+3, VASIT+4!, COCACC+2, COCACC+3, COCACC+4!
PD	STAGE+3~, STAGE+6*, STAGE+8
PRIMST	SNCNT+1~, SNCNT+3*, SNCNT+7
PT	CS+6~, CS+10, CS+11, CS+12, CCTST+2~, CCTST+4, CCTST+5, CCTST+6, CSTST+2~, CSTST+7* , CSTST+8, CSTST+9, CSTST+10, ADDCTRY+16*, ADDCTRY+17, ADDCTRY+18, ADDCTRY+19
STATE	ADDCTRY+20*!
STRING	STAGE+11~, STAGE+12*, STAGE+13, STAGE+14, STAGE+15
SUB	SUB+6~
SUBFLD	SUB+6~, SUB+20*, SUB+21, SUB164~, SUB164+9, SUB164+11, RXPRI~, RXPRI+15, RXPRI+17
SUBIEN	SUB+6~, SUB+7*, SUB+8, SUB+9
SUFFIX	VENDOR+1~, VENDOR+3*, VENDOR+5
SURGDT	DS+5*, DS+6, DS+7!
SURGDT(	DS+2, DS+3, DS+4*
SURGDT(0	DS+5
TOP1	SUB164+1~, SUB164+3, SUB164+4, SUB164+5, SUB164+6, SUB164+7, SUB164+8, SUB164+9, RXPRI+13, RXPRI+15
TOP2	SUB164+1~, SUB164+4, SUB164+5, SUB164+6, SUB164+7, SUB164+8, SUB164+9, SUB164+10, SUB164+11
TYPE	STAGE~, STAGE+7, STAGE+8, STAGE+9, STAGE+10, STAGE+15
U	ICN+5, ICN+8, VASIT+3, COCACC+3, SUB+13, SUB164+11, ADDCTRY+20, DPTLRT+3, DPTLRT+4, STNUM+6 , STNUM+7
VERSION	VENDOR+1~, VENDOR+4*, VENDOR+5
VICPNT	ADDCTRY+20*!
X	ICN+2~, ICN+3, ICN+4, ICN+7, ICN+8, ICN+9, VASIT+1~, VASIT+3, VASIT+5, COCACC+1~ , COCACC+3, COCACC+5, SNCNT+1~, SNCNT+6, SNCNT+7, SNCNT+8, COCO+1~, COCO+3, COCO+4, VENDOR+1~ , VENDOR+5, VENDOR+6, WORD+1~, WORD+2, WORD+12, WORD+13, WORD+14, STAGE+3~, STAGE+4, STAGE+7 , STAGE+8, STAGE+13, STAGE+14, STAGE+15, STAGEEX, CCOUNTY+1, CCOUNTY+2~, CCOUNTY+5, CCEX, SUB+2~ , SUB+4, SUB+8, SUB+10, SUB+15, SUB+16, SUB+17, SUB+18, SUB+19, SUB+20, SUB+21 , SUB+22, SUB+23, SUB164+1~, SUB164+2, SUB164+11, SUB164+12, RXPRI+11~, RXPRI+12, RXPRI+15, RXPRI+16 , RXPRI+17, RXPRI+18, FNODE+8~, FNODE+9, FNODE+13, FNODE+14, LAST+2, LAST+4, LAST+5, LAST+6 , FCNODE+7~, FCNODE+8, FCNODE+14, FCNODE+15, CS+1~, CS+3, CS+12, CS+13, CCTST+2~, CCTST+4* , CCTST+5, CCTST+6, CCTST+7, CCTST+8, ADDCTRY+16, ADDCTRY+17, ADDCTRY+18, ADDCTRY+19, ICD+2~, PPAY+1~ , PPAY+2, PPAY+3, PPAY+4, PPAY+5, DS+1~, DS+2, DS+3, DS+4, DS+6, DS+8
XPT	CSTST+2~, CSTST+3, CSTST+8, CSTST+9, CSTST+10
XX	CSTST+2~, CSTST+3, CSTST+8, CSTST+9, CSTST+10, CSTST+11, CSTST+12, CSTST+13, CSTST+14, ADDCTRY+11~ , ADDCTRY+14, ADDCTRY+16, ADDCTRY+17, ADDCTRY+18, ADDCTRY+19, ADDCTRY+20, ADDCTRY+21, ADDCTRY+22, ADDCTRY+23, ADDCTRY+24 , ADDCTRY+25, ADDCTRY+26, ADDCTRY+27, ADDCTRY+28, ADDCTRY+29, ADDCTRY+30, ADDCTRY+31, ADDCTRY+32, ADDCTRY+33, ADDCTRY+34 , ADDCTRY+35, ADDCTRY+36, ADDCTRY+37, ADDCTRY+38
Z	CS+1~

Customize PDF page

Package: Oncology

Routine: ONCACDU2

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 4

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items