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

Package: General Medical Record - IO

Routine: GMRYUT12


Information

GMRYUT12 ;HIRMFO/YH-ROOM SEARCH AND OTHER UTILITIES ;11/6/96

Source Information

Source file <GMRYUT12.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
General Medical Record - IO 2 $$RW^GMRYDIR  PATDAT^GMRYUT0  
VA Fileman 2 MIX^DIC1  (FILE,YN)^DICN  
Registration 1 (DEM,IN5)^VADPT  

Caller Graph

Caller Graph Total: 10

Package Total Caller Graph
General Medical Record - IO 10 GMRYED0  GMRYED2  GMRYED3  GMRYFLSH  GMRYINFS  GMRYMNT  GMRYRP5  GMRYUT10  
GMRYUT3  GMRYUT5  

Entry Points

Name Comments DBIA/ICR reference
Q
YN ;
CONTNU(OK,MSSG) ;
OSITE ;ENTER OTHER NAME OF IV INFUSION SITE
NEXT
ADM(GOUT,GDA,GDT) ;SCREEN PATIENT'S ADMISSION STATUS FOR THE INTAKE/OUTPUT DATE/TIME
ROOMSEL ;CALLED FROM GMRYRP5 - SELECT ROOMS ON A GIVEN WARD
SEARCH(DFN) ;SELECT PATIENT

External References

Name Field # of Occurrence
MIX^DIC1 SEARCH+4
FILE^DICN SEARCH+4
YN^DICN CONTNU+1
$$RW^GMRYDIR YN+1
PATDAT^GMRYUT0 SEARCH+3
DEM^VADPT ADM+2
IN5^VADPT ADM+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?33,I(3),". ",$G(GMRMSL(I(3)))
  • Condition for execution: $G(GMRMSL($G(I(2))))'="" ?16,I(2),". ",$G(GMRMSL(I(2))) W:$G(GMRMSL($G(I(3))))'=""
  • Line Location: ROOMSEL+1
Function Call: WRITE
  • Prompt: !!,$P(VADM(1),"^")_" died on "_$P(VADM(6),"^",2)
  • Line Location: ADM+3
Function Call: WRITE
  • Prompt: !!,VADM(1)_" on "_$P($G(VAIP(4)),"^",2)_" started on "_$P($G(VAIP(3)),"^",2),!
  • Line Location: ADM+4
Function Call: WRITE
  • Prompt: !,"Do you want to "_MSSG
  • Line Location: CONTNU+1
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: OSITE+1
Function Call: WRITE
  • Prompt: !,"Enter the name of this infusion site or ^ to quit",!
  • Line Location: OSITE+2

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMR(126 - [#126] SEARCH+2*

Label References

Name Line Occurrences
NEXT SEARCH+4
OSITE OSITE+2
Q ADM+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % CONTNU+1*, CONTNU+2
D SEARCH+4*, NEXT!
DD SEARCH+4!, NEXT!
DFN SEARCH~, SEARCH+3, SEARCH+4, ADM+2~*
DIC SEARCH+4*, NEXT!
DIC(0 SEARCH+4*
>> DINUM SEARCH+4*
DLAYGO SEARCH+4*, NEXT!
DO NEXT!
DTIME OSITE+1
GDA ADM~, ADM+2
GDT ADM~, ADM+2
>> GMRMSL( ROOMSEL+1, ROOMSEL+2
>> GMROUT OSITE+1*
GMYX SEARCH+1~*, SEARCH+3, SEARCH+4*, NEXT+1
GOUT ADM~
GOUT(1 ADM+3*, ADM+4*, Q
>> I(1 ROOMSEL+1, ROOMSEL+3*
>> I(2 ROOMSEL+1, ROOMSEL+3*
>> I(3 ROOMSEL+1, ROOMSEL+3*
>> I(4 ROOMSEL+2, ROOMSEL+3*
>> I(5 ROOMSEL+2, ROOMSEL+3*
MSSG CONTNU~, CONTNU+1
OK CONTNU~, CONTNU+2*, CONTNU+3
>> VADM(1 ADM+3, ADM+4
>> VADM(6 ADM+3
>> VAIP("D" ADM+2*!
>> VAIP(10 ADM+4
>> VAIP(3 ADM+4
>> VAIP(4 ADM+4
>> X SEARCH+4*, OSITE+1*, OSITE+2, YN+1*
>> Y SEARCH+4
>> Y(0 YN+1*
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