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 |  Local Variables  | All
Print Page as PDF
Routine: ONCIPC8

Package: Oncology

Routine: ONCIPC8


Information

ONCIPC8 ;Hines OIFO/GWB - Primary Intracranial/CNS Tumors PCE Study ;05/01/00

Source Information

Source file <ONCIPC8.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Oncology 6 $$OCCUP^ONCACDU1  $$IIN^ONCFUNC  HEAD^ONCIPC0  ^ONCIPC8A  DOB1^ONCOES  DATEOT^ONCOPCE  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 3 NOW^%DTC  $$GET1^DIQ  ^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 ONCOGEN  

Entry Points

Name Comments DBIA/ICR reference
PRT
I
GP
II
KILL ;Kill variables
P ;Print
TASK ;Queue a task

External References

Name Field # of Occurrence
NOW^%DTC PRT+1
^%ZIS ONCIPC8+3
^%ZISC ONCIPC8+5, TASK+5
^%ZTLOAD TASK+5
$$GET1^DIQ I+7, I+9, I+11, I+15, I+17, I+19, I+21, I+23, I+25, I+31
I+33, I+35, I+37, I+39, I+45, I+47, I+49, I+51, I+53, I+55
I+57, I+59, GP+2, GP+4, GP+6, GP+8, GP+10, GP+12, GP+16, II+5
II+11, II+13, II+17, II+19, II+21, II+23, II+25, II+27, II+29, II+31
II+33, II+35, II+37, II+39, II+41, II+43, II+45, II+49, II+51, II+53
II+55, II+57, II+59, II+61, II+63
^DIR I+61, GP+23, P+2
$$OCCUP^ONCACDU1 GP+20, GP+22
$$IIN^ONCFUNC I+5
HEAD^ONCIPC0 II+61, GP+23, II+1, II+67, P+3
^ONCIPC8A II+67
DOB1^ONCOES I+4
DATEOT^ONCOPCE I+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ONCIPC8+3
Function Call: WRITE
  • Prompt: !?4,TABLE,!?4,LINE
  • Line Location: I+3
Function Call: WRITE
  • Prompt: !," 1. FACILITY ID NUMBER (FIN)......: ",$$IIN^ONCFUNC
  • Line Location: I+5
Function Call: WRITE
  • Prompt: !," 2. ACCESSION NUMBER..............: ",$$GET1^DIQ(165.5,IE,.05)
  • Line Location: I+7
Function Call: WRITE
  • Prompt: !," 3. SEQUENCE NUMBER...............: ",$$GET1^DIQ(165.5,IE,.06)
  • Line Location: I+9
Function Call: WRITE
  • Prompt: !," 4. POSTAL CODE AT DIAGNOSIS......: ",$$GET1^DIQ(165.5,IE,9)
  • Line Location: I+11
Function Call: WRITE
  • Prompt: !," 5. DATE OF BIRTH.................: ",DOB
  • Line Location: I+13
Function Call: WRITE
  • Prompt: !," 6. RACE..........................: ",$$GET1^DIQ(165.5,IE,.12)
  • Line Location: I+15
Function Call: WRITE
  • Prompt: !," 7. SPANISH ORIGIN................: ",$$GET1^DIQ(160,ONCOPA,9)
  • Line Location: I+17
Function Call: WRITE
  • Prompt: !," 8. SEX...........................: ",$$GET1^DIQ(160,ONCOPA,10)
  • Line Location: I+19
Function Call: WRITE
  • Prompt: !," 9. HANDEDNESS....................: ",$$GET1^DIQ(165.5,IE,1200)
  • Line Location: I+21
Function Call: WRITE
  • Prompt: !,"10. PRIOR EXPOSURE TO RADIATION...: ",$$GET1^DIQ(165.5,IE,403)
  • Line Location: I+23
Function Call: WRITE
  • Prompt: !,"11. PRIMARY PAYER AT DIAGNOSIS....: ",$$GET1^DIQ(165.5,IE,18)
  • Line Location: I+25
Function Call: WRITE
  • Prompt: !
  • Line Location: I+27
Function Call: WRITE
  • Prompt: !,"12. PRIOR MEDICAL CONDITIONS:"
  • Line Location: I+29
Function Call: WRITE
  • Prompt: !," HYPERTENSION.................: ",$$GET1^DIQ(165.5,IE,1201)
  • Line Location: I+31
Function Call: WRITE
  • Prompt: !," MULTIPLE SCLEROSIS (MS)......: ",$$GET1^DIQ(165.5,IE,1202)
  • Line Location: I+33
Function Call: WRITE
  • Prompt: !," DIABETES.....................: ",$$GET1^DIQ(165.5,IE,1203)
  • Line Location: I+35
