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

Package: PCC Medical Query

Routine: AMQQMGR


Information

AMQQMGR ; IHS/CMI/THL - MANAGER'S UTILITIES ;

Source Information

Source file <AMQQMGR.m>

Call Graph

Call Graph Total: 14

Package Total Call Graph
PCC Medical Query 7 ^AMQQMGR1  ^AMQQMGR2  (GET,LIST,TOP)^AMQQMGR4  ^AMQQMGR5  ^AMQQMGR6  IMM^AMQQMGR9  ^AMQQNTEG  
VA Fileman 5 ^DIC  YN^DICN  ^DIE  (,EN)^DIK  ^DIR  
Kernel 2 ^%ZIS  ^%ZISC  

Entry Points

Name Comments DBIA/ICR reference
M51
M5
M4
M7
M6
M1 ;
M3
M2
M8 ;EP;TO DELETE A SEARCH TEMPLATE
TERMS ;EP;PROGRAMMER ENTRY POINT TO CREATE NEW METADICTIONARY ENTRIES
ASKFAC
XXX
M81 ;
INIT ;
ASK
FAC
VER
ISET
CHK
T1
WAIT
MENU ;
M11 ;EP;TO UPDATE IMMUNIZATIONS ENTRIES IN THE QMAN DICTIONARY OF TERMS
M10
EXIT
SETM7
KEY

External References

Name Field # of Occurrence
^%ZIS AMQQMGR+4, M1+1
^%ZISC M10+2
^AMQQMGR1 M3
^AMQQMGR2 M6
GET^AMQQMGR4 M51+9
LIST^AMQQMGR4 M51+10
TOP^AMQQMGR4 M51+8
^AMQQMGR5 M2
^AMQQMGR6 M5
IMM^AMQQMGR9 M11+1
^AMQQNTEG M4
^DIC MENU+5, ISET+5, TERMS+13, TERMS+21, M81+8
YN^DICN ASKFAC+3, INIT+4
^DIE ASKFAC+12, ASKFAC+18, SETM7+4, SETM7+11
^DIK M81+21
EN^DIK ISET+14
^DIR ASK+5, FAC+1, M51+4, TERMS+4, TERMS+32, M81+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,"DUZ(2) MUST BE SET TO THE FACILITY INDICATED IN THE QMAN SITE PARAMETERS FILE!"
  • Line Location: MENU+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,"Enter a code from the list or type '??' for more information."
  • Line Location: ASK+10
Function Call: WRITE
  • Prompt: ?15,"***** SECURITY KEY ASSIGNMENT CRITERIA *****",!!
  • Line Location: M1+5
Function Call: WRITE
  • Prompt: "Q-MAN DEMOGRAPHIC DATA ACCESS Key = AMQQZMENU Assign to all Q-Man users",!
  • Line Location: M1+6
Function Call: WRITE
  • Prompt: "Q-MAN CLINICAL DATA ACCESS Key = AMQQZCLIN Assign to health professionals only",!
  • Line Location: M1+7
Function Call: WRITE
  • Prompt: "Q-MAN PROGRAMMER ACCESS Key = AMQQZPROG Assign to PCC developers only",!
  • Line Location: M1+8
Function Call: WRITE
  • Prompt: "Q-MAN MANAGERS UTILITIES Key = AMQQZMGR Only the site manager should hold it"
  • Line Location: M1+9
Function Call: WRITE
  • Prompt: "PROMPT FOR WHO REPORT IS FOR Key = AMQQZRPT Assign to users running reports",!,"for others"
  • Line Location: M1+10
Function Call: READ
  • Prompt: "<Press the ENTER key to go on>"
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: M1+14
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: M10+0
Function Call: WRITE
  • Prompt: !!,?10,"***** ",$P(X,U,2)," *****",!
  • Line Location: KEY+1
Function Call: WRITE
  • Prompt: !
  • Line Location: KEY+3
Function Call: WRITE
  • Prompt: $S($D(@AMQQ200(3)@(%,0)):$P(^(0),U),1:(%_" ??"))
  • Line Location: KEY+3
Function Call: WRITE
  • Prompt: IOF
  • Line Location: WAIT+2
Function Call: READ
  • Prompt: "<>"
  • Timeout: DTIME
  • Variable: Z
  • Line Location: WAIT+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: WAIT+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: WAIT+4
Function Call: WRITE
  • Prompt: @IOF,!!,?20,"***** SECONDARY FACILITIES *****",!!
  • Line Location: M7+0
Function Call: WRITE
  • Prompt: !,"Normally, when the user requests patient reports, s/he will only see the chart"
  • Line Location: M7+1
Function Call: WRITE
  • Prompt: !,"number at this facility. The user may request other chart numbers provided"
  • Line Location: M7+2
Function Call: WRITE
  • Prompt: !,"that you enter the other local facilities now. You may enter up to three",!,"facilities, but do not enter this one!",!
  • Line Location: M7+3
