Routine: GMTSPXU2

Information

GMTSPXU2 ;SLC/KKA,SBW - PCE Drivers for visits ; 08/27/2002

Source Information

Source file <GMTSPXU2.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
Kernel	2	$$FMTE^XLFDT $$VERSION^XPDUTL
Health Summary	1	(INPAT,OUTPAT)^GMTSPXU2
PCE Patient Care Encounter	1	VISIT^PXRHS14
VA Fileman	1	^DIR

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Health Summary	2	GMTS GMTSPXU2

Entry Points

Name	Comments	DBIA/ICR reference
OUTPAT(DFN,DATEFROM,DATETO)	; Select by Outpatient Visit Date
OUTHDR	; Header for screen Display
OUTLOOK(DFN,OUT)	; Display Outpatient Visits ; ; This option displays outpatient visits from the ; Visit (#9000010) file to the screen. Outpatient ; visits = visits with a service category of: ; ; Ambulatory ; Observation ; Day Surgery ; Nursing Home ; ; A number, the visit date, and the hospital location ; or credit stop will be display on the screen. The ; order of the display will be from most recent visits ; to oldest visits. The user can pick the visit they ; want and the visit date is passed back to the calling ; routine by parameter passing by reference. ;
INPAT(DFN,DATEFROM,DATETO)	; Select by Inpatient Visit Date
INHDR	; Based on the VISIT File
INLOOK(DFN,GMTSADM,GMTSDC)	; Displays Patient's Admission Dates
MENU(DFN,GMTSPX2,GMTSPX1)	; HS Selection Menu ; ; Allows user to choose Outpatient Visits based ; on V files or Inpatient visits based on patient ; movement file.

External References

Name	Field # of Occurrence
^DIR	MENU+13, INLOOK+17, INLOOK+21, OUTLOOK+35, OUTLOOK+38
INPAT^GMTSPXU2	MENU+10, MENU+17
OUTPAT^GMTSPXU2	MENU+16
VISIT^PXRHS14	OUTLOOK+23
$$FMTE^XLFDT	INLOOK+12, INLOOK+13, OUTLOOK+31
$$VERSION^XPDUTL	MENU+10

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"No admissions on file for this patient" Line Location: INLOOK+3
Function Call: WRITE	Prompt: !,?7,SELNR,?15,$$FMTE^XLFDT(ADMDT,"2P") Line Location: INLOOK+12
Function Call: WRITE	Prompt: ! Line Location: INLOOK+17
Function Call: WRITE	Prompt: ! Line Location: INLOOK+21
Function Call: WRITE	Prompt: !!,?15,"ADMISSION DATE/TIME",?45,"DISCHARGE DATE/TIME",! Line Location: INHDR+1
Function Call: WRITE	Prompt: !,?7,SELNR,?15,$$FMTE^XLFDT(VISIT,"2P"),?45,$S(HLOC]"":HLOC,1:CLINIC) Line Location: OUTLOOK+31
Function Call: WRITE	Prompt: ! Line Location: OUTLOOK+35
Function Call: WRITE	Prompt: ! Line Location: OUTLOOK+38
Function Call: WRITE	Prompt: !!,"No Outpatient visits for this patient" Line Location: OUTLOOK+39
Function Call: WRITE	Prompt: !!,?15,"VISIT DATE/TIME",?45,"HOSPITAL LOCATION/CLINIC",! Line Location: OUTHDR+1
Routine Call	DIR Line Location: MENU+13 INLOOK+17 INLOOK+21 OUTLOOK+35 OUTLOOK+38

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGPM - [#405]	INLOOK+9, INLOOK+10
^DGPM("ATID1"	INLOOK+3, INLOOK+6, INLOOK+8
^TMP("GMTSPX"	INLOOK+4!, INLOOK+14*, INLOOK+23, INLOOK+24, INLOOK+26!
^TMP("HS"	OUTLOOK+20!, OUTLOOK+32*, OUTLOOK+40, OUTLOOK+41!
^TMP("PXV"	OUTLOOK+20!, OUTLOOK+24, OUTLOOK+25!, OUTLOOK+41!

Label References

Name	Line Occurrences
INHDR	INLOOK+11
INLOOK	INPAT+2
OUTHDR	OUTLOOK+30
OUTLOOK	OUTPAT+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADMDT	INLOOK+1~, INLOOK+9*, INLOOK+12, INLOOK+14
ADT	INLOOK+1~, INLOOK+5, INLOOK+6, INLOOK+8
CLINIC	OUTLOOK+18~, OUTLOOK+28*, OUTLOOK+31, OUTLOOK+32
CTR	INLOOK+1~, INLOOK+5, INLOOK+11, INLOOK+15, INLOOK+17, INLOOK+19, OUTLOOK+18~, OUTLOOK+21, OUTLOOK+30, OUTLOOK+33 , OUTLOOK+35, OUTLOOK+36
DATEFROM	OUTPAT~, OUTPAT+4, INPAT~, INPAT+2, INPAT+3
DATETO	OUTPAT~, OUTPAT+4, INPAT~, INPAT+2, INPAT+3
DCDT	INLOOK+1~, INLOOK+10*, INLOOK+13, INLOOK+14
DFN	MENU~, MENU+10, MENU+16, MENU+17, OUTPAT~, OUTPAT+2, INPAT~, INPAT+2, INLOOK~, INLOOK+3 , INLOOK+6, INLOOK+8, OUTLOOK~, OUTLOOK+23
DIR	MENU+5~, INLOOK+1~, OUTLOOK+18~
DIR("?"	MENU+12*
DIR("A"	INLOOK+16, INLOOK+20, OUTLOOK+34, OUTLOOK+37
DIR(0	MENU+11, INLOOK+17, INLOOK+21, OUTLOOK+35, OUTLOOK+38*
>> DIROUT	INLOOK+18, INLOOK+22
DIRUT	MENU+5~, MENU+14, OUTPAT+1~, INPAT+1~, INLOOK+6, INLOOK+8
DT	INLOOK+25
DTOUT	MENU+5~, OUTPAT+1~, INPAT+1~, INLOOK+15, INLOOK+18, INLOOK+22, OUTLOOK+23, OUTLOOK+33
>> DUOUT	INLOOK+15, INLOOK+18, INLOOK+22, OUTLOOK+23, OUTLOOK+33
GMTSADM	INLOOK~, INLOOK+2, INLOOK+23, INLOOK+25
GMTSDC	INLOOK~, INLOOK+2, INLOOK+24, INLOOK+25*
GMTSPX1	MENU~, MENU+6*, MENU+10, MENU+16, MENU+17
GMTSPX2	MENU~, MENU+6*, MENU+10, MENU+16, MENU+17
HIT	INLOOK+1~, INLOOK+5, INLOOK+11, OUTLOOK+18~, OUTLOOK+21, OUTLOOK+30
HLOC	OUTLOOK+18~, OUTLOOK+29*, OUTLOOK+31, OUTLOOK+32
INPDATE	OUTPAT+1~, OUTPAT+2, OUTPAT+3, OUTPAT+4
>> NODE	OUTLOOK+24*, OUTLOOK+26, OUTLOOK+27, OUTLOOK+28, OUTLOOK+29
OUT	OUTLOOK~, OUTLOOK+19, OUTLOOK+40
RECNR	INLOOK+1~, INLOOK+7, INLOOK+8, INLOOK+9, INLOOK+10, OUTLOOK+18~, OUTLOOK+21, OUTLOOK+22, OUTLOOK+23, OUTLOOK+24 , OUTLOOK+32
SEL	MENU+5~, MENU+15*, MENU+16, MENU+17
SELNR	INLOOK+1~, INLOOK+5, INLOOK+11, INLOOK+12, INLOOK+14, INLOOK+16, INLOOK+17, INLOOK+19, INLOOK+20, INLOOK+21 , OUTLOOK+18~, OUTLOOK+21, OUTLOOK+30, OUTLOOK+31, OUTLOOK+32, OUTLOOK+34, OUTLOOK+35, OUTLOOK+36, OUTLOOK+37, OUTLOOK+38 , OUTLOOK+39
U	INLOOK+9, INLOOK+10, INLOOK+14, INLOOK+23, INLOOK+24, OUTLOOK+27, OUTLOOK+28, OUTLOOK+29, OUTLOOK+32, OUTLOOK+40
VISIT	OUTLOOK+18~, OUTLOOK+27*, OUTLOOK+31, OUTLOOK+32
VISITDT	OUTLOOK+18~, OUTLOOK+21, OUTLOOK+22, OUTLOOK+23, OUTLOOK+24
X	INLOOK+1~, OUTLOOK+18~
Y	MENU+14, MENU+15, INLOOK+1~, INLOOK+6, INLOOK+8, INLOOK+15, INLOOK+19, INLOOK+22, INLOOK+23, INLOOK+24 , OUTLOOK+18~, OUTLOOK+23, OUTLOOK+33, OUTLOOK+40

Customize PDF page

Package: Health Summary

Routine: GMTSPXU2

Call Graph Total: 5

Caller Graph Total: 2