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 |  All
Print Page as PDF
Routine: PXCE

Package: PCE Patient Care Encounter

Routine: PXCE


Information

PXCE ;ISL/dee - Main routine for PCE's user interface ; 3/27/01 12:17pm

Source Information

Source file <PXCE.m>

Call Graph

Call Graph

Call Graph Total: 19

Package Total Call Graph
PCE Patient Care Encounter 9 $$SOURCE^PXAPIUTL  GETVIEN^PXCEAE  DATE9S^PXCEDATE  EN^PXCEEXP  PAUSE^PXCEHELP  (MAKELIST,NEWHOSL1)^PXCENEW  (NEWPAT1,PATKILL)^PXCEPAT  ($$SELAPPM,FNL)^PXCESDAM  
$$PKG2IEN^VSIT  
List Manager 3 EN^VALM  ($$SETSTR,FULL)^VALM1  CLEAN^VALM10  
Scheduling 3 EN^SDGAF  $$PCLINE^SDPPTEM  ($$CLNCK,$$COLLAT,$$ELSTAT,$$MHCLIN,$$NEWGAF)^SDUTL2  
VA FileMan 2 C^%DTC  ^DIR  
Kernel 1 $$FMTE^XLFDT  
Registration 1 KVA^VADPT  

Caller Graph

Caller Graph Total: 35

