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

Package: Medicine

Routine: MCARGE


Information

MCARGE ;WISC/TJK-GI ENTER/EDIT ;5/8/96 14:29

Source Information

Source file <MCARGE.m>

Call Graph

Call Graph Total: 17

Package Total Call Graph
Medicine 9 (EXIT,MCEPROC)^MCARE  DATE^MCAREH  ^MCARGD  ^MCARGEA  (ORDER,ORDER1)^MCARGEO  (IN,OUT)^MCEO  BACKSS^MCESEDT  ($$ESTONUM,$$PREEDIT,ESRC)^MCESSCR  
QTASK^MCPARAM  
VA Fileman 6 ^DIC  ^DIE  ^DIK  EN^DIQ  EN^DIQ1  ^DIR  
Adverse Reaction Tracking 1 EN2^GMRAPEM0  
Registration 1 DEM^VADPT  

Caller Graph

Caller Graph Total: 10

Package Total Caller Graph
Medicine 10 MCARGD  MCARGES  MCARGICONSULTBRIEF  MCARGICONSULTEDIT  MCARPCE  MCBLGI  MCBLPULM  MCFLGI  
MCFLPULM  MCRH1  

Entry Points

Name Comments DBIA/ICR reference
HIST ;Lets look at the history
DPT ;ALSO CALLED FROM MCARGES
HELP ;DISPLAY CHOOSABLE ANATOMY LOCATIONS-CALLED BY FINDINGS,ATRIAL STUDY,VENTRICULAR STUDY FILES
EDITDEMO ;lets edit the demo and allergy using the line editor
EDIT ;Lets edit Endoscopy
DEMO ;Lets display the demo information ask if they want to edit
; -------------------
; SSN = External Format of the patients SSN
; -------------------
HIST2 ;Lets display allergy and ask the question
BACK
HIST1 ;Lets look at some more history
EDIT1 ; Lets edit Non-Endo
START ;EDIT ENDSCOPY
PREEDT ; Allow editing of demo and allergy
EXIT ;Lets leave
CONSULT
DPTNON ;
SETVAR ;Set Pulmonary variables

External References

Name Field # of Occurrence
^DIC CONSULT+1, DPT+6, DPTNON+5
^DIE EDIT1+2, CONSULT+5, EDITDEMO+1
^DIK CONSULT+3, DPT+11, DPTNON+9
EN^DIQ HIST+3
EN^DIQ1 HIST1+1
^DIR HIST2+3
EN2^GMRAPEM0 EDITDEMO+2
EXIT^MCARE EXIT+1
MCEPROC^MCARE DPT+1
DATE^MCAREH DPT+2
^MCARGD EDIT1+3
^MCARGEA HIST2+1
ORDER^MCARGEO CONSULT+5
ORDER1^MCARGEO CONSULT+5
IN^MCEO EDIT1+1
OUT^MCEO EDIT1+3
BACKSS^MCESEDT START+3
$$ESTONUM^MCESSCR DPT+9
$$PREEDIT^MCESSCR DPT+5, DPTNON+3
ESRC^MCESSCR START+5, DPT+9
QTASK^MCPARAM CONSULT+5
DEM^VADPT DEMO+4, DPTNON+14

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?26,"PERSONAL HISTORY INFORMATION",!,?5,VADM(1),?50,"SSN: ",SSN,!
  • Line Location: HIST+1
Function Call: WRITE
  • Prompt: !,?2,"History of Bleeding Disorder: ",^UTILITY("DIQ1",$J,690,DA,3),?40,"Valvular Heart Disease: ",^(4),!,?2,"Glaucoma: ",^(5),!,?2,"History Comments: ",^(6)
  • Line Location: HIST1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: HIST1+2
Function Call: WRITE
  • Prompt: !!,"The valid Anatomy locations are: ",!
  • Line Location: HELP+1
Function Call: READ
  • Prompt: "'^' TO STOP: "
  • Timeout: DTIME
  • Variable: %Y
  • Line Location: HELP+2
Routine Call
  • DIE
  • Line Location:
    • EDIT1+2
    • CONSULT+5
    • EDITDEMO+1
Routine Call
  • DIC
  • Line Location:
    • CONSULT+1
    • DPT+6
    • DPTNON+5