Function Call: WRITE
  • Prompt: !," MYOCARDIAL INFARCTION (MI)...: ",$$GET1^DIQ(165.5,IE,354)
  • Line Location: I+37
Function Call: WRITE
  • Prompt: !," CEREBROVASCULAR DISEASE......: ",$$GET1^DIQ(165.5,IE,1204)
  • Line Location: I+39
Function Call: WRITE
  • Prompt: !
  • Line Location: I+41
Function Call: WRITE
  • Prompt: !,"13. PERSONAL HISTORY OF OTHER CANCER:"
  • Line Location: I+43
Function Call: WRITE
  • Prompt: !," BRAIN........................: ",$$GET1^DIQ(165.5,IE,1205)
  • Line Location: I+45
Function Call: WRITE
  • Prompt: !," BREAST.......................: ",$$GET1^DIQ(165.5,IE,1206)
  • Line Location: I+47
Function Call: WRITE
  • Prompt: !," PROSTATE.....................: ",$$GET1^DIQ(165.5,IE,1207)
  • Line Location: I+49
Function Call: WRITE
  • Prompt: !," MALIGNANT MELANOMA...........: ",$$GET1^DIQ(165.5,IE,1208)
  • Line Location: I+51
Function Call: WRITE
  • Prompt: !," OTHER SKIN CANCER............: ",$$GET1^DIQ(165.5,IE,1209)
  • Line Location: I+53
Function Call: WRITE
  • Prompt: !," LEUKEMIA.....................: ",$$GET1^DIQ(165.5,IE,1210)
  • Line Location: I+55
Function Call: WRITE
  • Prompt: !," COLON OR OTHER GI CANCERS....: ",$$GET1^DIQ(165.5,IE,1211)
  • Line Location: I+57
Function Call: WRITE
  • Prompt: !," OTHER........................: ",$$GET1^DIQ(165.5,IE,1212)
  • Line Location: I+59
Function Call: WRITE
  • Prompt: !
  • Line Location: I+62
Function Call: WRITE
  • Prompt: !,"14. GENETIC PREDISPOSITION:"
  • Line Location: GP+0
Function Call: WRITE
  • Prompt: !," NEUROFIBROMATOSIS............: ",$$GET1^DIQ(165.5,IE,1213)
  • Line Location: GP+2
Function Call: WRITE
  • Prompt: !," VON HIPPEL-LINDAU DISEASE....: ",$$GET1^DIQ(165.5,IE,1214)
  • Line Location: GP+4
Function Call: WRITE
  • Prompt: !," TUBEROUS SCLEROSIS...........: ",$$GET1^DIQ(165.5,IE,1215)
  • Line Location: GP+6
Function Call: WRITE
  • Prompt: !," TURCOT SYNDROME..............: ",$$GET1^DIQ(165.5,IE,1216)
  • Line Location: GP+8
Function Call: WRITE
  • Prompt: !," LI-FRAUMENI SYNDROME.........: ",$$GET1^DIQ(165.5,IE,1217)
  • Line Location: GP+10
Function Call: WRITE
  • Prompt: !," KOWDEN DISEASE...............: ",$$GET1^DIQ(165.5,IE,1218)
  • Line Location: GP+12
Function Call: WRITE
  • Prompt: !," NEVOID BASAL CELL CARCINOMA"
  • Line Location: GP+14
Function Call: WRITE
  • Prompt: !," SYNDROME....................: ",$$GET1^DIQ(165.5,IE,1219)
  • Line Location: GP+16
Function Call: WRITE
  • Prompt: !
  • Line Location: GP+18
Function Call: WRITE
  • Prompt: !," 15. USUAL OCCUPATION.............: ",$$OCCUP^ONCACDU1(ONCOPA)
  • Line Location: GP+20
Function Call: WRITE
  • Prompt: !," 16. USUAL INDUSTRY...............: ",$$OCCUP^ONCACDU1(ONCOPA)
  • Line Location: GP+22
Function Call: WRITE
  • Prompt: !?4,TABLE,!?4,LINE
  • Line Location: II+3
Function Call: WRITE
  • Prompt: !,"17. CLASS OF CASE.................: ",$$GET1^DIQ(165.5,IE,.04)
  • Line Location: II+5
Function Call: WRITE
  • Prompt: !
  • Line Location: II+7
Function Call: WRITE
  • Prompt: !,"18. SYMPTOMS:"
  • Line Location: II+9
Function Call: WRITE
  • Prompt: !," HEADACHE.....................: ",$$GET1^DIQ(165.5,IE,1220)
  • Line Location: II+11
