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

Package: VA Point of Service

Routine: VPSPDO1M


Information

VPSPDO1M ;DALOI/KML,WOIFO/BT - PDO OUTPUT DISPLAY - MEDS ;11/20/11 15:30

Source Information

Source file <VPSPDO1M.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Point of Service 2 ($$GETACTIV,$$GETDFN,$$GETDSPLY,$$GETLREFL,$$GETLSTMR,$$GETMEDNM,$$GETMFILL,$$GETMKFOL,$$GETMREFL,$$GETMTYPE,$$GETNFILL,$$GETPATRP,$$GETPROV,$$GETREMOT,$$GETRMLOC,$$GETSIG,$$GETSTAFF,ADDBLANK,ADDCJ,ADDLJ,ADDPDO,ADDUNDLN,APDNONVA,GETFORMT,GETNONVA,GETPATCM,KILNONVA,SETACTIV,SETDSPLY,SETLREFL,SETMEDNM,SETMFILL,SETMKFOL,SETMREFL,SETMTYPE,SETNFILL,SETPATCM,SETPATRP,SETPROV,SETREMOT,SETRMLOC,SETSIG)^VPSOBJ  ($$SETFLD,FCOMM,GCOMM)^VPSPUTL1  
Kernel 1 ($$FMDIFF,$$FMTE)^XLFDT  
VA FileMan 1 ($$GET1,GETS)^DIQ  

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
VA Point of Service 1 VPSPDO1  

Entry Points

Name Comments DBIA/ICR reference
MEDHDR(OREF) ; build medication sections for Patient Entered allergy medication review note
; active medications have an (RX) status of Active, Suspended, Hold, Provider Hold
; INPUT
; OREF : Object Reference for the VPS PDO object
MEDS(OREF,SAVMEDS) ; sort the displayed meds by active, NONVA, and PAST
; INPUT
; OREF : Object Reference for the VPS PDO object
; OUTPUT
; SAVMEDS : passed in by reference. array represents the list of medications to display at a given section
GET(OREF,RXSTAT,MEDITMS) ; get MED data
; INPUT
; OREF : Object Reference for the VPS PDO object
; RXSTAT : RX status. Medication list is displayed at specific sections of the note depending on status
; OUTPUT
; MEDITMS : passed in by reference. array represents the list of medications to display at a given section
BLDNONVA(OREF) ; build NON VA meds
; INPUT
; OREF : Object Reference for the VPS PDO object
BLD(OREF,MEDITMS,TYPE) ; build the array of data associated with a given medication (at the 853.54 SUB-ENTRY)
; INPUT
; OREF : Object Reference for the VPS PDO object
; MEDITMS : passed in by reference. array represents the list of medications to display at a given section
; TYPE : "ACTIVE" or "PAST" medication
SETPROPS(OREF,FLD) ; assign data to properties for ease of handling
; INPUT
; OREF : Object Reference for the VPS PDO object
; FLD : Med data by fieldname
;
NAMELINE(OREF) ; Add followup, patient response, med name to result array
; INPUT
; OREF : Object Reference for the VPS PDO object
SIGLINES(OREF) ; Add SIG lines to result array
; INPUT
; OREF : Object Reference for the VPS PDO object
PRVLINES(OREF) ; Add provider lines
; INPUT
; OREF : Object Reference for the VPS PDO object
PTCLINES(OREF) ; Add patient comments
; INPUT
; OREF : Object Reference for the VPS PDO object
ADDNONVA(OREF) ; Add Non-va patient comment
; INPUT
; OREF : Object Reference for the VPS PDO object
ADDREMOT(OREF) ; Add remote (cdw) patient comment, filled days, next fill date to result array
; INPUT
; OREF : Object Reference for the VPS PDO object
ADDLOCAL(OREF) ; Add local vista patient comment, filled days, next fill date to result array
; INPUT
; OREF : Object Reference for the VPS PDO object

External References

