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 |  Used in RPC
Print Page as PDF
Routine: GMVSC0

Package: General Medical Record - Vitals

Routine: GMVSC0


Information

GMVSC0 ;HOIFO/MD,YH,FT-CUMULATIVE VITALS/MEASUREMENTS FOR PATIENT OVER GIVEN DATE RANGE ;6/6/07

Source Information

Source file <GMVSC0.m>

Entry Points

Name Comments DBIA/ICR reference
EN1(RESULT,GMVDATA) ; GMV CUMULATIVE REPORT [RPC entry point]
; Cumulative Vitals Report
; DFN - patient internal entry number (FILE 2)
; GMRVSDT - start date/time of report range
; GMRVFDT - end date/time of report range
; GMVDEV - device name
; GMVIEN - device internal entry name (FILE 3.5)
; GMVPDT - date/time to print the report
; GMVWARD - ward internal entry number (FILE 42)
; GMVHLOC - hospital location internal entry number (FILE 44)
; GMVRMLST - list of room numbers separated by commas (e.g., 200,210)
START ; Start the report output
Q ; kill variables and quit
FOOTER ;REPORT FOOTER {called from GMVSC1, GMVSC2}
WRT ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"*** (E) - Error entry",!!
  • Line Location: FOOTER+1
Function Call: WRITE
  • Prompt: ?17,$E($P(VADM(2),"^",2),8,11)
  • Condition for execution: VADM(1)'="" ?$X-3,$E(VADM(1),1,15) W:VADM(2)'=""
  • Line Location: FOOTER+1
Function Call: WRITE
  • Prompt: ?43,$P(VADM(4),"^")_" YRS"
  • Condition for execution: VADM(3)'="" ?30,$P(VADM(3),"^",2) W:VADM(4)'=""
  • Line Location: FOOTER+1
Function Call: WRITE
  • Prompt: ?65,"VAF 10-7987j"
  • Line Location: FOOTER+3
Function Call: WRITE
  • Prompt: !,"Unit: "_$S($P(VAIN(4),"^",2)'="":$P(VAIN(4),"^",2),1:" "),?32,"Room: "_$S($P(VAIN(5),"^")'="":$P(VAIN(5),"^"),1:" "),!
  • Line Location: FOOTER+3
Function Call: WRITE
  • Prompt: "Division: "_$$DIVISION^GMVUTL1(+GMRVHLOC),!
  • Line Location: FOOTER+5

Used in RPC

RPC Name Call Tags
GMV CUMULATIVE REPORT EN1
Info |  Source |  Entry Points |  Interaction Calls |  Used in RPC