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

Package: General Medical Record - IO

Routine: GMRYRP5


Information

GMRYRP5 ;HIRMFO/YH,RM-PATIENT SEARCH BY MAS WARD ;11/7/95

Source Information

Source file <GMRYRP5.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
General Medical Record - IO 1 ROOMSEL^GMRYUT12  
Kernel 1 EN^XQH  
Registration 1 (1,DEM,INP,KVAR)^VADPT  
VA FileMan 1 ^DIC  

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

Package Total Caller Graph
General Medical Record - IO 2 GMRYED0  GMRYED3  

Entry Points

Name Comments DBIA/ICR reference
MASPT
Q
WARDPAT ; SELECT EDIT BY 1. UNIT, 2. SELECTED ROOMS ON UNIT, 3. PATIENT
WP1 ;
WARDSEL ; SELECT SEARCH WARD
PATDAT ;
HOSP
WARD ; SORT PATIENTS ON WARD
WSA1 ; STORE SELECTED WARD/ROOM PATIENTS IN ^TMP("GMRPT",$J)
ROOM ; SELECT ROOMS ON A GIVEN WARD
S3
RMCHK ;

External References

Name Field # of Occurrence
^DIC WARDSEL+2, PATDAT+1, HOSP
ROOMSEL^GMRYUT12 S3
1^VADPT PATDAT+3
DEM^VADPT WSA1+1
INP^VADPT WSA1+1
KVAR^VADPT PATDAT+4, WSA1+1
EN^XQH WP1+1

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: GMREDB
  • Timeout: DTIME
  • Line Location: WARDPAT+1
Function Call: WRITE
  • Prompt: !!,"Enter A for all patients on a unit,",!," S for the selected rooms on unit, or",!," P for a patient.",!!
  • Line Location: WARDPAT+2
Function Call: WRITE
  • Prompt: !,$C(7),?5,"INVALID ENTRY ??"
  • Line Location: WARDPAT+4
Function Call: WRITE
  • Prompt: !,*7,"**** NO PATIENTS REGISTERED ON UNIT ",$P(^DIC(42,GMRWARD,0),U)," ****"
  • Line Location: WARDSEL+4
Function Call: WRITE
  • Prompt: !!,"Unit "_GMRWARD(1)_" has the following Rooms:",!
  • Line Location: S3+0
Function Call: WRITE
  • Prompt: !!,"Select the NUMBER(S) of the Rooms: "
  • Line Location: S3+1
Function Call: READ
  • Variable: GMRRMST
  • Timeout: DTIME
  • Line Location: S3+2
Function Call: WRITE
  • Prompt: !,?5,"Type in number(s) associated with the rooms you want,",!,?5,"separated by commas or hyphens if there is more than one room",!,?5,"(e.g., 1-3,5 would be entries 1,2,3 and 5)."
  • Line Location: S3+3
Function Call: WRITE
  • Prompt: $C(7)," ??"
  • Line Location: S3+4
Function Call: WRITE
  • Prompt: !?5,$C(7),"Please select a number between 1 and ",GMRMSL
  • Line Location: RMCHK+1
Routine Call
  • DIC
  • Line Location:
    • WARDSEL+2
    • PATDAT+1
    • HOSP

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^DIC(42 - [#42] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(405.4 - [#405.4] WP1+1, ROOM+2
^DIC(42 - [#42] WARDSEL+4, WARDSEL+5, HOSP
^DPT("CN" WARDSEL+3, WSA1+3
^SC - [#44] HOSP
^TMP("GMRPT" PATDAT+4*, WARD+1!, WSA1+2*

Label References

Name Line Occurrences
PATDAT WP1+2
Q MASPT
RMCHK S3+5
ROOM MASPT
S3 S3+3, S3+4, S3+5
WARD MASPT
WARDPAT MASPT, WARDPAT+2, WARDPAT+4, WP1+1
WARDSEL WP1+1
WP1 WARDPAT+3
WSA1 WSA1+4

Naked Globals

Name Field # of Occurrence
^(0 HOSP, ROOM+2
^(44 WARDSEL+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN WARDSEL+3*, WARDSEL+4, PATDAT+1*, PATDAT+2, PATDAT+4, WSA1+2, WSA1+3*, WSA1+4
DIC WARDSEL+1*, WARDSEL+2!, PATDAT+1*!, HOSP*!
DIC("A" HOSP*
DIC("B" HOSP*
DIC("S" WARDSEL+1*, HOSP*
DIC(0 WARDSEL+1*, PATDAT+1*, HOSP*
DTIME WARDPAT+1, S3+2
GBED Q!, PATDAT+4*, WSA1+1*, WSA1+2
>> GMREDB MASPT, WARDPAT+1*, WARDPAT+2*, WARDPAT+3, WP1+1, WSA1+2
>> GMRI S3+5*
>> GMRLEN S3+5*
>> GMRLEN(1 S3+5*
GMRMSL Q!, ROOM+1!, ROOM+3*, RMCHK+1
GMRMSL( ROOM+2*, S3, RMCHK+1, RMCHK+2
GMRMSL("B" ROOM+2*
>> GMRNAM PATDAT+3*, PATDAT+4, WSA1+1*, WSA1+2
>> GMROUT MASPT, WARDPAT+1*, WP1+1, WARDSEL+2*, WARDSEL+4*, PATDAT+2*, HOSP*, S3+2*, S3+5*, RMCHK+1*
GMRQUAL Q!
GMRRMBD Q!, PATDAT+3*, PATDAT+4, WSA1+1*
GMRRMST Q!, S3+2*, S3+3, S3+4, S3+5
GMRROOM Q!
GMRROOM( WSA1+2, RMCHK+2*
>> GMRVHLOC WARDSEL+5*, HOSP+1*
>> GMRVWLOC WARDPAT+1*
>> GMRWARD WP1+1, WARDSEL+3*, WARDSEL+4, WARDSEL+5, PATDAT+3*, HOSP, ROOM+2
>> GMRWARD(1 WARDSEL+3*, PATDAT+3*, WSA1+3, S3
>> GMRX S3+5*, RMCHK+1, RMCHK+2
GRM Q!, PATDAT+3*, PATDAT+4, WSA1+1*, WSA1+2
I S3!
I(1 S3*
I(2 S3*
I(3 S3*
I(4 S3*
I(5 S3*
U WARDPAT+1, WARDSEL+2, WARDSEL+3, WARDSEL+4, WARDSEL+5, PATDAT+3, HOSP
VA PATDAT+4!, WSA1+1!
>> VADM(1 PATDAT+3, WSA1+1
VAIN Q!
VAIN(4 PATDAT+3
VAIN(5 PATDAT+3, WSA1+1
>> X WARDSEL+2, ROOM+2*
XQH WP1+1*!
>> Y WARDSEL+2, WARDSEL+3, PATDAT+1, HOSP, HOSP+1, ROOM+2*, ROOM+3, S3*
>> Y(0 WARDSEL+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 |  Naked Globals |  Local Variables  | All