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 ; 3/27/02 4:48pm

Source Information

Source file <PXBPL.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
PCE Patient Care Encounter 6 (LOC,REVPOV,TERM,WIN17)^PXBCC  EN0^PXBDPRV  POV^PXBGPOV  PRV^PXBGPRV  PRV^PXBPPRV  HELP1^PXBUTL1  
VA Fileman 3 ^DIE  GETS^DIQ  ^DIR  
Lexicon Utility 1 EN^LEXCODE  
Problem List 1 CREATE^GMPLUTL  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
PCE Patient Care Encounter 1 PXBMPOV  

Entry Points

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

External References

Name Field # of Occurrence
^DIE PR+16
GETS^DIQ PR+11
^DIR PRMPT+5, SELECT+26
CREATE^GMPLUTL LOOP+19, SEND+18
EN^LEXCODE LOOP+17, SEND+16
LOC^PXBCC R+1
REVPOV^PXBCC SELECT+25
TERM^PXBCC SEND+2
WIN17^PXBCC SET+2
EN0^PXBDPRV R+1
POV^PXBGPOV R+2
PRV^PXBGPRV PRV+2
PRV^PXBPPRV R
HELP1^PXBUTL1 PR+3

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 (eg 1,3,4,7,3-6,2-5): "
  • Line Location: SELECT+3
Function Call: WRITE
  • Prompt: !,"Enter the ITEM numbers of the entries you whish to add to the PROBLEM LIST."
  • Line Location: SELECT+16
Function Call: WRITE
  • Prompt: OK
  • Line Location: SELECT+19
Function Call: WRITE
  • Prompt: IOEDEOP
  • Line Location: R+0
Routine Call
  • DIE
  • Line Location:
    • PR+16
Routine Call
  • DIR
  • Line Location:
    • PRMPT+5
    • SELECT+26

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+20
PRV R+1
R R
SELECT SELECT+16, SELECT+26

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+26!
DIR("A" PRMPT+3*, PRMPT+4*, SELECT+26*
DIR("B" PRMPT+2*, SELECT+26*
DIR(0 PRMPT+1*, SELECT+26*
DR PR+7~, PR+15*
DTIME SELECT+3, PR+3
DUZ SELECT+18, SELECT+19
ERROR R!
FLAG SET+1~, SELECT+24*, SELECT+26, PRV+1
>> FROM PRV+2*, R*
ICDCODE SET+1~, LOOP+15*, LOOP+16, LOOP+17, SEND+1~, SEND+14*, SEND+15, SEND+16
>> IOEDEOP R
>> IORVOFF PR+2
>> IORVON SEND+2, PR+2
LEXS LOOP+17!, SEND+16!
LEXS("ICD" LOOP+18, SEND+17
NOPLLIST SET+3, LOOP+21!
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
>> PXBCNT SET+2, PRMPT+3, PRMPT+4, SELECT+2, SELECT+3
PXBI SELECT+9~, SELECT+10*
PXBJ SELECT+9~, SELECT+11*
PXBK SELECT+9~, SELECT+11*
>> PXBKY( SEND+4, SEND+14
>> PXBLEN SELECT+15*, SELECT+21*, LOOP+1*
>> PXBPIECE SELECT+21*, SELECT+22, SELECT+23, SELECT+25, LOOP+1*, LOOP+2, LOOP+3, LOOP+5, LOOP+7, LOOP+15
, PR+8
PXBPL SET+1~, LOOP+19, SEND+1~, SEND+18
PXBPL( LOOP+14*, SEND+13*
PXBPL("DIAGNOSIS" LOOP+7*, SEND+6*
PXBPL("LEXICON" LOOP+18*, SEND+17*
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+19, SEND+18, PR+1, PR+6, PR+15
>> PXBRES(0 PR+2
>> PXBSAM( SELECT+23, LOOP+3, LOOP+5, LOOP+15, SEND+4, SEND+14
>> PXBSKY( LOOP+7, PR+8
>> PXBVST PRV+2, R+2, LOOP+8, LOOP+14, SEND+7, SEND+13
>> PXI SELECT+21*, LOOP+1*
PXII LOOP+10~, LOOP+12*, LOOP+13, LOOP+14, SEND+9~, SEND+11*, SEND+12, SEND+13
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
>> REQE SEND+4, SEND+14
>> REQI LOOP+6, SEND+5, SEND+6
Y PRMPT+6, SELECT+26!
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