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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Routine: PXCESK

Package: PCE Patient Care Encounter

Routine: PXCESK


Information

PXCESK ;ISL/dee - Used to edit and display V SKIN TEST ;Mar 15, 2021@15:16:32

Source Information

Source file <PXCESK.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA FileMan 6 BROWSE^DDBR  EN^DDIOL  REFRESH^DDSUTL  $$GET1^DID  $$EXTERNAL^DILFD  ^DIR  
PCE Patient Care Encounter 4 WAIT^PXCEHELP  $$GETDT^PXDATE  EN1^PXKMAIN  SKLIST^PXVRPC8  
Kernel 1 ($$FMDIFF,$$FMTE)^XLFDT  

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

Package Total Caller Graph
PCE Patient Care Encounter 2 PXCEVFI1  PXCEVFI2  

Entry Points

Name Comments DBIA/ICR reference
FORMAT ;;Skin Test~9000010.12~0,12,13,80,811,812~1~^AUPNVSK
INTRFACE ;;PX SELECT SKIN TEST
EREADING ;
EREADDT ;
ERESULTS ;
EVENTDT(PXCEAFTR) ;Edit the Event Date and Time.
EVDTHELP ;Event Date and Time help.
DISPLY01(PXCESK,PXCEDT) ;
SAVE ;Special code for saving a Skin Test.
SKIP ;Used to by-pass roll and scroll editing of a field.
NEW(PXCESKTYP,PXCEAFTR,PXCEPAT,PXCEVIEN) ;
EDIT(PXCESKTYP,PXCEAFTR,PXCEFIEN) ;
PROMPT(PXCESKTYP,PXFIELD) ;
CANDEL(PXCEFIEN) ;
DISPLYSK(PXCESK,PXCEDT) ;Display the skin test.

External References

Name Field # of Occurrence
BROWSE^DDBR EVDTHELP+3
EN^DDIOL EREADDT+26
REFRESH^DDSUTL EVDTHELP+4
$$GET1^DID EVDTHELP+2
$$EXTERNAL^DILFD EREADING+4, EREADDT+5, ERESULTS+4, DISPLY01+3
^DIR EREADING+9, EREADDT+10, ERESULTS+9, NEW+13, NEW+47
WAIT^PXCEHELP NEW+40, NEW+57, CANDEL+7
$$GETDT^PXDATE EVENTDT+5
EN1^PXKMAIN SAVE+6
SKLIST^PXVRPC8 NEW+24
$$FMDIFF^XLFDT EREADDT+25
$$FMTE^XLFDT NEW+38, NEW+39, NEW+46

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: NEW+10
Function Call: WRITE
  • Prompt: !!,"We could not find a "_PXSKINNM_" skin test administered between "_$$FMTE^XLFDT(PXSTART,"D")
  • Line Location: NEW+38
Function Call: WRITE
  • Prompt: !,"and "_$$FMTE^XLFDT(PXEND,"D")_" that does not already have a reading."
  • Line Location: NEW+39
Function Call: WRITE
  • Prompt: !!,"Is this reading for the "_PXSKINNM_" skin test administered on"
  • Line Location: NEW+45
Function Call: WRITE
  • Prompt: !!,"We will link this skin test reading to that placement entry.",!
  • Line Location: NEW+51
Function Call: WRITE
  • Prompt: !!,"You must first record the skin test placement before recording the reading."
  • Line Location: NEW+56
Function Call: WRITE
  • Prompt: !!,"There is a skin test reading linked to this entry. "
  • Line Location: CANDEL+4
Function Call: WRITE
  • Prompt: !,"You must first delete the skin test reading entry (#"_$O(^AUPNVSK("APT",PXCEFIEN,0))_")"
  • Line Location: CANDEL+5
Function Call: WRITE
  • Prompt: !,"before deleting this placement entry."
  • Line Location: CANDEL+6
