Routine: SDWLIFT3

Information

SDWLIFT3 ;IOFO BAY PINES/OG - INTER-FACILITY TRANSFER: NEW TRANSFER ; Compiled March 23, 2005 11:15:27 ; Compiled April 16, 2007 10:52:44

Source Information

Source file <SDWLIFT3.m>

Call Graph

Call Graph Total: 12

Package	Total	Call Graph
VA Fileman	7	NOW^%DTC (,LIST)^DIC FILE^DICN ^DIE ($$GET1,GETS)^DIQ ^DIR EN^DIWE
Registration	3	(ADD,DEM)^VADPT FULL^VALM1 $$SITE^VASITE
MailMan	1	^XMD
Scheduling	1	($$GETTRN,INIT)^SDWLIFT1

Entry Points

Name	Comments	DBIA/ICR reference
MSG	;acknowledgement notification to destination
ISEWL2(SDWLDA,DFN)	; If the EWL entry exists, is not closed, is a team or team position assignment and not already in transit.
EN	; INITIALIZE VARIABLES
EN2(SDWLDA)	; Entry point if Wait List has been selected elsewhere. ; SDWLOPT is the option to be queried. ; 1: Patient & Wait List Entry ; 2: Institution ; 3: Comments ; 4: Processing ; 5: Confirmation
ISEWL(DFN)	; Filter for seach of PATIENT file ; OG ; SD5.3446

External References

