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 |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PXBPPOV

Package: PCE Patient Care Encounter

Routine: PXBPPOV


Information

PXBPPOV ;ISL/JVS - PROMPT POV ;24 Sep 2013 11:19 AM

Source Information

Source file <PXBPPOV.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
PCE Patient Care Encounter 9 (LOC,TERM)^PXBCC  DPOV4^PXBDPOV  EN1^PXBHLP0  (ADDM,DELM)^PXBPPOV1  WHICH^PXBPWCH  (CASE,TIMES)^PXBUTL  HELP1^PXBUTL1  (,QM3)^PXDSLK  
($$ACTDT,$$CSDATE)^PXDXUTL  
DRG Grouper 1 $$ICDDATA^ICDXCODE  
Lexicon Utility 1 CONFIG^LEXSET  
List Manager 1 (CLEAR,FULL)^VALM1  
VA FileMan 1 ^DIC  

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 PXBMPOV  PXBPL  

Entry Points

Name Comments DBIA/ICR reference
POV ;--DIAGNOSIS
P ;--Second Entry point
P1 ;--Third entry point
M ;--------IF Multiple entries have been entered
LI ;--------If picked a line number
LI1 ;
PFIN ;--Finish the DIAGNOSIS
POVX ;--EXIT AND CLEAN UP
REVPOV(LINE) ;--NEW Reverse video API for POV since Long Descriptions are
; multiple lines

External References

Name Field # of Occurrence
^DIC LI1+30, PFIN+1
$$ICDDATA^ICDXCODE LI1+35, PFIN+5
CONFIG^LEXSET LI1+27
LOC^PXBCC POV+6, P+5, P+6, P+7, P+8, REVPOV+8, REVPOV+10
TERM^PXBCC POV+10
DPOV4^PXBDPOV P1+15, LI+1, LI1+3
EN1^PXBHLP0 LI1+11, LI1+12
ADDM^PXBPPOV1 M+1
DELM^PXBPPOV1 M+5
WHICH^PXBPWCH LI1+7
CASE^PXBUTL P1+5
TIMES^PXBUTL LI1+4
HELP1^PXBUTL1 PFIN+2
^PXDSLK LI1+23
QM3^PXDSLK LI1+21
$$ACTDT^PXDXUTL POV+4, LI1+19
$$CSDATE^PXDXUTL POV+3
CLEAR^VALM1 LI1+15, LI1+21
FULL^VALM1 LI1+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: IOUON,"Previous Entry: ",$G(PXBNPOVL(1))
  • Line Location: POV+6
Function Call: WRITE
  • Prompt: " "
  • Line Location: POV+6
Function Call: WRITE
  • Prompt: IOUOFF
  • Line Location: POV+7
Function Call: WRITE
  • Prompt: IOSC
  • Line Location: P+1
Function Call: WRITE
  • Prompt: "...There are 0 ",PXACS," CODES associated with this encounter."
  • Line Location: P+5
Function Call: WRITE
  • Prompt: "...There is 1 ",PXACS," CODE associated with this encounter."
  • Line Location: P+6
Function Call: WRITE
  • Prompt: "...There are ",CNT," ",PXACS," CODES associated with this encounter."
  • Line Location: P+7
Function Call: WRITE
  • Prompt: !,"Enter '+' for next page, '-' for previous page."
  • Line Location: P+9
Function Call: WRITE
  • Prompt: !,"Enter ",PXACS," Diagnosis : ",$G(PXBDPOV)
  • Line Location: P+10
Function Call: WRITE
  • Prompt: " //"
  • Condition for execution: $D(PXBDPOV)
  • Line Location: P+10
Function Call: WRITE
  • Prompt: IOELEOL
  • Line Location: P+10
Function Call: WRITE
  • Prompt: !,"Enter ",IOINHI,"NEXT",IOINLOW," ",PXACS," Diagnosis : "_$G(PXBDPOV)
  • Line Location: P+11
Function Call: WRITE
  • Prompt: " //"
  • Condition for execution: $D(PXBDPOV)
  • Line Location: P+11
Function Call: WRITE
  • Prompt: IOELEOL
  • Line Location: P+11
Function Call: READ
  • Variable: DATA
  • Timeout: DTIME
  • Line Location: P+12
Function Call: WRITE
  • Prompt: DATA
  • Line Location: P1+7
Function Call: WRITE
  • Prompt: IOCUB,IOECH
  • Line Location: LI+2
Function Call: WRITE
  • Prompt: "Searching for diagnosis codes...",!
  • Line Location: LI1+16
Function Call: WRITE
  • Prompt: !!
  • Line Location: POVX+4
Function Call: WRITE
  • Prompt: IORVON,$J($P($P(ENTRY,"^",1),".",1),4),".",$P($P(ENTRY,"^",1),".",2),IORVOFF
  • Line Location: REVPOV+9
