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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: QAMAHO1

Package: Clinical Monitoring System

Routine: QAMAHO1


Information

QAMAHO1 ;HISC/GJC-REPORTS FOR FALLOUT FILE ;11/15/94 13:47

Source Information

Source file <QAMAHO1.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Clinical Monitoring System 3 (DLMNT,MON,PAT)^QAMAHO2  ^QAMAHO3  EVENT^QAMAHO5  
Quality Assurance Integration 2 K^QAQDATE  EN1^QAQSELCT  
Kernel 1 HOME^%ZIS  
VA FileMan 1 YN^DICN  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Clinical Monitoring System 1 QAM RPT ADHOC  

Entry Points

Name Comments DBIA/ICR reference
KILL
ASKSRT ;
ASKPRT ;
CHPRT ;
CHSRT ;
DISP ;
MSSG ;
VOID ;
ZFLDS ;;

External References

Name Field # of Occurrence
HOME^%ZIS QAMAHO1+3
YN^DICN VOID+1
DLMNT^QAMAHO2 ASKSRT+11
MON^QAMAHO2 ASKSRT+11
PAT^QAMAHO2 ASKSRT+11
^QAMAHO3 QAMAHO1+7
EVENT^QAMAHO5 ASKSRT+11
K^QAQDATE KILL+4
EN1^QAQSELCT ASKPRT+11

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: ZZZ
  • Timeout: 3
  • Line Location: ASKSRT+3
Function Call: WRITE
  • Prompt: !!?15,"Maximum of two sort fields reached!!",*7
  • Line Location: ASKSRT+3
Function Call: WRITE
  • Prompt: !?15,"Select next field to sort on. "
  • Line Location: ASKSRT+4
Function Call: WRITE
  • Prompt: !?15,"Maximum two sort fields allowed."
  • Line Location: ASKSRT+5
Function Call: WRITE
  • Prompt: !?15,"* indicates already selected."
  • Condition for execution: CNTR>0
  • Line Location: ASKSRT+5
Function Call: WRITE
  • Prompt: !!?15,"Sort selection #",CNTR+1_": "
  • Line Location: ASKSRT+5
Function Call: READ
  • Variable: ZZZ
  • Timeout: 3
  • Line Location: ASKPRT+3
Function Call: WRITE
  • Prompt: !!?15,"Maximum of four print fields reached!!",*7
  • Line Location: ASKPRT+3
Function Call: WRITE
  • Prompt: !?15,"Select next field to print on. "
  • Line Location: ASKPRT+4
Function Call: WRITE
  • Prompt: !?15,"Maximum four print fields allowed. "
  • Line Location: ASKPRT+5
Function Call: WRITE
  • Prompt: !?15,"* indicates already selected."
  • Condition for execution: CNT>0
  • Line Location: ASKPRT+5
