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

Package: General Medical Record - Vitals

Routine: GMRVSC0


Information

GMRVSC0 ;HIOFO/MD,YH,FT-CUMULATIVE VITALS/MEASUREMENTS FOR PATIENT OVER GIVEN DATE RANGE ;9/27/07

Source Information

Source file <GMRVSC0.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
General Medical Record - Vitals 3 FOOTER^GMRVSC0  (PRT,SETAR,SETAR1)^GMRVSC1  HDR^GMRVSC2  
VA FileMan 3 ^%DT  NOW^%DTC  ($$GET1,D)^DIQ  
Kernel 1 ^%ZISC  
Registration 1 (DEM,INP,KVAR)^VADPT  

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

Package Total Caller Graph
General Medical Record - Vitals 5 GMRV CUMULATIVE V/M  GMRVORP CUM REPORT  GMRVSC0  GMRVSC1  GMRVSC2  
Barcode Medication Administration 1 PSBOVT  
Nursing Service 1 NURCVPR0  
Order Entry Results Reporting 1 ORPRS14  

Entry Points

Name Comments DBIA/ICR reference
DATE ;W !,"CALLED BY IA 1444 - NURSING, BCMA"
FOOTER ;REPORT FOOTER SUBROUTINE
EN3(DFN,GMRVSDT,GMRVFDT) ; APPLICATION PROGRAM INTERFACE FOR PATIENT CUMULATIVE VITALS REPORT
; INPUT VARIABLES: DFN=PATIENT NUMBER
; GMRVSDT=START DATE
; GMRVFDT=FINISH DATE OF REPORT
EN5 ;CALLED BY [NURCPP-VIT-CUM] - IA 1444, NURSING, BCMA
Q3

External References

Name Field # of Occurrence
^%DT DATE+1, DATE+3
NOW^%DTC DATE+4, EN5+2
^%ZISC Q3+3
$$GET1^DIQ FOOTER+5
D^DIQ EN5+2
FOOTER^GMRVSC0 Q3+1
PRT^GMRVSC1 EN5+9
SETAR^GMRVSC1 EN5+5
SETAR1^GMRVSC1 EN5+5
HDR^GMRVSC2 EN5+6
DEM^VADPT EN5+1
INP^VADPT EN5+1
KVAR^VADPT Q3+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?3,"PRINTED REPORTS MUST BE QUEUED!!",$C(7)
  • Line Location: GMRVSC0+16
Function Call: WRITE
  • Prompt: !,?3,$C(7),"THE START DATE MUST BE BEFORE THE END DATE OF THIS REPORT"
  • Line Location: DATE+6
Function Call: WRITE
  • Prompt: !!,"*** (E) - Error entry",!!
  • Line Location: FOOTER+1
Function Call: WRITE
  • Prompt: ?17,$P($P(VADM(2),"^",2),"-",3)
  • 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: "_$S(GMRVHLOC>0:$$GET1^DIQ(4,+$$GET1^DIQ(44,+GMRVHLOC,3,"I"),.01,"I"),1:""),!
  • Line Location: FOOTER+5
Function Call: WRITE
  • Prompt: !!,"No cumulative vitals data for "_$S($D(OPSPNM):ORSPNM,1:"this patient"),!
  • Line Location: EN5+7
Function Call: WRITE
  • Prompt: !
  • Line Location: Q3+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: Q3+1
Function Call: WRITE
  • Prompt: !
  • Line Location: Q3+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] GET1^DIQ
^SC - [#44] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42 - [#42] FOOTER+4
^GMRD(120.51 - [#120.51] EN5+5
^GMRD(120.52 - [#120.52] EN5+3
^TMP($J EN5+4!, EN5+7, EN5+9, Q3+2!

Label References

Name Line Occurrences
DATE DATE+6
Q3 EN5+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DATE+4, EN5+2
%DT DATE+1*!, DATE+3*!
%DT("A" DATE+1*, DATE+3*
%DT("B" DATE+1*, DATE+3*
DFN EN3~
DT DATE+4
DTIME Q3+1
GBED EN5+1*, Q3+2!
GMR1ST EN5+2*, Q3+2!
GMRDAT Q3+2!
>> GMRDATE EN5+8*, EN5+9*
>> GMRDATE(0 EN5+2*
GMRDSH EN5+2*, Q3+2!
GMRLN Q3+2!
>> GMROUT DATE+1*, DATE+3*, EN5+1*, EN5+7*, EN5+9, Q3+1*
GMRPDT EN5+2*, Q3+2!
GMRPG EN5+1*, Q3+3!
GMRQUAL Q3+2!
GMRSITE Q3+2!
GMRSP Q3+2!
GMRVDA Q3+2!
GMRVDATE Q3+2!
>> GMRVDT( EN5+9
GMRVFDT DATE+7*, EN3~, Q3+3!
>> GMRVHLOC FOOTER+4*, FOOTER+5
GMRVITY EN5+5*, Q3+2!
GMRVOR EN3+5*, Q3+1, Q3+2!
GMRVSDT DATE+2*, DATE+6, EN3~, Q3+3!
GMRVTY EN5+4*, EN5+5, Q3+2!
GMRVX Q3+2!
GMRX DATE+1, Q3+2!
GMRY Q3+2!
GPEDIS EN5+3~*
GWARD EN5+1*, Q3+2!
GX Q3+2!
IO EN5+6
IOSL Q3
IOST Q3+1
>> OPSPNM EN5+7
>> ORSPNM EN5+7, Q3+3
VA Q3+2!
>> VADM(1 FOOTER+1
>> VADM(2 FOOTER+1
>> VADM(3 FOOTER+1
>> VADM(4 FOOTER+1
>> VADM(5 FOOTER+2
>> VAIN(4 FOOTER+3, FOOTER+4, EN5+1
>> VAIN(5 FOOTER+3, EN5+1
>> X DATE+3, Q3*, Q3+1*
>> Y DATE+1, DATE+2, DATE+4*, DATE+5*, DATE+6, DATE+7, EN5+2*
>> ZTQUEUED Q3+3
>> ZTREQ Q3+3*
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