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

Package: PCE Patient Care Encounter

Routine: PXBPL


Information

PXBPL ;ISL/JVS - ADD DIAGNOSIS TO PROBLEM LIST ;17 Jul 2013 11:21 AM

Source Information

Source file <PXBPL.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
PCE Patient Care Encounter 9 (LOC,TERM,WIN17)^PXBCC  DPOV4^PXBDPOV  EN0^PXBDPRV  POV^PXBGPOV  PRV^PXBGPRV  REVPOV^PXBPPOV  PRV^PXBPPRV  HELP1^PXBUTL1  
($$ACTDT,$$CSDATE)^PXDXUTL  
VA FileMan 3 ^DIE  GETS^DIQ  ^DIR  
Lexicon Utility 1 EN^LEXCODE  
Problem List 1 CREATE^GMPLUTL  

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

Package Total Caller Graph
PCE Patient Care Encounter 1 PXBMPOV  

Entry Points

Name Comments DBIA/ICR reference
SET ;--SETUP AND NEW VARIABLES
PRMPT ;--Ask if you want to put entries in PL
SELECT ;--Select entries for PL
PRV ;--Ask for provider
R
LOOP ;--Loop through diagnoses
SEND ;--Entry point to send data to problem list
PR ;

External References

Name Field # of Occurrence
^DIE PR+16
GETS^DIQ PR+11
^DIR PRMPT+5, SELECT+27
CREATE^GMPLUTL LOOP+22, SEND+21
EN^LEXCODE LOOP+18, SEND+17
LOC^PXBCC PRMPT+1, PRV+4, R+1
TERM^PXBCC SEND+2
WIN17^PXBCC SET+2
DPOV4^PXBDPOV SELECT+24
EN0^PXBDPRV R+1
POV^PXBGPOV R+2
PRV^PXBGPRV PRV+2
REVPOV^PXBPPOV SELECT+26
PRV^PXBPPRV R
HELP1^PXBUTL1 PR+3
$$ACTDT^PXDXUTL LOOP+19, SEND+18
$$CSDATE^PXDXUTL LOOP+17, LOOP+21, SEND+16, SEND+20

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"THIS IS NOT AN ENTRY POINT"
  • Line Location: PXBPL+5
Function Call: WRITE
  • Prompt: !
  • Line Location: SELECT+1
Function Call: WRITE
  • Prompt: !,"Select 1 or several Diagnoses (e.g. 1,3,4,7,3-6,2-5): "
  • Line Location: SELECT+3
Function Call: WRITE
  • Prompt: !,"Enter the ITEM numbers of the entries you wish to add to the PROBLEM LIST."
  • Line Location: SELECT+16
Function Call: WRITE
  • Prompt: OK
  • Line Location: SELECT+19
Function Call: WRITE
  • Prompt: PXBLANKS
  • Line Location: PRV+4
Function Call: WRITE
  • Prompt: IOEDEOP
  • Line Location: R+0
Routine Call
  • DIE
  • Line Location:
    • PR+16
