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

Package: Emergency Room

Routine: AMERSAV


Information

AMERSAV ; IHS/ANMC/GIS -ISC - FILE INFO IN ER VISIT FILE ;

Source Information

Source file <AMERSAV.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Emergency Room 5 $$ERCHCKIN^AMERBSDU  ($$FINDVSIT,$$VISIT,SAVPCCO,SYNCHPCC)^AMERPCC  ($$RUN,INJ)^AMERSAV1  VER^AMERVER  DELETVST^AMERVSIT  
VA Fileman 3 EN^DDIOL  ^DIC  ^DIK  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Emergency Room 1 AMERD  
IHS Emergency Dept Dashboard 1 BEDDUTIS  

Entry Points

Name Comments DBIA/ICR reference
DR1(T) ; MAKES DR STRING FROM TMP GLOBALS. DOES NOT DO SUBFILES
TASK ; SETS TASKMAN VARIABLES AND CALLS TASKMAN
RUN ;
; Transfer PCC VISIT ien
TSK ;
200() ;ENTRY POINT FROM AMERSAV2
; -- SUBRTN to determine if PCC converted to file 200 yet
NOTSK
STUFF(P) ; STUFF COMPUTED VALUES INTO DR STRING
UPDATE ; EP - UPDATE THE VISIT FILE
KILLADM ; ENTRY POINT FROM AMER2
EXIT
CONSULT ; ER CONSULTANT WAS NOTIFIED indicated by an entry in ^TMP("AMER",$J,2,7,1)
DRM ; GIVEN THE 2ND DR STRING, ADD MULTIPLES
XXX ;

External References

Name Field # of Occurrence
$$ERCHCKIN^AMERBSDU UPDATE+24
$$FINDVSIT^AMERPCC UPDATE+7
$$VISIT^AMERPCC UPDATE+22
SAVPCCO^AMERPCC UPDATE+25
SYNCHPCC^AMERPCC UPDATE+27
$$RUN^AMERSAV1 UPDATE+3
INJ^AMERSAV1 RUN+8
VER^AMERVER UPDATE+30
DELETVST^AMERVSIT UPDATE+37
EN^DDIOL UPDATE+33, UPDATE+38
^DIC UPDATE+13
^DIK KILLADM+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,AMERLINE
  • Line Location: TSK+2
Function Call: WRITE
  • Prompt: !!,"Data entry session successfully completed...Thank you"
  • Line Location: TSK+3
Function Call: WRITE
  • Prompt: !!,*7,"Data entry session terminated due to internal error.",!,"ER VISIT file not updated...Sorry!!!!"
  • Line Location: TSK+4
