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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ONCOAIM

Package: Oncology

Routine: ONCOAIM


Information

ONCOAIM ;HINES OIFO/GWB - Create additional primaries for a patient ;03/08/11

Source Information

Source file <ONCOAIM.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 5 ^DIC  FILE^DICN  ^DIE  ^DIK  ^DIR  
Oncology 3 $$DIV^ONCFUNC  SEX^ONCOCKI  (CX,SDA)^ONCOCOM  

Entry Points

Name Comments DBIA/ICR reference
EN ;Add additional primaries for patient
PROMPT ;SEQUENCE NUMBER (165.5,.06) prompt
LOOK2 ;Select Primary Site
CR ;Create Primary
PID ;Continue defining Primary Record
UPDT ;Update 00 to 01, update 60 to 61
KLN ;KILL entry
KILL ;KILL variables
EX ;Exit
CLEANUP ;Cleanup

External References

Name Field # of Occurrence
^DIC LOOK2+5
FILE^DICN CR+5
^DIE CR+24, UPDT+2, UPDT+3
^DIK KLN+1
^DIR PROMPT+5, LOOK2+9
$$DIV^ONCFUNC EN+16
SEX^ONCOCKI LOOK2+7
CX^ONCOCOM PROMPT+9
SDA^ONCOCOM UPDT+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !!?5,"******** ADD PRIMARY RECORD FOR THIS PATIENT********",!!
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !!?5,"ACCESSION NUMBER: ",ACN
  • Line Location: EN+32
Function Call: WRITE
  • Prompt: " Allowable Values: 00-88, 99"
  • Line Location: PROMPT+6
Function Call: WRITE
  • Prompt: ?32,"Next Non-Malignant SEQUENCE NUMBER is",NEXTBEN
  • Line Location: PROMPT+19
Function Call: WRITE
  • Prompt: !,?5,"Creating another primary record for ",ONCONM_" "_ACN_"..."
  • Line Location: CR+2
Function Call: WRITE
  • Prompt: !!?5,"The following up-dating has occurred:",!!
  • Line Location: UPDT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: KLN+4
Routine Call
  • DIC
  • Line Location:
    • LOOK2+5
Routine Call
  • DIE
  • Line Location:
    • CR+24
    • UPDT+2
    • UPDT+3