Routine Call
  • DIR
  • Line Location:
    • PRMPT+5
    • SELECT+27

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNVPOV - [#9000010.07] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVPOV - [#9000010.07] LOOP+7
^AUPNVSIT - [#9000010] LOOP+8, LOOP+14, SEND+7, SEND+13
^DISV( SELECT+18*, SELECT+19

Label References

Name Line Occurrences
PR LOOP+23
PRV R+1
R R
SELECT SELECT+16, SELECT+27

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA PR+7~, PR+8*, PR+11, PR+13
DATA SET+1~, R+1
DIE PR+7~, PR+15*
DIR PRMPT+5!, SELECT+27!
DIR("A" PRMPT+3*, PRMPT+4*, SELECT+27*
DIR("B" PRMPT+2*, SELECT+27*
DIR(0 PRMPT+1*, SELECT+27*
DR PR+7~, PR+15*
DTIME SELECT+3, PR+3
DUZ SELECT+18, SELECT+19
ERROR R!
FLAG SET+1~, SELECT+25*, SELECT+27, PRV+1
>> FROM PRV+2*, R*
ICDCODE SET+1~, LOOP+15*, LOOP+16, LOOP+18, SEND+1~, SEND+14*, SEND+15, SEND+17
>> IOEDEOP R
>> IORVOFF PR+2
>> IORVON SEND+2, PR+2
LEXS LOOP+18!, SEND+17!
LEXS( LOOP+20, SEND+19
NOPLLIST SET+3, LOOP+24!
OK SET+1~, SELECT+2*, SELECT+3*, SELECT+4*, SELECT+5*, SELECT+8, SELECT+10, SELECT+11*, SELECT+16, SELECT+18
, SELECT+19*, SELECT+21, LOOP+1, SEND+1~, PR+3*
>> PATIENT LOOP+4, SEND+3
PIECE SELECT+9~, SELECT+10*, SELECT+11
PXACSID LOOP+19*, LOOP+20, LOOP+24!, SEND+1~, SEND+18*, SEND+19
PXACSREC LOOP+19*, LOOP+24!, SEND+1~, SEND+18*
PXBCNT SET+2, PRMPT+3, PRMPT+4, SELECT+2, SELECT+3, SELECT+24, PRV+2!
PXBI SELECT+9~, SELECT+10*
PXBJ SELECT+9~, SELECT+11*
PXBK SELECT+9~, SELECT+11*
>> PXBKY( SEND+4, SEND+14
PXBLANKS PRV+3~*, PRV+4
>> PXBLEN SELECT+15*, SELECT+21*, LOOP+1*
>> PXBPIECE SELECT+21*, SELECT+22, SELECT+23, SELECT+24, SELECT+26, LOOP+1*, LOOP+2, LOOP+3, LOOP+5, LOOP+7
, LOOP+15, PR+8
PXBPL SET+1~, LOOP+22, SEND+1~, SEND+21
PXBPL( LOOP+14*, SEND+13*
PXBPL("DIAGNOSIS" LOOP+7*, SEND+6*
PXBPL("DX_DATE_OF_INTEREST" LOOP+21*, SEND+20*
PXBPL("LEXICON" LOOP+20*, SEND+19*
PXBPL("LOCATION" LOOP+8*, SEND+7*
PXBPL("NARRATIVE" LOOP+5*, SEND+4*
PXBPL("PATIENT" LOOP+4*, SEND+3*
PXBPL("PROVIDER" LOOP+6*, SEND+5*
PXBPLARR PR+7~, PR+10!
PXBPLARR( PR+13
PXBPLERR PR+7~, PR+10!, PR+12
PXBPLPOV PR+7~, PR+9*, PR+11, PR+13
>> PXBRES LOOP+22, SEND+21, PR+1, PR+6, PR+15
>> PXBRES(0 PR+2
>> PXBSAM( SELECT+23, SELECT+24, LOOP+3, LOOP+5, LOOP+15, SEND+4, SEND+14
>> PXBSKY( LOOP+7, PR+8
>> PXBVST PRV+2, R+2, LOOP+8, LOOP+14, LOOP+17, LOOP+21, SEND+7, SEND+13, SEND+16, SEND+20
>> PXI SELECT+21*, LOOP+1*
PXII LOOP+10~, LOOP+12*, LOOP+13, LOOP+14, SEND+9~, SEND+11*, SEND+12, SEND+13
PXPRVLIN SET+1~, SET+2*, SELECT+3*, SELECT+16*, SELECT+27*, PRV+4
PXSCSTR LOOP+10~, LOOP+11*, LOOP+13, SEND+9~, SEND+10*, SEND+12
PXTYP LOOP+10~, LOOP+13*, LOOP+14, SEND+9~, SEND+12*, SEND+13
PXVDATE LOOP+17*, LOOP+18, LOOP+19, LOOP+24!, SEND+1~, SEND+16*, SEND+17, SEND+18
>> REQE SEND+4, SEND+14
>> REQI LOOP+6, SEND+5, SEND+6
U LOOP+19, SEND+18
Y PRMPT+6, SELECT+27!
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