Routine: GMTSU

Package	Total	Call Graph
VA Fileman	4	%XY^%RCR ($$GET1,FILE)^DID $$VFIELD^DILFD ^DIR
Kernel	2	($$FMTE,$$FMTHL7,$$HL7TFM)^XLFDT $$UP^XLFSTR
Health Summary	1	($$UACT,$$UNAM)^GMTSU2
Registration	1	OERR^VADPT

Package

Total

Call Graph

VA Fileman

%XY^%RCR ($$GET1,FILE)^DID $$VFIELD^DILFD ^DIR

Kernel

($$FMTE,$$FMTHL7,$$HL7TFM)^XLFDT $$UP^XLFSTR

Health Summary

($$UACT,$$UNAM)^GMTSU2

Registration

OERR^VADPT

Package	Total	Caller Graph
Health Summary	79	GMTS GMTS1 GMTSADH2 GMTSADH5 GMTSADHC GMTSALG GMTSAMIE GMTSCNB GMTSDA GMTSDCB GMTSDEM GMTSDEM2 GMTSDGA GMTSDGA1 GMTSDGA2 GMTSDGC2 GMTSDGCH GMTSDGH GMTSDGP GMTSDVR GMTSFH GMTSGAF GMTSHCPR GMTSLRA GMTSLRAE GMTSLRB GMTSLRBE GMTSLRCE GMTSLRCP GMTSLREE GMTSLREM GMTSLRME GMTSLROE GMTSLRPE GMTSLRSE GMTSLRT GMTSLTR GMTSMAG GMTSMCPZ GMTSOBH GMTSORC3 GMTSPCD GMTSPD GMTSPL GMTSPLST GMTSPN GMTSPN2 GMTSPNB GMTSPOST GMTSPSG GMTSPSG5 GMTSPSI GMTSPSI5 GMTSPSO GMTSPSO7 GMTSPSZO GMTSPXEP GMTSPXFP GMTSPXHR GMTSPXIM GMTSPXOP GMTSPXSK GMTSPXTP GMTSPXXP GMTSRAD GMTSRAE GMTSRAI GMTSRAS GMTSRASP GMTSRO GMTSROB GMTSROE GMTSRON GMTSSCD GMTSSOWK GMTSUP GMTSVS GMTSVSD GMTSVSS
Health Summary Components	45	BHSALG BHSAPRO BHSAST1 BHSBCH BHSBH BHSDEN1 BHSDEN2 BHSDM5 BHSENC BHSENC2 BHSENCS BHSENCW BHSEXAM BHSEYEKG BHSFAM1 BHSFH BHSFH1 BHSFLOA BHSHOS BHSHS1 BHSINSUR BHSLAB BHSLAB1 BHSLABA BHSLABB BHSMBN BHSMEA BHSMEAP BHSMED BHSMEDAL BHSMEDCS BHSMEDH BHSMEDI BHSMSUP BHSMSUP1 BHSNRS BHSPED BHSPHN BHSPL BHSPLST BHSPLST1 BHSPSO7A BHSRAD BHSSKIN BHSSUR
Clinical Scheduling for Windows	1	BSDX41C
IHS Mods To Text Integration Utilities	1	BTIUPCC1

Package

Total

Caller Graph

Health Summary

GMTS  GMTS1  GMTSADH2  GMTSADH5  GMTSADHC  GMTSALG  GMTSAMIE  GMTSCNB
GMTSDA  GMTSDCB  GMTSDEM  GMTSDEM2  GMTSDGA  GMTSDGA1  GMTSDGA2  GMTSDGC2
GMTSDGCH  GMTSDGH  GMTSDGP  GMTSDVR  GMTSFH  GMTSGAF  GMTSHCPR  GMTSLRA
GMTSLRAE  GMTSLRB  GMTSLRBE  GMTSLRCE  GMTSLRCP  GMTSLREE  GMTSLREM  GMTSLRME
GMTSLROE  GMTSLRPE  GMTSLRSE  GMTSLRT  GMTSLTR  GMTSMAG  GMTSMCPZ  GMTSOBH
GMTSORC3  GMTSPCD  GMTSPD  GMTSPL  GMTSPLST  GMTSPN  GMTSPN2  GMTSPNB
GMTSPOST  GMTSPSG  GMTSPSG5  GMTSPSI  GMTSPSI5  GMTSPSO  GMTSPSO7  GMTSPSZO
GMTSPXEP  GMTSPXFP  GMTSPXHR  GMTSPXIM  GMTSPXOP  GMTSPXSK  GMTSPXTP  GMTSPXXP
GMTSRAD  GMTSRAE  GMTSRAI  GMTSRAS  GMTSRASP  GMTSRO  GMTSROB  GMTSROE
GMTSRON  GMTSSCD  GMTSSOWK  GMTSUP  GMTSVS  GMTSVSD  GMTSVSS

