Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: VPRHSX

Package: Virtual Patient Record

Routine: VPRHSX


Information

VPRHSX ;SLC/MKB -- HS Mgt Options ;09/18/18 4:36pm

Source Information

Source file <VPRHSX.m>

Entry Points

Name Comments DBIA/ICR reference
ON ; -- Turn monitoring on/off [VPR HS ENABLE]
SURE() ; -- are you sure?
PATS ; -- Inquire if patient is subscribed [VPR HS PATIENTS]
P1
GET ; -- Add patient/container/record to GET list [VPR HS PUSH]
LAST ; -- Reset last seq# [VPR HS CLEAR LIST]
LOG ; -- Turn update logging on/off for debugging [VPR HS LOG]
ACTION() ; -- select log action
OFF ; -- turn off logging?
KILL ; remove log too?
VIEW ; -- display ^XTMP log
V1
HDR ; -- write captions
DATE() ; -- select a date from ^XTMP("VPRHS",date)
NUM(DAY) ; -- select a starting seq#
N1
READ ; -- continue?

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7)
  • Line Location: ON+7
Function Call: WRITE
  • Prompt: !,"WARNING: Turning off data monitoring will cause the Regional Health Connect"
  • Line Location: ON+8
Function Call: WRITE
  • Prompt: !," server to become out of synch with VistA!!",!
  • Line Location: ON+9
Function Call: WRITE
  • Prompt: !," *** Do NOT proceed unless directed to do so by Health Product Support"
  • Line Location: ON+10
Function Call: WRITE
  • Prompt: !," or VPR development staff!",!
  • Line Location: ON+11
Function Call: WRITE
  • Prompt: !
  • Line Location: ON+12
Function Call: WRITE
  • Prompt: !
  • Line Location: P1+0
Function Call: WRITE
  • Prompt: !,"DFN: "_+PAT
  • Line Location: P1+3
Function Call: WRITE
  • Prompt: !,"ICN: "_$S(ICN>0:ICN,1:$P(ICN,U,2))
  • Line Location: P1+4
Function Call: WRITE
  • Prompt: !,">> Patient DIED on "_$$FMTE^XLFDT(X)
  • Line Location: P1+6
Function Call: WRITE
  • Prompt: !,">> TEST PATIENT"
  • Line Location: P1+7
Function Call: WRITE
  • Prompt: !,">> Patient is being MERGED"_$S(X:" into DFN "_X,1:"")
  • Line Location: P1+10
Function Call: WRITE
  • Prompt: !
  • Line Location: P1+11
Function Call: WRITE
  • Prompt: !!,"OUT OF ORDER",$C(7)
  • Line Location: LAST+1
Function Call: WRITE
  • Prompt: !,"NOTE: Data monitoring is not running!!"
  • Line Location: LOG+2
Function Call: WRITE
  • Prompt: !!,"Upload list logging is currently OFF",!
  • Line Location: LOG+6
Function Call: WRITE
  • Prompt: !!,"Upload list logging is currently ON",!
  • Line Location: LOG+15
Function Call: WRITE
  • Prompt: !
  • Line Location: LOG+16
Function Call: WRITE
  • Prompt: !
  • Line Location: V1+4
Function Call: WRITE
  • Prompt: !,SEQ,?10,DFN,?20,STR
  • Line Location: V1+8
Function Call: WRITE
  • Prompt: !
  • Line Location: V1+9
Function Call: WRITE
  • Prompt: !!,"SEQ",?10,"DFN",?20,$$HTE^XLFDT(VPRH)
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: " for ",$P(PAT,U,2)
  • Condition for execution: PAT
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",79)
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,"There are no log entries to display."
  • Line Location: DATE+3
Function Call: WRITE
  • Prompt: !,"Starting sequence#: FIRST// "
  • Line Location: N1+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: N1+1
Function Call: WRITE
  • Prompt: !!,"Sequence numbers for this date are "_A_"-"_Z,!
  • Line Location: N1+4
Function Call: WRITE
  • Prompt: !!,"Press <return> to continue ..."
  • Line Location: READ+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VPR - [#560] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call