Routine Call
  • DIR
  • Line Location:
    • HIST2+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^MCAR(690 - [#690] Classic Fileman Calls
^MCAR(699 - [#699] Classic Fileman Calls
^MCAR(699.5 - [#699.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(120.8 EDITDEMO+2
^MCAR( START+3, START+4
^MCAR(697 - [#697] HELP+2
^MCAR(697.2 - [#697.2] CONSULT, DPT+8, DPTNON+10
^MCAR(699.6 - [#699.6] SETVAR+1, SETVAR+2, SETVAR+3
^UTILITY("DIQ1" HIST1+1!, HIST1+2!

Label References

Name Line Occurrences
BACK DPT+10
DEMO PREEDT+2
DPT PREEDT+1
EDIT PREEDT+3
EDIT1 EDIT+2
EDITDEMO PREEDT+2
EXIT START+2, START+6, CONSULT+2, CONSULT+3, CONSULT+5, DPTNON+8, DPTNON+9
HIST DEMO+4, EDITDEMO+3, DPTNON+15
HIST1 HIST+2
HIST2 HIST+3, HIST1+1
PREEDT START+1
SETVAR EDIT+2

Naked Globals

Name Field # of Occurrence
^(4 HIST1+2
^(5 HIST1+2
^(6 HIST1+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %Y HELP+2*, HELP+3*
>> DA EDIT+1*, EDIT1+3, CONSULT+3*, CONSULT+4*, DPT+11*, HIST+2*, HIST1+1*, HIST1+2, EDITDEMO+1*, DPTNON+9*
>> DFN CONSULT+4*, DPT+8*, HIST+2, HIST1+1, EDITDEMO+1, DPTNON+10*
DIC EDIT+1!*, CONSULT!, CONSULT+1*, CONSULT+4, DPT+3*, DPT+6!, HIST+2*, HIST+3!, HIST1+1*, EDITDEMO+1*
, DPTNON+1*, DPTNON+6!
DIC("A" CONSULT+1*!, DPT+3*, DPTNON+1*
DIC("DR" CONSULT*, DPTNON+4*
DIC("S" CONSULT+1*!, DPT+4*, DPT+5*, DPTNON+2*, DPTNON+3*
DIC(0 CONSULT+1*, DPT+3*, DPTNON+1*
DIE EDIT+1!*, CONSULT+4*, EDITDEMO+1*
>> DIK CONSULT+3*, DPT+11*, DPTNON+9*
DIR HIST2+3!
DIR("?" HIST2+3*
DIR("A" HIST2+2*
DIR("B" HIST2+3*
DIR(0 HIST2+2*
DIROUT HIST2+4, BACK+1!
>> DJCP HELP+2
>> DJDN HELP+2, HELP+3
DLAYGO CONSULT+1*!, DPT+4*, DPT+6!, DPTNON+2*, DPTNON+6!
DR EDIT+1!, EDIT1+2*, CONSULT+5*, HIST+3*!, HIST1+1*, EDITDEMO+1*
DTIME HELP+2, HELP+3
DTOUT EDIT1+1, CONSULT+5, DPT+11, DPTNON+9, BACK+1!
DUOUT EDIT1+1, CONSULT+5, HIST2+4, BACK+1!
>> DZ HELP+1*
EXIT START+1!, PREEDT+1, PREEDT+3, EDIT1+1*, DPT+7*, DPT+9*, DPT+11*, HIST2+4*, BACK+1!
>> I HELP+2*
>> MCARCODE PREEDT+2, EDIT+2, HIST+2
>> MCARDA DPT+6*
>> MCARGDA START+2, START+3, START+4, START+5, EDIT+1, CONSULT+4*, DPT+8*, DPT+9, DPTNON+10*, BACK+1*
>> MCARGNAM EDIT+2, DPT+8*, DPTNON+10*
>> MCARGNUM CONSULT*, DPT+1*, DPT+8*, HELP+2, DPTNON+10*
>> MCARP DPT+1
MCBACK START+3!, DPT+6!, DPT+9, DPT+10
>> MCBOUGIE SETVAR+2*
>> MCBS CONSULT+5
MCDEMO START+1!, PREEDT+1*, PREEDT+2, HIST2+4!, HIST2+5!
MCDFLAG CONSULT+1, CONSULT+3, CONSULT+4, DPTNON+7, BACK+1!
>> MCDFLG DPTNON+9
>> MCDONE HELP+1*
>> MCEPROC EDIT1+2
MCESFL START+1!*, START+4!, START+5, DPT+1*, DPT+9*
>> MCESON START+5, DPT+5, DPT+9
>> MCFILE START+2, START+3, START+4, START+5, EDIT+1*, CONSULT+5*, DPT+4*, DPT+5, DPT+9, DPTNON+3
>> MCGTUBE SETVAR+2*
>> MCHEATP SETVAR+3*
>> MCJTUBE SETVAR+2*
>> MCSPHIN SETVAR+1*
>> MCSTENT SETVAR+1*
>> MCTEST DPTNON+2
MCY BACK+1!
MCY(0 BACK+1
>> SSN DEMO+4*, HIST+1, DPTNON+14*
U CONSULT+3, CONSULT+4, DPT+8, DPT+9, DPT+10, DPT+11, DEMO+4, HELP+2, DPTNON+7, DPTNON+9
, DPTNON+10, DPTNON+14
VADM EDITDEMO+2~
VADM(1 HIST+1
VADM(2 DEMO+4, DPTNON+14
>> X DPT+9*, DPT+10*, DPTNON+7*
>> Y CONSULT+1, CONSULT+2, CONSULT+3, CONSULT+4, DPT+6, DPT+7, DPT+8, DPT+11, HIST2+5, DPTNON+7
, DPTNON+8, DPTNON+9, DPTNON+10, BACK+1*
>> Y(0 CONSULT+3, CONSULT+4, DPT+8, DPT+11, DPTNON+9, DPTNON+10, BACK+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 |  Naked Globals |  Local Variables |  All