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

Package: Oncology

Routine: ONCHPC8


Information

ONCHPC8 ;Hines OIFO/GWB - 2000 Hepatocellular Cancers PCE Study ;01/12/00

Source Information

Source file <ONCHPC8.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Oncology 5 $$IIN^ONCFUNC  HEAD^ONCHPC0  ^ONCHPC8A  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
II
III
KILL ;
P ;Print
TASK ;Queue a task

External References

Name Field # of Occurrence
NOW^%DTC PRT+1
^%ZIS ONCHPC8+3
^%ZISC ONCHPC8+5, TASK+5
^%ZTLOAD TASK+5
$$GET1^DIQ I+7, I+9, I+11, I+13, I+17, I+19, I+21, I+23, II+5, II+11
, II+13, II+15, II+17, II+23, II+25, II+27, II+29, II+31, II+33, II+35
, II+37, II+41, II+47, II+49, II+51, II+57, II+59, II+61, II+63, II+73
, II+75, II+77, II+79, II+81, II+83, II+85, II+91, II+93, II+95, II+97
, II+99, II+101, II+103, II+109, II+111, II+113, II+115, II+117, II+119, II+121
, II+127, II+129, II+131, II+133, II+135, II+137, II+139, II+145, II+147, II+149
, II+151, II+153, II+155, II+157, II+161, II+163, II+167, II+169
^DIR I+25, II+170, P+2
$$IIN^ONCFUNC I+5
HEAD^ONCHPC0 I+1, I+25, II+1, III, P+3
^ONCHPC8A III
DOB1^ONCOES I+4
DATEOT^ONCOPCE I+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ONCHPC8+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 DIAGNOIS.....: ",$$GET1^DIQ(165.5,IE,9)
  • Line Location: I+11
Function Call: WRITE
  • Prompt: !," 5. PLACE OF BIRTH..............: ",$$GET1^DIQ(160,ONCOPA,7)
  • Line Location: I+13
Function Call: WRITE
  • Prompt: !," 6. DATE OF BIRTH...............: ",DOB
  • Line Location: I+15
Function Call: WRITE
  • Prompt: !," 7. RACE........................: ",$$GET1^DIQ(165.5,IE,.12)
  • Line Location: I+17
Function Call: WRITE
  • Prompt: !," 8. SPANISH ORIGIN..............: ",$$GET1^DIQ(160,ONCOPA,9)
  • Line Location: I+19
Function Call: WRITE
  • Prompt: !," 9. SEX.........................: ",$$GET1^DIQ(160,ONCOPA,10)
  • Line Location: I+21
Function Call: WRITE
  • Prompt: !,"10. PRIMARY PAYER AT DIAGNOSIS..: ",$$GET1^DIQ(165.5,IE,18)
  • Line Location: I+23
Function Call: WRITE
  • Prompt: !?4,TABLE,!?4,LINE
  • Line Location: II+3
Function Call: WRITE
  • Prompt: !,"11. 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: !,"12. HORMONES:"
  • Line Location: II+9
Function Call: WRITE
  • Prompt: !," ORAL CONTRACEPTIVES........: ",$$GET1^DIQ(165.5,IE,1000)
  • Line Location: II+11
Function Call: WRITE
  • Prompt: !," ESTROGEN REPLACEMENT.......: ",$$GET1^DIQ(165.5,IE,1001)
  • Line Location: II+13
Function Call: WRITE
  • Prompt: !," TAMOXIFEN..................: ",$$GET1^DIQ(165.5,IE,1002)
  • Line Location: II+15
Function Call: WRITE
  • Prompt: !," OTHER......................: ",$$GET1^DIQ(165.5,IE,1003)
  • Line Location: II+17
Function Call: WRITE
  • Prompt: !
  • Line Location: II+19
Function Call: WRITE
  • Prompt: !,"13. CONDITIONS PRESENT AT INITIAL DIAGNOSIS:"
  • Line Location: II+21
