Routine: GMTSOBE

Information

GMTSOBE ; SLC/KER - HS Object - Export ; 01/06/2003

Source Information

Source file <GMTSOBE.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
Health Summary	2	$$OBJ^GMTSOBL $$EN2^GMTSUMX
Kernel	2	($$DOW,$$DT,$$FMTE,$$NOW)^XLFDT $$UP^XLFSTR
MailMan	1	^XMD
Registration	1	$$SITE^VASITE
VA Fileman	1	$$GET1^DIQ

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Health Summary	1	GMTSOBJ

Entry Points

Name	Comments	DBIA/ICR reference
VER(X)	; Health Summary Version
EN	; Main Entry Point to Export a HS Object
OBJ	; Export an Object
DOW(X)	; Day of Week
NOW(X)	; Now
BL	; Blank Line
TL(X)	; Text Line
XMSUB(X)	; Get Subject
S	; Spacer/Comment Line
ROK(X)	; Routine is OK
Q	; Quit Line
INIT	; Initialize Export Routine
DOM(X)	; Domain
CREATED(X)	; Created Text
MAIL	; Send Object via Mailman
TYPE	; Export Health Summary Type ; This will not export: ; National Health Summary Types ; Local Components ; Components with Selected Items
XMY(X)	; Get Addressee
CRTN(X)	; Clear Routine

External References