Routine Call
  • DIR
  • Line Location:
    • EREADING+9
    • EREADDT+10
    • ERESULTS+9
    • NEW+13
    • NEW+47

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNVSK - [#9000010.12] EXTERNAL^DILFD,  GET1^DID

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT - [#9000010] EREADDT+18, EREADDT+22, NEW+7, NEW+20
^AUPNVSK - [#9000010.12] EREADDT+21, EREADDT+22, DISPLYSK+6
^AUPNVSK("APT" EDIT+2, CANDEL+2, CANDEL+5, DISPLYSK+7
^AUTTSK - [#9999999.28] NEW+22, NEW+23, DISPLYSK+3
^TMP("PXK" EVENTDT+2, SAVE+2, SAVE+4*, SAVE+5*, SAVE+7*, SAVE+8*, SAVE+9*, SAVE+10*, SAVE+11*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA EREADING+10!, EREADDT+11!, ERESULTS+10!
>> DDS EVDTHELP+4
DEFAULT EVENTDT+1~, EVENTDT+2*, EVENTDT+5
DIERR EREADING+2~, EREADING+5, EREADDT+3~, EREADDT+6, ERESULTS+2~, ERESULTS+5, DISPLY01+1~, DISPLY01+4
DIR EREADING+10!, EREADDT+11!, ERESULTS+10!, NEW+2~, NEW+42!
DIR("?" EREADING+8*, EREADDT+9*, ERESULTS+8*
DIR("A" EREADING+7*, EREADDT+8*, ERESULTS+7*, NEW+12*, NEW+46*
DIR("B" EREADING+5*, EREADDT+6*, ERESULTS+5*, NEW+44*
DIR(0 EREADING+6*, EREADDT+7*, ERESULTS+6*, NEW+11*, NEW+43*
DIRUT NEW+2~, NEW+15, NEW+42!, NEW+49
>> DTOUT EREADING+12, EREADDT+13, ERESULTS+12
>> DUOUT EREADING+12, EREADDT+13, ERESULTS+12
>> DX EVDTHELP+4*
>> DY EVDTHELP+4*
ERR EVDTHELP+1~
EVENTDT EVENTDT+1~, EVENTDT+5*, EVENTDT+6
HELP EVENTDT+1~, EVENTDT+3*, EVENTDT+5
IEN EVENTDT+1~, DISPLYSK+6, DISPLYSK+7
IOSL EVDTHELP+4
>> IOXY EVDTHELP+4
PROMPT EVENTDT+1~, EVENTDT+4*, EVENTDT+5
PXCEAFTR EVENTDT~, NEW~, EDIT~
PXCEAFTR( EREADING+3, EREADDT+4, ERESULTS+3
PXCEAFTR(0 EREADING+1, EREADING+13*, EREADDT+2, EREADDT+14*, EREADDT+16, EREADDT+18, ERESULTS+1, ERESULTS+13*, SAVE+7, NEW+21
PXCEAFTR(12 EREADDT+17, EREADDT+19, EVENTDT+6*, SAVE+8, NEW+53*, EDIT+1
PXCEAFTR(13 SAVE+9
PXCEAFTR(80 SAVE+10
PXCEAFTR(811 SAVE+11
>> PXCECATS SAVE+2, SAVE+4, SAVE+5, SAVE+7, SAVE+8, SAVE+9, SAVE+10, SAVE+11
PXCEDILF EREADING+2~, EREADDT+3~, ERESULTS+2~, DISPLY01+1~
PXCEDT DISPLY01~, DISPLYSK~
PXCEEND EREADING+12*, EREADDT+13*, ERESULTS+12*, NEW+2~, NEW+4*, NEW+18, NEW+55*, NEW+59
PXCEEXT EREADING+2~, EREADING+4*, EREADING+5, EREADDT+3~, EREADDT+5*, EREADDT+6, ERESULTS+2~, ERESULTS+4*, ERESULTS+5, DISPLY01+1~
, DISPLY01+3*, DISPLY01+4
PXCEFIEN EDIT~, EDIT+2, CANDEL~, CANDEL+2, CANDEL+5
>> PXCEFILE EREADING+4, EREADDT+5, ERESULTS+4
PXCEINT EREADING+2~, EREADING+3*, EREADING+4, EREADING+5, EREADDT+3~, EREADDT+4*, EREADDT+5, EREADDT+6, ERESULTS+2~, ERESULTS+3*
ERESULTS+4, ERESULTS+5, DISPLY01+1~, DISPLY01+2*, DISPLY01+3, DISPLY01+4
PXCEPAT NEW~, NEW+24
PXCERR SAVE+1~, SAVE+2*, SAVE+3, SAVE+4, SAVE+5
PXCESK DISPLY01~, DISPLY01+2, DISPLYSK~, DISPLYSK+2*, DISPLYSK+3
PXCESKTYP NEW~, NEW+8*, NEW+16*, EDIT~, EDIT+1*, EDIT+2*, PROMPT~, PROMPT+4, PROMPT+12, PROMPT+13
>> PXCETEXT EREADING+3, EREADING+4, EREADING+7, EREADING+8, EREADDT+4, EREADDT+5, EREADDT+8, EREADDT+9, ERESULTS+3, ERESULTS+4
ERESULTS+7, ERESULTS+8
PXCEVIEN NEW~, NEW+7, NEW+20
PXDATE NEW+2~, NEW+20*, NEW+24
PXEND NEW+2~, NEW+27*, NEW+30*, NEW+39
PXFIELD PROMPT~, PROMPT+12, PROMPT+13
PXNODE NEW+2~, NEW+25*, NEW+28, NEW+29, NEW+30, NEW+31*, NEW+33, NEW+34, NEW+35
PXPLACE PROMPT+2~, PROMPT+7*, PROMPT+12
PXREAD PROMPT+2~, PROMPT+10*, PROMPT+13
PXREADTYP DISPLYSK+1~, DISPLYSK+5*, DISPLYSK+6*, DISPLYSK+7*, DISPLYSK+8
PXSKIN NEW+2~, NEW+21*, NEW+22, NEW+23, NEW+24
PXSKINNM NEW+2~, NEW+22*, NEW+23*, NEW+38, NEW+45
PXSKINP NEW+2~, NEW+35*, NEW+53
PXSKINPDT NEW+2~, NEW+32*, NEW+34*, NEW+37, NEW+46
PXSKLST NEW+2~, NEW+24
PXSKLST(1 NEW+25
PXSKLST(2 NEW+31
PXSTART NEW+2~, NEW+26*, NEW+29*, NEW+38
PXTEXT DISPLYSK+1~, DISPLYSK+3*, DISPLYSK+8*, DISPLYSK+10
PXVPLACE EREADDT+1~, EREADDT+19*, EREADDT+20, EREADDT+21, EREADDT+22
PXVX EREADDT+15~, EREADDT+24*, EREADDT+25*, EREADDT+26
RESULT EVDTHELP+1~, EVDTHELP+2*
TEXT EVDTHELP+1~
U EREADDT+18, EREADDT+19, EREADDT+21, EREADDT+22, EVENTDT+2, EVENTDT+6, NEW+7, NEW+20, NEW+21, NEW+22
, NEW+23, NEW+28, NEW+29, NEW+30, NEW+33, NEW+34, NEW+35, NEW+53, EDIT+1, PROMPT+12
, PROMPT+13, DISPLYSK+3, DISPLYSK+6
X EREADING+11, EREADDT+12, ERESULTS+11, SKIP+1*, NEW+2~, NEW+42!
X1 EREADDT+15~, EREADDT+16*, EREADDT+25
X2 EREADDT+15~, EREADDT+17*, EREADDT+18*, EREADDT+21*, EREADDT+22*, EREADDT+25
X3 EREADDT+15~, EREADDT+23*, EREADDT+25
Y EREADING+11*, EREADING+13, EREADDT+12*, EREADDT+14, ERESULTS+11*, ERESULTS+13, SKIP+1*, NEW+2~, NEW+15, NEW+16
, NEW+18, NEW+42!, NEW+49, NEW+50, NEW+54
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables  | All