Function Call: WRITE
  • Prompt: !," ASCITES....................: ",$$GET1^DIQ(165.5,IE,1004)
  • Line Location: II+23
Function Call: WRITE
  • Prompt: !," CIRRHOSIS..................: ",$$GET1^DIQ(165.5,IE,1005)
  • Line Location: II+25
Function Call: WRITE
  • Prompt: !," CHILD'S CLASS A............: ",$$GET1^DIQ(165.5,IE,1006)
  • Line Location: II+27
Function Call: WRITE
  • Prompt: !," CHILD'S CLASS B............: ",$$GET1^DIQ(165.5,IE,1007)
  • Line Location: II+29
Function Call: WRITE
  • Prompt: !," CHILD'S CLASS C............: ",$$GET1^DIQ(165.5,IE,1008)
  • Line Location: II+31
Function Call: WRITE
  • Prompt: !," HEPATITIS B................: ",$$GET1^DIQ(165.5,IE,1009)
  • Line Location: II+33
Function Call: WRITE
  • Prompt: !," HEPATITIS C................: ",$$GET1^DIQ(165.5,IE,1010)
  • Line Location: II+35
Function Call: WRITE
  • Prompt: !," HEMOCHROMATOSIS............: ",$$GET1^DIQ(165.5,IE,1011)
  • Line Location: II+37
Function Call: WRITE
  • Prompt: !
  • Line Location: II+39
Function Call: WRITE
  • Prompt: !,"14. ALCOHOL CONSUMPTION.........: ",$$GET1^DIQ(165.5,IE,1012)
  • Line Location: II+41
Function Call: WRITE
  • Prompt: !
  • Line Location: II+43
Function Call: WRITE
  • Prompt: !,"15. TUMOR MARKERS:"
  • Line Location: II+45
Function Call: WRITE
  • Prompt: !," AFP (IU/ml)................: ",$$GET1^DIQ(165.5,IE,1013)
  • Line Location: II+47
Function Call: WRITE
  • Prompt: !," CEA (mg/ml)................: ",$$GET1^DIQ(165.5,IE,1014)
  • Line Location: II+49
Function Call: WRITE
  • Prompt: !," CA 19.9 (U/ml).............: ",$$GET1^DIQ(165.5,IE,1015)
  • Line Location: II+51
Function Call: WRITE
  • Prompt: !
  • Line Location: II+53
Function Call: WRITE
  • Prompt: !,"16. TESTS RELATED TO LIVER FUNCTION:"
  • Line Location: II+55
Function Call: WRITE
  • Prompt: !," PROTIME (sec)..............: ",$$GET1^DIQ(165.5,IE,1016)
  • Line Location: II+57
Function Call: WRITE
  • Prompt: !," BILIRUBIN (mg/ml)..........: ",$$GET1^DIQ(165.5,IE,1017)
  • Line Location: II+59
Function Call: WRITE
  • Prompt: !," ALBUMIN (g/dl).............: ",$$GET1^DIQ(165.5,IE,1018)
  • Line Location: II+61
Function Call: WRITE
  • Prompt: !," LDH (U/l)..................: ",$$GET1^DIQ(165.5,IE,1019)
  • Line Location: II+63
Function Call: WRITE
  • Prompt: !
  • Line Location: II+65
Function Call: WRITE
  • Prompt: !,"17. RADIOLOGICAL EVALUATION"
  • Line Location: II+67
Function Call: WRITE
  • Prompt: !
  • Line Location: II+69
Function Call: WRITE
  • Prompt: !," CT ARTERIAL PORTOGRAPHY:"
  • Line Location: II+71
Function Call: WRITE
  • Prompt: !," PERFORMED..................: ",$$GET1^DIQ(165.5,IE,1020)
  • Line Location: II+73
Function Call: WRITE
  • Prompt: !," CIRRHOSIS..................: ",$$GET1^DIQ(165.5,IE,1021)
  • Line Location: II+75
