Routine: SCMCTMM

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Caller Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Local Variables

Information

SCMCTMM ;ALB/REW - Patient Team Changes MailMessages ; 26 Mar 1996

Source Information

Source file <SCMCTMM.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
VA Fileman	3	EN^DDIOL FIELD^DID $$EXTERNAL^DILFD
Scheduling	2	$$PCMMXMY^SCAPMC25 $$PCMAIL^SCMCMM
MailMan	1	^XMD
Registration	1	PID^VADPT6

Caller Graph

Caller Graph Total: 4

Package	Total	Caller Graph
Scheduling	4	SCAPMC6 SCMCBK7 SCMCCON SCMCCV

Entry Points

Name	Comments	DBIA/ICR reference
QTTXT
QTMULT
END
TEXT(SCFILE,SCNODE,SCPC,SCSPACE,SCLAB)	;returns fldname & external value
MAILLST(SCTM,SCFIELDA,SCDATE,SCNEWTM,SCOLDTM,SCBADTM)	; ; Input: ; SCTM - Pointer to Team File (#404.51) ; SCFIELDA - Field array with internal values ; SCDATE - Effective Date ; SCNEWTM - DFN array of newly assigned to team ; SCOLDTM - DFN array of previously assigned to team ; SCBADTM - DFN array of patients unassignable to team
DDNAME(FILE,FIELD)	;return the fieldname
BAD
MAIL	;Do Patient Team Changes MailMan Message ; - called by SCMC PT TEAM CHANGES MAIL MESSAGE protocol
SETLN(TEXT)	;

Name	Field # of Occurrence
EN^DDIOL	MAIL+28, MAILLST+27
FIELD^DID	DDNAME+2
$$EXTERNAL^DILFD	TEXT+18
$$PCMMXMY^SCAPMC25	MAIL+27, MAILLST+42, BAD+5
$$PCMAIL^SCMCMM	MAIL+51
PID^VADPT6	MAIL+29, MAILLST+43, BAD+7
^XMD	MAIL+54, BAD+16

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	MAILLST+31
^DPT - [#2]	MAIL+30, MAILLST+44, BAD+6
^SCTM(404.51 - [#404.51]	MAILLST+25, MAILLST+29
^TMP("SCTM MAIL LST"	MAILLST+45, MAILLST+46, MAILLST+48, MAILLST+50, MAILLST+51, BAD+8, BAD+9, BAD+11, BAD+13, BAD+14 , QTMULT!
^TMP($J	END!, SETLN+4*, QTMULT+1!

Label References

Name	Line Occurrences
$$DDNAME	TEXT+15
$$TEXT	MAIL+36, MAIL+41, MAIL+47, MAIL+49, MAILLST+37
END	MAIL+2, MAIL+27
QTMULT	MAILLST+9, MAILLST+10, MAILLST+11
QTTXT	TEXT+11
SETLN	MAIL+33, MAIL+34, MAIL+36, MAIL+38, MAIL+39, MAIL+41, MAIL+43, MAIL+44, MAIL+50, MAILLST+30 , MAILLST+32, MAILLST+33, MAILLST+37, MAILLST+38, MAILLST+39, MAILLST+51, BAD+1, BAD+2, BAD+14

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DFN	MAIL+4~, MAIL+25, MAIL+27, MAIL+30, MAIL+51, MAILLST+13~, MAILLST+40, MAILLST+41, MAILLST+42, MAILLST+44 , MAILLST+45, MAILLST+46, MAILLST+49, MAILLST+50, MAILLST+51, BAD+3, BAD+4, BAD+5, BAD+6, BAD+8 , BAD+9, BAD+12, BAD+13*, BAD+14
>> DGQUIET	MAIL+28, MAILLST+27
DT	MAIL+11, MAIL+13, MAIL+16, MAIL+17, MAIL+51, MAILLST+19, MAILLST+20
DUZ	MAIL+52, BAD+15
FIELD	DDNAME~, DDNAME+2
FILE	DDNAME~, DDNAME+2
SCB	MAIL+4~, MAIL+11, MAIL+13, MAIL+16, MAIL+18, MAIL+22, MAILLST+13~, MAILLST+17, MAILLST+19*, MAILLST+22
SCB2	MAIL+4~, MAIL+17*, MAIL+18
SCBADTM	MAILLST~, BAD, BAD+4
SCDATE	MAILLST~, MAILLST+22, MAILLST+23, MAILLST+31
SCDELTEM	MAILLST+13~, MAILLST+15*, QTMULT
>> SCDETAIL	MAILLST+51, BAD+14
SCE	MAIL+4~, MAIL+11, MAIL+13, MAIL+16, MAIL+19, MAIL+23, MAILLST+13~, MAILLST+18, MAILLST+20*, MAILLST+23
SCE2	MAIL+4~, MAIL+17*, MAIL+19
SCFIELDA	MAILLST~, MAILLST+16, MAILLST+34
SCFIELDA(	MAILLST+17, MAILLST+18, MAILLST+35, MAILLST+36
SCFILE	TEXT~, TEXT+15, TEXT+18
SCFLD	MAIL+40, MAIL+45, TEXT+8~, TEXT+12, TEXT+15, TEXT+18, MAILLST+13~, MAILLST+35, MAILLST+36
SCINT	TEXT+8~, TEXT+10*, TEXT+11, TEXT+18
SCLAB	TEXT~, TEXT+14, TEXT+16, TEXT+17
SCLAB2	MAIL+46~, MAIL+48*, MAIL+49
SCLNCNT	MAIL+4~, MAIL+31, MAIL+51, SETLN+3, SETLN+4, MAILLST+26
SCNDX	MAILLST+13~, MAILLST+35*, MAILLST+36, MAILLST+37
SCNEWTM	MAILLST~, MAILLST+10, MAILLST+11, MAILLST+41
SCNODE	MAIL+4~, TEXT~, TEXT+10, MAILLST+13~, MAILLST+36*, MAILLST+37
>> SCNOMAIL	MAIL+2, MAILLST+9
SCOK	MAILLST+13~, MAILLST+28, MAILLST+42, BAD+5*
SCOLDTM	MAILLST~
SCPAD	MAIL+4~
SCPC	TEXT~, TEXT+10, TEXT+12
SCPHONE	MAIL+4~
SCPTNM	MAIL+4~, MAIL+30, MAIL+31, MAILLST+13~, MAILLST+44, MAILLST+45, MAILLST+46, MAILLST+47, MAILLST+48, MAILLST+50 , BAD+6, BAD+8, BAD+9, BAD+10, BAD+11*, BAD+13
>> SCPTTMAF	MAIL+13, MAIL+17, MAIL+25, MAIL+36, MAIL+49
>> SCPTTMB4	MAIL+11, MAIL+16, MAIL+25, MAIL+41, MAIL+47
SCSPACE	MAIL+4~, MAIL+6, MAIL+36, MAIL+41, MAIL+43, MAIL+47, MAIL+49, MAIL+50, TEXT~, TEXT+16 , TEXT+17, MAILLST+13~, MAILLST+21, MAILLST+37
SCSTAT	MAIL+4~, MAIL+11, MAIL+13, MAIL+15*, MAIL+21, MAIL+25, MAIL+28, MAIL+31, MAIL+32, MAIL+37 , MAIL+42
SCTM	MAILLST~, MAILLST+25, MAILLST+29, MAILLST+45, MAILLST+46, MAILLST+48, MAILLST+50, MAILLST+51, BAD+8, BAD+9 , BAD+11, BAD+13, BAD+14, QTMULT
>> SCTMAF	MAIL+9, MAIL+10, MAIL+13, MAIL+14, MAIL+17
SCTMAR	MAIL+4~
SCTMAR(	MAIL+8, MAIL+9
>> SCTMB4	MAIL+8, MAIL+11, MAIL+12, MAIL+14, MAIL+16
SCTMDT	MAIL+4~, MAILLST+13~
SCTMDT("BEGIN"	MAIL+18, MAIL+22, MAILLST+22*
SCTMDT("END"	MAIL+19, MAIL+23, MAILLST+23*
SCTMDT("INCL"	MAIL+20, MAIL+24, MAILLST+24*
SCTMNM	MAILLST+13~, MAILLST+25, MAILLST+26, MAILLST+29, MAILLST+30
SCTMXM	MAIL+4~
SCX	MAIL+3~, MAIL+35, MAIL+36, MAIL+40, MAIL+41, MAIL+45, MAIL+47, MAIL+49, TEXT+8~, TEXT+9 , TEXT+15, TEXT+16, TEXT+17, TEXT+18, TEXT+20*, QTTXT, DDNAME+1~
SCX("LABEL"	DDNAME+3
SCY	MAIL+4~, MAIL+46~, MAIL+47*, MAIL+48, MAIL+50
SCZ	MAIL+46~, MAIL+49*, MAIL+50
TEXT	SETLN~, SETLN+1, SETLN+4
U	MAIL+11, MAIL+13, MAIL+16, MAIL+17, MAIL+30, TEXT+10, MAILLST+25, MAILLST+29, MAILLST+36, MAILLST+44 , BAD+6
VA	MAIL+3~, MAILLST+12~
VA("BID"	MAIL+31
VA("PID"	TEXT+20, MAILLST+45, BAD+8
VAERR	MAIL+3~, MAILLST+12~
XMDUZ	MAIL+3~, MAIL+52, MAIL+53, MAILLST+12~, BAD+15
XMSUB	MAIL+3~, MAIL+31, MAILLST+12~, MAILLST+26
XMTEXT	MAIL+3~, MAIL+31, MAILLST+12~, MAILLST+26
XMY	MAIL+3~, MAILLST+12~
XMY(	MAIL+53*
XMZ	MAIL+3~, MAILLST+12~
Y	MAIL+3~, MAILLST+12~, MAILLST+31*, MAILLST+32
ZTQUEUED	MAIL+3~, MAIL+5, MAILLST+12~, MAILLST+14

Customize PDF page

Package: Scheduling

Routine: SCMCTMM

Call Graph Total: 7

Caller Graph Total: 4