Routine: SD132PT

Information

SD132PT ;ALB/MJK - Patch SD*5.3*132 Post-Init Routine ; 11/5/97

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
Kernel	4	(,$$S)^%ZTLOAD ($$FMTE,$$NOW)^XLFDT OUT^XPDMENU (BMES,MES)^XPDUTL
VA Fileman	3	FIELD^DID (,FILE)^DIE ^DIK
MailMan	1	^XMD

Entry Points

Name	Comments	DBIA/ICR reference
LINE(TEXT)	; -- add line of text
MAS	; -- delete MAS PARAMETERS (#43) fields and related data
EN	; --- main entry point
ACG	; -- update new computer generated appt type related fields in ; OUTPATIENT ENCOUNTER (#409.68) with data for ^SDV data
MASQ
AG	; -- queue job to set 'AG' xref and related fields
LOGQ
OVER	; -- post override flag information
AGQUE	; -- TaskMan entry point to queue 'AG' setting
FLDS	; -- fields to be deleted [ file# ^ field# ^ field label ]
HLQ
BUILDR(SDD,SDARY)	; -- build array of fields to delete
MSG(SDFLD,SDNAME)	; -- tell user (use kids call??)
HL	; -- delete HOSPITIAL LOCATION (#44) fields and related data
BULL	; -- send message indicating 'AG' xref is set and option enabled
DELDD(SDD)	; -- tool to delete fields dd ; -- delete dd
LABEL(SDFILE,SDFLD)	; -- get label if not deleted
LOG	; -- delete APPOINTMENT STATUS UPDATE LOG (#409.65) fields and related data

External References

Name	Field # of Occurrence
^%ZTLOAD	AG+14
$$S^%ZTLOAD	AGQUE+9
FIELD^DID	LABEL+2
^DIE	ACG+20, AGQUE+18
FILE^DIE	MAS+15, HL+17, LOG+17
^DIK	DELDD+16
$$FMTE^XLFDT	BULL+5, BULL+6
$$NOW^XLFDT	AG+12, AGQUE+5, AGQUE+21
^XMD	BULL+29
OUT^XPDMENU	AG+5, BULL+14
BMES^XPDUTL	EN+2, EN+7, MAS+3, HL+3, LOG+3, ACG+3, AG+3, OVER+3
MES^XPDUTL	MASQ, HLQ, LOGQ, ACG+22, AG+6, AG+15, AG+16, OVER+7, OVER+10, OVER+11 , DELDD+20, MSG+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^SCE - [#409.68]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^SC - [#44]	HL+12
^SCE - [#409.68]	ACG+15, ACG+16, AGQUE+15
^SDD(409.65 - [#409.65]	LOG+12
^SDV - [#409.5]	ACG+10, ACG+11, AGQUE+11, AGQUE+12
^SDV("ACG"	ACG+8, ACG+9
^SDV("AG"	AGQUE+9, AGQUE+10
^XTMP("SD5.3132 OVERRIDE FLAGS"	OVER+6

Label References

Name	Line Occurrences
$$LABEL	BUILDR+9, DELDD+14
ACG	EN+5
AG	EN+5
BUILDR	MAS+6, HL+6, LOG+6
BULL	AGQUE+23
DELDD	MAS+18, HL+20, LOG+20
HL	EN+5
HLQ	HL+8
LINE	BULL+4, BULL+5, BULL+6, BULL+7, BULL+11, BULL+17, BULL+18, BULL+19, BULL+21, BULL+22
LOG	EN+5
LOGQ	LOG+8
MAS	EN+5
MASQ	MAS+8
MSG	DELDD+17
OVER	EN+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	ACG+6~, ACG+20, AGQUE+2~, AGQUE+18, DELDD+15~, DELDD+16*
DA(1	DELDD+16*
DIE	ACG+6~, ACG+20, AGQUE+2~, AGQUE+18
DIK	DELDD+15~, DELDD+16*
DR	ACG+6~, ACG+17, ACG+18, ACG+19, AGQUE+2~, AGQUE+16, AGQUE+17*
DUZ	AG+2
SDAPPT	ACG+6~, ACG+12*, ACG+16
SDARY	MAS+1~, MAS+6, HL+1~, HL+6, LOG+1~, LOG+6, BUILDR~
SDARY(	MAS+13, HL+15, LOG+15, BUILDR+10*
SDARY(0	MAS+8, HL+8, LOG+8
SDATE	ACG+6~, ACG+7, ACG+8, ACG+9, ACG+10, ACG+11, AGQUE+2~, AGQUE+8, AGQUE+9, AGQUE+10 , AGQUE+11, AGQUE+12
SDBEG	AGQUE+2~, AGQUE+5*, BULL+5
SDCG	ACG+6~, ACG+11, ACG+18, AGQUE+2~, AGQUE+12, AGQUE+15
SDCNT	BULL+1~, BULL+2, OVER+1~, OVER+5, OVER+8, OVER+10, LINE+1, LINE+2, DELDD+2~, DELDD+4* , DELDD+18*, DELDD+20
SDCS	ACG+6~, ACG+9, ACG+10, ACG+11, AGQUE+2~, AGQUE+10, AGQUE+11, AGQUE+12
SDCS0	ACG+6~, ACG+10, ACG+12, ACG+13, ACG+14, AGQUE+2~, AGQUE+11, AGQUE+13, AGQUE+14
SDD	BUILDR~, BUILDR+9, DELDD~, DELDD+14, DELDD+16
SDEND	AGQUE+2~, AGQUE+21*, BULL+6
SDENDFLG	BUILDR+1~, BUILDR+2, BUILDR+4, DELDD+2~, DELDD+3, DELDD+7
SDFDA	MAS+11~, HL+13~, LOG+13~
SDFDA(	LOG+16*
SDFDA(43	MAS+14*
SDFDA(44	HL+16*
SDFILE	BUILDR+5~, BUILDR+6, BUILDR+9, DELDD+8~, DELDD+9, DELDD+14, LABEL~, LABEL+2
SDFLD	MAS+11~, MAS+12, MAS+13, MAS+14, HL+13~, HL+14, HL+15, HL+16, LOG+13~, LOG+14* , LOG+15, LOG+16, BUILDR+5~, BUILDR+7, BUILDR+9, BUILDR+10, DELDD+8~, DELDD+10*, DELDD+14, DELDD+16 , DELDD+17, LABEL~, LABEL+2, MSG~, MSG+1
SDI	BUILDR+1~, BUILDR+4, DELDD+2~, DELDD+7
>> SDIEN	HL+11, HL+12, HL+16, LOG+11, LOG+12, LOG+16
SDNAME	BUILDR+8, BUILDR+9, DELDD+8~, DELDD+11, DELDD+14, DELDD+17, MSG~, MSG+1
SDOE	ACG+6~, ACG+14, ACG+15, ACG+16, ACG+20, AGQUE+2~, AGQUE+13, AGQUE+15, AGQUE+18
SDOE0	ACG+6~, ACG+15*, ACG+16
SDPKG	OVER+1~, OVER+5, OVER+6, OVER+7
SDREASON	ACG+6~, ACG+13, ACG+19, AGQUE+2~, AGQUE+14, AGQUE+17
SDSTOP	AGQUE+2~, AGQUE+9*, BULL+10
SDTEXT	BULL+1~
SDTEXT(	LINE+2*
SDTOT	AGQUE+2~, AGQUE+4, AGQUE+19, BULL+22
SDUZ	AG+1~, AG+2*, BULL+28
SDX	BUILDR+1~, BUILDR+4, BUILDR+6, BUILDR+7, BUILDR+8, DELDD+2~, DELDD+7, DELDD+9, DELDD+10, DELDD+11
SDY	LABEL+1~
SDY("LABEL"	LABEL+3
TEXT	LINE~, LINE+2
U	EN+1*, ACG+12, ACG+13, ACG+14, ACG+16, AGQUE+13, AGQUE+14, BUILDR+7, BUILDR+8, DELDD+10 , DELDD+11
>> X	AG+13*
XMDUZ	BULL+1~, BULL+27*
XMN	BULL+1~, BULL+25*
XMSUB	BULL+1~, BULL+24*
XMTEXT	BULL+1~, BULL+26*
XMY	BULL+1~
XMY(	BULL+28*
ZTDESC	AG+1~, AG+11*
ZTDTH	AG+1~, AG+12*
ZTIO	AG+1~, AG+9*
ZTRTN	AG+1~, AG+10*
ZTSAVE	AG+1~
ZTSAVE(	AG+13*
ZTSK	AG+1~, AG+15

Marked Items

Name	Field # of Occurrence
$T(FLDS+SDI	BUILDR+4, DELDD+7

Customize PDF page

Package: Scheduling

Routine: SD132PT

Information

Source Information

Call Graph

Call Graph Total: 8

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items