Name	Field # of Occurrence
$$GET1^DIQ	EN+6, XMY+1, DOM+1
$$OBJ^GMTSOBL	EN+7
$$EN2^GMTSUMX	EN+11
$$SITE^VASITE	EN+7
$$DOW^XLFDT	DOW+1
$$DT^XLFDT	DOW+1
$$FMTE^XLFDT	INIT+18, NOW+1
$$NOW^XLFDT	INIT+18, NOW+1
$$UP^XLFSTR	DOW+1
^XMD	MAIL+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!," User not defined" Line Location: EN+5
Function Call: WRITE	Prompt: !!," Invalid User" Line Location: EN+6
Function Call: WRITE	Prompt: !," Can not export a Health Summary Object using GMTS HS ADHOC OPTION",!," (Adhoc) Health Summary Type." Line Location: EN+13
Function Call: WRITE	Prompt: !," Can not export a Health Summary Object using a nationally released",!," Remote Data View Health Summary Type." Line Location: EN+15
Function Call: WRITE	Prompt: !!," Exporting Object Routine - ",GMTSRTN Line Location: INIT+2
Function Call: WRITE	Prompt: !," Message [",+($G(XMZ)),"] sent" Line Location: MAIL+4

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ
^XMB(1 - [#4.3]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("DEL"	CRTN+1
^GMT(142 - [#142]	EN+9, EN+10, TYPE+8, TYPE+10
^GMT(142.1 - [#142.1]	TYPE+22
^GMT(142.5 - [#142.5]	EN+7, OBJ+3, XMSUB+1
^TMP($J	EN+17!, INIT+4!, TL+1, TL+2*, MAIL+1, MAIL+5!

Label References

Name	Line Occurrences
$$CREATED	INIT+5
$$DOM	CREATED+2
$$DOW	CREATED+2
$$NOW	CREATED+3
$$ROK	CRTN+1
$$VER	INIT+19
$$XMSUB	MAIL+3
$$XMY	MAIL+2, CREATED+1
BL	INIT+6, INIT+9, INIT+10, INIT+12, INIT+14, INIT+15
CRTN	INIT+2
INIT	EN+16
MAIL	EN+16
OBJ	EN+16
Q	INIT+22, TYPE+8, TYPE+27, OBJ+8
S	INIT+19, INIT+22
TL	INIT+5, INIT+6, INIT+7, INIT+8, INIT+10, INIT+11, INIT+12, INIT+13, INIT+14, INIT+15 , INIT+16, INIT+17, INIT+18, INIT+19, INIT+20, INIT+21, INIT+22, TYPE+7, TYPE+9, TYPE+11 , TYPE+20, TYPE+26, TYPE+27, OBJ+2, OBJ+4, OBJ+7, OBJ+8, Q+1, S+1, BL+1
TYPE	EN+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%Z	EN+1~, MAIL+1~, MAIL+5!
DUZ	EN+5, EN+6, MAIL+2, XMY+1
GMTS	EN+1~, TL+1~*, TL+2
GMTSCP	EN+1~, TYPE+5~, TYPE+21*, TYPE+22
GMTSD	EN+1~, TYPE+6~, NOW+1~*, NOW+2
GMTSD(	TYPE+17, TYPE+19, TYPE+25
GMTSDM	EN+1~, CREATED+1~, CREATED+2*
GMTSDT	EN+1~, CREATED+1~, CREATED+3*
GMTSDW	EN+1~, CREATED+1~, CREATED+2*
GMTSEX	EN+1~, VER+1~, ROK+2~
GMTSFRM	EN+1~, EN+7*, INIT+1, INIT+7, INIT+9, INIT+21
GMTSHD	EN+1~, TYPE+5~, TYPE+22*, TYPE+23
GMTSI	EN+2~, INIT+3~
GMTSN	EN+2~, MAIL+1~, MAIL+2, CREATED+1~
GMTSNC	EN+2~, TYPE+5~, TYPE+14, TYPE+15, OBJ+1~, OBJ+5, OBJ+6
GMTSND	EN+2~, TYPE+5~, TYPE+20, TYPE+21, TYPE+23, TYPE+24, TYPE+26, OBJ+1~, OBJ+7
GMTSNN	EN+2~, TYPE+5~, TYPE+13, TYPE+15, TYPE+16, TYPE+18, TYPE+20, OBJ+1~, OBJ+5, OBJ+6 , OBJ+7
GMTSNX	EN+2~, TYPE+6~, TYPE+18*
GMTSO	EN+2~, EN+7*, OBJ+3, OBJ+4, OBJ+5, XMSUB+1
GMTSON	EN+2~, EN+8, INIT+1, INIT+6, INIT+9, INIT+20, OBJ+2, XMSUB+1~, XMSUB+2
GMTSOND	EN+2~, EN+7*, EN+8
GMTSQIT	EN+3~, MAIL+1~, MAIL+2, MAIL+3, MAIL+4
GMTSRT	EN+3~, TYPE+5~, TYPE+12, TYPE+16, TYPE+18, OBJ+1~, OBJ+4, OBJ+7
GMTSRTN	EN+3~, EN+16*, INIT+2, INIT+17, INIT+18, OBJ+8
GMTSSX	EN+3~, TYPE+6~, TYPE+18*, TYPE+19
GMTST	EN+3~, EN+8, EN+9, EN+10, INIT+3~, INIT+5, TYPE+8, TYPE+10, TYPE+12, TYPE+13 , TYPE+14, NOW+1~, NOW+2, CREATED+1~, CREATED+2, CREATED+3
GMTSTMP	EN+3~, TYPE+5~, TYPE+10, TYPE+11, OBJ+1~, OBJ+3, OBJ+4
GMTSTN	EN+3~, EN+10*, EN+11, EN+12, TYPE+9, TYPE+10
GMTSTN0	EN+3~, EN+9*, EN+10
GMTSTNAT	EN+4~, EN+14*
GMTSTNT	EN+4~, EN+9*, EN+11
GMTSTNV	EN+4~, EN+10*, EN+14
GMTSTR	EN+4~, TYPE+5~, TYPE+14, TYPE+16, TYPE+17, TYPE+20, TYPE+24, TYPE+25, TYPE+26, OBJ+1~ , OBJ+7*
GMTSTT	EN+4~, EN+11*, TYPE+9, TYPE+27
GMTSTXT	EN+4~, VER+1~, ROK+2~
GMTSUSR	EN+4~, EN+6*, INIT+1, INIT+8, INIT+9, INIT+22
GMTSX	EN+4~
X	EN+5~, EN+7, TL~, TL+2, XMY~, XMY+1, XMSUB~, XMSUB+2, XMSUB+3, DOM~ , DOM+1, DOW~, DOW+1, NOW~, NOW+1, NOW+2, NOW+3, CRTN~, CRTN+1, VER~ , VER+1, ROK~, ROK+1, ROK+2, CREATED~, CREATED+3*, CREATED+4
XCNP	EN+5~, MAIL+1~, MAIL+5!
XMDUZ	EN+5~, MAIL+1~, MAIL+2*, MAIL+5!
XMSCR	EN+5~, MAIL+1~, MAIL+5!
XMSUB	EN+5~, MAIL+1~, MAIL+3*, MAIL+5!
XMTEXT	EN+5~, MAIL+1~, MAIL+3*, MAIL+5!
XMY	EN+5~, MAIL+1~, MAIL+5!
XMY(	MAIL+2*
XMZ	EN+5~, MAIL+1~, MAIL+4, MAIL+5!
Y	EN+5~

Customize PDF page

Package: Health Summary

Routine: GMTSOBE

Call Graph Total: 7

Caller Graph Total: 1