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

Package: Emergency Room

Routine: AMEROUT1


Information

AMEROUT1 ; IHS/ANMC/GIS - SORT CONTROL FOR OUTPUT ;

Source Information

Source file <AMEROUT1.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA Fileman 5 DD^%DT  (C,NOW)^%DTC  ^DIC  EN1^DIP  ^DIR  
Emergency Room 4 LOG^AMERBUSA  SYNCHERS^AMERERS  (OUT,S1)^AMEROUT  $$AMERDHD^AMERREPT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Emergency Room 1 AMEROUT  

Entry Points

Name Comments DBIA/ICR reference
ENDIP
FSET ; FINAL ADJUSTMENTS OF BY,FR,TO
TASK ; BACKGROUND JOB ENTRY POINT
RUN
NOTE ;
EN1 ; ENTRY POINT FORM OPTION AMER LOG
; PRINT RECENT VISITS
S1 ; SORT BY LOOP REENTRY POINT
A1
MET ; METADICTIONARY LOOKUP
ADD
EXIT
PRINT ; GENERATE OUTPUT - ENTRY POINT FROM AMEROUT
SEL ; SELECT SORT
AGE ; ENTRY POINT
LOOP

External References

Name Field # of Occurrence
DD^%DT PRINT+2, PRINT+3, EN1+13, EN1+14
C^%DTC EN1+7
NOW^%DTC EN1+4
LOG^AMERBUSA ENDIP+3, EN1+21
SYNCHERS^AMERERS EN1+15
OUT^AMEROUT S1+6, S1+12
S1^AMEROUT LOOP+4
$$AMERDHD^AMERREPT PRINT+4, EN1+17
^DIC S1+11
EN1^DIP ENDIP, EN1+18
^DIR S1+4, ENDIP+5, EN1+23

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: SEL+1
Function Call: WRITE
  • Prompt: " (",AMERATNM,")"
  • Line Location: S1+9
Function Call: WRITE
  • Prompt: !!
  • Line Location: LOOP+4
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: MET+2
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: MET+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ENDIP+5
Function Call: WRITE
  • Prompt: "Please note: the following criteria were used to screen entries:",!
  • Line Location: NOTE+3
Function Call: WRITE
  • Prompt: !,?3,I,") ",X," = """,^(X),""""
  • Line Location: NOTE+4
Function Call: WRITE
  • Prompt: !!!
  • Line Location: NOTE+5
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+23
Routine Call
  • DIC
  • Line Location:
    • S1+11
Routine Call
  • DIR
  • Line Location:
    • S1+4
    • ENDIP+5
    • EN1+23

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AMERVSIT - [#9009080] Classic Fileman Calls
^AMER(2.2 - [#9009082.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AMER(2.2 - [#9009082.2] S1+9, S1+13, MET+3, MET+4
^TMP("AMER" S1+9, NOTE+2, NOTE+4

Label References

Name Line Occurrences
@( MET+5
ADD LOOP+2
AGE MET+6
FSET RUN+1
LOOP S1+9
MET S1+9, S1+13
PRINT RUN+1
S1 LOOP+4
SEL RUN

Naked Globals

Name Field # of Occurrence
^( S1+9, NOTE+4
^(1 MET+4
^(2 MET+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% MET+4*, EN1+2~
>> AMERATNM S1+9*, S1+13*
AMERBY ADD, A1+1, MET+1!, MET+4*, AGE+2
>> AMERCAT MET+4*, MET+5
AMERD1 FSET+3, FSET+7, FSET+10, FSET+12, FSET+13, FSET+14, PRINT+2*, PRINT+4, ENDIP+3, AGE+1
, EN1+2~, EN1+13*, EN1+15, EN1+17
AMERD2 FSET+3, FSET+7, FSET+10, FSET+12, FSET+13, FSET+14, PRINT+3*, PRINT+4, ENDIP+3, AGE+1
, EN1+2~, EN1+14*, EN1+15, EN1+17
AMERDATE EN1+2~, EN1+8*
>> AMERDISP FSET+3, FSET+4, FSET+10, FSET+12
>> AMERFR ADD, A1+1
>> AMERGBL MET+4*
AMERHDR PRINT+4, ENDIP+3, EN1+2~, EN1+16*, EN1+17
AMERNOTE NOTE+1!
AMERNXT S1+3!
>> AMERPTOT S1+1
>> AMERQUIT RUN, S1+5*, S1+6, S1+12, LOOP, ADD+1*, MET+2*, MET+3*
AMERRTYP S1+1, LOOP+1, LOOP+4, MET+5, MET+6, FSET+1, PRINT+1, EN1+2~, EN1+3*
AMERSCR MET+1!, MET+4*
>> AMERSTAT S1+7, LOOP+3, FSET+2, FSET+8, FSET+12, FSET+14
>> AMERTO ADD, A1+1
>> AMERVTOT S1+1
BY ADD, A1*, A1+1*, FSET+3*, FSET+5*, FSET+6*, FSET+7*, FSET+8*, FSET+10*, FSET+11*
, FSET+12*, FSET+13*, FSET+14*, AGE+3*, EN1+2~, EN1+11*
>> DHD PRINT+4*, PRINT+5*, AGE+4*, EN1+17*
DIC S1+10*, S1+11!, PRINT+1*, AGE+1*, EN1+2~, EN1+12*
DIC("S" S1+10*
DIC(0 S1+10*
>> DIOBEG PRINT+1*
DIR S1+4!
DIR("?" S1+2*
DIR("??" S1+2*
DIR("A" SEL+2*, S1+3*, LOOP+4*, ENDIP+5*, EN1+23*
DIR(0 S1+1*, ENDIP+5*, EN1+23*
>> DIRUT ENDIP+5, EN1+23
>> DTOUT ENDIP+5, EN1+23
FLDS FSET+2*, AGE+2*, EN1+2~, EN1+11*
FR ADD, A1*, A1+1*, FSET+3*, FSET+6*, FSET+7*, FSET+10*, FSET+12*, FSET+13*, FSET+14*
, AGE+1*, EN1+2~, EN1+9*, EN1+10, EN1+13
I NOTE+1~, NOTE+4*
IOST ENDIP+5, EN1+23
TO ADD, A1*, A1+1*, FSET+3*, FSET+6*, FSET+7*, FSET+10*, FSET+12*, FSET+13*, FSET+14*
, AGE+1*, EN1+2~, EN1+10*, EN1+14
U S1+5, S1+9, S1+13, MET+4
X S1+5, S1+7, S1+8, S1+10*, NOTE+1~, NOTE+4*, EN1+5, EN1+8, EN1+9
>> X1 EN1+5*
>> X2 EN1+6*
>> Y S1+9*, S1+10, S1+13*, MET+2, MET+3, MET+4, PRINT+2*, PRINT+3*, EN1+13*, EN1+14*
ZTDESC EXIT!
ZTIO EXIT!
ZTRTN EXIT!
ZTSAVE EXIT!
ZTSK EXIT!
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