Name	Field # of Occurrence
NOW^%DTC	EN2+82, MSG+7
^DIC	EN2+17, EN2+59
LIST^DIC	EN2+20
FILE^DICN	EN2+78, EN2+81
^DIE	EN2+84, MSG+43, MSG+45
$$GET1^DIQ	EN2+26, EN2+41, EN2+43, EN2+46, EN2+54, EN2+61, EN2+83, MSG+8, MSG+32, MSG+33 , MSG+38
GETS^DIQ	ISEWL2+3, MSG+9, MSG+13
^DIR	EN2+35, EN2+47, EN2+75
EN^DIWE	EN2+69
$$GETTRN^SDWLIFT1	ISEWL2+5
INIT^SDWLIFT1	EN+4
ADD^VADPT	MSG+12
DEM^VADPT	MSG+12
FULL^VALM1	EN+2
$$SITE^VASITE	MSG+19
^XMD	MSG+41

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"This Institution does not have a Domain to which the request can be sent." Line Location: EN2+62
Routine Call	DIC Line Location: EN2+20
Routine Call	DIE Line Location: EN2+84 MSG+43 MSG+45
Routine Call	DIC Line Location: EN2+17 EN2+59
Routine Call	DIR Line Location: EN2+35 EN2+47 EN2+75

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ, GETS^DIQ
^DIC(4 - [#4]	GET1^DIQ
^SDWL(409.3 - [#409.3]	GET1^DIQ, GETS^DIQ, LIST^DIC
^SDWL(409.35 - [#409.35]	GET1^DIQ
^SDWL(409.36 - [#409.36]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^SDWL(409.3 - [#409.3]	ISEWL+3, ISEWL+5
^SDWL(409.36 - [#409.36]	EN2+39, EN2+41
^TMP("SDWLIFT"	EN2+81

Name	Line Occurrences
$$ISEWL2	ISEWL+5
EN2	EN+3
MSG	EN2+85

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EN2+12~, EN2+82, MSG+7
DA	EN2+12~, MSG+1~, MSG+43, MSG+45
DA(1	EN2+80*
DFN	EN2+14~, EN2+19, ISEWL~, ISEWL+3, ISEWL+5, ISEWL2~, ISEWL2+4, MSG+1~, MSG+10, MSG+13 , MSG+30, MSG+31, MSG+32, MSG+40
DIC	EN+1~, EN2+12~, EN2+16, EN2+55, EN2+66, EN2+68, EN2+74!, EN2+77, EN2+80
DIC("A"	EN2+57*
DIC("S"	EN2+16, EN2+58
DIC(0	EN2+16, EN2+56, EN2+77*
DIE	EN+1~, EN2+12~, EN2+83, MSG+1~, MSG+43, MSG+45*
DIR	EN+1~, EN2+12~, EN2+86!
DIR("A"	EN2+35, EN2+42, EN2+43, EN2+45, EN2+46, EN2+75
DIR("B"	EN2+75*
DIR(0	EN2+30, EN2+35, EN2+42, EN2+75
DIWETXT	EN2+12~, EN2+66*, EN2+67
DO	EN2+12~, EN2+81!
DR	EN+1~, EN2+83, MSG+1~, MSG+43, MSG+45*
DUZ	EN2+83
I	EN2+12~, EN2+21*, EN2+24, EN2+25, EN2+26, EN2+27, EN2+28, EN2+30
SDWLC	EN2+14~
SDWLDA	EN2~, EN2+9, EN2+38, EN2+39, EN2+41, EN2+54, EN2+77, ISEWL+1~, ISEWL+4, ISEWL+5 , ISEWL2~, ISEWL2+3, ISEWL2+4, ISEWL2+5, MSG+1~, MSG+8*, MSG+9, MSG+10, MSG+11, MSG+38 , MSG+39, MSG+45
SDWLDFN	EN2+12~, EN2+54*
SDWLDMN	EN2+12~, EN2+61*, EN2+62, MSG+4
SDWLDTM	EN2+73~, EN2+82, EN2+83, MSG+1~, MSG+7, MSG+36
SDWLI	EN2+14~, EN2+80, EN2+81, MSG+1~, MSG+2~, MSG+34*
SDWLIFTN	EN2+12~, EN2+40~, EN2+41, EN2+79, MSG+8, MSG+33, MSG+35, MSG+43
SDWLINST	EN2+12~, EN2+63*, EN2+83
SDWLNM	EN2+14~
SDWLOK	EN2+14~, EN2+39, EN2+48, ISEWL+1~, ISEWL+2, ISEWL+3, ISEWL+5, ISEWL+6
SDWLOPT	EN2+7~, EN2+8, EN2+9, EN2+10, EN2+11, EN2+13, EN2+18, EN2+39, EN2+50, EN2+52 , EN2+60, EN2+63, EN2+65, EN2+70, EN2+72, EN2+76, EN2+86
SDWLOPT0	EN2+7~, EN2+10*, EN2+60
SDWLOUT	EN2+14~
SDWLSTA	EN2+22~, EN2+26*, EN2+27
SDWLSTN	EN2+40~, EN2+41*, EN2+43, EN2+46
SDWLTMP	EN2+14~
SDWLTMP("DILIST"	EN2+21, EN2+24, EN2+25, EN2+26, EN2+27, EN2+35, EN2+36, EN2+38
SDWLTMP("WLTY"	EN2+26, EN2+27, EN2+28, EN2+37
SDWLTY	MSG+1~, MSG+11*, MSG+37, MSG+38
SDWLX	MSG+1~, MSG+2~
SDWLX(	MSG+15, MSG+16, MSG+17, MSG+18, MSG+19, MSG+20, MSG+21, MSG+22, MSG+23, MSG+24 , MSG+25, MSG+26, MSG+27, MSG+28, MSG+29, MSG+30, MSG+31, MSG+32, MSG+34, MSG+35 , MSG+36, MSG+37, MSG+38, MSG+39, MSG+40*
SDWLX(0	MSG+14, MSG+15, MSG+16, MSG+17, MSG+18, MSG+19, MSG+20, MSG+21, MSG+22, MSG+23 , MSG+24, MSG+25, MSG+26, MSG+27, MSG+28, MSG+29, MSG+30, MSG+31, MSG+32, MSG+34 , MSG+35, MSG+36, MSG+37, MSG+38, MSG+39, MSG+40
SDWLY	EN2+53~, EN2+61*, EN2+63
TMP	EN2+22~, EN2+23, EN2+24, EN2+28*, EN2+30, ISEWL2+1~, MSG+1~
TMP(	ISEWL2+4, ISEWL2+5, MSG+10, MSG+11, MSG+39
TMP(2	MSG+30, MSG+31, MSG+40
U	EN2+20, MSG+15, MSG+16, MSG+17, MSG+18, MSG+19, MSG+20, MSG+21, MSG+22, MSG+23 , MSG+24, MSG+25, MSG+26, MSG+27, MSG+28, MSG+29, MSG+30, MSG+31, MSG+32, MSG+34 , MSG+35, MSG+36, MSG+37, MSG+38, MSG+39, MSG+40
VADM	EN+1~
VADM(1	MSG+15
VADM(2	MSG+18
VADM(3	MSG+17
VADM(5	MSG+16
>> VALMBCK	EN+6*
VAPA	MSG+1~
VAPA(1	MSG+20
VAPA(10	MSG+28
VAPA(2	MSG+21
VAPA(3	MSG+22
VAPA(4	MSG+23
VAPA(5	MSG+24
VAPA(6	MSG+25
VAPA(7	MSG+26
VAPA(8	MSG+29
VAPA(9	MSG+27
WP	MSG+1~
WP(	MSG+34
X	EN+1~, EN2+15!, EN2+77, EN2+81, MSG+33*
XMDUZ	MSG+2~, MSG+6*
XMSUB	MSG+2~, MSG+3*
XMTEXT	MSG+2~, MSG+5*
XMY	MSG+2~
XMY("S.SDWL-XFER-SERVER@"	MSG+4*
Y	EN+1~, EN2+12~, EN2+15!, EN2+18, EN2+19, EN2+20, EN2+34*, EN2+35, EN2+36, EN2+37 , EN2+38, EN2+60, EN2+61, EN2+76, EN2+79, EN2+80

Customize PDF page

Package: Scheduling

Routine: SDWLIFT3

Information

Source Information

Call Graph

Call Graph Total: 12

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: