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

Package: PCC Medical Query

Routine: AMQQEM3


Information

AMQQEM3 ; IHS/CMI/THL - FINE TUNES THE HEADER LINE ;

Source Information

Source file <AMQQEM3.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
PCC Medical Query 3 ^AMQQEM21  (FLEN,T5,T6,T7,T8)^AMQQEM31  MARK^AMQQEMAN  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
PCC Medical Query 1 AMQQEM2  

Entry Points

Name Comments DBIA/ICR reference
DISP
RUN
T8
T9
T6
TYPE1
T2
T5
LIST ; - EP -
T3
T1
T21
EXIT
T7
DATE
TYPE
T4
TUNE

External References

Name Field # of Occurrence
^AMQQEM21 DATE+1
FLEN^AMQQEM31 AMQQEM3+6
T5^AMQQEM31 T5
T6^AMQQEM31 T6, T9
T7^AMQQEM31 T7
T8^AMQQEM31 T8
MARK^AMQQEMAN TUNE+22, DATE+5, T3+17
^DIR TUNE+13, TYPE1+4, T2+2, T3+12, T4+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7
  • Line Location: EXIT+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DISP+4
Function Call: WRITE
  • Prompt: $P(X,";")
  • Line Location: DISP+6
Function Call: WRITE
  • Prompt: %,D
  • Line Location: DISP+8
Function Call: WRITE
  • Prompt: !,%
  • Line Location: DISP+19
Function Call: WRITE
  • Prompt: !!,"This field cancelled..."
  • Line Location: TUNE+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TUNE+1
Function Call: WRITE
  • Prompt: !
  • Line Location: TUNE+3
Function Call: WRITE
  • Prompt: "Edit field/variable = """,%,""""
  • Line Location: TUNE+6
Function Call: WRITE
  • Prompt: "DATA TYPE",!
  • Line Location: TYPE+1
Function Call: WRITE
  • Prompt: "VIEW/EDIT DATA TYPE",!
  • Line Location: T1+0
Function Call: WRITE
  • Prompt: "DELETE",!
  • Line Location: T2+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: T21+1
Function Call: WRITE
  • Prompt: "MOVE",!
  • Line Location: T3+0
Function Call: WRITE
  • Prompt: *7,"Whoops, you have only defined one segment. Request denied..."
  • Line Location: T3+1
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: T3+7
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: T3+17
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: T3+18
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: T3+19
Function Call: WRITE
  • Prompt: "RENAME FIELD",!
  • Line Location: T4+0
Function Call: WRITE
  • Prompt: "Current field name: ",$P(^(0),U,6)
  • Line Location: T4+1
Routine Call
  • DIR
  • Line Location:
    • TUNE+13
    • TYPE1+4
    • T2+2
    • T3+12
    • T4+4

Label References

Name Line Occurrences
@( RUN, TUNE+22
DISP LIST+21
EXIT AMQQEM3+7
LIST EXIT, TUNE+2, TUNE+24
T2 TUNE+18
T21 TUNE
T3 T3+17, T3+18, T3+19
TUNE TUNE+25
TYPE1 T1+1

Naked Globals

Name Field # of Occurrence
^( DATE+4
^(0 TUNE+5, T4+1*
^(2 DATE+4*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DISP~, DISP+8*, DISP+13*, DISP+14*, DISP+15, DISP+17*, DISP+18*, DISP+19, TUNE+4*, TUNE+5*
, TUNE+6, DATE+4*, TYPE1*, TYPE1+1, T21*, T3+3*
%(1 T3+4*, T3+9
%(2 T3+5*, T3+9
A LIST+7*, LIST+8, LIST+9, LIST+10, LIST+11, DISP~, DISP+10*, DISP+11*, DISP+12*, DISP+14
, DISP+16
>> AMQQEM("DATA" TYPE
>> AMQQEM("DATE TRANS" , DATE, DATE+4
>> AMQQEM("DEL" DISP+1
>> AMQQEM("FIX" AMQQEM3+6, LIST+11, LIST+12, DISP+8, TUNE+8, TUNE+10, TUNE+21
>> AMQQEM("HLEN" T4+2
>> AMQQEM("LEN" DISP+12, DISP+16
AMQQEM3 AMQQEM3+4*, RUN*, EXIT+1!, DISP+8
AMQQEMAX EXIT+1!, T3+6*, T3+18
>> AMQQEMFN RUN, LIST+7*, LIST+17, LIST+21
>> AMQQEMFS EXIT*, LIST+2, LIST+7, DISP+8, T21*, T21+1, T3+1, T3+3, T3+8*, T3+19
, T3+20, T3+21*, T3+22*, T3+23*, T3+24*
AMQQEMKL TUNE!, DATE+3*, TYPE
>> AMQQEMN AMQQEM3+4*, EXIT, LIST+10, DISP+8, TUNE+4, DATE, TYPE1, TYPE1+8, T21, T3+3
, T3+19, T4+1, T4+9
AMQQEMNO DATE+3!
AMQQEMP EXIT+1!, T3+3*, T3+4, T3+5, T3+20, T3+21
AMQQFLEN AMQQEM3+6~, LIST+10
>> AMQQQUIT AMQQEM3+6, RUN, TUNE+16*, TUNE+23, DATE+2, TYPE1+7*, T2+5*, T3+16*, T4+8*
AMQQSTOP AMQQEM3+7, RUN, EXIT!
D DISP~, DISP+1*, DISP+2*, DISP+3*, DISP+8
DIR TUNE+14!, DATE!, TYPE1+5!, T2+3!, T3+13!, T4+5!
DIR("A" TUNE+11*, TYPE1+3*, T2+1*, T3+11*, T4+3*
DIR("B" TUNE+12*, TYPE1+1*, T3+9*
DIR(0 TUNE+7*, TUNE+8*, TUNE+9*, TUNE+10*, TYPE1+2*, T2+1*, T3+10*, T4+2*
DIROUT EXIT+1!
DIRUT EXIT+1!, TUNE+15*, TYPE1+6*, T2+4*, T3+14*, T4+6*
DTOUT EXIT+1!
DUOUT EXIT+1!, TUNE+15, TYPE1+6, T2+4, T3+14, T4+6
>> G EXIT, LIST+8, LIST+9, LIST+11*, TUNE+4, DATE, DATE+4, TYPE1, TYPE1+8*, T4+1
, T4+9*
H LIST+1!
H( LIST+17*, LIST+20*, DISP+5, DISP+6, DISP+8, DISP+9
H(1 LIST+5*
I LIST+4*, LIST+18*, LIST+20, DISP~, DISP+6*, DISP+8*
IOF DISP+4, TUNE+1, T21+1
J LIST+3*, LIST+17*, LIST+20, DISP~, DISP+5*, DISP+6, DISP+8, DISP+9
K DISP~*, DISP+8*
N LIST+4*, LIST+17*, LIST+19*, DISP~, DISP+5*, DISP+6*, DISP+10, DISP+11
T LIST+1~, LIST+6*, LIST+16*, DISP~*, DISP+8*, DISP+12, DISP+16
U RUN, EXIT, LIST+7, LIST+8, LIST+9, LIST+11, LIST+20, DISP+3, DISP+6, DISP+8
, TUNE+4, TUNE+5, DATE, DATE+4, TYPE1, TYPE1+8, T21, T3+1, T3+3, T3+8
, T3+19, T3+20, T3+21, T3+22, T3+23, T3+24, T4+1, T4+9
X LIST+8*, LIST+13*, LIST+15, LIST+20, DISP~, DISP+6*, DISP+8*, TYPE1+7, T2+5, T21*
, T3+2*, T3+3*, T3+5, T3+6, T3+7, T3+8, T3+15, T3+16, T3+17, T3+18
, T3+19, T3+24, T4+7, T4+8
Y AMQQEM3+3, AMQQEM3+4, AMQQEM3+5~, LIST+9*, LIST+10*, LIST+11*, LIST+12*, LIST+13, LIST+15, LIST+16
, LIST+17, LIST+19, LIST+20, DISP~, DISP+8*, TUNE+16, TUNE+17, TUNE+18, TUNE+19*, TUNE+20*
, TUNE+21*, TUNE+22, TYPE1+8, T2+6, T3+3*, T4+9
Z LIST+14*, LIST+15*, LIST+20, DISP~, DISP+8*, T3+20*, T3+24
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Naked Globals |  Local Variables |  All