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
Print Page as PDF
Routine: GMTSVS

Package: Health Summary

Routine: GMTSVS


Information

GMTSVS ; SLC/KER - Vital Signs Component ; 02/27/2002

Source Information

Source file <GMTSVS.m>

Entry Points

Name Comments DBIA/ICR reference
OUTPAT ; Outpatient Vital Signs Main Control
ENVS ; Set up for Vitals Extraction Routine
FIRST ; First Set of Vitals
; 1 2 3 4 5 6 7 8
; Date^Temp()^Pulse^Respt^BP^Height()^Weight()^Control
FLOOP ; Loop through first set of vitals by date
FFMT ; Extract and format first set of vitals
FWRT ; Write first set of vitals by date
SECOND ; Second Set of Vitals
; 1 2 3 4 5
; Date^CVP^POx^Cir/Gir^Control
SLOOP ; Loop through second set of vitals by date
SFMT ; Extract and format second set of vitals
SWRT ; Write second set of vitals by date
THIRD ; Third Set of Vitals
TLOOP ; Loop through third set of vitals by date
TFMT ; Extract and format third set of vitals
TWRT ; Write third set of vitals by date
KILLVS ; Kill Variables
FN(X,Y) ; Format Number

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "*** No Outpatient measurements ***",!!
  • Line Location: OUTPAT+13
Function Call: WRITE
  • Prompt: "Measurement DT",?20,"TEMP",?29,"PULSE",?36,"RESP",?45,"BP",?55,"HT",?68,"WT",!
  • Line Location: FIRST+5
Function Call: WRITE
  • Prompt: ?20,"F(C)",?55,"IN(CM)",?68,"LB(KG)",!
  • Line Location: FIRST+6
Function Call: WRITE
  • Prompt: ?20,"----",?29,"-----",?36,"----",?45,"--",?55,"------",?68,"------",!!
  • Line Location: FIRST+7
Function Call: WRITE
  • Prompt: "Measurement DT",?18,"TEMP",?30,"PULSE",?36,"RESP",?41,"BP",?53,"HT",?63,"WT",!
  • Line Location: FIRST+9
Function Call: WRITE
  • Prompt: ?18,"F(C)",?53,"IN(CM)",?63,"LB(KG)[BMI]",!
  • Line Location: FIRST+10
Function Call: WRITE
  • Prompt: ?18,"----",?30,"-----",?36,"----",?41,"--",?53,"------",?63,"-----------",!!
  • Line Location: FIRST+11
Function Call: WRITE
  • Prompt: $P(ARRAY,U,1),?18,$P(ARRAY,U,2),?30,$P(ARRAY,U,3),?37,$P(ARRAY,U,4),?42,$P(ARRAY,U,5),?54,$P(ARRAY,U,6),?67,$P(ARRAY,U,7),!
  • Line Location: FWRT+3
Function Call: WRITE
  • Prompt: $P(ARRAY,U,1),?18,$P(ARRAY,U,2),?30,$P(ARRAY,U,3),?36,$P(ARRAY,U,4),?41,$P(ARRAY,U,5),?53,$P(ARRAY,U,6),?63,$P(ARRAY,U,7),!
  • Line Location: FWRT+4
Function Call: WRITE
  • Prompt: !,"Measurement DT",?18,"CVP",?32,"POx",?45,"CG"
  • Line Location: SECOND+5
Function Call: WRITE
  • Prompt: !,?18,"CMH20(MMHG)",?32,"(L/MIN)(%)",?45,"IN(CM)",!,?18,"-----------",?32,"----------",?45,"------",!!
  • Line Location: SECOND+6
Function Call: WRITE
  • Prompt: !,"Measurement DT",?18,"CVP",?34,"POx",?46,"CG"
  • Line Location: SWRT+4
Function Call: WRITE
  • Prompt: !,?18,"CMH20(MMHG)",?32,"(L/MIN)(%)",?45,"IN(CM)",!,?18,"-----------",?32,"----------",?45,"------",!!
  • Line Location: SWRT+5
Function Call: WRITE
  • Prompt: $P(ARRAY,U,1),?18,$P(ARRAY,U,2),?32,$P(ARRAY,U,3),?45,$P(ARRAY,U,4),!
  • Line Location: SWRT+7
Function Call: WRITE
  • Prompt: !,"Measurement DT",?18,"Pain"
  • Line Location: THIRD+6
Function Call: WRITE
  • Prompt: !,?18,"----",!!
  • Line Location: THIRD+7
Function Call: WRITE
  • Prompt: !,"Measurement DT",?18,"Pain"
  • Line Location: TWRT+4
Function Call: WRITE
  • Prompt: !,?18,"----",!!
  • Line Location: TWRT+5
Function Call: WRITE
  • Prompt: $P(ARRAY,U,1),?18,$P(ARRAY,U,2),!
  • Line Location: TWRT+7
Info |  Source |  Entry Points |  Interaction Calls