Health Summary Components

BHSALG  BHSAPRO  BHSAST1  BHSBCH  BHSBH  BHSDEN1  BHSDEN2  BHSDM5
BHSENC  BHSENC2  BHSENCS  BHSENCW  BHSEXAM  BHSEYEKG  BHSFAM1  BHSFH
BHSFH1  BHSFLOA  BHSHOS  BHSHS1  BHSINSUR  BHSLAB  BHSLAB1  BHSLABA
BHSLABB  BHSMBN  BHSMEA  BHSMEAP  BHSMED  BHSMEDAL  BHSMEDCS  BHSMEDH
BHSMEDI  BHSMSUP  BHSMSUP1  BHSNRS  BHSPED  BHSPHN  BHSPL  BHSPLST
BHSPLST1  BHSPSO7A  BHSRAD  BHSSKIN  BHSSUR

Clinical Scheduling for Windows

BSDX41C

IHS Mods To Text Integration Utilities

BTIUPCC1

Entry Points

Name	Comments	DBIA/ICR reference
HF(X)	; Host File - Used to distinguish from Host Files that ; are intended for Printers and Host Files for other ; purposes (windows/files) ; ; 1 - if Device Type is HFS and not a TCP/IP Printer ; 0 - if Device Type is not HFS or device is a Printer ; ; Check Device ; Check Host File Server
FNAM(X)	; File Name
FLOC(X)	; File location
REGDT	; Receives X FM date and returns X in MM/DD/YY format
EDT(X)	; Health Summary External Date and Time
DEM	; Gets Demographic Data from VADPT ; ; Input DFN ; ; Output GMTSPNM Patient Name ; GMTSSN Social Security Number ; GMTSDOB Date of Birth ; SEX Sex ; GMTSWARD Ward ; GMTSRB Bed ; GMTSAGE Age ; VADM() Demographic Array ; VAIN() Inpatient Array ; GMTSPHDR() Report Header Array ;
REGDT4	; Receives X FM date and returns X in MM/DD/YYYY format
FLDS(X,Y)	; Field Set of Codes
PROK(X,Y)	; Routine and Patch # OK (in UCI)
ROK(X)	; Routine OK (in UCI) (NDBI)
HL7FMDTM	; Convert X - HL7 CCYYMMDDHHMM-HHHH to int date/time local
OED()	; Other Editor - DIC("S")
MTIM	; Convert Time from X=2890313.1304 to X=13:04
CMU(X)	; Component Uses CPT Modifiers
REGDTM4	; Receives X FM date and returns X in MM/DD/YYYY TT:TT
FCLR(X)	; File Closed Root
FHDD(X)	; File has a DD?
GETRANGE(FROMDATE,TODATE)	; Select Date Range (from and to dates)
FLDI(X,Y)	; Field Input Transform
NAME(X,Y,L)	; Format name ; ; Input ; X Internal Entry Number of NEW PERSON file 200 ; Y Flag to specify the first name format ; 0 for First Name Initial (only) ; 1 for First Name ; L Maximum Length of Name ; ; Output Last,First (name/initial) to specified length ;
FSFN(X)	; File/Sub-File Name
REGDTM	; Receives X FM date and returns X in MM/DD/YY TT:TT
ED(X)	; Health Summary External Date
FLDN(X,Y)	; Field Name
SIDT	; Receives X FM date and returns X in DD MMM YY
NDBI(X)	; National Database Integration site 1 = yes 0 = no
CPT(X)	; Use CPT Modifiers Needs GMTSEG Array
FMHL7DTM	; Convert X - int date/time to HL7 CCYYMMDDHHMM-HHHH	ICR #1505 Status: Withdrawn Usage: Private