Function Call: WRITE
  • Prompt: !," NAUSEA/VOMITING..............: ",$$GET1^DIQ(165.5,IE,1221)
  • Line Location: II+13
Function Call: WRITE
  • Prompt: !," CHANGE IN SENSE OF SMELL AND/"
  • Line Location: II+15
Function Call: WRITE
  • Prompt: !," OR TASTE....................: ",$$GET1^DIQ(165.5,IE,1222)
  • Line Location: II+17
Function Call: WRITE
  • Prompt: !," ALTERED ALERTNESS............: ",$$GET1^DIQ(165.5,IE,1223)
  • Line Location: II+19
Function Call: WRITE
  • Prompt: !," FATIGUE......................: ",$$GET1^DIQ(165.5,IE,1224)
  • Line Location: II+21
Function Call: WRITE
  • Prompt: !," SPEECH DISTURBANCE...........: ",$$GET1^DIQ(165.5,IE,1225)
  • Line Location: II+23
Function Call: WRITE
  • Prompt: !," PERSONALITY CHANGES..........: ",$$GET1^DIQ(165.5,IE,1226)
  • Line Location: II+25
Function Call: WRITE
  • Prompt: !," DEPRESSION...................: ",$$GET1^DIQ(165.5,IE,1227)
  • Line Location: II+27
Function Call: WRITE
  • Prompt: !," MEMORY LOSS..................: ",$$GET1^DIQ(165.5,IE,1228)
  • Line Location: II+29
Function Call: WRITE
  • Prompt: !," LACK OF CONCENTRATION........: ",$$GET1^DIQ(165.5,IE,1229)
  • Line Location: II+31
Function Call: WRITE
  • Prompt: !," DOUBLE VISION................: ",$$GET1^DIQ(165.5,IE,1230)
  • Line Location: II+33
Function Call: WRITE
  • Prompt: !," OTHER VISUAL DISTURBANCE.....: ",$$GET1^DIQ(165.5,IE,1231)
  • Line Location: II+35
Function Call: WRITE
  • Prompt: !," DECREASED HEARING............: ",$$GET1^DIQ(165.5,IE,1232)
  • Line Location: II+37
Function Call: WRITE
  • Prompt: !," VERTIGO......................: ",$$GET1^DIQ(165.5,IE,1233)
  • Line Location: II+39
Function Call: WRITE
  • Prompt: !," TINNITUS.....................: ",$$GET1^DIQ(165.5,IE,1234)
  • Line Location: II+41
Function Call: WRITE
  • Prompt: !," NUMBNESS/TINGLING............: ",$$GET1^DIQ(165.5,IE,1235)
  • Line Location: II+43
Function Call: WRITE
  • Prompt: !," WEAKNESS OR PARALYSIS........: ",$$GET1^DIQ(165.5,IE,1236)
  • Line Location: II+45
Function Call: WRITE
  • Prompt: !," DIFFICULTY IN COORDINATION/"
  • Line Location: II+47
Function Call: WRITE
  • Prompt: !," BALANCE.....................: ",$$GET1^DIQ(165.5,IE,1237)
  • Line Location: II+49
Function Call: WRITE
  • Prompt: !," GENERALIZED SEIZURE..........: ",$$GET1^DIQ(165.5,IE,1238)
  • Line Location: II+51
Function Call: WRITE
  • Prompt: !," FOCAL SEIZURE................: ",$$GET1^DIQ(165.5,IE,1239)
  • Line Location: II+53
Function Call: WRITE
  • Prompt: !," BLADDER INCONTINENCE.........: ",$$GET1^DIQ(165.5,IE,1240)
  • Line Location: II+55
Function Call: WRITE
  • Prompt: !," BOWEL INCONTINENCE...........: ",$$GET1^DIQ(165.5,IE,1241)
  • Line Location: II+57
Function Call: WRITE
  • Prompt: !," PAIN (OTHER THAN HEADACHE)...: ",$$GET1^DIQ(165.5,IE,1242)
  • Line Location: II+59
Function Call: WRITE
  • Prompt: !," WEIGHT CHANGE................: ",$$GET1^DIQ(165.5,IE,1243)
  • Line Location: II+61
Function Call: WRITE
  • Prompt: !," OTHER........................: ",$$GET1^DIQ(165.5,IE,1244)
  • Line Location: II+63
Function Call: WRITE
  • Prompt: !
  • Line Location: II+65
Function Call: WRITE
  • Prompt: !,"Request Queued",!
  • Line Location: TASK+5
Routine Call
  • DIR
  • Line Location:
    • I+61
    • GP+23
    • P+2
