Routine: GMTSU

Information

GMTSU ;SLC/JER,KER - Health Summary Utilities ;Jul 21, 2023@12:36

Source file <GMTSU.m>

Name	Comments	DBIA/ICR reference
PROK(X,Y)	; Routine and Patch # OK (in UCI)
ROK(X)	; Routine OK (in UCI) (NDBI)
NDBI(X)	; National Database Integration site 1 = yes 0 = no
CPT(X)	; Use CPT Modifiers Needs GMTSEG Array
CMU(X)	; Component Uses CPT Modifiers
ED(X)	; Health Summary External Date
EDT(X)	; Health Summary External Date and Time
REGDT	; Receives X FM date and returns X in MM/DD/YY format
REGDT4	; Receives X FM date and returns X in MM/DD/YYYY format
REGDTM	; Receives X FM date and returns X in MM/DD/YY TT:TT
REGDTM4	; Receives X FM date and returns X in MM/DD/YYYY TT:TT
SIDT	; Receives X FM date and returns X in DD MMM YY
MTIM	; Convert Time from X=2890313.1304 to X=13:04
HF(X)	; Host File - Used to distinguish from Host Files that ; are intended for Printers and Host Files for other ; purposes (windows/files)
FMHL7DTM	; Convert X - int date/time to HL7 CCYYMMDDHHMM-HHHH	ICR #1505 Status: Withdrawn Usage: Private
HL7FMDTM	; Convert X - HL7 CCYYMMDDHHMM-HHHH to int date/time local
DEM	; Gets Demographic Data from VADPT
NAME(X,Y,L)	; Format name
GETRANGE(FROMDATE,TODATE)	; Select Date Range (from and to dates)
OED()	; Other Editor - DIC("S")
FCLR(X)	; File Closed Root
FSFN(X)	; File/Sub-File Name
FNAM(X)	; File Name
FLOC(X)	; File location
FHDD(X)	; File has a DD?
FLDN(X,Y)	; Field Name
FLDS(X,Y)	; Field Set of Codes
FLDI(X,Y)	; Field Input Transform
FORMAT(X,GMTSLABEL,DIWL)	; Format long line(s)
LINE(GMTSCOL)	; Writes wrapped long lines

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