Function Call: WRITE
  • Prompt: !," VASCULAR INVASTION.........: ",$$GET1^DIQ(165.5,IE,1022)
  • Line Location: II+77
Function Call: WRITE
  • Prompt: !," BILOBAR DISEASE............: ",$$GET1^DIQ(165.5,IE,1023)
  • Line Location: II+79
Function Call: WRITE
  • Prompt: !," LYMPH NODES................: ",$$GET1^DIQ(165.5,IE,1024)
  • Line Location: II+81
Function Call: WRITE
  • Prompt: !," SIZE OF DOMINANT TUMOR (MM): ",$$GET1^DIQ(165.5,IE,1025)
  • Line Location: II+83
Function Call: WRITE
  • Prompt: !," NUMBER OF TUMORS...........: ",$$GET1^DIQ(165.5,IE,1026)
  • Line Location: II+85
Function Call: WRITE
  • Prompt: !
  • Line Location: II+87
Function Call: WRITE
  • Prompt: !," SPIRAL CT:"
  • Line Location: II+89
Function Call: WRITE
  • Prompt: !," PERFORMED..................: ",$$GET1^DIQ(165.5,IE,1027)
  • Line Location: II+91
Function Call: WRITE
  • Prompt: !," CIRRHOSIS..................: ",$$GET1^DIQ(165.5,IE,1028)
  • Line Location: II+93
Function Call: WRITE
  • Prompt: !," VASCULAR INVASTION.........: ",$$GET1^DIQ(165.5,IE,1029)
  • Line Location: II+95
Function Call: WRITE
  • Prompt: !," BILOBAR DISEASE............: ",$$GET1^DIQ(165.5,IE,1030)
  • Line Location: II+97
Function Call: WRITE
  • Prompt: !," LYMPH NODES................: ",$$GET1^DIQ(165.5,IE,1031)
  • Line Location: II+99
Function Call: WRITE
  • Prompt: !," SIZE OF DOMINANT TUMOR (MM): ",$$GET1^DIQ(165.5,IE,1032)
  • Line Location: II+101
Function Call: WRITE
  • Prompt: !," NUMBER OF TUMORS...........: ",$$GET1^DIQ(165.5,IE,1033)
  • Line Location: II+103
Function Call: WRITE
  • Prompt: !
  • Line Location: II+105
Function Call: WRITE
  • Prompt: !," INCREMENTAL CT:"
  • Line Location: II+107
Function Call: WRITE
  • Prompt: !," PERFORMED..................: ",$$GET1^DIQ(165.5,IE,1034)
  • Line Location: II+109
Function Call: WRITE
  • Prompt: !," CIRRHOSIS..................: ",$$GET1^DIQ(165.5,IE,1035)
  • Line Location: II+111
Function Call: WRITE
  • Prompt: !," VASCULAR INVASTION.........: ",$$GET1^DIQ(165.5,IE,1036)
  • Line Location: II+113
Function Call: WRITE
  • Prompt: !," BILOBAR DISEASE............: ",$$GET1^DIQ(165.5,IE,1037)
  • Line Location: II+115
Function Call: WRITE
  • Prompt: !," LYMPH NODES................: ",$$GET1^DIQ(165.5,IE,1038)
  • Line Location: II+117
Function Call: WRITE
  • Prompt: !," SIZE OF DOMINANT TUMOR (MM): ",$$GET1^DIQ(165.5,IE,1039)
  • Line Location: II+119
Function Call: WRITE
  • Prompt: !," NUMBER OF TUMORS...........: ",$$GET1^DIQ(165.5,IE,1040)
  • Line Location: II+121
Function Call: WRITE
  • Prompt: !
  • Line Location: II+123
Function Call: WRITE
  • Prompt: !," ULTRASOUND:"
  • Line Location: II+125
Function Call: WRITE
  • Prompt: !," PERFORMED..................: ",$$GET1^DIQ(165.5,IE,1041)
  • Line Location: II+127