Name Field # of Occurrence
$$GET1^DIQ GET+12
GETS^DIQ BLD+20
$$GETACTIV^VPSOBJ MEDS+14
$$GETDFN^VPSOBJ MEDHDR+5, MEDS+6, GET+7, BLD+6, SETPROPS+5
$$GETDSPLY^VPSOBJ PRVLINES+7
$$GETLREFL^VPSOBJ SIGLINES+7
$$GETLSTMR^VPSOBJ MEDHDR+6, MEDS+7, GET+8, BLD+7, SETPROPS+6
$$GETMEDNM^VPSOBJ SETPROPS+8, NAMELINE+8
$$GETMFILL^VPSOBJ ADDREMOT+6, ADDLOCAL+9
$$GETMKFOL^VPSOBJ NAMELINE+6
$$GETMREFL^VPSOBJ SIGLINES+8
$$GETMTYPE^VPSOBJ SIGLINES+5, PRVLINES+5, ADDREMOT+9, ADDLOCAL+12
$$GETNFILL^VPSOBJ ADDREMOT+7, ADDLOCAL+10
$$GETPATRP^VPSOBJ NAMELINE+7
$$GETPROV^VPSOBJ PRVLINES+6
$$GETREMOT^VPSOBJ PTCLINES+4
$$GETRMLOC^VPSOBJ ADDREMOT+5
$$GETSIG^VPSOBJ SIGLINES+6
$$GETSTAFF^VPSOBJ MEDHDR+7, BLD+8, SETPROPS+7, NAMELINE+5
ADDBLANK^VPSOBJ MEDHDR+11, MEDS+20, ADDNONVA+12, ADDLOCAL+25
ADDCJ^VPSOBJ MEDS+10, MEDS+21, MEDS+28
ADDLJ^VPSOBJ MEDHDR+10, MEDHDR+14, MEDHDR+15, MEDHDR+16, MEDHDR+17, MEDHDR+18, MEDHDR+19, MEDS+15, MEDS+23, MEDS+31
ADDPDO^VPSOBJ NAMELINE+14, SIGLINES+17, PRVLINES+10, ADDNONVA+11, ADDREMOT+14, ADDREMOT+22, ADDREMOT+26, ADDLOCAL+16, ADDLOCAL+18, ADDLOCAL+22
, ADDLOCAL+24
ADDUNDLN^VPSOBJ MEDHDR+9, MEDHDR+20, MEDS+27
APDNONVA^VPSOBJ BLD+31
GETFORMT^VPSOBJ BLD+9, NAMELINE+4, SIGLINES+4, PRVLINES+4, ADDNONVA+4, ADDREMOT+4, ADDLOCAL+8
GETNONVA^VPSOBJ MEDS+22, BLDNONVA+4
GETPATCM^VPSOBJ ADDNONVA+5, ADDREMOT+8, ADDLOCAL+11
KILNONVA^VPSOBJ BLD+16
SETACTIV^VPSOBJ BLD+14, BLD+34
SETDSPLY^VPSOBJ SETPROPS+14
SETLREFL^VPSOBJ SETPROPS+10
SETMEDNM^VPSOBJ BLDNONVA+8, BLD+19
SETMFILL^VPSOBJ SETPROPS+16
SETMKFOL^VPSOBJ SETPROPS+22
SETMREFL^VPSOBJ SETPROPS+11
SETMTYPE^VPSOBJ BLD+15
SETNFILL^VPSOBJ SETPROPS+18
SETPATCM^VPSOBJ BLD+42
SETPATRP^VPSOBJ SETPROPS+23
SETPROV^VPSOBJ SETPROPS+13
SETREMOT^VPSOBJ SETPROPS+20
SETRMLOC^VPSOBJ SETPROPS+19
SETSIG^VPSOBJ SETPROPS+12
$$SETFLD^VPSPUTL1 NAMELINE+11, NAMELINE+12, NAMELINE+13, SIGLINES+15, SIGLINES+16, PRVLINES+8, PRVLINES+9, ADDNONVA+10, ADDREMOT+12, ADDREMOT+13
, ADDREMOT+20, ADDREMOT+21, ADDREMOT+25, ADDLOCAL+15, ADDLOCAL+16, ADDLOCAL+17, ADDLOCAL+21, ADDLOCAL+24
FCOMM^VPSPUTL1 SIGLINES+9
GCOMM^VPSPUTL1 BLD+41
$$FMDIFF^XLFDT SETPROPS+15
$$FMTE^XLFDT SETPROPS+17

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
853.54 GET1^DIQ,  GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("VPSPUTL1" SIGLINES+9*
^VPS(853.5 - [#853.5] MEDHDR+13, GET+11

Label References

Name Line Occurrences
ADDLOCAL PTCLINES+6
ADDNONVA BLDNONVA+13
ADDREMOT PTCLINES+5
BLD MEDS+13, MEDS+32
BLDNONVA MEDS+24
GET MEDS+12, MEDS+30
NAMELINE BLDNONVA+10, BLD+36
PRVLINES BLDNONVA+12, BLD+38
PTCLINES BLD+43
SETPROPS BLDNONVA+9, BLD+35
SIGLINES BLDNONVA+11, BLD+37

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACTIVE MEDS+14~*, MEDS+15
COL BLD+9~, BLD+41, NAMELINE+4~, SIGLINES+4~, PRVLINES+4~, ADDNONVA+4~, ADDREMOT+4~, ADDLOCAL+8~
COL("COMMENTS" ADDNONVA+10, ADDREMOT+20, ADDLOCAL+15
COL("DAYS SUP PLIED" , PRVLINES+9
COL("FILLED" ADDREMOT+13, ADDLOCAL+16, ADDLOCAL+21
COL("FOLLOWUP" NAMELINE+11
COL("MEDNAME" NAMELINE+13
COL("NEXTFILL" ADDREMOT+21, ADDREMOT+25, ADDLOCAL+17, ADDLOCAL+24
COL("PATRESP" NAMELINE+12
COL("PROVIDER" PRVLINES+8
COL("REFILLS" SIGLINES+16
COL("REMOTE" ADDREMOT+12
COL("SIG" SIGLINES+9, SIGLINES+15
DAYSUPLY PRVLINES+7~*, PRVLINES+9
DT SETPROPS+15
FILLED ADDREMOT+6~*, ADDREMOT+13, ADDLOCAL+9~*, ADDLOCAL+16, ADDLOCAL+21
FIRST ADDREMOT+17~*, ADDREMOT+21*, ADDLOCAL+7~*, ADDLOCAL+16*, ADDLOCAL+17
FLD BLD+23~, BLD+25*, BLD+26*, BLD+27*, BLD+31!, BLD+35, BLD+44!, SETPROPS~
FLD( BLD+25*, BLD+27*, BLD+30, SETPROPS+10, SETPROPS+11, SETPROPS+12, SETPROPS+13, SETPROPS+14, SETPROPS+15, SETPROPS+17
, SETPROPS+19, SETPROPS+20, SETPROPS+21, SETPROPS+23
INEX BLD+23~, BLD+25*, BLD+27*
ISNONVA BLD+30~*, BLD+31
LAST SIGLINES+11~*, SIGLINES+16
LFTREFIL SIGLINES+7~*, SIGLINES+16
LMRARDT MEDHDR+6~*, MEDHDR+13, MEDS+7~*, GET+8~*, GET+11, GET+12, BLD+7~*, BLD+20, BLD+27, BLD+41
, SETPROPS+6~*
MARKFOL SETPROPS+21~*, SETPROPS+22*, NAMELINE+6~*, NAMELINE+11
MAXREFIL SIGLINES+8~*, SIGLINES+16
MEDIEN GET+10~*, GET+11*, GET+12, GET+14
MEDITMS MEDS+11~, MEDS+12, MEDS+13, MEDS+16, MEDS+17!, MEDS+29~, MEDS+30, MEDS+31, MEDS+32, MEDS+33
, MEDS+34!, GET~, BLD~
MEDITMS( GET+14*, BLD+18
MEDLST BLD+20~, BLD+44!
MEDLST( BLD+27
MEDNAME GET+12~*, GET+13, GET+14
MEDTYPE ADDREMOT+9~*, ADDLOCAL+12~*
MFILL SETPROPS+15~*, SETPROPS+16
MIEN BLD+13~*, BLD+18*, BLD+20, BLD+27, BLD+41
NAME BLDNONVA+5~*, BLDNONVA+7*, BLDNONVA+8, BLD+12~*, BLD+18*, BLD+19, BLD+25, BLD+27, BLD+30, SETPROPS+8~*
, SETPROPS+10, SETPROPS+11, SETPROPS+12, SETPROPS+13, SETPROPS+14, SETPROPS+15, SETPROPS+17, SETPROPS+19, SETPROPS+20, SETPROPS+21
, SETPROPS+23, NAMELINE+8~*, NAMELINE+13
NEXTFILL ADDLOCAL+6~*, ADDLOCAL+17*, ADDLOCAL+24
NONVA MEDS+22~, MEDS+23, MEDS+24, BLDNONVA+4~, BLDNONVA+9, BLDNONVA+15!, BLD+11~
NONVA( BLDNONVA+7
NSIG SIGLINES+9~
NSIG( SIGLINES+14, SIGLINES+15
NSIG("" SIGLINES+11
NXFILLDT SETPROPS+17~*, SETPROPS+18, ADDREMOT+7~*, ADDREMOT+21, ADDREMOT+25, ADDLOCAL+10~*, ADDLOCAL+17, ADDLOCAL+24
OREF MEDHDR~, MEDHDR+5, MEDHDR+6, MEDHDR+7, MEDHDR+9, MEDHDR+10, MEDHDR+11, MEDHDR+14, MEDHDR+15, MEDHDR+16
, MEDHDR+17, MEDHDR+18, MEDHDR+19, MEDHDR+20, MEDS~, MEDS+6, MEDS+7, MEDS+10, MEDS+12, MEDS+13
, MEDS+14, MEDS+15, MEDS+20, MEDS+21, MEDS+22, MEDS+23, MEDS+24, MEDS+27, MEDS+28, MEDS+30
, MEDS+31, MEDS+32, GET~, GET+7, GET+8, BLDNONVA~, BLDNONVA+4, BLDNONVA+8, BLDNONVA+9, BLDNONVA+10
, BLDNONVA+11, BLDNONVA+12, BLDNONVA+13, BLD~, BLD+6, BLD+7, BLD+8, BLD+9, BLD+14, BLD+15
, BLD+16, BLD+19, BLD+31, BLD+34, BLD+35, BLD+36, BLD+37, BLD+38, BLD+42, BLD+43
, SETPROPS~, SETPROPS+5, SETPROPS+6, SETPROPS+7, SETPROPS+8, SETPROPS+10, SETPROPS+11, SETPROPS+12, SETPROPS+13, SETPROPS+14
, SETPROPS+16, SETPROPS+18, SETPROPS+19, SETPROPS+20, SETPROPS+22, SETPROPS+23, NAMELINE~, NAMELINE+4, NAMELINE+5, NAMELINE+6
, NAMELINE+7, NAMELINE+8, NAMELINE+14, SIGLINES~, SIGLINES+4, SIGLINES+5, SIGLINES+6, SIGLINES+7, SIGLINES+8, SIGLINES+17
, PRVLINES~, PRVLINES+4, PRVLINES+5, PRVLINES+6, PRVLINES+7, PRVLINES+10, PTCLINES~, PTCLINES+4, PTCLINES+5, PTCLINES+6
, ADDNONVA~, ADDNONVA+4, ADDNONVA+5, ADDNONVA+11, ADDNONVA+12, ADDREMOT~, ADDREMOT+4, ADDREMOT+5, ADDREMOT+6, ADDREMOT+7
, ADDREMOT+8, ADDREMOT+9, ADDREMOT+14, ADDREMOT+22, ADDREMOT+26, ADDLOCAL~, ADDLOCAL+8, ADDLOCAL+9, ADDLOCAL+10, ADDLOCAL+11
, ADDLOCAL+12, ADDLOCAL+16, ADDLOCAL+18, ADDLOCAL+22, ADDLOCAL+24, ADDLOCAL+25
PATCOMM BLD+41~, BLD+42, BLD+44!, ADDNONVA+5~, ADDNONVA+7, ADDREMOT+8~, ADDREMOT+24, ADDLOCAL+11~, ADDLOCAL+20
PATCOMM( ADDNONVA+9, ADDNONVA+10, ADDREMOT+19, ADDREMOT+20, ADDLOCAL+14, ADDLOCAL+15
PATRESP NAMELINE+7~*, NAMELINE+12
PROVIDER PRVLINES+6~*, PRVLINES+8
PTIEN MEDHDR+5~*, MEDHDR+13, MEDS+6~*, GET+7~*, GET+11, GET+12, BLD+6~*, BLD+20, BLD+27, BLD+41
, SETPROPS+5~*
REMLOC ADDREMOT+5~*, ADDREMOT+12
REMOTE PTCLINES+4~*, PTCLINES+5, PTCLINES+6
RSS ADDNONVA+8~*, ADDNONVA+9*, ADDNONVA+10, ADDREMOT+16~*, ADDREMOT+19*, ADDREMOT+20, ADDLOCAL+5~*, ADDLOCAL+14*, ADDLOCAL+15
RXSTAT MEDS+11~, MEDS+12*, MEDS+29~, MEDS+30*, GET~, GET+11
SAVMEDS MEDS~, MEDS+16!*, MEDS+33*
SIG SIGLINES+6~, SIGLINES+9
SIG(1 SIGLINES+6*
STAFF MEDHDR+7~*, MEDHDR+19, BLD+8~*, BLD+41, SETPROPS+7~*, SETPROPS+22, NAMELINE+5~*, NAMELINE+11
SUB SIGLINES+12~*, SIGLINES+14*, SIGLINES+15, SIGLINES+16
TYPE BLD~, BLD+15, BLD+31, SIGLINES+5~*, SIGLINES+16, PRVLINES+5~*, PRVLINES+9, ADDREMOT+21, ADDREMOT+24, ADDLOCAL+17
, ADDLOCAL+24
U SIGLINES+9
VPSX NAMELINE+10~*, NAMELINE+11*, NAMELINE+12*, NAMELINE+13*, NAMELINE+14, SIGLINES+15~*, SIGLINES+16*, SIGLINES+17, PRVLINES+8~*, PRVLINES+9*
, PRVLINES+10, ADDNONVA+10*, ADDNONVA+11, ADDREMOT+11~*, ADDREMOT+12*, ADDREMOT+13*, ADDREMOT+14, ADDREMOT+20*, ADDREMOT+21*, ADDREMOT+22
, ADDREMOT+25*, ADDREMOT+26, ADDLOCAL+4~*, ADDLOCAL+15*, ADDLOCAL+16*, ADDLOCAL+17*, ADDLOCAL+18, ADDLOCAL+21*, ADDLOCAL+22, ADDLOCAL+24*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All