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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: GMRVEE1

Package: General Medical Record - Vitals

Routine: GMRVEE1


Information

GMRVEE1 ;HIRMFO/RM,YH-ENTERED IN ERROR EDIT ;7/15/97

Source Information

Source file <GMRVEE1.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
General Medical Record - Vitals 4 EN1^GMRVADM  EN4^GMRVED2  (DUPDT,DUPREC,EN1,EN2,EN3,PRTEED)^GMRVEE2  QUALIFY^GMRVEE3  
VA Fileman 3 DD^%DT  ^DIC  ^DIE  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
General Medical Record - Vitals 2 GMRVEE0  GMRVEE2  

Entry Points

Name Comments DBIA/ICR reference
RESLS ; RESELECT REASON FOR ERROR
QUIT
ENTERR ; ENTER RECORD DEFINED BY GMRDA IN ERROR
PERSON
REHLP
EN1 ; ENTRY FROM ROUTINE GMRVEE1 TO CONTINUE EDITING VITALS IN ERROR
ERREN ; EDIT A RECORD ENTERED IN ERROR
TIME
RESCH
CHKRG ; CHECK RANGE

External References

Name Field # of Occurrence
DD^%DT TIME, PERSON
^DIC ERREN+2
^DIE ERREN+1
EN1^GMRVADM TIME, PERSON
EN4^GMRVED2 ENTERR+10
DUPDT^GMRVEE2 ENTERR+2, ENTERR+3, ENTERR+4
DUPREC^GMRVEE2 TIME, PERSON
EN1^GMRVEE2 TIME
EN2^GMRVEE2 TIME+2
EN3^GMRVEE2 PERSON
PRTEED^GMRVEE2 EN1+2
QUALIFY^GMRVEE3 PERSON+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"*** DATA TO BE ENTERED IN ERROR ***"
  • Line Location: EN1+1
Function Call: READ
  • Timeout: DTIME
  • Variable: GMRX
  • Line Location: RESCH+1
Function Call: WRITE
  • Prompt: !,"Select the reason(s) for entering ",$S(GMRVITY'="A":"this vital/measurement",1:"these vital/measurements")," in error",!,"or type '^' to exit: " R GMRX:DTIME I '$T!(GMRX="^")
  • Line Location: RESCH+1
Function Call: WRITE
  • Prompt: !!,"NO UPDATING WAS DONE"
  • Line Location: RESCH+1
Function Call: WRITE
  • Prompt: !!?3,$C(7),"Answer with selection number(s) with ranges separated with hyphens (-),",!?3,"and multiple selections separated by commas (,).",!
  • Line Location: REHLP+0
Function Call: WRITE
  • Prompt: !!,?3,$C(7),"The INVALID RECORD reason cannot be used in combination with any",!?3,"other selections."
  • Line Location: REHLP+3
Function Call: WRITE
  • Prompt: "."
  • Line Location: ERREN+1
Routine Call
  • DIE
  • Line Location:
    • ERREN+1
Routine Call
  • DIC
  • Line Location:
    • ERREN+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMR(120.5 - [#120.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMR(120.5 - [#120.5] ENTERR+2, ENTERR+3, ENTERR+4, ENTERR+5, ERREN+1*
^GMRD(120.51 - [#120.51] ENTERR+6

Label References

Name Line Occurrences
CHKRG REHLP+1
ENTERR PERSON+2
ERREN ENTERR+1
QUIT TIME+1, TIME+3, PERSON+1
REHLP REHLP+1
RESCH REHLP, REHLP+3
RESLS REHLP

Naked Globals

Name Field # of Occurrence
^(0 ENTERR+5, ENTERR+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA ERREN+1*
>> DA(1 ERREN+1*, ERREN+2
>> DFN PERSON*, ENTERR+2, ENTERR+3*, ENTERR+4*, ENTERR+8*, ENTERR+10*
>> DIC ERREN+2*
>> DIC(0 ERREN+2*
>> DIE ERREN+1*
DLAYGO ERREN+2*!
>> DR ERREN+1*
DTIME RESCH+1
GBLNK QUIT!
GCHA QUIT!
GCOL QUIT!
GDATA QUIT!
>> GDATE TIME*, PERSON*, ENTERR+2*, ENTERR+3*, ENTERR+4*
>> GDFN PERSON*, ENTERR+3*, ENTERR+4*
>> GDT TIME*, PERSON*
GENTR QUIT!
GLAST QUIT!
GLINE QUIT!
GLN QUIT!
GLVL QUIT!
>> GMRARTY( EN1+2, TIME+2, PERSON+2
>> GMRARTY(0 TIME+2
GMRCHC RESCH!
GMRCHC( REHLP+1*, ERREN+2
GMRCHC(0 REHLP+3
GMRCHC(1 TIME, PERSON, ENTERR+2, ENTERR+3, ENTERR+4, ENTERR+7
GMRCHC(2 REHLP+2!, TIME+2, ENTERR+7, ENTERR+9
GMRCHC(3 REHLP+2!*, TIME, PERSON, ENTERR+2, ENTERR+3, ENTERR+4, ENTERR+8
GMRCHC(4 REHLP+2*, REHLP+3, ENTERR+1
>> GMRDA EN1+2*, PERSON+2*, ENTERR+2*, ENTERR+3*, ENTERR+4*, ENTERR+5, ERREN+1
>> GMRDAT ENTERR+5*, ENTERR+7, ENTERR+8, ENTERR+9
>> GMRDAT( ENTERR+7*
>> GMRDFN ENTERR+8*, ENTERR+10
>> GMREDB ENTERR+10*
>> GMRENTY ENTERR+10*
GMRING QUIT!
>> GMRO2( ENTERR+9*
>> GMROUT RESCH*, RESCH+1*, REHLP+1, TIME, TIME+1, TIME+2, TIME+3, PERSON, PERSON+1, CHKRG+1*
, CHKRG+2*, CHKRG+3*, CHKRG+4*, ERREN+3*
>> GMRSTR ENTERR+6*, ENTERR+7, ENTERR+9, ENTERR+10
>> GMRSTR(0 ENTERR+10*
>> GMRVDT EN1+2, PERSON, PERSON+2, ENTERR+4
>> GMRVHLOC ENTERR+8*
>> GMRVIDT TIME+2*, ENTERR+7*
>> GMRVITY RESLS+1, RESCH+1, REHLP+2, CHKRG+3, CHKRG+4
GMRVLST QUIT!
>> GMRX EN1+2*, RESCH+1*, REHLP, REHLP+1, TIME+2*, CHKRG+1*, CHKRG+2*, CHKRG+3*, CHKRG+4*
>> GMRY REHLP+1*, PERSON+2*, ENTERR+2, ENTERR+3, ENTERR+4, ENTERR+6
>> GMRY(0 REHLP+1*
>> GMRZ REHLP+1*, CHKRG+1, ERREN+2*
>> GMRZ(1 REHLP+1*, CHKRG+2, CHKRG+3
>> GMRZ(2 REHLP+1*, CHKRG+2, CHKRG+4
GORDER QUIT!
GQUAL QUIT!
>> GSAVE ENTERR+2*, ENTERR+3*, ENTERR+4*
GSIDE QUIT!
GTYPE QUIT!
>> X ERREN+2*
>> Y TIME*, PERSON*
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 |  Naked Globals |  Local Variables |  All