Function Call: WRITE
  • Prompt: !," CIRRHOSIS..................: ",$$GET1^DIQ(165.5,IE,1042)
  • Line Location: II+129
Function Call: WRITE
  • Prompt: !," VASCULAR INVASTION.........: ",$$GET1^DIQ(165.5,IE,1043)
  • Line Location: II+131
Function Call: WRITE
  • Prompt: !," BILOBAR DISEASE............: ",$$GET1^DIQ(165.5,IE,1044)
  • Line Location: II+133
Function Call: WRITE
  • Prompt: !," LYMPH NODES................: ",$$GET1^DIQ(165.5,IE,1045)
  • Line Location: II+135
Function Call: WRITE
  • Prompt: !," SIZE OF DOMINANT TUMOR (MM): ",$$GET1^DIQ(165.5,IE,1046)
  • Line Location: II+137
Function Call: WRITE
  • Prompt: !," NUMBER OF TUMORS...........: ",$$GET1^DIQ(165.5,IE,1047)
  • Line Location: II+139
Function Call: WRITE
  • Prompt: !
  • Line Location: II+141
Function Call: WRITE
  • Prompt: !," MRI:"
  • Line Location: II+143
Function Call: WRITE
  • Prompt: !," PERFORMED..................: ",$$GET1^DIQ(165.5,IE,1048)
  • Line Location: II+145
Function Call: WRITE
  • Prompt: !," CIRRHOSIS..................: ",$$GET1^DIQ(165.5,IE,1049)
  • Line Location: II+147
Function Call: WRITE
  • Prompt: !," VASCULAR INVASTION.........: ",$$GET1^DIQ(165.5,IE,1050)
  • Line Location: II+149
Function Call: WRITE
  • Prompt: !," BILOBAR DISEASE............: ",$$GET1^DIQ(165.5,IE,1051)
  • Line Location: II+151
Function Call: WRITE
  • Prompt: !," LYMPH NODES................: ",$$GET1^DIQ(165.5,IE,1052)
  • Line Location: II+153
Function Call: WRITE
  • Prompt: !," SIZE OF DOMINANT TUMOR (MM): ",$$GET1^DIQ(165.5,IE,1053)
  • Line Location: II+155
Function Call: WRITE
  • Prompt: !," NUMBER OF TUMORS...........: ",$$GET1^DIQ(165.5,IE,1054)
  • Line Location: II+157
Function Call: WRITE
  • Prompt: !
  • Line Location: II+159
Function Call: WRITE
  • Prompt: !,"18. DEFINITIVE DIAGNOSIS........: ",$$GET1^DIQ(165.5,IE,1055)
  • Line Location: II+161
Function Call: WRITE
  • Prompt: !,"19. DATE OF INITIAL DIAGNOSIS...: ",$$GET1^DIQ(165.5,IE,3)
  • Line Location: II+163
Function Call: WRITE
  • Prompt: !,"20. HISTOLOGY (ICD-O-2).........: ",$E(HIST,1,4)
  • Line Location: II+165
Function Call: WRITE
  • Prompt: !,"21. GRADE.......................: ",$$GET1^DIQ(165.5,IE,24)
  • Line Location: II+167
Function Call: WRITE
  • Prompt: !,"22. DIAGNOSTIC CONFIRMATION.....: ",$$GET1^DIQ(165.5,IE,26)
  • Line Location: II+169
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+25
    • II+170
    • P+2
Routine Call
  • %ZIS
  • Line Location:
    • ONCHPC8+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