Function Call: WRITE
  • Prompt: !,"OTHER FACILITIES' CHART NUMBERS NOW DISPLAYED =>",!
  • Line Location: M7+4
Function Call: WRITE
  • Prompt: !,$P(^DIC(4,$P(^(0),U,%),0),U)
  • Line Location: M7+5
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKFAC+7
Function Call: WRITE
  • Prompt: !!,"Okay, the entered local facility or facilities' chart numbers will now appear"
  • Line Location: SETM7+13
Function Call: WRITE
  • Prompt: !,"on all outputs"
  • Line Location: SETM7+14
Function Call: WRITE
  • Prompt: !,*7,"Enter a facility other than your local facility.",!
  • Line Location: FAC+2
Function Call: WRITE
  • Prompt: @IOF,!,?15,"***** LAB RESULTS FOR Q-MAN *****",!!
  • Line Location: VER+0
Function Call: WRITE
  • Prompt: !
  • Line Location: M51+0
Function Call: WRITE
  • Prompt: !!,"Select a code from the list or type '??' for more info",!!
  • Line Location: M51+6
Function Call: READ
  • Prompt: "<>"
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: M51+10
Function Call: WRITE
  • Prompt: !!,"KERNEL VARIABLES NOT SET!!,",!!
  • Line Location: INIT+1
Function Call: WRITE
  • Prompt: !!,"Is the site where Q-Man is being installed ",$P(^DIC(4,DUZ(2),0),U)
  • Line Location: INIT+2
Function Call: WRITE
  • Prompt: !!,"Well then, you must log in again, and this time enter the correct site!",!!,*7
  • Line Location: ISET+0
Function Call: WRITE
  • Prompt: !
  • Line Location: TERMS+3
Function Call: WRITE
  • Prompt: !!,"Entry already exists.",!
  • Line Location: TERMS+7
Function Call: WRITE
  • Prompt: !
  • Line Location: TERMS+12
Function Call: WRITE
  • Prompt: !
  • Line Location: TERMS+20
Function Call: WRITE
  • Prompt: !,"IEN: ",IEN," will be created patterned after"
  • Line Location: TERMS+25
Function Call: WRITE
  • Prompt: !,"TERM: ",$P(^AMQQ(5,TERM,0),U)," and"
  • Line Location: TERMS+26
Function Call: WRITE
  • Prompt: !,"LINK: ",$P(^AMQQ(1,LINK,0),U),"."
  • Line Location: TERMS+27
Function Call: WRITE
  • Prompt: !
  • Line Location: TERMS+31
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: M81+1
Function Call: WRITE
  • Prompt: !?10,"Qman Search Template Deletion Utility"
  • Line Location: M81+2
Function Call: WRITE
  • Prompt: !!?10,"Select a Search Template to Delete.",!
  • Line Location: M81+3
Function Call: WRITE
  • Prompt: !
  • Line Location: M81+7
Function Call: WRITE
  • Prompt: !
  • Line Location: M81+15
Routine Call
  • DIE
  • Line Location:
    • ASKFAC+12
    • ASKFAC+18
    • SETM7+4
    • SETM7+11
Routine Call
  • DIC
  • Line Location:
    • MENU+5
    • ISET+5
    • TERMS+13
    • TERMS+21
    • M81+8
Routine Call
  • DIR
  • Line Location:
    • ASK+5
    • FAC+1
    • M51+4
    • TERMS+4
    • TERMS+32
    • M81+16