Routine Call
  • DIC
  • Line Location:
    • LI1+30
    • PFIN+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LEX(757.01 - [#757.01] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DISV( POV+9*, P1+7, PFIN+7*
^TMP("PXK" P+10, P+11

Label References

Name Line Occurrences
LI LI1+7
P P1+15, LI1+11, PFIN+2
P1 M+2, M+6, LI1+11, LI1+12, LI1+20, LI1+32
PFIN LI+5, LI1+8, LI1+12
POVX P1+1, P1+9, P1+11, P1+14
REVPOV LI+1, LI1+5, LI1+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT POV+8~, P+4*, P+5, P+6, P+7
COL REVPOV+3~, REVPOV+7*, REVPOV+8
>> CYCL P+3
DATA P+1!, P+12*, P1+1*, P1+2*, P1+3*, P1+4*, P1+7*, P1+9, P1+11, P1+13*
, P1+14, P1+15, LI+1, LI+2, LI+3, LI+4*, LI+5, LI1+2, LI1+3, LI1+4
, LI1+5, LI1+8, LI1+11, LI1+12*, LI1+20, LI1+21*, LI1+32*, LI1+34*, PFIN+7, POVX+1
DIC POV+8~, LI1+17!, LI1+27!, LI1+29*, PFIN+1*
DIC("A" LI1+28*
DIC("S" POV+13*, PFIN+1*
DIC(0 LI1+29*, PFIN+1*
>> DOUBLEQQ POV+11*, P+5, P+6, P+7, P+9, LI1+2, LI1+12*, LI1+40
DTIME P+12
DUZ POV+9, P1+7, PFIN+7
DXINF PFIN+5~*, PFIN+10
EDATA POV+8~, P+1!, P+12*, P1+3*, P1+4*, P1+13*, LI+5*, LI1+12*, LI1+18, LI1+34*
ENTRY REVPOV+3~, REVPOV+4*, REVPOV+9
FPL POV+8~, P+1!
>> FPRI LI+3*, LI1+5*, LI1+42*
>> I POV+6*, LI+2*
>> IOCUB LI+2
>> IOECH LI+2
>> IOELEOL P+10, P+11
>> IOINHI P+11
>> IOINLOW P+11
>> IORVOFF REVPOV+9
>> IORVON REVPOV+9
>> IOSC POV+10, P+1
>> IOUOFF POV+7
>> IOUON POV+6
>> LEAVE P1+1*, P1+14*
LINE POV+8~, LI1+5*, LI1+41*, LI1+42, REVPOV~, REVPOV+4, REVPOV+5
>> NF M+2, M+6
>> NLINE LI1+6*
>> NOREV REVPOV+2
>> POV LI1+43*, PFIN+3*, PFIN+5*, PFIN+6, PFIN+7, PFIN+12
>> PRISEC LI+3*, LI1+5*, LI1+42*
PXACS POV+1~, POV+4*, POV+5*, P+5, P+6, P+7, P+10, P+11, LI1+19*, LI1+28
PXACSREC POV+1~, POV+4*, LI1+19*, LI1+20, LI1+22, LI1+24, LI1+26, LI1+27, LI1+33
>> PXAGAIN LI1+23*
>> PXBCNT P+9, P1+15, LI+1, LI1+3
>> PXBDPOV P+10, P+11, P1+13, P1+14
PXBEDIS POV+8~, PFIN+10*, PFIN+12
>> PXBEXIT P1+9*, POVX+1*
>> PXBKY( LI1+2, LI1+3, LI1+5, LI1+40, LI1+41, PFIN+8, PFIN+9
>> PXBNPOV( PFIN+6*
>> PXBNPOVL POV+6
>> PXBNPOVL(1 POV+6, PFIN+7*
>> PXBSAM( LI+1, LI+3, LI+4, LI1+3, LI1+5, LI1+42, REVPOV+4, REVPOV+5
>> PXBSAM("" P+4
>> PXBSKY( PFIN+8, PFIN+9
>> PXBSPL P1+14*
>> PXBUT P1+1*, P1+14*
>> PXBVST POV+3
>> PXDATE LI1+23*
>> PXDEF LI1+23*
PXDXDATE POV+1~, POV+3*, POV+4, LI1+19, LI1+23, LI1+27, LI1+35, PFIN+5
PXICDDATA POV+1~, LI1+35*, LI1+36, LI1+37
PXICDROW POV+1~, POV+2*, P+8, PFIN+2*
>> PXPAUSE LI1+21*
>> PXXX LI1+23, LI1+24, LI1+25
Q LI1+4!, LI1+5, LI1+6, LI1+7
Q( LI1+6
>> REQE PFIN+12*, POVX+2*, POVX+3*
>> REQI PFIN+8*, PFIN+9*, PFIN+11*
SELINE POV+8~, LI+1*, PFIN+8, PFIN+9
TIMED POV+8~, POV+12*, P1+1
U POV+4, LI1+19, LI1+20, LI1+22, LI1+24, LI1+25, LI1+26, LI1+27, LI1+33, LI1+36
, LI1+37, PFIN+5, PFIN+10
>> VALMBCK POVX+4*
>> WHAT LI1+33*, LI1+34, LI1+35, POVX+1
X LI1+17!, LI1+18*, LI1+23, LI1+29, LI1+31, PFIN+1*
XFLAG POV+8~, LI+1*, LI+5, LI1+5*, LI1+8
XLINE REVPOV+3~, REVPOV+4*, REVPOV+5*, REVPOV+6*, REVPOV+8
Y LI+5*, LI1+8*, LI1+12*, LI1+23*, LI1+25*, LI1+32, LI1+34!, LI1+36*, LI1+40, LI1+41
, PFIN+1, PFIN+2, PFIN+5, PFIN+10, PFIN+11
Y( LI1+24*, LI1+33
Y(0 LI1+37*, LI1+43, PFIN+3, PFIN+8, PFIN+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All