Package Total Caller Graph
PCE Patient Care Encounter 33 PXCE ADD/EDIT  PXCE ADD/EDIT DISPLAY BRIEF  PXCE ADD/EDIT DISPLAY DETAIL  PXCE ADD/EDIT KNOWN ENCOUNTER  PXCE CHANGE CLINIC STOP  PXCE CHANGE HOSPITAL LOCATION  PXCE DATE CHANGE  PXCE DELETE V-FILE  
PXCE EDIT V-FILE  PXCE ENCOUNTER DATA ENTRY  PXCE ENCOUNTER ENTRY & DELETE  PXCE ENCOUNTER ENTRY NO DELETE  PXCE ENCOUNTER ENTRY SUPER  PXCE ENCOUNTER VIEWER  PXCE GAF  PXCE GMPL OE DATA ENTRY  
PXCE GMRP REVIEW SCREEN  PXCE GMTS HS ADHOC  PXCE HOSPITAL LOCATION VIEW  PXCE INTERVIEW  PXCE MAIN MENU  PXCE PATIENT CHANGE  PXCE QUIT  PXCE SDAM INTERVIEW  
PXCE SDAM MENU  PXCE SDAM UPDATE ENCOUNTER  PXCE SDAM VIEW ONLY  PXCE VIEW ONLY  PXCEAE  PXCEEXP  PXCEINTR  PXCENEW  
PXCEPAT  
Kernel 2 ^DIC(19  ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
ASKLOOP
HDR ; -- header code
SKIP
EN1(PXCEKEYS) ;Does not checks for provider
START1 ;
EN(PXCEKEYS) ;Checks for provider
EXPND ; -- expand code
SEL1(HELP,PXCEADD) ; Select 1 visit
; If the $GET(PXCEADD) is non zero then will
; add to the prompt "add a new encounter"
SETDATES ;
START ;
INIT ; -- init variables and list array
EXIT ; -- exit code
EXITALL ; Exit of whole program
GAF ;;
DONE ; -- exit action for protocol
GAFQ
SETUP ;

External References

Name Field # of Occurrence
C^%DTC SETUP+5, SETUP+7, SETUP+9, SETUP+11
^DIR SETUP+4, SEL1+18, ASKLOOP+5, GAF+6, GAF+15, GAF+32
$$SOURCE^PXAPIUTL START1+15
GETVIEN^PXCEAE GAF+8
DATE9S^PXCEDATE SETDATES+7
EN^PXCEEXP EXPND+1
PAUSE^PXCEHELP SEL1+9
MAKELIST^PXCENEW INIT+1
NEWHOSL1^PXCENEW SETUP+19
NEWPAT1^PXCEPAT SETUP+18
PATKILL^PXCEPAT EXITALL+1
$$SELAPPM^PXCESDAM GAF+9
FNL^PXCESDAM EXIT+5
EN^SDGAF GAF+27
$$PCLINE^SDPPTEM HDR+6
$$CLNCK^SDUTL2 SETUP+15
$$COLLAT^SDUTL2 HDR+32, GAF+20
$$ELSTAT^SDUTL2 HDR+28, GAF+19
$$MHCLIN^SDUTL2 HDR+23, HDR+32, GAF+2, GAF+20
$$NEWGAF^SDUTL2 HDR+33, GAF+21
KVA^VADPT EXITALL+2
EN^VALM START1+25, START1+26, START1+28, START1+29
$$SETSTR^VALM1 HDR+23, HDR+25
FULL^VALM1 START1+30, EXIT+1, GAF+22
CLEAN^VALM10 EXIT+2
$$PKG2IEN^VSIT START1+16
$$FMTE^XLFDT HDR+16, HDR+36, GAF+26

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?5,"Clinic MUST be corrected before continuing."
  • Line Location: SETUP+16
Function Call: WRITE
  • Prompt: !,$C(7),"Selection '",Y,"' is not a valid choice."
  • Line Location: SEL1+8
Function Call: WRITE
  • Prompt: !
  • Line Location: GAF+23
Function Call: WRITE
  • Prompt: !,"Warning: Patient is deceased."
  • Line Location: GAF+24
Function Call: WRITE
  • Prompt: !,"Current GAF: "_+$P(PXGAF,U,2)
  • Line Location: GAF+25
Function Call: WRITE
  • Prompt: $S($P(PXGAF,U,3)>0:", from "_$$FMTE^XLFDT($P(PXGAF,U,3),"D"),1:", Date Unavailable")
  • Line Location: GAF+26
Routine Call
  • VALM
  • Line Location:
    • START1+25
    • START1+26
    • START1+28
    • START1+29
Routine Call
  • DIR
  • Line Location:
    • SETUP+4
    • SEL1+18
    • ASKLOOP+5
    • GAF+6
    • GAF+15
    • GAF+32

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT - [#9000010] HDR+31, GAF+16, GAF+17, GAF+18
^DPT - [#2] GAF+18
^PX(815 - [#815] START1+14, SETUP+5, SETUP+7, SETUP+9, SETUP+11
^SC - [#44] HDR+11
^TMP("PXCE" EXIT+3!
^TMP("PXCEIDX" HDR+30, HDR+31, EXIT+4!, SEL1+4, GAF+8
^TMP("SDAMIDX" GAF+9
^VA(200 - [#200] START+2

Label References

Name Line Occurrences
ASKLOOP ASKLOOP+9
EXITALL START1+31
SETDATES SETUP+17
SETUP START1+19, SETUP+14, SETUP+18
SKIP GAF+2
START PXCE+19
START1 EN1+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%B START1+5!
DA START1+5!, SETUP+1~, SETUP+4!, SEL1+12~, SEL1+20~, ASKLOOP+6!
DFN START1+12~, SETUP+3
DIE START1+5!
DIR SETUP+1~, SETUP+4!, SEL1+12~, SEL1+20~, ASKLOOP+6!, GAF+6!, GAF+15!, GAF+32!
DIR("?" SEL1+16*, SEL1+17*, ASKLOOP+2*, ASKLOOP+3*, ASKLOOP+4*
DIR("A" SETUP+4*, SEL1+13*, SEL1+14*, SEL1+15*, ASKLOOP+1*, GAF+4*, GAF+5*, GAF+12*, GAF+13*, GAF+14*
, GAF+30*, GAF+31*
DIR("B" SEL1+15*
DIR(0 SETUP+4*, SEL1+13*, ASKLOOP*, GAF+3*, GAF+11*, GAF+29*
DIRUT START1+18!, START1+19, SETUP+4, SETUP+18, ASKLOOP+7
DNM START1+5!
DQ START1+5!
DR START1+5!
DT SETUP+5, SETUP+7, SETUP+9, SETUP+11, HDR+6
>> DTOUT SEL1+18
DUZ START+2
FSEL SETUP+18*!
HELP SEL1~, SEL1+17, ASKLOOP+3, ASKLOOP+4
I START1+5!
MAX SEL1+3~, SEL1+4*, SEL1+7, SEL1+13, SEL1+14, SEL1+15, ASKLOOP, ASKLOOP+1, ASKLOOP+9
PXCE9BEG START1+8~
PXCE9END START1+8~
PXCEADD SEL1~, SEL1+11
PXCECONT START1+10~, START1+21, START1+22!
PXCEDBEG START1+8~, SETDATES+2*, SETDATES+5*, HDR+16
PXCEDBHL START1+9~, SETUP+10*, SETDATES+2
PXCEDBP START1+9~, SETUP+6*, SETDATES+5
PXCEDEHL START1+9~, SETUP+12*, SETDATES+3
PXCEDEND START1+8~, SETDATES+3*, SETDATES+6*, HDR+16
PXCEDEP START1+9~, SETUP+8*, SETDATES+6
>> PXCEGAF HDR+33*, HDR+34, HDR+36
>> PXCEGDT HDR+36*, HDR+37
>> PXCEGPR HDR+36*
>> PXCEGSC HDR+36*, HDR+37
>> PXCEGST HDR+34*, HDR+35
PXCEHIT HDR+27!, HDR+30, HDR+37*
PXCEHLC HDR+26~, HDR+31*, HDR+32
PXCEHLOC START1+7~, SETUP+19*, HDR+11, HDR+23, GAF+2
PXCEKEYS PXCE+17~*, PXCE+18*, EN1~, EN~, START+2*, START1+3*, START1+23
PXCEPAT START1+7~, SETUP+18*, HDR+6, HDR+28, HDR+33
PXCEPAT("NAME" HDR+7
PXCEPAT("SSN" HDR+8
PXCEPKG START1+11~, START1+16*
PXCESOR START1+11~, START1+15*
PXCESTA HDR+26~, HDR+28*, HDR+32
PXCEUSEL SETUP+2~, SETUP+3*, SETUP+4*, SETUP+13, SETUP+14, SETUP+15, SETUP+18, SETUP+19
PXCEVIEN GAF+1~, GAF+9*, GAF+10, GAF+12, GAF+13, GAF+16, GAF+17, GAF+18
PXCEVIEW START1+6~, START1+14*, START1+21, START1+24, START1+27, SETUP+13*, SETUP+14*, SETDATES+1, HDR+5, HDR+11
, HDR+19, HDR+23, HDR+24
>> PXCEZZ HDR+29*, HDR+30*, HDR+31
PXDATA GAF+1~, GAF+18*, GAF+20
PXDFN GAF+1~, GAF+16*, GAF+18, GAF+19, GAF+21, GAF+27
PXDSS GAF+1~, GAF+17*, GAF+20
PXELIG GAF+1~, GAF+19*, GAF+20
>> PXGAF GAF+21*, GAF+24, GAF+25, GAF+26
PXLNX HDR+1!, HDR+2*, HDR+7, HDR+8, HDR+9, HDR+11, HDR+12*, HDR+13*, HDR+16, HDR+19
, HDR+20*, HDR+23, HDR+25, HDR+37
PXPCP HDR+1!, HDR+2*, HDR+6*, HDR+13
PXRES SETUP+1~, SETUP+14, SETUP+15*, SETUP+16
>> SDAMLIST HDR+19
SDAMTYP START1+6~, SETUP+13*, SETUP+14*
SDB START1+5!
SDBEG START1+8~
SDCLN START1+5!
SDEND START1+8~
SDFN START1+5!, HDR+33
U GAF+18, GAF+20, GAF+24, GAF+25, GAF+26
>> VALMBCK DONE+1*, GAF+10*, SKIP*
VALMHDR HDR+1!
VALMHDR( HDR+7*, HDR+8*, HDR+9*, HDR+11*, HDR+13*, HDR+16*, HDR+19*, HDR+23*, HDR+25*, HDR+37*
>> VALMSG HDR+39*, DONE+2*
X START1+5!, SETUP+1~, SETUP+6, SETUP+8, SETUP+10, SETUP+12, SEL1+3~, SEL1+18, ASKLOOP+7
X1 SETUP+2~, SETUP+5*, SETUP+7*, SETUP+9*, SETUP+11*
X2 SETUP+2~, SETUP+5*, SETUP+7*, SETUP+9*, SETUP+11*
XQORNOD START1+5!
XQORNOD(0 SEL1+5
Y SETUP+1~, SETUP+4, SEL1+3~, SEL1+5*, SEL1+6, SEL1+7, SEL1+8, SEL1+10*, SEL1+18*, ASKLOOP+7*
, ASKLOOP+8*, ASKLOOP+9, ASKLOOP+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All