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

Package: IHS Patient

Routine: AUPNLK2B


Information

AUPNLK2B ; IHS/CMI/LAB - Broke up AUPNLK2 because of size ;

Source Information

Source file <AUPNLK2B.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 3 ^%DT  YN^DICN  ^DIR  
IHS Patient 2 ^AUPNLK3  NAME^AUPNPED  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Patient 1 AUPNLK2  

Entry Points

Name Comments DBIA/ICR reference
HLPID
ASKID
CHKID1 ;
NICKNM2 ; CHECK NICK NAMES
MIDDLE ;
CHKID ; CHECK IDENTIFIERS
DUPECHK ; CHECK FOR DUPLICATE PATIENTS
TALK ; TALK TO OPERATOR
ASK ; ASK OPERATOR
NICKNM ; CHECK FIRST & MIDDLE NAMES FOR NICK NAMES
ASKADD ;

External References

Name Field # of Occurrence
^%DT HLPID+1
^AUPNLK3 DUPECHK+2
NAME^AUPNPED MIDDLE+20
YN^DICN ASKADD+2, NICKNM2+4
^DIR MIDDLE+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?3,"...adding new patient"
  • Line Location: TALK+9
Function Call: WRITE
  • Prompt: !?6,"Enter 'YES' to add a new patient, or 'NO' not to."
  • Line Location: ASKADD+2
Function Call: WRITE
  • Prompt: !," Do you want ",$S(AUPNMCVN=1:AUPNMF,1:AUPNMM)," entered as ",$P(^APMM(99,AUPNMCV,0),U,1)
  • Line Location: NICKNM2+3
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: ASKID+0
Function Call: WRITE
  • Prompt: !?6,*7,"<'",AUPX,"'> DELETED"
  • Line Location: ASKID+0
Function Call: WRITE
  • Prompt: !?6,*7,"Sorry, '^' not allowed!"
  • Condition for execution: $E(X)["^"
  • Line Location: ASKID+2
Function Call: WRITE
  • Prompt: " ??"
  • Line Location: ASKID+2
Function Call: WRITE
  • Prompt: !?5,^(0)
  • Line Location: HLPID+0
Function Call: WRITE
  • Prompt: !?5,"..."
  • Line Location: HLPID+0
Function Call: WRITE
  • Prompt: !?7,"CHOOSE FROM: "
  • Line Location: HLPID+2
Function Call: WRITE
  • Prompt: !?7,$P(Y,":",1),?15," ",$P(Y,":",2)
  • Line Location: HLPID+2
Routine Call
  • DIR
  • Line Location:
    • MIDDLE+15

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APMM(99 - [#9002099] NICKNM+2, NICKNM+3, NICKNM2+2, NICKNM2+3, NICKNM2+5
^DD(2 CHKID+5, CHKID1+1, ASKID+6, HLPID, HLPID+1
^DPT(0 ASKADD+1

Label References

Name Line Occurrences
ASK TALK+1
ASKADD ASK+1
ASKID CHKID1+1, ASKID+2, ASKID+3, ASKID+8
CHKID TALK+5
CHKID1 CHKID+3
DUPECHK TALK+7
HLPID ASKID+3, ASKID+7
MIDDLE TALK+3
NICKNM TALK+4
NICKNM2 NICKNM+2, NICKNM+3

Naked Globals

Name Field # of Occurrence
^( HLPID
^(0 CHKID1+1, HLPID
^(3 HLPID
^(4 HLPID+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ASK+1, ASK+2, ASKADD+2*, NICKNM2+4*, NICKNM2+5, NICKNM2+6!
>> %DT HLPID+1*
%Y NICKNM2+6!
>> AUP("DR" CHKID+5*, CHKID1+1*, ASKID+1*, ASKID+6*
>> AUPGID CHKID+2*, CHKID+5
>> AUPID CHKID+3*, CHKID+5*, CHKID1+1, ASKID+1, ASKID+6, HLPID, HLPID+1
>> AUPID0 CHKID1+1*, ASKID, ASKID+4, ASKID+7, HLPID+1, HLPID+2
>> AUPIDS( ASKID+1*, ASKID+6*
>> AUPL ASK+1*
>> AUPLID CHKID+5*
AUPNLK3 DUPECHK+2!
AUPNMCV NICKNM+2*, NICKNM+3*, NICKNM+5!, NICKNM2+2, NICKNM2+3, NICKNM2+5*
AUPNMCVN NICKNM+2*, NICKNM+3*, NICKNM+5!, NICKNM2+1, NICKNM2+3, NICKNM2+5
AUPNMCVX NICKNM+5!, NICKNM2+1*, NICKNM2+2
AUPNMF NICKNM+1*, NICKNM+2, NICKNM+4, NICKNM+5!, NICKNM2+1, NICKNM2+3
AUPNML NICKNM+1*, NICKNM+4, NICKNM+5!
AUPNMM MIDDLE+1*, MIDDLE+2, MIDDLE+3, NICKNM+1*, NICKNM+3, NICKNM+4, NICKNM+5!, NICKNM2+1, NICKNM2+3
AUPNMX NICKNM+1*, NICKNM+4, NICKNM+5!
>> AUPQF2 TALK+2, TALK+6, TALK+8, ASK+2*, CHKID+3, CHKID+4, CHKID+5, CHKID1+1*, DUPECHK+2*
AUPSET ASKID+4*, ASKID+6!
>> AUPX ASKADD+1, MIDDLE+1, MIDDLE+18, MIDDLE+19, NICKNM+1, NICKNM+4*, ASKID
>> D0 ASKID+5*
>> DA ASKID+5*
DFOUT MIDDLE+16*, MIDDLE+17, MIDDLE+21!
>> DIC("DR" CHKID+1, DUPECHK+1
DIR MIDDLE+12!, MIDDLE+21!
DIR("A" MIDDLE+14*
DIR(0 MIDDLE+13*
DTIME ASKID
>> DTOUT MIDDLE+17
DUOUT MIDDLE+17, MIDDLE+21!
>> I ASKID+4*, HLPID*, HLPID+2*
U ASKADD+1, NICKNM2+2, NICKNM2+3, NICKNM2+5, CHKID+5, ASKID, ASKID+4, ASKID+6, ASKID+7, HLPID+1
, HLPID+2
X MIDDLE+18*, MIDDLE+19*, MIDDLE+21!, CHKID1+1, ASKID*!, ASKID+1, ASKID+2, ASKID+3, ASKID+4!*, ASKID+6
, ASKID+7, HLPID, HLPID+1*
Y ASKADD+1*, MIDDLE+16, MIDDLE+18*, MIDDLE+21!, ASKID+4*, HLPID+2*
Z MIDDLE+18*!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All