External References

Name	Field # of Occurrence
%XY^%RCR	FSFN+3
$$GET1^DID	FLDN+1, FLDS+1, FLDI+1
FILE^DID	FSFN+1, FNAM+1, FLOC+1
$$VFIELD^DILFD	FHDD+1
^DIR	GETRANGE+2, GETRANGE+6
$$UACT^GMTSU2	OED+2, OED+12
$$UNAM^GMTSU2	NAME+13, OED+2
OERR^VADPT	DEM+15
$$FMTE^XLFDT	REGDT+1, REGDT4+1, REGDTM+1, REGDTM4+1, GETRANGE+4
$$FMTHL7^XLFDT	FMHL7DTM+1
$$HL7TFM^XLFDT	HL7FMDTM+1
$$UP^XLFSTR	GETRANGE+4, FSFN+2, FSFN+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: GETRANGE+1
Function Call: WRITE	Prompt: ! Line Location: GETRANGE+2
Function Call: WRITE	Prompt: " (",$$UP^XLFSTR($$FMTE^XLFDT(+FROMDATE,1)),")" Line Location: GETRANGE+4
Function Call: WRITE	Prompt: ! Line Location: GETRANGE+10
Routine Call	DIR Line Location: GETRANGE+2 GETRANGE+6

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	ROK+1, NDBI+1
^A7RCP	NDBI+1
^GMT(142 - [#142]	OED+1, OED+2
^GMT(142.1 - [#142.1]	CMU+1, CMU+2

Name	Line Occurrences
$$CMU	CPT+3
$$FLOC	FCLR+1
$$PROK	HF+11
$$ROK	PROK+2
REGDT4	ED+1, DEM+18
REGDTM4	EDT+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%X	FSFN+1~, FSFN+3*
%Y	FSFN+1~, FSFN+3*
ALPHA	NAME+11~, NAME+15, NAME+17, NAME+18
AUSER	OED+1~, OED+2, OED+10, OED+12
CH	NAME+11~, NAME+17*
COMP	OED+1~*, OED+2
>> DA(1	OED+1
DIERR	FSFN+1~, FSFN+2, FNAM+1~, FLOC+1~
DIR	GETRANGE+1~, GETRANGE+5~
DIR("A"	GETRANGE+1, GETRANGE+5
DIR("B"	GETRANGE+5*
DIR(0	GETRANGE+1, GETRANGE+5
>> DIROUT	GETRANGE+2, GETRANGE+6
DIRUT	GETRANGE+1~, GETRANGE+2, GETRANGE+6
DOB	DEM+18~, DEM+21*, DEM+22
DTOUT	GETRANGE+1~, GETRANGE+2, GETRANGE+6
>> DUOUT	GETRANGE+2, GETRANGE+6
DUZ	OED+2
FI	FSFN+1~*, FSFN+3
FIRST	NAME+11~, NAME+15, NAME+16, NAME+17, NAME+18, NAME+19*, NAME+20
FNF	NAME+11~, NAME+12*, NAME+19
FR	FSFN+1~, FSFN+3!
FR(""	FSFN+3
FRDT	GETRANGE+9~*
FROMDATE	GETRANGE~, GETRANGE+3, GETRANGE+4, GETRANGE+6!, GETRANGE+7!, GETRANGE+8, GETRANGE+9
G	NDBI+1~*
GMTS	PROK+1~, PROK+2*, PROK+3
GMTS85	HF+11~*, HF+12
GMTSA	CPT+1~, CPT+3, CMU+1~, CMU+2*
>> GMTSAGE	DEM+16*
GMTSC	CPT+1~*, CPT+3
>> GMTSDOB	DEM+18*, DEM+21
GMTSE	FSFN+1~, FNAM+1~, FLOC+1~
>> GMTSEG(	CPT+1
GMTSI	PROK+1~, PROK+3, CPT+1~, CMU+1~, CMU+2
GMTSL	FCLR+1~*
GMTSM	CPT+1~, CPT+2*
GMTSN	CPT+1~, CPT+2, CMU+1~, FSFN+1~, FNAM+1~, FLOC+1~
GMTSN("GLOBAL	NAME" , FLOC+1
GMTSN("NAME"	FSFN+2, FNAM+1
GMTSO	PROK+1~, PROK+2, PROK+3, PROK+4
GMTSPHDR	DEM+18!
GMTSPHDR("DOB"	DEM+22*
GMTSPHDR("DOBS"	DEM+22*
GMTSPHDR("NMSSN"	DEM+21*
GMTSPHDR("TWO"	DEM+23*
GMTSPHDR("WARDRB"	DEM+21*
GMTSPHDR("WARDRBS"	DEM+22*
>> GMTSPNM	DEM+15*, DEM+19
>> GMTSRB	DEM+17*, DEM+19
>> GMTSSN	DEM+15*, DEM+19
>> GMTSWARD	DEM+17*, DEM+19
IEN	NAME+11~, NAME+12*, NAME+13
IO	HF+16
ION	HF+14, HF+18, HF+20
IOST	HF+21
>> IOT	HF+9
L	NAME~, NAME+12
LAST	NAME+11~, NAME+15*, NAME+20
LEN	NAME+11~, NAME+12, NAME+13, NAME+20
LWARDRB	DEM+18~, DEM+20*
MM	SIDT+1~, SIDT+3*, SIDT+4
MON	SIDT+1~, SIDT+2*, SIDT+3
NAT	OED+1~, OED+2*, OED+4, OED+6, OED+8
NMSSN	DEM+18~, DEM+19*, DEM+21
NMSSNE	DEM+18~, DEM+19*, DEM+23
>> ORWINDEV	HF+12
OTHER	OED+1~, OED+2*, OED+12, OED+14
OWNER	OED+1~, OED+2*, OED+6, OED+8, OED+10, OED+14
OWNN	OED+1~, OED+2*, OED+14
PSN	NAME+11~, NAME+17*
R	NDBI+1~*
RAWNM	NAME+11~, NAME+13, NAME+14, NAME+15
>> SEX	DEM+16*
TODATE	GETRANGE~, GETRANGE+8, GETRANGE+9
U	SIDT+3
USER	OED+1~, OED+2*, OED+8, OED+10
VA	DEM+18!
VA("PID"	DEM+15
>> VADM(1	DEM+15
>> VADM(2	DEM+15
>> VADM(3	DEM+18
>> VADM(4	DEM+16
>> VADM(5	DEM+16
VAHOW	DEM+15!
>> VAIN(4	DEM+17
>> VAIN(5	DEM+17
WARDRB	DEM+18~, DEM+19*, DEM+20, DEM+21
WARDRBE	DEM+18~, DEM+20*, DEM+23
WARDRBS	DEM+18~, DEM+20*, DEM+22, DEM+23
X	PROK~, PROK+1, PROK+2, PROK+4, ROK~, ROK+1, NDBI~, NDBI+1, CPT~, CPT+1* , CMU~, CMU+1, ED~, ED+1, EDT~, EDT+1, REGDT+1, REGDT4+1, REGDTM+1, REGDTM4+1* , SIDT+1, SIDT+3, SIDT+4, MTIM+1, HF~, HF+20, HF+21, HF+22, FMHL7DTM+1, HL7FMDTM+1* , DEM+18, NAME~, NAME+12, NAME+20, NAME+21, GETRANGE+1~, GETRANGE+5~, OED+2, FCLR~, FCLR+1* , FCLR+2, FSFN~, FSFN+1, FSFN+2, FSFN+3, FNAM~, FNAM+1, FLOC~, FLOC+1, FHDD~ , FHDD+1, FLDN~, FLDN+1, FLDS~, FLDS+1, FLDI~, FLDI+1
Y	PROK~, PROK+1, PROK+2, PROK+3, NAME~, NAME+12, GETRANGE+1~, GETRANGE+3, GETRANGE+5~, GETRANGE+7 , GETRANGE+8, FLDN~, FLDN+1, FLDS~, FLDS+1, FLDI~, FLDI+1

Customize PDF page

Package: Health Summary

Routine: GMTSU

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 126

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items