Routine Call
  • %ZIS
  • Line Location:
    • AMQQMGR+4
    • M1+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AMQQ(1 - [#9009071] Classic Fileman Calls
^AMQQ(5 - [#9009075] Classic Fileman Calls
^AMQQ(8 - [#9009078] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AMQQ(1 - [#9009071] TERMS+27, T1+1*
^AMQQ(5 - [#9009075] TERMS+7, TERMS+26, T1*
^AMQQ(8 - [#9009078] AMQQMGR+5, MENU+1, M7+4, M7+5, ASKFAC+8, ISET+10*
^DD(9009078 ISET+8
^DIBT( M81+11
^DIC(4 - [#4] M7+5, INIT+2
^XUSEC( KEY+3

Label References

Name Line Occurrences
@( ASK+11
ASK ASK+10
ASKFAC ASKFAC+4
CHK ASK+7, FAC+4
EXIT ASK+8, ASK+9
FAC ASKFAC+21, FAC+2
INIT MENU+1
ISET INIT+5
KEY M1+13
M10 M1+13
M5 M51+8, M51+9, M51+10, M51+11
M51 M51+6
M81 M8+2
MENU ASK+12
SETM7 ASKFAC+22
T1 XXX
TERMS TERMS+7
WAIT KEY+3

Naked Globals

Name Field # of Occurrence
^(0 KEY+3, M7+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% AMQQMGR+6*, EXIT!, KEY+3*, WAIT+3*, M7+5*, ASKFAC+2*, ASKFAC+4, ASKFAC+5, SETM7*, SETM7+3
, SETM7+6*, SETM7+10, INIT+3*, INIT+6!
%Y INIT+5, INIT+6!, ISET
>> AMQQ200( AMQQMGR+6*
>> AMQQ200(3 KEY+3
>> AMQQDA M81+10*, M81+19
AMQQLSSX EXIT!
AMQQMGRF EXIT!, ASKFAC+20*, ASKFAC+23, SETM7, SETM7+16!, FAC+7*
AMQQMGRL EXIT!, M1+11*, M10+1!, KEY*, KEY+3*, WAIT, WAIT+1*
AMQQMGRN EXIT!, ASKFAC+21, ASKFAC+22*, SETM7+6, SETM7+16!, FAC+6*, FAC+7
AMQQMGRS EXIT!
AMQQQUIT ASK+8, ASK+12, EXIT!, CHK*, WAIT+3*, FAC+5!, M8+1!, M8+2, M8+3!, M81+9*
AMQQSTP ASKFAC+5*, ASKFAC+6!
DA ASKFAC+9*, ASKFAC+13!, ASKFAC+15*, ASKFAC+19!, SETM7+1*, SETM7+5!, SETM7+8*, SETM7+12!, ISET+13*, M81+19*
, M81+22!
DA(1 ASKFAC+16*, SETM7+9*
DIC MENU+2*, MENU+6!, SETM7+16!, ISET+2*, TERMS+9*, TERMS+14!, TERMS+17*, TERMS+22!, M81+4*
DIC("A" TERMS+11*, TERMS+19*, M81+6*
DIC(0 MENU+3*, ISET+3*, TERMS+10*, TERMS+18*, M81+5*
DIE ASKFAC+10*, ASKFAC+13!, ASKFAC+14*, ASKFAC+19!, SETM7+2*, SETM7+5!, SETM7+7*, SETM7+12!
DIK ISET+11*, M81+20*, M81+22!
DIK(1 ISET+12*
DIR ASK+6!, M51+5!, TERMS+5!, TERMS+33!, M81+17!
DIR("?" ASK+4*
DIR("??" ASK+2*, M51+3*
DIR("A" ASK+3*, M51+2*, TERMS+2*, TERMS+29*, M81+13*
DIR("B" TERMS+30*, M81+14*
DIR(0 ASK*, FAC*, M51+1*, TERMS+1*, TERMS+28*, M81+12*
DIRUT CHK!, M1+14!
>> DLAYGO ISET+4*
DR ASKFAC+11*, ASKFAC+13!, ASKFAC+17*, ASKFAC+19!, SETM7+3*, SETM7+5!, SETM7+10*, SETM7+12!
DTIME M1+14, WAIT+3, M51+10
DTOUT CHK!, M1+14!, INIT+6!
DUOUT CHK!, M1+14!, INIT+6!
DUZ(2 AMQQMGR+5, MENU+4, M7+4, M7+5, ASKFAC+8, ASKFAC+9, SETM7+1, FAC+2, INIT+1, INIT+2
, ISET+1, ISET+13
>> IEN TERMS+8*, TERMS+25, T1, T1+1, XXX*
IO M1+3
IOF M1+2, M1+4, M10, WAIT+2, WAIT+3, WAIT+4, M7, VER, M81+1
>> IOP AMQQMGR+3*
IOSL WAIT
IOST M1+4, M1+14, WAIT+2
>> LINK TERMS+24*, TERMS+27, T1+1, XXX*
>> POP M1+2
>> TERM TERMS+16*, TERMS+26, T1, XXX*
U AMQQMGR+5, M1+13, KEY+1, KEY+2, KEY+3, M7+4, M7+5, ASKFAC+8, SETM7+3, FAC+3
, FAC+7, INIT+2, ISET+8, TERMS+26, TERMS+27, M81+11
X AMQQMGR+5*, AMQQMGR+6, MENU+4*, EXIT!, M1+13*, M1+14*, KEY+1, KEY+2*, KEY+3, ASKFAC+21
, ASKFAC+22, FAC+3, M51+10*, ISET+1*, ISET+7*, ISET+9, ISET+10, M81+11*, M81+13
Y MENU+7, ASK+9, ASK+10, ASK+11, EXIT!, CHK, FAC+2, FAC+7, M51+6, M51+7
, M51+8, M51+9, M51+10, ISET+6, ISET+10, TERMS+6, TERMS+7, TERMS+8, TERMS+15, TERMS+16
, TERMS+23, TERMS+24, TERMS+34, M81+9, M81+10, M81+11, M81+18
>> Z M1+12*, M1+13, KEY+3, WAIT+3*
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