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

Package: PCE Patient Care Encounter

Routine: PXCEAE


Information

PXCEAE ;ISL/dee,ISA/KWP - Main routine for the List Manager display of a visit and related v-files ;04/26/99

Source Information

Source file <PXCEAE.m>

Call Graph

Call Graph Total: 16

Package Total Call Graph
PCE Patient Care Encounter 12 ($$SEL1,DONE)^PXCE  BUILD^PXCEAE1  $$SEL^PXCEAE2  $$DISPLY08^PXCECSTP  $$DATE^PXCEDATE  (PAUSE,WAIT)^PXCEHELP  PATINFO^PXCEPAT  APPCHECK^PXCESDAM  
CHECK^PXCEVFI5  EVENT^PXKMAIN  ($$LOCK,UNLOCK)^PXUALOCK  ($$CREATE,DELETE)^PXUAXTMP  
Registration 3 EN^VALM  FULL^VALM1  CLEAN^VALM10  
Kernel 1 DISP^XQORM1  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
PCE Patient Care Encounter 3 PXCE  PXCEEXP  PXCESDAM  

Entry Points

Name Comments DBIA/ICR reference
DEL ; -- delete a V-File entries
QUIT
EN ;+ -- main entry point for PXCE DISPLAY VISIT
HDR ; -- header code
DO1(PXCEFIDX,WHATDO,WHATTODO) ;Process one V-File entry
EDIT ; -- edit a V-File entry
DOMANY(PXCEFIDX,WHATDO,WHATTODO) ;Process one or more V-File entries
KEYS(PXCEPROT,PXCEEND) ;Set up ^XQORM("KEY") array so that can edit an item by having its
; number be and action to edit it.
EXPND ; -- expand code
INIT ; -- init variables and list array
EXIT ; -- exit code
GETVIEN ;Ask the user which visit.
HELP ; -- help code

External References

Name Field # of Occurrence
$$SEL1^PXCE GETVIEN+3
DONE^PXCE EXPND+3
BUILD^PXCEAE1 INIT+1, EXPND+2
$$SEL^PXCEAE2 DOMANY+7, DOMANY+9
$$DISPLY08^PXCECSTP HDR+13
$$DATE^PXCEDATE HDR+12
PAUSE^PXCEHELP GETVIEN+19
WAIT^PXCEHELP GETVIEN+12, DEL+1, DO1+10
PATINFO^PXCEPAT EN+10
APPCHECK^PXCESDAM GETVIEN+7
CHECK^PXCEVFI5 EXIT+5
EVENT^PXKMAIN EXIT+9
$$LOCK^PXUALOCK EN+19
UNLOCK^PXUALOCK EN+22, EN+24
$$CREATE^PXUAXTMP EN+21
DELETE^PXUAXTMP EN+24
EN^VALM EN+23
FULL^VALM1 DOMANY+5
CLEAN^VALM10 EXIT+7
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$C(7),"Can not update future encounters."
  • Line Location: GETVIEN+11
Function Call: WRITE
  • Prompt: !!,"This is a historical encounter for documenting a clinical encounter only"
  • Line Location: GETVIEN+17
Function Call: WRITE
  • Prompt: !,"and will not be used by Scheduling, Billing or Workload credit."
  • Line Location: GETVIEN+18
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !!!,$C(7),"Error: You do not have delete access."
  • Line Location: DEL+1
Function Call: WRITE
  • Prompt: "??",$C(7)
  • Line Location: DOMANY+10
Function Call: WRITE
  • Prompt: !!!,$C(7),"You cannot edit stop codes."
  • Line Location: DO1+10