Function Call: WRITE
  • Prompt: !!?15,"Print selection # ",CNT+1_": "
  • Line Location: ASKPRT+5
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+1
Function Call: WRITE
  • Prompt: !,+X,$S($D(CHOICE(+X))#2:" * ",1:" "),$P(X," ",2)
  • Line Location: DISP+1
Function Call: WRITE
  • Prompt: !,+X,$S($D(CHOICE(+X))#2:" * ",1:" "),$P(X," ",2)
  • Line Location: DISP+1
Function Call: WRITE
  • Prompt: *7," ??",!!?15,"Enter a number between 1 - "_LIMIT_". "
  • Line Location: MSSG+1
Function Call: WRITE
  • Prompt: !!?15,*7,"You have not selected any sort or print data.",!?15,"Do you wish to exit the program"
  • Line Location: VOID+1
Function Call: WRITE
  • Prompt: !,*7,?15,"""Y"" for Yes, ""N"" for No "
  • Line Location: VOID+2
Routine Call
  • %ZIS
  • Line Location:
    • QAMAHO1+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^UTILITY($J KILL!

Label References

Name Line Occurrences
ASKPRT QAMAHO1+6, ASKPRT+7, ASKPRT+9, ASKPRT+10
ASKSRT QAMAHO1+4, ASKSRT+7, ASKSRT+9, ASKSRT+10, ASKSRT+12
CHPRT ASKPRT+10
CHSRT ASKSRT+10
DISP ASKSRT+5, ASKPRT+5
KILL QAMAHO1+3, QAMAHO1+5
MSSG ASKSRT+9, ASKPRT+9
VOID ASKSRT+7, ASKPRT+7, VOID+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% KILL+1!, ASKSRT+7, ASKPRT+7, VOID+1*, VOID+2
%DT KILL+1!
C KILL+3!
CD KILL+1!
CHOICE QAMAHO1+6!, KILL+3!
CHOICE( ASKSRT+12!, ASKSRT+13*, ASKPRT+10*, ASKPRT+11!, DISP+1
CNT QAMAHO1+3*, KILL+1!, ASKPRT+2, ASKPRT+3, ASKPRT+4, ASKPRT+5, ASKPRT+7, ASKPRT+10*, ASKPRT+11*, CHPRT+1*
CNTR QAMAHO1+3*, KILL+1!, ASKSRT+2, ASKSRT+3, ASKSRT+4, ASKSRT+5, ASKSRT+7, ASKSRT+10*, ASKSRT+12*, ASKSRT+13
CHSRT+1*
DATA1 KILL+1!
DATA2 KILL+1!
DIR KILL+1!
DIRUT KILL+1!
DIW KILL+1!
DIWF KILL+1!
DIWI KILL+1!
DIWL KILL+1!
DIWR KILL+1!
DIWT KILL+1!
DIWTC KILL+1!
DIWX KILL+1!
DN KILL+1!
DTIME ASKSRT+6, ASKPRT+6
DTOUT KILL+1!, VOID+1!
DUOUT KILL+1!
DUP KILL+1!
EF KILL+1!
ELEM KILL+1!
ELEMENT KILL+3!
FIELD KILL+1!, ASKSRT+10*, ASKSRT+12, ASKSRT+13, ASKPRT+10*, ASKPRT+11, CHPRT+1, CHPRT+2, CHSRT+1, CHSRT+2
GC KILL+1!
IEN KILL+1!
IOF ASKSRT+2, ASKPRT+2
JD KILL+1!
LABEL1 KILL+1!
LABEL2 KILL+1!
LIMIT KILL+1!, ASKSRT+1*, ASKPRT+1*, MSSG+1
LOOP KILL+1!
LP KILL+1!, CHPRT+1*, CHSRT+1*
LP0 KILL+1!
LP1 KILL+1!
MN KILL+1!
MN1 KILL+1!
MON KILL+2!
MON1 KILL+2!
MON2 KILL+2!
MONI KILL+2!
NAME1 KILL+2!
NAME2 KILL+2!
PAGE KILL+2!
PARRAY KILL+3!
PARRAY( ASKPRT+10*
PARRY QAMAHO1+7, KILL+2!
PARRY( ASKPRT+10*, ASKPRT+11!, CHPRT+1
PCPY KILL+2!, ASKPRT+10, CHPRT+1*, CHPRT+2
PNT KILL+2!
POP KILL+2!
PRNT KILL+2!, ASKPRT+6*, ASKPRT+7, ASKPRT+8, ASKPRT+9, ASKPRT+11
PTNT KILL+2!
QA KILL*, KILL+2!, KILL+3!
QADIRPNT KILL+3!
QAM0 QAMAHO1+4*, QAMAHO1+6*, KILL+2!
QAM1 KILL+2!
QAM1HED KILL+3!
QAM2 KILL+2!
QAM2HED KILL+3!
QAMCD KILL+3!
QAMD0 KILL+2!
QAMDATA KILL+2!, ASKSRT+13
QAMDIEN KILL+2!
QAMDT KILL+2!
QAMELEM KILL+3!
QAMENGD KILL+3!
QAMEXIT QAMAHO1+3*, QAMAHO1+5, KILL+2!, ASKSRT+8*, ASKPRT+8*, VOID+1*
QAMFIN KILL+2!
QAML KILL+2!, DISP+1*
QAMLP KILL+2!
QAMOUT QAMAHO1+4, QAMAHO1+6, KILL+2!, ASKSRT+1*, ASKSRT+3*, ASKSRT+7, ASKSRT+8*, ASKSRT+12, ASKPRT+1*, ASKPRT+3*
ASKPRT+7, ASKPRT+8*, VOID+1*
QAMPT KILL+2!
QAMQUIT KILL+2!, ASKPRT+11*
QAMRANG KILL+3!
QAMTART KILL+3!
QAMTYPE KILL+2!
QAMX KILL+3!
>> QAQDIC ASKPRT+11*
>> QAQDIC("A" ASKPRT+11*
>> QAQDIC(0 ASKPRT+11*
QAQNBEG KILL+3!
QAQNEND KILL+3!
QAQQUIT KILL+2!, KILL+3!, ASKPRT+11*
>> QAQUTIL ASKPRT+11*
SARRAY KILL+3!
SARRAY( ASKSRT+12!, ASKSRT+13*
SARRY QAMAHO1+7, KILL+3!
SARRY( ASKSRT+10*, ASKSRT+12!, CHSRT+1
SCPY KILL+3!, ASKSRT+10, CHSRT+1*, CHSRT+2
SORT KILL+3!, ASKSRT+6*, ASKSRT+7, ASKSRT+8, ASKSRT+9, ASKSRT+11, ASKSRT+13
SUB KILL+3!
SUB1 KILL+3!
SUB2 KILL+3!
TODAY KILL+3!
U ASKSRT+10, ASKPRT+10, DISP+1
>> X DISP+1*
X1 KILL+3!
X2 KILL+3!
YZ KILL+3!
Z KILL+3!
>> ZTQUEUED KILL+4
>> ZTREQ KILL+4*
ZTSAVE KILL+3!
ZZZ KILL+3!, ASKSRT+3*, ASKPRT+3*, CHPRT+2*, CHSRT+2*, MSSG+1*

Marked Items

Name Field # of Occurrence
$T(ZFLDS+PRNT ASKPRT+10
$T(ZFLDS+QAML DISP+1
$T(ZFLDS+QAML+2 DISP+1
$T(ZFLDS+SORT ASKSRT+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All