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

Package: Emergency Room

Routine: AMER3


Information

AMER3 ; IHS/ANMC/GIS - MORE DISCHARGE QUESTIONS ;

Source Information

Source file <AMER3.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA Fileman 5 EN^DDIOL  ^DIC  YN^DICN  $$GET1^DIQ  ^DIR  
Emergency Room 4 OUT^AMER  ($$CAT,$$OPT)^AMER0  ($$TCK,$$TVAL)^AMER2A  QD11^AMER31  

Entry Points

Name Comments DBIA/ICR reference
QD18 ; DISCHARGE NURSE
QD19 ; TIME OF DEPARTURE
QD17 ; DISCHARGE PHYSICIAN
SCHEDULE ; APPOINTMENT STUB
QD10 ; ER PROCEDURES
QD11 ; FINAL DIAGNOSES
REM(X,Y)
QD14 ; DISPOSITION AND SCHEDULING
QD15 ; OTHER FACILITIES
QD16 ; DISCHARGE INSTRUCTIONS
DIC
PREV(X) ; ENTRY POINT FROM AMER31
QD12 ; FINAL TRIAGE CATEGORY

External References

Name Field # of Occurrence
OUT^AMER DIC+5, REM+1, QD12+5, QD14+14, QD15+6, QD16+21, QD16+27, QD17+9, QD18+8, QD19+12
$$CAT^AMER0 DIC+1, QD14+13
$$OPT^AMER0 QD10+1, QD14+17, QD14+31, QD14+32, QD18+10, QD18+14
$$TCK^AMER2A QD19+7, QD19+8, QD19+9
$$TVAL^AMER2A QD19+10
QD11^AMER31 QD11+1
EN^DDIOL QD14+18, QD14+19
^DIC DIC+2, QD14+9, QD14+14, QD17+8, QD18+7
YN^DICN REM+1
$$GET1^DIQ QD16+4, QD16+12
^DIR QD12+4, QD14+22, QD15+5, QD16+18, QD19+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "Type '??' to see choices"
  • Line Location: QD10+2
Function Call: WRITE
  • Prompt: !,*7,$P(Y,U,2)," has already been selected. Want to cancel it"
  • Line Location: REM+0
Function Call: WRITE
  • Prompt: !,$P(Y,U,2)," cancelled...",!!
  • Line Location: REM+3
Function Call: WRITE
  • Prompt: !,"You have already selected =>",!
  • Line Location: PREV+1
Function Call: WRITE
  • Prompt: ?3,$P(^(%),U,2),!
  • Line Location: PREV+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PREV+3
Routine Call
  • DIC
  • Line Location:
    • DIC+2
    • QD14+9
    • QD14+14
    • QD17+8
    • QD18+7
Routine Call
  • DIR
  • Line Location:
    • QD12+4
    • QD14+22
    • QD15+5
    • QD16+18
    • QD19+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls
^AMER(3 - [#9009083] Classic Fileman Calls,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AMER(2 - [#9009082] QD16+8
^AMER(2.1 - [#9009082.1] QD15+3
^AMER(3 - [#9009083] QD14+3, QD14+32, QD16+9
^DD("DD" QD19+1
^TMP("AMER" QD10+4, DIC, DIC+3!*, DIC+7, DIC+8*, REM+3!, PREV+2, QD12+1, QD14+3, QD14+25*
, QD14+32!, QD15+3, QD16+4, QD17+2*, QD17+3, QD18+2, QD18+10*, QD18+11*, QD18+12*, QD18+13*
, QD18+14*, QD19+1, QD19+7, QD19+8, QD19+9, QD19+10
^VA(200 - [#200] QD17+3, QD18+2

Label References

Name Line Occurrences
DIC QD10+4, DIC+7, DIC+9
PREV QD10+5
QD19 QD19+7, QD19+8, QD19+9, QD19+10
REM DIC+7

Naked Globals

Name Field # of Occurrence
^( DIC+8!, PREV+2
^(14 QD14+3
^(15 QD15+3
^(16 QD16+4
^(17 QD17+3
^(18 QD18+2
^(19 QD19+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% REM+1*, PREV+2*, QD14+3*, QD15+3*, QD16+1~, QD16+4*, QD17+2*, QD17+3*, QD18+2*, QD18+10*
, QD18+14*
>> %Y REM+1, REM+2
AMERDISP QD14+1~, QD14+16*, QD14+17, QD14+31, QD14+32, QD14+33
>> AMERDNA QD14+6
>> AMERDOA QD14+5, QD18+9
AMERNONE QD10+1~*, QD10+4, DIC+3, DIC+8
>> AMEROPT QD10+3*
>> AMERQUIT DIC+5, DIC+7, REM+1, QD14+14
>> AMERRUN QD14+24*, QD14+27*, QD14+29, QD14+31*, QD19+13*
CNT QD16+1~, QD16+6*, QD16+11*, QD16+13, QD16+14
DA QD12+4!
DIC DIC+1*, DIC+2!, QD14+8*, QD14+13*, QD14+14!, QD17+4*, QD17+8!, QD18+3*, QD18+7!
DIC("?" QD17+6*, QD18+5*
DIC("A" DIC*, QD14+2*, QD17+1*, QD18+1*
DIC("B" QD10+4*, QD14+2!, QD14+3*, QD14+5*, QD14+10*, QD14+11*, QD17+1!, QD17+3*, QD18+1!, QD18+2*
DIC("S" DIC+1*, QD14+13*, QD17+7*, QD18+6*
DIC(0 DIC+1*, QD14+8*, QD14+13*, QD17+4*, QD18+3*
DIR QD12+4!, QD15+5!, QD16+1~, QD19+6!
DIR("?" QD12+2*, QD12+3*, QD19+6*
DIR("A" QD12+4*, QD14+20*, QD15+2*, QD16+17*, QD19+5*
DIR("B" QD12+1*, QD14+21*, QD15+2!, QD15+3*, QD16+4*, QD16+15*, QD19+1*, QD19+2*
DIR(0 QD12+4*, QD14+20*, QD15+5*, QD16+7*, QD16+14*, QD19+5*
>> DIROUT DIC+4*, REM+1*
FI QD16+1~, QD16+9*, QD16+12, QD16+13
FIIEN QD16+1~, QD16+8*, QD16+9
INS QD16+1~
INS( QD16+13*, QD16+24
INSNM QD16+10~, QD16+12*, QD16+13, QD16+14, QD16+15
U DIC+3, REM, REM+3, PREV+2, QD14+3, QD14+32, QD15+3, QD16+13, QD16+24, QD17+3
, QD18+2, QD18+10
X DIC+4, DIC+6, REM~, REM+3, PREV~, PREV+2, QD14+8*, QD16+21*, QD16+26*
Y DIC+3, DIC+6*, DIC+7, DIC+8, REM~, REM+3, QD14+10, QD14+15, QD14+16, QD14+23
, QD14+27, QD14+33*, QD16+21*, QD16+24*, QD16+26*, QD18+12, QD19+1*, QD19+7!, QD19+8!, QD19+9!
, QD19+10!, QD19+11*
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