Routine Call
  • DIC
  • Line Location:
    • UPDATE+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AMERADM - [#9009081] Classic Fileman Calls
^AMER(3 - [#9009083] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AMER(2.3 - [#9009082.3] DR1+2, DR1+6, STUFF+3
^AMER(2.5 - [#9009082.5] UPDATE+22, UPDATE+24
^AMERADM - [#9009081] RUN+3, STUFF+6
^AMERVSIT - [#9009080] UPDATE+10, UPDATE+19, UPDATE+20
^DD(9000010.06 200+2
^DD(9009081 STUFF+5
^TMP("AMER" RUN+7, DR1+5, DR1+9, DR1+14, DR1+16, DR1+17, DR1+18, DR1+20, DRM+3, DRM+5
, DRM+7, DRM+20, DRM+21, KILLADM+5!, CONSULT+1

Label References

Name Line Occurrences
$$DR1 RUN+2, RUN+4
CONSULT RUN+9
DRM RUN+10
KILLADM RUN+10
STUFF RUN+10
TASK RUN+10
UPDATE NOTSK
XXX DR1+3

Naked Globals

Name Field # of Occurrence
^( DR1+2, DRM+21, STUFF+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% RUN+7*, DR1+1~, DR1+9*, DR1+14*, DR1+16*, DR1+17*, DR1+18*, DR1+20*, DR1+21, DR1+22
, DRM+1~, DRM+22*, KILLADM+3!, STUFF+2~, STUFF+5*, STUFF+6
%H KILLADM+3!
A DR1+1~*, DR1+14*, DR1+21*, DR1+22*, DR1+24, DRM+1~, DRM+4*, DRM+6*, DRM+7*, DRM+8
, DRM+21*, DRM+22, STUFF+2~, STUFF+4*, STUFF+5
AMERAIEN UPDATE+1~
>> AMERDA UPDATE+3*, UPDATE+7, UPDATE+10, UPDATE+19, UPDATE+20, UPDATE+25, UPDATE+27, UPDATE+33, UPDATE+37
>> AMERDEMO TSK+3
AMERDEST KILLADM+4!
AMERDFN RUN+3, RUN+10, KILLADM+2, KILLADM+4!, UPDATE+1~, UPDATE+20*, UPDATE+22, UPDATE+24
AMERDISP UPDATE+1~, UPDATE+10*, UPDATE+16
>> AMERDR( DR1+5*, DR1+9*, DR1+16*, DRM+8*
>> AMERDR(1 RUN+2*, RUN+3*, DR1+17*, STUFF+9*
>> AMERDR(12 DR1+18*
>> AMERDR(2 RUN+4*, CONSULT+1*, CONSULT+2*
>> AMERDR(3 DRM+25*
AMERDUZ UPDATE+1~
AMEREDNO UPDATE+1~
AMERFIN KILLADM+4!
>> AMERLINE TSK+2
AMERPCC UPDATE+1~, UPDATE+7*, UPDATE+17*, UPDATE+18, UPDATE+22*, UPDATE+24*, UPDATE+25, UPDATE+27, UPDATE+30, UPDATE+32
AMERQNO KILLADM+4!
AMERQSEQ KILLADM+4!
AMERREGX UPDATE+1~, UPDATE+14*, UPDATE+16
AMERRUN KILLADM+4!
AMERSTOP DR1+1~, UPDATE+1~, UPDATE+2*, UPDATE+16*, UPDATE+17, UPDATE+18, UPDATE+27, UPDATE+30, UPDATE+36
AMERSTRT KILLADM+4!
>> AMERSTUF TSK+1
AMERTIME UPDATE+1~, UPDATE+19*, UPDATE+22, UPDATE+24
AUPNDAYS KILLADM+4!
AUPNDOB KILLADM+4!
AUPNDOD KILLADM+4!
AUPNPAT KILLADM+4!
AUPNSEX KILLADM+4!
B DRM+1~, DRM+22*, DRM+24, STUFF+2~, STUFF+4*, STUFF+9
C DRM+1~, DRM+22*, DRM+25
DA KILLADM+1!, KILLADM+2*, KILLADM+3!
>> DFN UPDATE+30
DIC KILLADM+1!, KILLADM+3!, UPDATE+11~, UPDATE+12*
DIC(0 UPDATE+12*
DIE KILLADM+1!
DIK KILLADM+2*, KILLADM+3!
DR KILLADM+1!, KILLADM+3!
DUZ RUN+4
DUZ(2 UPDATE+22, UPDATE+24
I DR1+1~, DR1+19*, DR1+20, DRM+1~, DRM+21*, DRM+24*, DRM+25
J DR1+1~*, DR1+20
M DRM+1~
N DR1+1~, DR1+8*, DR1+9, DR1+14, DR1+16, DR1+17, DR1+18, DR1+22, DRM+22*, DRM+25
P STUFF~, STUFF+1, STUFF+6
T DR1~, DR1+1, DR1+2, DR1+4, DRM+22*, DRM+25
U RUN+3, DR1+7, DR1+8, DR1+19, DRM+6, DRM+22, DRM+23, UPDATE+10, UPDATE+19, UPDATE+20
, STUFF+4, STUFF+5, STUFF+6, 200+2
V STUFF+2~, STUFF+6*, STUFF+7, STUFF+8*, STUFF+9
X DR1+1~, DR1+2*, DR1+3, DR1+4, DR1+5, DR1+9, DR1+14, DR1+16, DR1+17, DR1+18
, DRM+1~, DRM+2*, DRM+3, DRM+5, DRM+7, DRM+8, KILLADM+3!, UPDATE+11~, UPDATE+12*, STUFF+2~
, STUFF+3*
Y DR1+1~, DR1+2*, DR1+6, DR1+17*, DR1+18*, DRM+1~, DRM+4*, DRM+5*, DRM+7, DRM+21*
, KILLADM+3!, UPDATE+11~, UPDATE+14, STUFF+2~, STUFF+3*
Z DR1+1~, DR1+6*, DR1+7, DR1+8, DR1+19, DRM+1~, DRM+21*, DRM+23*, DRM+24*, DRM+25
, STUFF+2~, STUFF+3*, STUFF+4
ZTDESC TSK+5!
ZTIO TSK+5!
ZTRTN TSK+5!
ZTSAVE TSK+5!
ZTSK NOTSK*, TSK+3!, TSK+5!
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