Routine Call
  • VALM
  • Line Location:
    • EN+23

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT - [#9000010] EN+9, EN+12, GETVIEN+10, GETVIEN+15, HDR+1, HDR+6, DO1+11
^DPT - [#2] GETVIEN+15
^ORD(101 - [#101] KEYS+3
^SC - [#44] HDR+9
^TMP("PXCEAE" EXIT+8!
^TMP("PXCEAEIX" EXIT+8!, DO1+7
^TMP("PXCEIDX" GETVIEN+5
^TMP("VALM DATA" EN+25
^VA(200 - [#200] EN+18
^XTMP("PXLCKUSR" EN+18

Label References

Name Line Occurrences
@( DO1+12
DO1 DOMANY+16, DOMANY+19, DOMANY+20
DOMANY EDIT+3, DEL+2
INIT DOMANY+21

Naked Globals

Name Field # of Occurrence
^("EXP" EN+25

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DT GETVIEN+10
DUZ EN+21
PXCEAEVW EN+5~*, INIT+1, EXPND+1*, EXPND+2
PXCEAPPM GETVIEN+15*, EXIT+10!
PXCECAT DO1+6~, DO1+9*, DO1+10, DO1+11*, DO1+12
PXCEDELV DOMANY+4~*, DOMANY+15*, DOMANY+18*, DOMANY+20
PXCEEND KEYS~, KEYS+4
>> PXCEEXIT EXIT+5
PXCEFIDX EDIT+1~, EDIT+2*, EDIT+3, DOMANY~, DOMANY+7*, DOMANY+9*, DOMANY+11, DOMANY+13, DO1~, DO1+7
PXCEFIEN DO1+6~, DO1+8*, DO1+11
PXCEFIX1 DOMANY+12~, DOMANY+13*, DOMANY+14, DOMANY+15, DOMANY+16, DOMANY+17
PXCEFIX2 DOMANY+12~, DOMANY+17*, DOMANY+18, DOMANY+19
PXCEHLOC EN+12~*
PXCEHLST EN+3~
PXCEINDX KEYS+2~, KEYS+4*, DOMANY+12~, DOMANY+13*
>> PXCEKEYS EN+15, EN+25, DEL+1
>> PXCENOER DO1+10*
PXCEONE DO1+6~, DO1+7*, DO1+8, DO1+9
PXCEPAT EN+8~, EN+9*, EN+10
PXCEPAT("NAME" HDR+7
PXCEPAT("SSN" HDR+8
PXCEPIEN KEYS+2~, KEYS+3*, KEYS+4
PXCEPROT KEYS~, KEYS+3
PXCEVDEL EN+6~*
PXCEVIDX GETVIEN+1~, GETVIEN+2*, GETVIEN+3*, GETVIEN+4, GETVIEN+5
PXCEVIEN EN+1, EN+9, EN+12, EN+17, GETVIEN+5*, GETVIEN+7, GETVIEN+8, GETVIEN+10, GETVIEN+13!, GETVIEN+15
, GETVIEN+16!, HDR+1, HDR+6, INIT+1, EXIT+10!, EXPND+2
PXMSG EN+16~, EN+17*, EN+18*, EN+19
PXQUIT EXIT+3~, EXIT+4*
PXRESVAL EN+16~, EN+19*, EN+20, EN+21*, EN+22
PXUSR EN+16~, EN+18*
PXVISIEN EN+16~, EN+17*, EN+18, EN+19, EN+21, EN+22, EN+24
>> VALMBCK INIT+2*
>> VALMEVL EN+25
VALMHDR HDR+2!, INIT+2!
VALMHDR(1 HDR+7*, HDR+8*, HDR+9*
VALMHDR(2 HDR+12*, HDR+13*
>> VALMQUIT HDR+1*
>> VALMSG HDR+15*
VISIT0 HDR+3~, HDR+6*, HDR+9, HDR+12, HDR+13
WHATDO DOMANY~, DOMANY+4, DOMANY+6, DOMANY+8, DOMANY+15, DOMANY+16, DOMANY+18, DOMANY+19, DOMANY+20, DO1~
, DO1+10
WHATTODO DOMANY~, DOMANY+16, DOMANY+19, DOMANY+20, DO1~, DO1+12
>> X HELP+1*
>> XQORM("KEY" KEYS+4*
>> XQORNOD(0 GETVIEN+2, EDIT+2
>> Y GETVIEN+16
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All