II I+25
KILL ONCHPC8+3, ONCHPC8+4, ONCHPC8+5, II+170
P I+6, I+8, I+10, I+12, I+14, I+16, I+18, I+20, I+22, I+24
, I+26, 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, II+68, II+70, II+72, II+74, II+76, II+78, II+80
, II+82, II+84, II+86, II+88, II+90, II+92, II+94, II+96, II+98, II+100
, II+102, II+104, II+106, II+108, II+110, II+112, II+114, II+116, II+118, II+120
, II+122, II+124, II+126, II+128, II+130, II+132, II+134, II+136, II+138, II+140
, II+142, II+144, II+146, II+148, II+150, II+152, II+154, II+156, II+158, II+160
, II+162, II+164, II+166, II+168
PRT ONCHPC8+5
TASK ONCHPC8+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PRT+1, KILL+3!
%ZIS ONCHPC8+3!*, ONCHPC8+5!
CS KILL+1!
CSDAT KILL+1!
CSI KILL+1!
CSPNT KILL+1!
>> D0 I+4*
DESC KILL+1!
DESC1 KILL+1!
DESC2 KILL+1!
DIR I+25!, II+170!, KILL+3!, P+2!
DIR(0 I+25*, II+170*, P+2*
DIROUT KILL+3!
DIRUT KILL+3!
DLC KILL+1!
DOB I+4*, I+15, KILL+1!
DOFCT KILL+1!
DTOUT KILL+3!
DUOUT KILL+3!
EX PRT*, I+6, I+8, I+10, I+12, I+14, I+16, I+18, I+20, I+22
, I+24, I+26, 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, II+68, II+70, II+72, II+74, II+76, II+78
, II+80, II+82, II+84, II+86, II+88, II+90, II+92, II+94, II+96, II+98
, II+100, II+102, II+104, II+106, II+108, II+110, II+112, II+114, II+116, II+118
, II+120, II+122, II+124, II+126, II+128, II+130, II+132, II+134, II+136, II+138
, II+140, II+142, II+144, II+146, II+148, II+150, II+152, II+154, II+156, II+158
, II+160, II+162, II+164, II+166, II+168, KILL+2!, P+1, P+2*
HIST PRT+2*, II+165, KILL+2!
IE PRT*, I+7, I+9, I+11, I+17, I+23, II+5, II+11, II+13, II+15
, II+17, II+23, II+25, II+27, II+29, II+31, II+33, II+35, II+37, II+41
, II+47, II+49, II+51, II+57, II+59, II+61, II+63, II+73, II+75, II+77
, II+79, II+81, II+83, II+85, II+91, II+93, II+95, II+97, II+99, II+101
, II+103, II+109, II+111, II+113, II+115, II+117, II+119, II+121, II+127, II+129
, II+131, II+133, II+135, II+137, II+139, II+145, II+147, II+149, II+151, II+153
, II+155, II+157, II+161, II+163, II+167, II+169, KILL+2!
IO ONCHPC8+5, TASK+5
IO("Q" ONCHPC8+4, TASK+1!
IOP ONCHPC8+3!, ONCHPC8+5!
IOSL PRT
IOST PRT, I+25, II+1, II+170, P+2
LIN PRT*, II+1, KILL+2!, P+1
LINE PRT+3!*, I+2!*, I+3, II+2!*, II+3, KILL+2!, P+1
LOS KILL+2!
NOP KILL+2!
ONCOLST ONCHPC8+4*, KILL+2!, TASK+4, TASK+6!
>> ONCONUM PRT, PRT+2
>> ONCOPA I+4, I+13, I+19, I+21
ONDATE PRT+1*, KILL+2!
>> POP ONCHPC8+3
TABLE I*, I+3, II*, II+3, KILL+2!, P+1
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, 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, II+68, II+70, II+72, II+74, II+76, II+78
, II+80, II+82, II+84, II+86, II+88, II+90, II+92, II+94, II+96, II+98
, II+100, II+102, II+104, II+106, II+108, II+110, II+112, II+114, II+116, II+118
, II+120, II+122, II+124, II+126, II+128, II+130, II+132, II+134, II+136, II+138
, II+140, II+142, II+144, II+146, II+148, II+150, II+152, II+154, II+156, II+158
, II+160, II+162, II+164, II+166, II+168, P+1, P+2
V1 TASK+4*, TASK+6!
V2 TASK+4*, TASK+6!
X I+4, KILL+3!
Y PRT+1*, I+4*, I+25, II+170, 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!
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