Routine Call
  • %ZIS
  • Line Location:
    • ONCIPC8+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ONCO(160 - [#160] GET1^DIQ
^ONCO(165.5 - [#165.5] GET1^DIQ

Global Variables Directly Accessed

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

Label References

Name Line Occurrences
GP I+61
II GP+23
KILL ONCIPC8+3, ONCIPC8+4, ONCIPC8+5, GP+23
P I+6, I+8, I+10, I+12, I+14, I+16, I+18, I+20, I+22, I+24
I+26, I+28, I+30, I+32, I+34, I+36, I+38, I+40, I+42, I+44
I+46, I+48, I+50, I+52, I+54, I+56, I+58, I+60, I+63, GP+1
GP+3, GP+5, GP+7, GP+9, GP+11, GP+13, GP+15, GP+17, GP+19, GP+21
GP+24, II+4, II+6, II+8, II+10, II+12, II+14, II+16, II+18, II+20
II+22, II+24, II+26, II+28, II+30, II+32, II+34, II+36, II+38, II+40
II+42, II+44, II+46, II+48, II+50, II+52, II+54, II+56, II+58, II+60
II+62, II+64, II+66
PRT ONCIPC8+5
TASK ONCIPC8+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PRT+1
%ZIS ONCIPC8+3!*, ONCIPC8+5!
>> D0 I+4*
DIR I+61!, GP+23!, P+2!
DIR(0 I+61*, GP+23*, P+2*
>> DOB I+4*, I+13
EX PRT*, I+6, I+8, I+10, I+12, I+14, I+16, I+18, I+20, I+22
I+24, I+26, I+28, I+30, I+32, I+34, I+36, I+38, I+40, I+42
I+44, I+46, I+48, I+50, I+52, I+54, I+56, I+58, I+60, I+63
GP+1, GP+3, GP+5, GP+7, GP+9, GP+11, GP+13, GP+15, GP+17, GP+19
GP+21, GP+24, II+4, II+6, II+8, II+10, II+12, II+14, II+16, II+18
II+20, II+22, II+24, II+26, II+28, II+30, II+32, II+34, II+36, II+38
II+40, II+42, II+44, II+46, II+48, II+50, II+52, II+54, II+56, II+58
II+60, II+62, II+64, II+66, KILL+1!, P+1, P+2*
>> HIST PRT+2*
IE PRT*, I+7, I+9, I+11, I+15, I+21, I+23, I+25, I+31, I+33
I+35, I+37, I+39, I+45, I+47, I+49, I+51, I+53, I+55, I+57
I+59, GP+2, GP+4, GP+6, GP+8, GP+10, GP+12, GP+16, II+5, II+11
II+13, II+17, II+19, II+21, II+23, II+25, II+27, II+29, II+31, II+33
II+35, II+37, II+39, II+41, II+43, II+45, II+49, II+51, II+53, II+55
II+57, II+59, II+61, II+63, KILL+1!
IO ONCIPC8+5, TASK+5
IO("Q" ONCIPC8+4, TASK+1!
IOP ONCIPC8+3!, ONCIPC8+5!
IOSL PRT
IOST PRTI+61, GP+23, II+1, II+67, P+2
LIN PRT*, II+1, KILL+1!, P+1
LINE PRT+3!*, I+2!*, I+3, II+2!*, II+3
ONCOLST ONCIPC8+4*, TASK+4, TASK+6!
>> ONCONUM PRTPRT+2
>> ONCOPA I+4, I+17, I+19, GP+20, GP+22
ONDATE PRT+1*, KILL+1!
>> POP ONCIPC8+3
>> TABLE I+1*, I+3, II*, II+3
U PRT+2, I+6, I+8, I+10, I+12, I+14, I+16, I+18, I+20, I+22
I+24, I+26, I+28, I+30, I+32, I+34, I+36, I+38, I+40, I+42
I+44, I+46, I+48, I+50, I+52, I+54, I+56, I+58, I+60, I+63
GP+1, GP+3, GP+5, GP+7, GP+9, GP+11, GP+13, GP+15, GP+17, GP+19
GP+21, GP+24, II+4, II+6, II+8, II+10, II+12, II+14, II+16, II+18
II+20, II+22, II+24, II+26, II+28, II+30, II+32, II+34, II+36, II+38
II+40, II+42, II+44, II+46, II+48, II+50, II+52, II+54, II+56, II+58
II+60, II+62, II+64, II+66, P+1, P+2
V1 TASK+4*, TASK+6!
V2 TASK+4*, TASK+6!
X I+4, KILL+1!
Y PRT+1*, I+4*, I+61, GP+23, KILL+1!, 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!
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 |  Local Variables  | All