Routine Call
  • DIR
  • Line Location:
    • PROMPT+5
    • LOOK2+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ONCO(164.2 - [#164.2] Classic Fileman Calls
^ONCO(165.5 - [#165.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ONCO(160 - [#160] CR+14, CR+15, CR+16, CR+18
^ONCO(164.2 - [#164.2] EN+15
^ONCO(165.5 - [#165.5] EN+10, EN+13, EN+14, PROMPT+7, CR+7*, CR+8*, CR+20, CR+25
^TMP($J EN+18*, EN+20*, EN+23, EN+24, EN+25, EN+26, PROMPT+12, PROMPT+13, PROMPT+14, PROMPT+17
, PROMPT+18, PROMPT+20, PROMPT+21, PROMPT+22, PID+1, PID+2, KILL+4!

Label References

Name Line Occurrences
CR LOOK2+10
EN LOOK2+10
EX LOOK2+5, CR+5, CR+26
KILL EN+1, PROMPT+5, PID+3, KLN+1, EX+1
KLN CR+26
LOOK2 LOOK2+7
PID CR+26
PROMPT PROMPT+6, PROMPT+7, PROMPT+19
UPDT PID+1, PID+2

Naked Globals

Name Field # of Occurrence
^(7 CR+7*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AC EN+9*, CR+23, PID+3, KILL+1!
ACAY CR+9*, KILL+1!
ACN EN+9*, EN+10, EN+11, EN+32, PROMPT+7, PROMPT+10, PROMPT+16, PROMPT+24, CR+2, CR+23*
, KILL+1!
ACS EN+9*, EN+10*, EN+11, EN+13, EN+18, EN+20, PROMPT+13*, PROMPT+16, PROMPT+21*, PROMPT+24
, KILL+1!
ACSL EN+10*, KILL+1!
ALPHA EN+23*, KILL+1!
AY PROMPT+11*, KILL+1!
BEN EN+23*, EN+25, KILL+1!
>> CS CR+12*, CR+17*
D0 UPDT+2*, UPDT+3*, KILL+1!
DA CR+23*, UPDT+1*, UPDT+3*, KLN+1*, KLN+2*, KLN+3, KILL+1!
DEF PROMPT+1~, PROMPT+2*, PROMPT+3
DIC LOOK2+1!, LOOK2+2*, LOOK2+5!, CR+1!, CR+3*, CR+5!, KILL+1!
DIC("A" LOOK2+3*
DIC("DR" CR+4*
DIC("S" LOOK2+4*
DIC(0 LOOK2+2*, CR+3*
DIE CR+21*, UPDT+1*, UPDT+3*, KILL+1!
DIEN PROMPT+1~, PROMPT+10*
DIK KLN+1*, KILL+1!
DIR PROMPT+3!, LOOK2+8!, KILL+1!
DIR("?" PROMPT+4*
DIR("??" PROMPT+5*
DIR("A" PROMPT+3*, LOOK2+9*
DIR("B" PROMPT+3*, LOOK2+9*
DIR(0 PROMPT+3*, LOOK2+9*
DO CR+1!
DR CR+22*, UPDT+1*, UPDT+3*, KILL+1!
DT PROMPT+11, CR+9
DTIME KLN+2
DTOUT CR+1!, KILL+1!
DUZ(2 EN+18, EN+20, CR+14
IOF EN+2
KK EN+10*, KILL+2!
KKB EN+9*, EN+20*, KILL+2!
KKM EN+9*, EN+18*, KILL+2!
LASTBEN EN+22!, EN+25*, EN+27, KILL+2!
LASTMAL EN+22!, EN+26*, EN+28, KILL+2!
LL EN+13*, KILL+2!
MAL EN+24*, EN+26, KILL+2!
>> MO CR+12*, CR+18*
NEXTBEN EN+22!, EN+27*, PROMPT+19, KILL+2!
NEXTMAL EN+22!, EN+28*, EN+29*, EN+30*, PROMPT+2, KILL+2!
NUM EN+24*, KILL+2!
ONCOACN PID+3*, CLEANUP+1!
ONCOD0 PROMPT+9, LOOK2+6, CR+7, CR+8, CR+14, CR+15, CR+16, CR+18, CLEANUP+1!
ONCOD0P CR+6*, CR+8, CR+20, CR+23, CR+25, UPDT+2, UPDT+3, KLN+1, CLEANUP+1!
ONCONM EN+4, CR+2, CLEANUP+1!
ONCOP EN+9, CLEANUP+1!
ONCOPN LOOK2+6*, CLEANUP+1!
ONCOSIT LOOK2+6*, CR+3, KILL+2!, CLEANUP+1!
PRIM EN+15*, EN+18, EN+20, KILL+3!
PRIMIEN EN+14*, EN+15, KILL+3!
REC00 PROMPT+14*, PROMPT+22*, UPDT+1, KILL+3!
REC002 PROMPT+18*, UPDT+3, KILL+3!
RECNUM EN+12*, EN+13*, EN+14, EN+16, EN+18, EN+20, KILL+3!
SEQ PROMPT+11*, CR+23, PID+3, KILL+3!
SEQDIV EN+16*, EN+18, EN+20, KILL+3!
SN PROMPT+11*, PROMPT+12, PROMPT+17, PROMPT+19, PROMPT+20, PID+1, PID+2, UPDT+1*, UPDT+3*, KILL+3!
SQN EN+10*, EN+17, EN+18, EN+20, KILL+3!
>> SR CR+12*, CR+16*, CR+17
SSPIEN CR+13~, CR+14*, CR+15, CR+16, CR+18
U EN+9, EN+14, EN+15, EN+18, EN+20, EN+25, EN+26, PROMPT+12, PROMPT+13, PROMPT+14
, PROMPT+17, PROMPT+18, PROMPT+20, PROMPT+21, PROMPT+22, LOOK2+6, CR+7, CR+15, CR+16, CR+18
, PID+1, PID+2, KLN+3
UPDATE PID+1*, PID+2*, UPDT+1, UPDT+3, KILL+3!
X LOOK2+6*, LOOK2+7, CR+3*, CR+5!, KILL+3!
>> XD CR+12*, CR+15*
XD0 PROMPT+9*, LOOK2+6*, KILL+3!
XX LOOK2+6*, KILL+3!
XXIEN PROMPT+7*, PROMPT+8, PROMPT+9!
Y PROMPT+5, PROMPT+6, PROMPT+7, PROMPT+10, PROMPT+11, LOOK2+5, LOOK2+6, LOOK2+10, CR+5, CR+6
, CR+7, CR+26, PID+3*, EX+1*, CLEANUP+1!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All