Routine: ONCBRP9

Package	Total	Call Graph
Oncology	5	HEAD^ONCBRP0 ^ONCBRP9A $$IIN^ONCFUNC DOB1^ONCOES DATEOT^ONCOPCE
VA FileMan	4	NOW^%DTC $$GET1^DIQ EN^DIQ1 ^DIR
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD

Package	Total	Caller Graph
Oncology	2	ONCBRP9A ONCOGEN

Name	Comments	DBIA/ICR reference
PRT
I
II
III
IV
KILL	;
P	;Print
TASK	;Queue a task
FEMALE	;Item for Females Only
MALE	;Item for Males Only

Name	Field # of Occurrence
NOW^%DTC	PRT+1
^%ZIS	ONCBRP9+3
^%ZISC	ONCBRP9+5, TASK+5
^%ZTLOAD	TASK+5
$$GET1^DIQ	FEMALE+1, MALE+1
EN^DIQ1	PRT+2, PRT+4
^DIR	I+44, II+54, III+11, P+2
HEAD^ONCBRP0	I+1, I+44, II+1, II+54, III+1, III+11, P+3
^ONCBRP9A	IV
$$IIN^ONCFUNC	I+2
DOB1^ONCOES	I+5
DATEOT^ONCOPCE	I+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: ONCBRP9+3
Function Call: WRITE	Prompt: !," 1. INSTITUTION ID NUMBER............: H6",$$IIN^ONCFUNC Line Location: I+2
Function Call: WRITE	Prompt: !!?4,TABLE,!?4,LINE Line Location: I+4
Function Call: WRITE	Prompt: !," 2. ACCESSION NUMBER.................: ",ONC(165.5,IE,.05) Line Location: I+6
Function Call: WRITE	Prompt: !," 3. SEQUENCE NUMBER..................: ",ONC(165.5,IE,.06) Line Location: I+7
Function Call: WRITE	Prompt: !," 4. POSTAL CODE AT DIAGNOSIS.........: ",ONC(165.5,IE,9) Line Location: I+8
Function Call: WRITE	Prompt: !," 5. DATE OF BIRTH....................: ",DOB Line Location: I+9
Function Call: WRITE	Prompt: !," 6. RACE.............................: ",ONC(165.5,IE,.12) Line Location: I+10
Function Call: WRITE	Prompt: !," 7. SPANISH ORIGIN...................: ",ONC(160,ONCOPA,9) Line Location: I+11
Function Call: WRITE	Prompt: !," 8. SEX..............................: ",ONC(160,ONCOPA,10) Line Location: I+12
Function Call: WRITE	Prompt: !," 9. PRIMARY PAYER AT DIAGNOSIS.......: ",ONC(165.5,IE,18) Line Location: I+13
Function Call: WRITE	Prompt: !!,"10. FAMILY HISTORY OF BREAST CANCER:" Line Location: I+14
Function Call: WRITE	Prompt: !," DAUGHTER........................: ",ONC(165.5,IE,900) Line Location: I+15
Function Call: WRITE	Prompt: !," MATERNAL AUNT...................: ",ONC(165.5,IE,901) Line Location: I+16
Function Call: WRITE	Prompt: !," MATERNAL GRANDMOTHER............: ",ONC(165.5,IE,902) Line Location: I+17
Function Call: WRITE	Prompt: !," MOTHER..........................: ",ONC(165.5,IE,903) Line Location: I+18
Function Call: WRITE	Prompt: !," ONE SISTER ONLY.................: ",ONC(165.5,IE,904) Line Location: I+19
Function Call: WRITE	Prompt: !," MORE THAN ONE SISTER............: ",ONC(165.5,IE,905) Line Location: I+20
Function Call: WRITE	Prompt: !," FATHER..........................: ",ONC(165.5,IE,906) Line Location: I+21
Function Call: WRITE	Prompt: !," BROTHER.........................: ",ONC(165.5,IE,907) Line Location: I+22
Function Call: WRITE	Prompt: !," POSTIVE FAMILY HISTORY, NOS.....: ",ONC(165.5,IE,908) Line Location: I+23
Function Call: WRITE	Prompt: ! Line Location: I+24
Function Call: WRITE	Prompt: !,"11. (F) PERSONAL HISTORY OF BREAST" Line Location: I+26
Function Call: WRITE	Prompt: !," CANCER...........................: ",ONC(165.5,IE,909) Line Location: I+27
Function Call: WRITE	Prompt: !,"12. SYNCHRONOUS BREAST CANCER........: ",ONC(165.5,IE,910) Line Location: I+28
Function Call: WRITE	Prompt: !!,"13. PERSONAL HISTORY OF OTHER CANCER:" Line Location: I+29
Function Call: WRITE	Prompt: !," COLON...........................: ",ONC(165.5,IE,911) Line Location: I+30
Function Call: WRITE	Prompt: !," OVARY (F).......................: ",ONC(165.5,IE,912) Line Location: I+32
Function Call: WRITE	Prompt: !," UTERUS (F)......................: ",ONC(165.5,IE,913) Line Location: I+34
Function Call: WRITE	Prompt: !," PROSTATE (M)....................: ",ONC(165.5,IE,914) Line Location: I+36
Function Call: WRITE	Prompt: !," OTHER...........................: ",ONC(165.5,IE,915) Line Location: I+37
Function Call: WRITE	Prompt: ! Line Location: I+38
Function Call: WRITE	Prompt: !,"14. (F) HORMONE REPLACEMENT THERAPY..: ",ONC(165.5,IE,916) Line Location: I+40
Function Call: WRITE	Prompt: !,"15. (F) HOW MANY YEARS OF HORMONE" Line Location: I+42
Function Call: WRITE	Prompt: !," REPLACEMENT THERAPY..............: ",ONC(165.5,IE,917) Line Location: I+43
Function Call: WRITE	Prompt: !?4,TABLE,!?4,LINE Line Location: II+3
Function Call: WRITE	Prompt: !,"16. CLASS OF CASE....................: ",ONC(165.5,IE,.04) Line Location: II+4
Function Call: WRITE	Prompt: !,"17. DIAGNOSTIC EVALUATION:" Line Location: II+5
Function Call: WRITE	Prompt: !," MAMMOGRAM (M)...................: ",ONC(165.5,IE,926) Line Location: II+7
Function Call: WRITE	Prompt: !," ULTRASOUND (M)(F)...............: ",ONC(165.5,IE,927) Line Location: II+8
Function Call: WRITE	Prompt: !!,"18. (F) TYPE OF MAMMOGRAM:" Line Location: II+9
Function Call: WRITE	Prompt: !," A. MAMMOGRAM GIVEN, TYPE UNKNOWN: ",ONC(165.5,IE,918) Line Location: II+11
Function Call: WRITE	Prompt: !," DATE.........................: ",ONC(165.5,IE,919) Line Location: II+12
Function Call: WRITE	Prompt: !," B. SCREENING MAMMOGRAM..........: ",ONC(165.5,IE,920) Line Location: II+14
Function Call: WRITE	Prompt: !," DATE.........................: ",ONC(165.5,IE,921) Line Location: II+15
Function Call: WRITE	Prompt: !," C. DIAGNOSTIC MAMMOGRAM.........: ",ONC(165.5,IE,922) Line Location: II+17
Function Call: WRITE	Prompt: !," DATE.........................: ",ONC(165.5,IE,923) Line Location: II+18
Function Call: WRITE	Prompt: !," D. MAGNIFICAITON MAMMOGRAM......: ",ONC(165.5,IE,924) Line Location: II+20
Function Call: WRITE	Prompt: !," DATE.........................: ",ONC(165.5,IE,925) Line Location: II+21
Function Call: WRITE	Prompt: ! Line Location: II+22
Function Call: WRITE	Prompt: !,"19. (F) PRESENTATION OF MOST" Line Location: II+24
Function Call: WRITE	Prompt: !," DEFINITIVE MAMMOGRAM.............: ",ONC(165.5,IE,928) Line Location: II+25
Function Call: WRITE	Prompt: !,"20. DATE OF INITIAL DIAGNOSIS........: ",ONC(165.5,IE,3) Line Location: II+26
Function Call: WRITE	Prompt: !,"21. DATE OF PATHOLOGIC DIAGNOSIS.....: ",ONC(165.5,IE,929) Line Location: II+27
Function Call: WRITE	Prompt: !,"22. PRIMARY SITE (ICD-O-2)...........: ",TOPCOD," ",ONC(165.5,IE,20) Line Location: II+28
Function Call: WRITE	Prompt: !,"23. HISTOLOGY (ICD-O-2)..............: ",$E(HIST,1,4) Line Location: II+29
Function Call: WRITE	Prompt: !,"24. BEHAVIOR CODE (ICD-O-2)..........: ",$E(HIST,5) Line Location: II+30
Function Call: WRITE	Prompt: !,"25. IF INVASIVE DUCTUAL CARCINOMA" Line Location: II+31
Function Call: WRITE	Prompt: !," REPORTED, IS DCIS ALSO PRESENT...: ",ONC(165.5,IE,930) Line Location: II+32
Function Call: WRITE	Prompt: !,"26. GRADE............................: ",ONC(165.5,IE,24) Line Location: II+33
Function Call: WRITE	Prompt: !,"27. ARCHITECTURE PATTERN IF DCIS" Line Location: II+34
Function Call: WRITE	Prompt: !," IS PRESENT.......................: ",ONC(165.5,IE,931) Line Location: II+35
Function Call: WRITE	Prompt: !,"28. NUCLEAR GRADE IF DCIS IS" Line Location: II+36
Function Call: WRITE	Prompt: !," PRESENT..........................: ",ONC(165.5,IE,932) Line Location: II+37
Function Call: WRITE	Prompt: !,"29. DIAGNOSTIC CONFIRMATION..........: ",ONC(165.5,IE,26) Line Location: II+38
Function Call: WRITE	Prompt: !,"30. (M) LEVEL OF INVOLVEMENT:" Line Location: II+39
Function Call: WRITE	Prompt: !," SKIN............................: ",ONC(165.5,IE,933) Line Location: II+41
Function Call: WRITE	Prompt: !," CHEST WALL......................: ",ONC(165.5,IE,934) Line Location: II+43
Function Call: WRITE	Prompt: !," PECTORAL MUSCLES................: ",ONC(165.5,IE,935) Line Location: II+45
Function Call: WRITE	Prompt: !," DERMAL/LYMPHATIC................: ",ONC(165.5,IE,936) Line Location: II+47
Function Call: WRITE	Prompt: !!," DIAGNOSTIC AND STAGING PROCEDURES" Line Location: II+48
Function Call: WRITE	Prompt: ! Line Location: II+49
Function Call: WRITE	Prompt: !,"31. BIOPSY PROCEDURE.................: ",ONC(165.5,IE,141) Line Location: II+50
Function Call: WRITE	Prompt: !,"32. GUIDANCE.........................: ",ONC(165.5,IE,142) Line Location: II+51
Function Call: WRITE	Prompt: !,"33. PALPABILITY OF PRIMARY...........: ",ONC(165.5,IE,143) Line Location: II+52
Function Call: WRITE	Prompt: !,"34. FIRST DETECTED BY................: ",ONC(165.5,IE,144) Line Location: II+53
Function Call: WRITE	Prompt: !?4,TABLE,!?4,LINE Line Location: III+3
Function Call: WRITE	Prompt: !,"35. (M) DNA INDEX/PLOIDY.............: ",ONC(165.5,IE,937) Line Location: III+5
Function Call: WRITE	Prompt: !,"36. ESTROGEN RECEPTOR PROTEIN........: ",ONC(165.5,IE,25.1) Line Location: III+6
Function Call: WRITE	Prompt: !,"37. PROGESTERONE RECEPTOR PROTEIN....: ",ONC(165.5,IE,25.2) Line Location: III+7
Function Call: WRITE	Prompt: !,"38. (M) ANDROGEN RECEPTOR PROTEIN....: ",ONC(165.5,IE,940) Line Location: III+9
Function Call: WRITE	Prompt: !,"39. TYPE OF TEST.....................: ",ONC(165.5,IE,941) Line Location: III+10
Function Call: WRITE	Prompt: !?4,TABLE_" (continued)",!?4,LINE_"------------" Line Location: P+1
Function Call: WRITE	Prompt: !,"Request Queued",! Line Location: TASK+5
Routine Call	DIR Line Location: I+44 II+54 III+11 P+2
Routine Call	%ZIS Line Location: ONCBRP9+3

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

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	PRT+1
^ONCO(165.5 - [#165.5]	PRT+5

Name	Line Occurrences
FEMALE	I+25, I+31, I+33, I+39, I+41, II+10, II+13, II+16, II+19, II+23
II	I+44
III	II+54
IV	III+11
KILL	ONCBRP9+3, ONCBRP9+4, ONCBRP9+5
MALE	I+35, II+6, II+40, II+42, II+44, II+46, III+4, III+8
P	I+2, I+6, I+7, I+8, I+9, I+10, I+11, I+12, I+13, I+14 , I+15, I+16, I+17, I+18, I+19, I+20, I+21, I+22, I+23, I+24 , I+27, I+28, I+29, I+30, I+32, I+34, I+36, I+37, I+38, I+40 , I+43, I+45, II+3, II+4, II+5, II+7, II+8, II+9, II+11, II+12 , II+14, II+15, II+17, II+18, II+20, II+21, II+22, II+25, II+26, II+27 , II+29, II+30, II+32, II+33, II+35, II+37, II+39, II+41, II+43, II+45 , II+47, II+48, II+49, II+50, II+51, II+52, II+53, II+55, III+3, III+5 , III+6, III+7, III+9, III+10, III+12
PRT	ONCBRP9+5
TASK	ONCBRP9+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	PRT+1, KILL+3!
%ZIS	ONCBRP9+3!*, ONCBRP9+5!
CDS	KILL+1!
CDSOT	KILL+1!
CS	KILL+1!
CSDAT	KILL+1!
CSIEN	KILL+1!
CSPNT	KILL+1!
>> D0	I+5*
>> DA	PRT+2, PRT+4
>> DIC	PRT+2, PRT+4
DIQ	PRT+2!, PRT+4
DIR	I+44!, II+54!, III+11!, KILL+3!, P+2!
DIR(0	I+44, II+54, III+11, P+2
DIROUT	KILL+3!
DIRUT	KILL+3!
DLC	KILL+1!
DOB	I+5*, I+9, KILL+1!
DOIT	KILL+1!
>> DR	PRT+2, PRT+3
DTOUT	KILL+3!
DUOUT	KILL+3!
>> EX	PRT, I+2, I+6, I+7, I+8, I+9, I+10, I+11, I+12, I+13 , I+14, I+15, I+16, I+17, I+18, I+19, I+20, I+21, I+22, I+23 , I+24, I+27, I+28, I+29, I+30, I+32, I+34, I+36, I+37, I+38 , I+40, I+43, I+45, II+3, II+4, II+5, II+7, II+8, II+9, II+11 , II+12, II+14, II+15, II+17, II+18, II+20, II+21, II+22, II+25, II+26 , II+27, II+29, II+30, II+32, II+33, II+35, II+37, II+39, II+41, II+43 , II+45, II+47, II+48, II+49, II+50, II+51, II+52, II+53, II+55, III+3 , III+5, III+6, III+7, III+9, III+10, III+12, P+1, P+2
FIL	KILL+1!
>> FN	I+25, I+31, I+33, I+35, I+39, I+41, II+6, II+10, II+13, II+16 , II+19, II+23, II+40, II+42, II+44, II+46, III+4, III+8, FEMALE+1, FEMALE+2 , MALE+1, MALE+2
>> HIST	PRT+5*, II+29, II+30
>> IE	PRT*, I+6, I+7, I+8, I+10, I+13, I+15, I+16, I+17, I+18 , I+19, I+20, I+21, I+22, I+23, I+27, I+28, I+30, I+32, I+34 , I+36, I+37, I+40, I+43, II+4, II+7, II+8, II+11, II+12, II+14 , II+15, II+17, II+18, II+20, II+21, II+25, II+26, II+27, II+28, II+32 , II+33, II+35, II+37, II+38, II+41, II+43, II+45, II+47, II+50, II+51 , II+52, II+53, III+5, III+6, III+7, III+9, III+10, FEMALE+1, FEMALE+2, MALE+1 , MALE+2
IIN	KILL+3!
IO	ONCBRP9+5, TASK+5
IO("Q"	ONCBRP9+4, TASK+1!
IOP	ONCBRP9+3!, ONCBRP9+5!
IOSL	PRT
IOST	PRT, I+44, II+1, II+22, II+54, III+1, III+11, P+2
LIN	PRT*, II+1, III+1, KILL+1!, P+1
LINE	PRT+6!, I+3!, I+4, II+2!, II+3, III+2!, III+3, P+1
LOS	KILL+1!
NCDS	KILL+1!
NCDSIEN	KILL+2!
NCDSOT	KILL+2!
ONC	KILL+2!
ONC(	I+6, I+7, I+8, I+10, I+13, I+15, I+16, I+17, I+18, I+19 , I+20, I+21, I+22, I+23, I+27, I+28, I+30, I+32, I+34, I+36 , I+37, I+40, I+43, II+4, II+7, II+8, II+11, II+12, II+14, II+15 , II+17, II+18, II+20, II+21, II+25, II+26, II+27, II+28, II+32, II+33 , II+35, II+37, II+38, II+41, II+43, II+45, II+47, II+50, II+51, II+52 , II+53, III+5, III+6, III+7, III+9, III+10, FEMALE+1, FEMALE+2, MALE+1, MALE+2
ONC(160	I+11, I+12
ONCOLST	ONCBRP9+4*, TASK+4, TASK+6!
>> ONCONUM	PRT, PRT+4, PRT+5
>> ONCOPA	PRT+2, I+5, I+11, I+12, FEMALE+1, MALE+1
ONDATE	PRT+1*, KILL+2!
OSP	KILL+3!
PG	PRT*, KILL+2!
>> POP	ONCBRP9+3
SURG	KILL+2!
SURG1	KILL+2!
SURG2	KILL+2!
SURGDT	KILL+2!
TABLE	I, I+4, II, II+3, III*, III+3, KILL+2!, P+1
>> TOPCOD	II+28
U	PRT+5, I+2, I+6, I+7, I+8, I+9, I+10, I+11, I+12, I+13 , I+14, I+15, I+16, I+17, I+18, I+19, I+20, I+21, I+22, I+23 , I+24, I+27, I+28, I+29, I+30, I+32, I+34, I+36, I+37, I+38 , I+40, I+43, I+45, II+3, II+4, II+5, II+7, II+8, II+9, II+11 , II+12, II+14, II+15, II+17, II+18, II+20, II+21, II+22, II+25, II+26 , II+27, II+29, II+30, II+32, II+33, II+35, II+37, II+39, II+41, II+43 , II+45, II+47, II+48, II+49, II+50, II+51, II+52, II+53, II+55, III+3 , III+5, III+6, III+7, III+9, III+10, III+12, P+1, P+2
V1	TASK+4*, TASK+6!
V2	TASK+4*, TASK+6!
X	I+5, KILL+3!
Y	PRT+1, I+5, I+44, II+54, III+11, KILL+3!, P+2
>> ZTDESC	TASK+3*
ZTDTH	TASK+1!
ZTIO	TASK+1!
>> ZTREQ	TASK+2*
>> ZTRTN	TASK+2*
ZTSAVE	TASK+1!
ZTSAVE(	TASK+4*
ZTSAVE("ZTREQ"	TASK+2*
ZTSK	TASK+6!
ZTUCI	TASK+1!

Customize PDF page

Package: Oncology

Routine: ONCBRP9

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: